public inbox for devel@edk2.groups.io
 help / color / mirror / Atom feed
From: "Michael D Kinney" <michael.d.kinney@intel.com>
To: "Wang, Jian J" <jian.j.wang@intel.com>,
	"devel@edk2.groups.io" <devel@edk2.groups.io>,
	"Kinney, Michael D" <michael.d.kinney@intel.com>
Cc: "Lu, XiaoyuX" <xiaoyux.lu@intel.com>
Subject: Re: [Patch 3/5] CryptoPkg/Driver: Add Crypto PEIM, DXE, and SMM modules
Date: Wed, 5 Feb 2020 01:38:35 +0000	[thread overview]
Message-ID: <E92EE9817A31E24EB0585FDF735412F5B9E86C91@ORSMSX113.amr.corp.intel.com> (raw)
In-Reply-To: <D827630B58408649ACB04F44C510003625A07558@SHSMSX107.ccr.corp.intel.com>

Jian,

I agree with all the feedback below.  I will update in V7.

Mike

> -----Original Message-----
> From: Wang, Jian J <jian.j.wang@intel.com>
> Sent: Tuesday, February 4, 2020 12:16 AM
> To: Kinney, Michael D <michael.d.kinney@intel.com>;
> devel@edk2.groups.io
> Cc: Lu, XiaoyuX <xiaoyux.lu@intel.com>
> Subject: RE: [Patch 3/5] CryptoPkg/Driver: Add Crypto
> PEIM, DXE, and SMM modules
> 
> Mike,
> 
> 
> > -----Original Message-----
> > From: Kinney, Michael D <michael.d.kinney@intel.com>
> > Sent: Thursday, January 30, 2020 3:01 PM
> > To: devel@edk2.groups.io
> > Cc: Wang, Jian J <jian.j.wang@intel.com>; Lu, XiaoyuX
> <xiaoyux.lu@intel.com>
> > Subject: [Patch 3/5] CryptoPkg/Driver: Add Crypto
> PEIM, DXE, and SMM modules
> >
> > https://bugzilla.tianocore.org/show_bug.cgi?id=2420
> >
> > Based on the following package with changes to merge
> into
> > CryptoPkg.
> >
> >
> https://github.com/microsoft/mu_plus/tree/dev/201908/Sh
> aredCryptoPkg
> >
> > Add the CryptoPei, CryptoDxe, and CryptoSmm modules
> that produce
> > EDK II Crypto Protocols/PPIs that provide the same
> services as
> > the BaseCryptLib class.
> >
> > In order to optimize the size of CryptoPei,
> CryptoDxe, and
> > CryptoSmm modules for a specific platform, the
> FixedAtBuild
> > PCD
> gEfiCryptoPkgTokenSpaceGuid.PcdCryptoServiceFamilyEnabl
> e
> > is used to determine if a specific service is enabled
> or
> > disabled.  If a service is enabled, then a call is
> made to
> > the BaseCryptLib service.  If the service is
> disabled, then
> > a DEBUG() message and ASSERT() are performed and a
> default
> > return value is returned.  This provides simple
> detection
> > of a service that is disabled but is used by another
> module
> > when DEBUG()/ASSERT() macros are enabled.
> >
> > The use of a FixedAtBuild PCD is required so the
> compiler
> > and linker know each services enable/disable setting
> at
> > build time and allows disabled services to be
> optimized away.
> >
> > CryptoPei supports both pre-mem and post-mem use
> cases.
> > If CryptoPei is initially dispatched pre-mmem, the
> the
> > register for shadow service is used so the Crypto PPI
> can
> > be reinstalled post-mem.
> >
> > Cc: Jian J Wang <jian.j.wang@intel.com>
> > Cc: Xiaoyu Lu <xiaoyux.lu@intel.com>
> > Signed-off-by: Michael D Kinney
> <michael.d.kinney@intel.com>
> > ---
> >  CryptoPkg/Driver/Crypto.c      | 4582
> ++++++++++++++++++++++++++++++++
> >  CryptoPkg/Driver/Crypto.uni    |   13 +
> >  CryptoPkg/Driver/CryptoDxe.c   |   38 +
> >  CryptoPkg/Driver/CryptoDxe.inf |   49 +
> >  CryptoPkg/Driver/CryptoPei.c   |   99 +
> >  CryptoPkg/Driver/CryptoPei.inf |   51 +
> >  CryptoPkg/Driver/CryptoSmm.c   |   41 +
> >  CryptoPkg/Driver/CryptoSmm.inf |   49 +
> >  8 files changed, 4922 insertions(+)
> >  create mode 100644 CryptoPkg/Driver/Crypto.c
> >  create mode 100644 CryptoPkg/Driver/Crypto.uni
> >  create mode 100644 CryptoPkg/Driver/CryptoDxe.c
> >  create mode 100644 CryptoPkg/Driver/CryptoDxe.inf
> >  create mode 100644 CryptoPkg/Driver/CryptoPei.c
> >  create mode 100644 CryptoPkg/Driver/CryptoPei.inf
> >  create mode 100644 CryptoPkg/Driver/CryptoSmm.c
> >  create mode 100644 CryptoPkg/Driver/CryptoSmm.inf
> >
> > diff --git a/CryptoPkg/Driver/Crypto.c
> b/CryptoPkg/Driver/Crypto.c
> > new file mode 100644
> > index 0000000000..eec2f55f80
> > --- /dev/null
> > +++ b/CryptoPkg/Driver/Crypto.c
> > @@ -0,0 +1,4582 @@
> > +/** @file
> > +  Implements the EDK II Crypto Protocol/PPI services
> using the library services
> > +  from BaseCryptLib and TlsLib.
> > +
> > +  Copyright (C) Microsoft Corporation. All rights
> reserved.
> > +  Copyright (c) 2019 - 2020, Intel Corporation. All
> rights reserved.<BR>
> > +  SPDX-License-Identifier: BSD-2-Clause-Patent
> > +
> > +**/
> > +#include <Base.h>
> > +#include <Library/DebugLib.h>
> > +#include <Library/BaseCryptLib.h>
> > +#include <Library/TlsLib.h>
> > +#include <Protocol/Crypto.h>
> > +#include <Pcd/PcdCryptoServiceFamilyEnable.h>
> > +
> > +/**
> > +  A macro used to retrieve the FixedAtBuild
> PcdCryptoServiceFamilyEnable with
> > a
> > +  typcast to its associcted structure type
> > PCD_CRYPTO_SERVICE_FAMILY_ENABLE.
> 
> Typos: typcase -> typecast, associcted -> associated
> 
> > +**/
> > +#define EDKII_CRYPTO_PCD ((const
> PCD_CRYPTO_SERVICE_FAMILY_ENABLE *)
> > \
> > +  (FixedPcdGetPtr (PcdCryptoServiceFamilyEnable)))
> > +
> > +/**
> > +  A macro used to call a non-void BaseCryptLib
> function if it is enabled.
> > +
> > +  If a BaseCryptLib function is not enabled, there
> will be no references to it
> > +  from this module and will be optimized away
> reducing the size of this module.
> > +
> > +  @param  Enable            The name of the enable
> field in PCD
> > +
> PcdCryptoServiceFamilyEnable for the BaseCryptLib
> > +                            function being called.
> If the value of this field
> > +                            is non-zero, then the
> BaseCryptLib function is
> > +                            enabled.
> > +  @param  Function          The name of the
> BaseCryptLib function.
> > +  @param  Args              The argument list to
> pass to Function.
> > +  @param  ErrorReturnValue  The value to return if
> the BaseCryptLib function is
> > +                            not enabled.
> > +
> > +**/
> > +#define CALL_BASECRYPTLIB(Enable, Function, Args,
> ErrorReturnValue) \
> > +  EDKII_CRYPTO_PCD->Enable
> \
> > +    ? Function Args
> \
> > +    : (BaseCryptLibServciceNotEnabled (#Function),
> ErrorReturnValue)
> > +
> > +/**
> > +  A macro used to call a void BaseCryptLib function
> if it is enabled.
> > +
> > +  If a BaseCryptLib function is not enabled, there
> will be no references to it
> > +  from this module and will be optimized away
> reducing the size of this module.
> > +
> > +  @param  Enable            The name of the enable
> field in PCD
> > +
> PcdCryptoServiceFamilyEnable for the BaseCryptLib
> > +                            function being called.
> If the value of this field
> > +                            is non-zero, then the
> BaseCryptLib function is
> > +                            enabled.
> > +  @param  Function          The name of the
> BaseCryptLib function.
> > +  @param  Args              The argument list to
> pass to Function.
> > +
> > +**/
> > +#define CALL_VOID_BASECRYPTLIB(Enable, Function,
> Args)  \
> > +  EDKII_CRYPTO_PCD->Enable
> \
> > +    ? Function Args
> \
> > +    : BaseCryptLibServciceNotEnabled (#Function)
> > +
> > +/**
> > +  Internal worker function that prints a debug
> message and asserts if a call is
> > +  made to a BaseCryptLib function that is not
> enabled in the EDK II Crypto
> > +  Protocol/PPI.
> > +
> > +  If this debug message and assert are observed,
> then a module is using
> > +  BaseCryptLib function that is not enabled in a
> Crypto driver.  The
> > +  PcdCryptoServiceFamilyEnable should be updated to
> enable the missing
> > service.
> > +
> > +  @param[in]  FunctionName  Null-termnated ASCII
> string that is the name of
> > an
> 
> Typo: termnated -> terminated
> 
> Regards,
> Jian
> 
> > +                            EDK II Crypto service.
> > +
> > +**/
> > +static
> > +VOID
> > +BaseCryptLibServciceNotEnabled (
> > +  IN CONST CHAR8  *FunctionName
> > +  )
> > +{
> > +  DEBUG ((DEBUG_ERROR, "[%a] Function %a() is not
> enabled\n",
> > gEfiCallerBaseName, FunctionName));
> > +  ASSERT_EFI_ERROR (EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Returns the version of the EDK II Crypto Protocol.
> > +
> > +  @return  The version of the EDK II Crypto
> Protocol.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceGetCryptoVersion (
> > +  VOID
> > +  )
> > +{
> > +  return EDKII_CRYPTO_VERSION;
> > +}
> > +
> >
> +//====================================================
> ==========
> > =======================
> > +//    One-Way Cryptographic Hash Primitives
> >
> +//====================================================
> ==========
> > =======================
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for MD4 hash
> > operations.
> > +
> > +  If this interface is not supported, then return
> zero.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for MD4 hash
> > operations.
> > +  @retval  0   This interface is not supported.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceMd4GetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Md4.Services.GetContextSize,
> > Md4GetContextSize, (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory pointed by
> Md4Context as MD4 hash context
> > for
> > +  subsequent use.
> > +
> > +  If Md4Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  Md4Context  Pointer to MD4 context
> being initialized.
> > +
> > +  @retval TRUE   MD4 context initialization
> succeeded.
> > +  @retval FALSE  MD4 context initialization failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd4Init (
> > +  OUT  VOID  *Md4Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md4.Services.Init,
> Md4Init, (Md4Context), FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing MD4 context.
> > +
> > +  If Md4Context is NULL, then return FALSE.
> > +  If NewMd4Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Md4Context     Pointer to MD4 context
> being copied.
> > +  @param[out] NewMd4Context  Pointer to new MD4
> context.
> > +
> > +  @retval TRUE   MD4 context copy succeeded.
> > +  @retval FALSE  MD4 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd4Duplicate (
> > +  IN   CONST VOID  *Md4Context,
> > +  OUT  VOID        *NewMd4Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md4.Services.Duplicate,
> Md4Duplicate,
> > (Md4Context, NewMd4Context), FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates MD4 context.
> > +
> > +  This function performs MD4 digest on a data buffer
> of the specified size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  MD4 context should be already correctly
> initialized by Md4Init(), and should
> > not be finalized
> > +  by Md4Final(). Behavior with invalid context is
> undefined.
> > +
> > +  If Md4Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  Md4Context  Pointer to the MD4
> context.
> > +  @param[in]       Data        Pointer to the buffer
> containing the data to be
> > hashed.
> > +  @param[in]       DataSize    Size of Data buffer
> in bytes.
> > +
> > +  @retval TRUE   MD4 data digest succeeded.
> > +  @retval FALSE  MD4 data digest failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd4Update (
> > +  IN OUT  VOID        *Md4Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md4.Services.Update,
> Md4Update, (Md4Context,
> > Data, DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the MD4 digest value.
> > +
> > +  This function completes MD4 hash computation and
> retrieves the digest value
> > into
> > +  the specified memory. After this function has been
> called, the MD4 context
> > cannot
> > +  be used again.
> > +  MD4 context should be already correctly
> initialized by Md4Init(), and should
> > not be
> > +  finalized by Md4Final(). Behavior with invalid MD4
> context is undefined.
> > +
> > +  If Md4Context is NULL, then return FALSE.
> > +  If HashValue is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  Md4Context  Pointer to the MD4
> context.
> > +  @param[out]      HashValue   Pointer to a buffer
> that receives the MD4 digest
> > +                               value (16 bytes).
> > +
> > +  @retval TRUE   MD4 digest computation succeeded.
> > +  @retval FALSE  MD4 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd4Final (
> > +  IN OUT  VOID   *Md4Context,
> > +  OUT     UINT8  *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md4.Services.Final,
> Md4Final, (Md4Context,
> > HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Computes the MD4 message digest of a input data
> buffer.
> > +
> > +  This function performs the MD4 message digest of a
> given data buffer, and
> > places
> > +  the digest value into the specified memory.
> > +
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   Data        Pointer to the buffer
> containing the data to be hashed.
> > +  @param[in]   DataSize    Size of Data buffer in
> bytes.
> > +  @param[out]  HashValue   Pointer to a buffer that
> receives the MD4 digest
> > +                           value (16 bytes).
> > +
> > +  @retval TRUE   MD4 digest computation succeeded.
> > +  @retval FALSE  MD4 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd4HashAll (
> > +  IN   CONST VOID  *Data,
> > +  IN   UINTN       DataSize,
> > +  OUT  UINT8       *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md4.Services.HashAll,
> Md4HashAll, (Data,
> > DataSize, HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for MD5 hash
> > operations.
> > +
> > +  If this interface is not supported, then return
> zero.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for MD5 hash
> > operations.
> > +  @retval  0   This interface is not supported.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceMd5GetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Md5.Services.GetContextSize,
> > Md5GetContextSize, (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory pointed by
> Md5Context as MD5 hash context
> > for
> > +  subsequent use.
> > +
> > +  If Md5Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  Md5Context  Pointer to MD5 context
> being initialized.
> > +
> > +  @retval TRUE   MD5 context initialization
> succeeded.
> > +  @retval FALSE  MD5 context initialization failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd5Init (
> > +  OUT  VOID  *Md5Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md5.Services.Init,
> Md5Init, (Md5Context), FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing MD5 context.
> > +
> > +  If Md5Context is NULL, then return FALSE.
> > +  If NewMd5Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Md5Context     Pointer to MD5 context
> being copied.
> > +  @param[out] NewMd5Context  Pointer to new MD5
> context.
> > +
> > +  @retval TRUE   MD5 context copy succeeded.
> > +  @retval FALSE  MD5 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd5Duplicate (
> > +  IN   CONST VOID  *Md5Context,
> > +  OUT  VOID        *NewMd5Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md5.Services.Duplicate,
> Md5Duplicate,
> > (Md5Context, NewMd5Context), FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates MD5 context.
> > +
> > +  This function performs MD5 digest on a data buffer
> of the specified size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  MD5 context should be already correctly
> initialized by Md5Init(), and should
> > not be finalized
> > +  by Md5Final(). Behavior with invalid context is
> undefined.
> > +
> > +  If Md5Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  Md5Context  Pointer to the MD5
> context.
> > +  @param[in]       Data        Pointer to the buffer
> containing the data to be
> > hashed.
> > +  @param[in]       DataSize    Size of Data buffer
> in bytes.
> > +
> > +  @retval TRUE   MD5 data digest succeeded.
> > +  @retval FALSE  MD5 data digest failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd5Update (
> > +  IN OUT  VOID        *Md5Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md5.Services.Update,
> Md5Update, (Md5Context,
> > Data, DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the MD5 digest value.
> > +
> > +  This function completes MD5 hash computation and
> retrieves the digest value
> > into
> > +  the specified memory. After this function has been
> called, the MD5 context
> > cannot
> > +  be used again.
> > +  MD5 context should be already correctly
> initialized by Md5Init(), and should
> > not be
> > +  finalized by Md5Final(). Behavior with invalid MD5
> context is undefined.
> > +
> > +  If Md5Context is NULL, then return FALSE.
> > +  If HashValue is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  Md5Context  Pointer to the MD5
> context.
> > +  @param[out]      HashValue   Pointer to a buffer
> that receives the MD5 digest
> > +                               value (16 bytes).
> > +
> > +  @retval TRUE   MD5 digest computation succeeded.
> > +  @retval FALSE  MD5 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd5Final (
> > +  IN OUT  VOID   *Md5Context,
> > +  OUT     UINT8  *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md5.Services.Final,
> Md5Final, (Md5Context,
> > HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Computes the MD5 message digest of a input data
> buffer.
> > +
> > +  This function performs the MD5 message digest of a
> given data buffer, and
> > places
> > +  the digest value into the specified memory.
> > +
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   Data        Pointer to the buffer
> containing the data to be hashed.
> > +  @param[in]   DataSize    Size of Data buffer in
> bytes.
> > +  @param[out]  HashValue   Pointer to a buffer that
> receives the MD5 digest
> > +                           value (16 bytes).
> > +
> > +  @retval TRUE   MD5 digest computation succeeded.
> > +  @retval FALSE  MD5 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceMd5HashAll (
> > +  IN   CONST VOID  *Data,
> > +  IN   UINTN       DataSize,
> > +  OUT  UINT8       *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Md5.Services.HashAll,
> Md5HashAll, (Data,
> > DataSize, HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for SHA-1 hash
> > operations.
> > +
> > +  If this interface is not supported, then return
> zero.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for SHA-1 hash
> > operations.
> > +  @retval  0   This interface is not supported.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceSha1GetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Sha1.Services.GetContextSize,
> > Sha1GetContextSize, (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory pointed by
> Sha1Context as SHA-1 hash
> > context for
> > +  subsequent use.
> > +
> > +  If Sha1Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  Sha1Context  Pointer to SHA-1 context
> being initialized.
> > +
> > +  @retval TRUE   SHA-1 context initialization
> succeeded.
> > +  @retval FALSE  SHA-1 context initialization
> failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha1Init (
> > +  OUT  VOID  *Sha1Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha1.Services.Init,
> Sha1Init, (Sha1Context),
> > FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing SHA-1 context.
> > +
> > +  If Sha1Context is NULL, then return FALSE.
> > +  If NewSha1Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Sha1Context     Pointer to SHA-1
> context being copied.
> > +  @param[out] NewSha1Context  Pointer to new SHA-1
> context.
> > +
> > +  @retval TRUE   SHA-1 context copy succeeded.
> > +  @retval FALSE  SHA-1 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha1Duplicate (
> > +  IN   CONST VOID  *Sha1Context,
> > +  OUT  VOID        *NewSha1Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha1.Services.Duplicate,
> Sha1Duplicate,
> > (Sha1Context, NewSha1Context), FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates SHA-1 context.
> > +
> > +  This function performs SHA-1 digest on a data
> buffer of the specified size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  SHA-1 context should be already correctly
> initialized by Sha1Init(), and should
> > not be finalized
> > +  by Sha1Final(). Behavior with invalid context is
> undefined.
> > +
> > +  If Sha1Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  Sha1Context  Pointer to the SHA-1
> context.
> > +  @param[in]       Data         Pointer to the
> buffer containing the data to be
> > hashed.
> > +  @param[in]       DataSize     Size of Data buffer
> in bytes.
> > +
> > +  @retval TRUE   SHA-1 data digest succeeded.
> > +  @retval FALSE  SHA-1 data digest failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha1Update (
> > +  IN OUT  VOID        *Sha1Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha1.Services.Update,
> Sha1Update,
> > (Sha1Context, Data, DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the SHA-1 digest value.
> > +
> > +  This function completes SHA-1 hash computation and
> retrieves the digest
> > value into
> > +  the specified memory. After this function has been
> called, the SHA-1 context
> > cannot
> > +  be used again.
> > +  SHA-1 context should be already correctly
> initialized by Sha1Init(), and should
> > not be
> > +  finalized by Sha1Final(). Behavior with invalid
> SHA-1 context is undefined.
> > +
> > +  If Sha1Context is NULL, then return FALSE.
> > +  If HashValue is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  Sha1Context  Pointer to the SHA-1
> context.
> > +  @param[out]      HashValue    Pointer to a buffer
> that receives the SHA-1
> > digest
> > +                                value (20 bytes).
> > +
> > +  @retval TRUE   SHA-1 digest computation succeeded.
> > +  @retval FALSE  SHA-1 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha1Final (
> > +  IN OUT  VOID   *Sha1Context,
> > +  OUT     UINT8  *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha1.Services.Final,
> Sha1Final, (Sha1Context,
> > HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Computes the SHA-1 message digest of a input data
> buffer.
> > +
> > +  This function performs the SHA-1 message digest of
> a given data buffer, and
> > places
> > +  the digest value into the specified memory.
> > +
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   Data        Pointer to the buffer
> containing the data to be hashed.
> > +  @param[in]   DataSize    Size of Data buffer in
> bytes.
> > +  @param[out]  HashValue   Pointer to a buffer that
> receives the SHA-1 digest
> > +                           value (20 bytes).
> > +
> > +  @retval TRUE   SHA-1 digest computation succeeded.
> > +  @retval FALSE  SHA-1 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha1HashAll (
> > +  IN   CONST VOID  *Data,
> > +  IN   UINTN       DataSize,
> > +  OUT  UINT8       *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha1.Services.HashAll,
> Sha1HashAll, (Data,
> > DataSize, HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for SHA-256 hash
> > operations.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for SHA-256 hash
> > operations.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceSha256GetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Sha256.Services.GetContextSize,
> > Sha256GetContextSize, (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory pointed by
> Sha256Context as SHA-256 hash
> > context for
> > +  subsequent use.
> > +
> > +  If Sha256Context is NULL, then return FALSE.
> > +
> > +  @param[out]  Sha256Context  Pointer to SHA-256
> context being initialized.
> > +
> > +  @retval TRUE   SHA-256 context initialization
> succeeded.
> > +  @retval FALSE  SHA-256 context initialization
> failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha256Init (
> > +  OUT  VOID  *Sha256Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha256.Services.Init,
> Sha256Init,
> > (Sha256Context), FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing SHA-256 context.
> > +
> > +  If Sha256Context is NULL, then return FALSE.
> > +  If NewSha256Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Sha256Context     Pointer to SHA-256
> context being copied.
> > +  @param[out] NewSha256Context  Pointer to new SHA-
> 256 context.
> > +
> > +  @retval TRUE   SHA-256 context copy succeeded.
> > +  @retval FALSE  SHA-256 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha256Duplicate (
> > +  IN   CONST VOID  *Sha256Context,
> > +  OUT  VOID        *NewSha256Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Sha256.Services.Duplicate, Sha256Duplicate,
> > (Sha256Context, NewSha256Context), FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates SHA-256
> context.
> > +
> > +  This function performs SHA-256 digest on a data
> buffer of the specified size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  SHA-256 context should be already correctly
> initialized by Sha256Init(), and
> > should not be finalized
> > +  by Sha256Final(). Behavior with invalid context is
> undefined.
> > +
> > +  If Sha256Context is NULL, then return FALSE.
> > +
> > +  @param[in, out]  Sha256Context  Pointer to the
> SHA-256 context.
> > +  @param[in]       Data           Pointer to the
> buffer containing the data to be
> > hashed.
> > +  @param[in]       DataSize       Size of Data
> buffer in bytes.
> > +
> > +  @retval TRUE   SHA-256 data digest succeeded.
> > +  @retval FALSE  SHA-256 data digest failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha256Update (
> > +  IN OUT  VOID        *Sha256Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha256.Services.Update,
> Sha256Update,
> > (Sha256Context, Data, DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the SHA-256 digest value.
> > +
> > +  This function completes SHA-256 hash computation
> and retrieves the digest
> > value into
> > +  the specified memory. After this function has been
> called, the SHA-256
> > context cannot
> > +  be used again.
> > +  SHA-256 context should be already correctly
> initialized by Sha256Init(), and
> > should not be
> > +  finalized by Sha256Final(). Behavior with invalid
> SHA-256 context is undefined.
> > +
> > +  If Sha256Context is NULL, then return FALSE.
> > +  If HashValue is NULL, then return FALSE.
> > +
> > +  @param[in, out]  Sha256Context  Pointer to the
> SHA-256 context.
> > +  @param[out]      HashValue      Pointer to a
> buffer that receives the SHA-256
> > digest
> > +                                  value (32 bytes).
> > +
> > +  @retval TRUE   SHA-256 digest computation
> succeeded.
> > +  @retval FALSE  SHA-256 digest computation failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha256Final (
> > +  IN OUT  VOID   *Sha256Context,
> > +  OUT     UINT8  *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha256.Services.Final,
> Sha256Final,
> > (Sha256Context, HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Computes the SHA-256 message digest of a input
> data buffer.
> > +
> > +  This function performs the SHA-256 message digest
> of a given data buffer,
> > and places
> > +  the digest value into the specified memory.
> > +
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   Data        Pointer to the buffer
> containing the data to be hashed.
> > +  @param[in]   DataSize    Size of Data buffer in
> bytes.
> > +  @param[out]  HashValue   Pointer to a buffer that
> receives the SHA-256
> > digest
> > +                           value (32 bytes).
> > +
> > +  @retval TRUE   SHA-256 digest computation
> succeeded.
> > +  @retval FALSE  SHA-256 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha256HashAll (
> > +  IN   CONST VOID  *Data,
> > +  IN   UINTN       DataSize,
> > +  OUT  UINT8       *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha256.Services.HashAll,
> Sha256HashAll, (Data,
> > DataSize, HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for SHA-384 hash
> > operations.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for SHA-384 hash
> > operations.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceSha384GetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Sha384.Services.GetContextSize,
> > Sha384GetContextSize, (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory pointed by
> Sha384Context as SHA-384 hash
> > context for
> > +  subsequent use.
> > +
> > +  If Sha384Context is NULL, then return FALSE.
> > +
> > +  @param[out]  Sha384Context  Pointer to SHA-384
> context being initialized.
> > +
> > +  @retval TRUE   SHA-384 context initialization
> succeeded.
> > +  @retval FALSE  SHA-384 context initialization
> failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha384Init (
> > +  OUT  VOID  *Sha384Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha384.Services.Init,
> Sha384Init,
> > (Sha384Context), FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing SHA-384 context.
> > +
> > +  If Sha384Context is NULL, then return FALSE.
> > +  If NewSha384Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Sha384Context     Pointer to SHA-384
> context being copied.
> > +  @param[out] NewSha384Context  Pointer to new SHA-
> 384 context.
> > +
> > +  @retval TRUE   SHA-384 context copy succeeded.
> > +  @retval FALSE  SHA-384 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha384Duplicate (
> > +  IN   CONST VOID  *Sha384Context,
> > +  OUT  VOID        *NewSha384Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Sha384.Services.Duplicate, Sha384Duplicate,
> > (Sha384Context, NewSha384Context), FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates SHA-384
> context.
> > +
> > +  This function performs SHA-384 digest on a data
> buffer of the specified size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  SHA-384 context should be already correctly
> initialized by Sha384Init(), and
> > should not be finalized
> > +  by Sha384Final(). Behavior with invalid context is
> undefined.
> > +
> > +  If Sha384Context is NULL, then return FALSE.
> > +
> > +  @param[in, out]  Sha384Context  Pointer to the
> SHA-384 context.
> > +  @param[in]       Data           Pointer to the
> buffer containing the data to be
> > hashed.
> > +  @param[in]       DataSize       Size of Data
> buffer in bytes.
> > +
> > +  @retval TRUE   SHA-384 data digest succeeded.
> > +  @retval FALSE  SHA-384 data digest failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha384Update (
> > +  IN OUT  VOID        *Sha384Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha384.Services.Update,
> Sha384Update,
> > (Sha384Context, Data, DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the SHA-384 digest value.
> > +
> > +  This function completes SHA-384 hash computation
> and retrieves the digest
> > value into
> > +  the specified memory. After this function has been
> called, the SHA-384
> > context cannot
> > +  be used again.
> > +  SHA-384 context should be already correctly
> initialized by Sha384Init(), and
> > should not be
> > +  finalized by Sha384Final(). Behavior with invalid
> SHA-384 context is undefined.
> > +
> > +  If Sha384Context is NULL, then return FALSE.
> > +  If HashValue is NULL, then return FALSE.
> > +
> > +  @param[in, out]  Sha384Context  Pointer to the
> SHA-384 context.
> > +  @param[out]      HashValue      Pointer to a
> buffer that receives the SHA-384
> > digest
> > +                                  value (48 bytes).
> > +
> > +  @retval TRUE   SHA-384 digest computation
> succeeded.
> > +  @retval FALSE  SHA-384 digest computation failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha384Final (
> > +  IN OUT  VOID   *Sha384Context,
> > +  OUT     UINT8  *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha384.Services.Final,
> Sha384Final,
> > (Sha384Context, HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Computes the SHA-384 message digest of a input
> data buffer.
> > +
> > +  This function performs the SHA-384 message digest
> of a given data buffer,
> > and places
> > +  the digest value into the specified memory.
> > +
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   Data        Pointer to the buffer
> containing the data to be hashed.
> > +  @param[in]   DataSize    Size of Data buffer in
> bytes.
> > +  @param[out]  HashValue   Pointer to a buffer that
> receives the SHA-384
> > digest
> > +                           value (48 bytes).
> > +
> > +  @retval TRUE   SHA-384 digest computation
> succeeded.
> > +  @retval FALSE  SHA-384 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha384HashAll (
> > +  IN   CONST VOID  *Data,
> > +  IN   UINTN       DataSize,
> > +  OUT  UINT8       *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha384.Services.HashAll,
> Sha384HashAll, (Data,
> > DataSize, HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for SHA-512 hash
> > operations.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for SHA-512 hash
> > operations.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceSha512GetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Sha512.Services.GetContextSize,
> > Sha512GetContextSize, (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory pointed by
> Sha512Context as SHA-512 hash
> > context for
> > +  subsequent use.
> > +
> > +  If Sha512Context is NULL, then return FALSE.
> > +
> > +  @param[out]  Sha512Context  Pointer to SHA-512
> context being initialized.
> > +
> > +  @retval TRUE   SHA-512 context initialization
> succeeded.
> > +  @retval FALSE  SHA-512 context initialization
> failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha512Init (
> > +  OUT  VOID  *Sha512Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha512.Services.Init,
> Sha512Init,
> > (Sha512Context), FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing SHA-512 context.
> > +
> > +  If Sha512Context is NULL, then return FALSE.
> > +  If NewSha512Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Sha512Context     Pointer to SHA-512
> context being copied.
> > +  @param[out] NewSha512Context  Pointer to new SHA-
> 512 context.
> > +
> > +  @retval TRUE   SHA-512 context copy succeeded.
> > +  @retval FALSE  SHA-512 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha512Duplicate (
> > +  IN   CONST VOID  *Sha512Context,
> > +  OUT  VOID        *NewSha512Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Sha512.Services.Duplicate, Sha512Duplicate,
> > (Sha512Context, NewSha512Context), FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates SHA-512
> context.
> > +
> > +  This function performs SHA-512 digest on a data
> buffer of the specified size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  SHA-512 context should be already correctly
> initialized by Sha512Init(), and
> > should not be finalized
> > +  by Sha512Final(). Behavior with invalid context is
> undefined.
> > +
> > +  If Sha512Context is NULL, then return FALSE.
> > +
> > +  @param[in, out]  Sha512Context  Pointer to the
> SHA-512 context.
> > +  @param[in]       Data           Pointer to the
> buffer containing the data to be
> > hashed.
> > +  @param[in]       DataSize       Size of Data
> buffer in bytes.
> > +
> > +  @retval TRUE   SHA-512 data digest succeeded.
> > +  @retval FALSE  SHA-512 data digest failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha512Update (
> > +  IN OUT  VOID        *Sha512Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha512.Services.Update,
> Sha512Update,
> > (Sha512Context, Data, DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the SHA-512 digest value.
> > +
> > +  This function completes SHA-512 hash computation
> and retrieves the digest
> > value into
> > +  the specified memory. After this function has been
> called, the SHA-512
> > context cannot
> > +  be used again.
> > +  SHA-512 context should be already correctly
> initialized by Sha512Init(), and
> > should not be
> > +  finalized by Sha512Final(). Behavior with invalid
> SHA-512 context is undefined.
> > +
> > +  If Sha512Context is NULL, then return FALSE.
> > +  If HashValue is NULL, then return FALSE.
> > +
> > +  @param[in, out]  Sha512Context  Pointer to the
> SHA-512 context.
> > +  @param[out]      HashValue      Pointer to a
> buffer that receives the SHA-512
> > digest
> > +                                  value (64 bytes).
> > +
> > +  @retval TRUE   SHA-512 digest computation
> succeeded.
> > +  @retval FALSE  SHA-512 digest computation failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha512Final (
> > +  IN OUT  VOID   *Sha512Context,
> > +  OUT     UINT8  *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha512.Services.Final,
> Sha512Final,
> > (Sha512Context, HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Computes the SHA-512 message digest of a input
> data buffer.
> > +
> > +  This function performs the SHA-512 message digest
> of a given data buffer,
> > and places
> > +  the digest value into the specified memory.
> > +
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   Data        Pointer to the buffer
> containing the data to be hashed.
> > +  @param[in]   DataSize    Size of Data buffer in
> bytes.
> > +  @param[out]  HashValue   Pointer to a buffer that
> receives the SHA-512
> > digest
> > +                           value (64 bytes).
> > +
> > +  @retval TRUE   SHA-512 digest computation
> succeeded.
> > +  @retval FALSE  SHA-512 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSha512HashAll (
> > +  IN   CONST VOID  *Data,
> > +  IN   UINTN       DataSize,
> > +  OUT  UINT8       *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sha512.Services.HashAll,
> Sha512HashAll, (Data,
> > DataSize, HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for SM3 hash
> > operations.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for SM3 hash
> > operations.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceSm3GetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Sm3.Services.GetContextSize,
> > Sm3GetContextSize, (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory pointed by
> Sm3Context as SM3 hash context
> > for
> > +  subsequent use.
> > +
> > +  If Sm3Context is NULL, then return FALSE.
> > +
> > +  @param[out]  Sm3Context  Pointer to SM3 context
> being initialized.
> > +
> > +  @retval TRUE   SM3 context initialization
> succeeded.
> > +  @retval FALSE  SM3 context initialization failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSm3Init (
> > +  OUT  VOID  *Sm3Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sm3.Services.Init,
> Sm3Init, (Sm3Context), FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing SM3 context.
> > +
> > +  If Sm3Context is NULL, then return FALSE.
> > +  If NewSm3Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Sm3Context     Pointer to SM3 context
> being copied.
> > +  @param[out] NewSm3Context  Pointer to new SM3
> context.
> > +
> > +  @retval TRUE   SM3 context copy succeeded.
> > +  @retval FALSE  SM3 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSm3Duplicate (
> > +  IN   CONST VOID  *Sm3Context,
> > +  OUT  VOID        *NewSm3Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sm3.Services.Duplicate,
> Sm3Duplicate,
> > (Sm3Context, NewSm3Context), FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates SM3 context.
> > +
> > +  This function performs SM3 digest on a data buffer
> of the specified size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  SM3 context should be already correctly
> initialized by Sm3Init(), and should
> > not be finalized
> > +  by Sm3Final(). Behavior with invalid context is
> undefined.
> > +
> > +  If Sm3Context is NULL, then return FALSE.
> > +
> > +  @param[in, out]  Sm3Context     Pointer to the SM3
> context.
> > +  @param[in]       Data           Pointer to the
> buffer containing the data to be
> > hashed.
> > +  @param[in]       DataSize       Size of Data
> buffer in bytes.
> > +
> > +  @retval TRUE   SM3 data digest succeeded.
> > +  @retval FALSE  SM3 data digest failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSm3Update (
> > +  IN OUT  VOID        *Sm3Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sm3.Services.Update,
> Sm3Update, (Sm3Context,
> > Data, DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the SM3 digest value.
> > +
> > +  This function completes SM3 hash computation and
> retrieves the digest value
> > into
> > +  the specified memory. After this function has been
> called, the SM3 context
> > cannot
> > +  be used again.
> > +  SM3 context should be already correctly
> initialized by Sm3Init(), and should
> > not be
> > +  finalized by Sm3Final(). Behavior with invalid SM3
> context is undefined.
> > +
> > +  If Sm3Context is NULL, then return FALSE.
> > +  If HashValue is NULL, then return FALSE.
> > +
> > +  @param[in, out]  Sm3Context     Pointer to the SM3
> context.
> > +  @param[out]      HashValue      Pointer to a
> buffer that receives the SM3 digest
> > +                                  value (32 bytes).
> > +
> > +  @retval TRUE   SM3 digest computation succeeded.
> > +  @retval FALSE  SM3 digest computation failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSm3Final (
> > +  IN OUT  VOID   *Sm3Context,
> > +  OUT     UINT8  *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sm3.Services.Final,
> Sm3Final, (Sm3Context,
> > HashValue), FALSE);
> > +}
> > +
> > +/**
> > +  Computes the SM3 message digest of a input data
> buffer.
> > +
> > +  This function performs the SM3 message digest of a
> given data buffer, and
> > places
> > +  the digest value into the specified memory.
> > +
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   Data        Pointer to the buffer
> containing the data to be hashed.
> > +  @param[in]   DataSize    Size of Data buffer in
> bytes.
> > +  @param[out]  HashValue   Pointer to a buffer that
> receives the SM3 digest
> > +                           value (32 bytes).
> > +
> > +  @retval TRUE   SM3 digest computation succeeded.
> > +  @retval FALSE  SM3 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceSm3HashAll (
> > +  IN   CONST VOID  *Data,
> > +  IN   UINTN       DataSize,
> > +  OUT  UINT8       *HashValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Sm3.Services.HashAll,
> Sm3HashAll, (Data,
> > DataSize, HashValue), FALSE);
> > +}
> > +
> >
> +//====================================================
> ==========
> > =======================
> > +//    MAC (Message Authentication Code) Primitive
> >
> +//====================================================
> ==========
> > =======================
> > +
> > +/**
> > +  Allocates and initializes one HMAC_CTX context for
> subsequent HMAC-MD5
> > use.
> > +
> > +  If this interface is not supported, then return
> NULL.
> > +
> > +  @return  Pointer to the HMAC_CTX context that has
> been initialized.
> > +           If the allocations fails, HmacMd5New()
> returns NULL.
> > +  @retval  NULL  This interface is not supported.
> > +
> > +**/
> > +VOID *
> > +EFIAPI
> > +CryptoServiceHmacMd5New (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (HmacMd5.Services.New,
> HmacMd5New, (),
> > NULL);
> > +}
> > +
> > +/**
> > +  Release the specified HMAC_CTX context.
> > +
> > +  If this interface is not supported, then do
> nothing.
> > +
> > +  @param[in]  HmacMd5Ctx  Pointer to the HMAC_CTX
> context to be released.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceHmacMd5Free (
> > +  IN  VOID  *HmacMd5Ctx
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (HmacMd5.Services.Free,
> HmacMd5Free,
> > (HmacMd5Ctx));
> > +}
> > +
> > +/**
> > +  Set user-supplied key for subsequent use. It must
> be done before any
> > +  calling to HmacMd5Update().
> > +
> > +  If HmacMd5Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  HmacMd5Context  Pointer to HMAC-MD5
> context.
> > +  @param[in]   Key             Pointer to the user-
> supplied key.
> > +  @param[in]   KeySize         Key size in bytes.
> > +
> > +  @retval TRUE   Key is set successfully.
> > +  @retval FALSE  Key is set unsuccessfully.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacMd5SetKey (
> > +  OUT  VOID         *HmacMd5Context,
> > +  IN   CONST UINT8  *Key,
> > +  IN   UINTN        KeySize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (HmacMd5.Services.SetKey,
> HmacMd5SetKey,
> > (HmacMd5Context, Key, KeySize), FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing HMAC-MD5 context.
> > +
> > +  If HmacMd5Context is NULL, then return FALSE.
> > +  If NewHmacMd5Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  HmacMd5Context     Pointer to HMAC-MD5
> context being copied.
> > +  @param[out] NewHmacMd5Context  Pointer to new
> HMAC-MD5 context.
> > +
> > +  @retval TRUE   HMAC-MD5 context copy succeeded.
> > +  @retval FALSE  HMAC-MD5 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacMd5Duplicate (
> > +  IN   CONST VOID  *HmacMd5Context,
> > +  OUT  VOID        *NewHmacMd5Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (HmacMd5.Services.Duplicate,
> > HmacMd5Duplicate, (HmacMd5Context,
> NewHmacMd5Context), FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates HMAC-MD5
> context.
> > +
> > +  This function performs HMAC-MD5 digest on a data
> buffer of the specified
> > size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  HMAC-MD5 context should be initialized by
> HmacMd5New(), and should not
> > be finalized by
> > +  HmacMd5Final(). Behavior with invalid context is
> undefined.
> > +
> > +  If HmacMd5Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  HmacMd5Context  Pointer to the
> HMAC-MD5 context.
> > +  @param[in]       Data            Pointer to the
> buffer containing the data to be
> > digested.
> > +  @param[in]       DataSize        Size of Data
> buffer in bytes.
> > +
> > +  @retval TRUE   HMAC-MD5 data digest succeeded.
> > +  @retval FALSE  HMAC-MD5 data digest failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacMd5Update (
> > +  IN OUT  VOID        *HmacMd5Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (HmacMd5.Services.Update,
> HmacMd5Update,
> > (HmacMd5Context, Data, DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the HMAC-MD5 digest
> value.
> > +
> > +  This function completes HMAC-MD5 hash computation
> and retrieves the
> > digest value into
> > +  the specified memory. After this function has been
> called, the HMAC-MD5
> > context cannot
> > +  be used again.
> > +  HMAC-MD5 context should be initialized by
> HmacMd5New(), and should not
> > be finalized by
> > +  HmacMd5Final(). Behavior with invalid HMAC-MD5
> context is undefined.
> > +
> > +  If HmacMd5Context is NULL, then return FALSE.
> > +  If HmacValue is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  HmacMd5Context  Pointer to the
> HMAC-MD5 context.
> > +  @param[out]      HmacValue       Pointer to a
> buffer that receives the HMAC-
> > MD5 digest
> > +                                   value (16 bytes).
> > +
> > +  @retval TRUE   HMAC-MD5 digest computation
> succeeded.
> > +  @retval FALSE  HMAC-MD5 digest computation failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacMd5Final (
> > +  IN OUT  VOID   *HmacMd5Context,
> > +  OUT     UINT8  *HmacValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (HmacMd5.Services.Final,
> HmacMd5Final,
> > (HmacMd5Context, HmacValue), FALSE);
> > +}
> > +
> > +/**
> > +  Allocates and initializes one HMAC_CTX context for
> subsequent HMAC-SHA1
> > use.
> > +
> > +  If this interface is not supported, then return
> NULL.
> > +
> > +  @return  Pointer to the HMAC_CTX context that has
> been initialized.
> > +           If the allocations fails, HmacSha1New()
> returns NULL.
> > +  @return  NULL   This interface is not supported.
> > +
> > +**/
> > +VOID *
> > +EFIAPI
> > +CryptoServiceHmacSha1New (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (HmacSha1.Services.New,
> HmacSha1New, (),
> > NULL);
> > +}
> > +
> > +/**
> > +  Release the specified HMAC_CTX context.
> > +
> > +  If this interface is not supported, then do
> nothing.
> > +
> > +  @param[in]  HmacSha1Ctx  Pointer to the HMAC_CTX
> context to be released.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceHmacSha1Free (
> > +  IN  VOID  *HmacSha1Ctx
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (HmacSha1.Services.Free,
> HmacSha1Free,
> > (HmacSha1Ctx));
> > +}
> > +
> > +/**
> > +  Set user-supplied key for subsequent use. It must
> be done before any
> > +  calling to HmacSha1Update().
> > +
> > +  If HmacSha1Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  HmacSha1Context  Pointer to HMAC-SHA1
> context.
> > +  @param[in]   Key              Pointer to the user-
> supplied key.
> > +  @param[in]   KeySize          Key size in bytes.
> > +
> > +  @retval TRUE   The Key is set successfully.
> > +  @retval FALSE  The Key is set unsuccessfully.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacSha1SetKey (
> > +  OUT  VOID         *HmacSha1Context,
> > +  IN   CONST UINT8  *Key,
> > +  IN   UINTN        KeySize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (HmacSha1.Services.SetKey, HmacSha1SetKey,
> > (HmacSha1Context, Key, KeySize), FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing HMAC-SHA1 context.
> > +
> > +  If HmacSha1Context is NULL, then return FALSE.
> > +  If NewHmacSha1Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  HmacSha1Context     Pointer to HMAC-
> SHA1 context being
> > copied.
> > +  @param[out] NewHmacSha1Context  Pointer to new
> HMAC-SHA1 context.
> > +
> > +  @retval TRUE   HMAC-SHA1 context copy succeeded.
> > +  @retval FALSE  HMAC-SHA1 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacSha1Duplicate (
> > +  IN   CONST VOID  *HmacSha1Context,
> > +  OUT  VOID        *NewHmacSha1Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (HmacSha1.Services.Duplicate,
> > HmacSha1Duplicate, (HmacSha1Context,
> NewHmacSha1Context), FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates HMAC-SHA1
> context.
> > +
> > +  This function performs HMAC-SHA1 digest on a data
> buffer of the specified
> > size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  HMAC-SHA1 context should be initialized by
> HmacSha1New(), and should not
> > be finalized by
> > +  HmacSha1Final(). Behavior with invalid context is
> undefined.
> > +
> > +  If HmacSha1Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  HmacSha1Context Pointer to the
> HMAC-SHA1 context.
> > +  @param[in]       Data            Pointer to the
> buffer containing the data to be
> > digested.
> > +  @param[in]       DataSize        Size of Data
> buffer in bytes.
> > +
> > +  @retval TRUE   HMAC-SHA1 data digest succeeded.
> > +  @retval FALSE  HMAC-SHA1 data digest failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacSha1Update (
> > +  IN OUT  VOID        *HmacSha1Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (HmacSha1.Services.Update, HmacSha1Update,
> > (HmacSha1Context, Data, DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the HMAC-SHA1 digest
> value.
> > +
> > +  This function completes HMAC-SHA1 hash computation
> and retrieves the
> > digest value into
> > +  the specified memory. After this function has been
> called, the HMAC-SHA1
> > context cannot
> > +  be used again.
> > +  HMAC-SHA1 context should be initialized by
> HmacSha1New(), and should not
> > be finalized
> > +  by HmacSha1Final(). Behavior with invalid HMAC-
> SHA1 context is undefined.
> > +
> > +  If HmacSha1Context is NULL, then return FALSE.
> > +  If HmacValue is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  HmacSha1Context  Pointer to the
> HMAC-SHA1 context.
> > +  @param[out]      HmacValue        Pointer to a
> buffer that receives the HMAC-
> > SHA1 digest
> > +                                    value (20
> bytes).
> > +
> > +  @retval TRUE   HMAC-SHA1 digest computation
> succeeded.
> > +  @retval FALSE  HMAC-SHA1 digest computation
> failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacSha1Final (
> > +  IN OUT  VOID   *HmacSha1Context,
> > +  OUT     UINT8  *HmacValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (HmacSha1.Services.Final,
> HmacSha1Final,
> > (HmacSha1Context, HmacValue), FALSE);
> > +}
> > +
> > +/**
> > +  Allocates and initializes one HMAC_CTX context for
> subsequent HMAC-
> > SHA256 use.
> > +
> > +  @return  Pointer to the HMAC_CTX context that has
> been initialized.
> > +           If the allocations fails, HmacSha256New()
> returns NULL.
> > +
> > +**/
> > +VOID *
> > +EFIAPI
> > +CryptoServiceHmacSha256New (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (HmacSha256.Services.New,
> HmacSha256New, (),
> > NULL);
> > +}
> > +
> > +/**
> > +  Release the specified HMAC_CTX context.
> > +
> > +  @param[in]  HmacSha256Ctx  Pointer to the HMAC_CTX
> context to be
> > released.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceHmacSha256Free (
> > +  IN  VOID  *HmacSha256Ctx
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (HmacSha256.Services.Free,
> HmacSha256Free,
> > (HmacSha256Ctx));
> > +}
> > +
> > +/**
> > +  Set user-supplied key for subsequent use. It must
> be done before any
> > +  calling to HmacSha256Update().
> > +
> > +  If HmacSha256Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  HmacSha256Context  Pointer to HMAC-
> SHA256 context.
> > +  @param[in]   Key                Pointer to the
> user-supplied key.
> > +  @param[in]   KeySize            Key size in bytes.
> > +
> > +  @retval TRUE   The Key is set successfully.
> > +  @retval FALSE  The Key is set unsuccessfully.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacSha256SetKey (
> > +  OUT  VOID         *HmacSha256Context,
> > +  IN   CONST UINT8  *Key,
> > +  IN   UINTN        KeySize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (HmacSha256.Services.SetKey,
> > HmacSha256SetKey, (HmacSha256Context, Key, KeySize),
> FALSE);
> > +}
> > +
> > +/**
> > +  Makes a copy of an existing HMAC-SHA256 context.
> > +
> > +  If HmacSha256Context is NULL, then return FALSE.
> > +  If NewHmacSha256Context is NULL, then return
> FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  HmacSha256Context     Pointer to HMAC-
> SHA256 context being
> > copied.
> > +  @param[out] NewHmacSha256Context  Pointer to new
> HMAC-SHA256
> > context.
> > +
> > +  @retval TRUE   HMAC-SHA256 context copy succeeded.
> > +  @retval FALSE  HMAC-SHA256 context copy failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacSha256Duplicate (
> > +  IN   CONST VOID  *HmacSha256Context,
> > +  OUT  VOID        *NewHmacSha256Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (HmacSha256.Services.Duplicate,
> > HmacSha256Duplicate, (HmacSha256Context,
> NewHmacSha256Context),
> > FALSE);
> > +}
> > +
> > +/**
> > +  Digests the input data and updates HMAC-SHA256
> context.
> > +
> > +  This function performs HMAC-SHA256 digest on a
> data buffer of the specified
> > size.
> > +  It can be called multiple times to compute the
> digest of long or discontinuous
> > data streams.
> > +  HMAC-SHA256 context should be initialized by
> HmacSha256New(), and should
> > not be finalized
> > +  by HmacSha256Final(). Behavior with invalid
> context is undefined.
> > +
> > +  If HmacSha256Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  HmacSha256Context Pointer to the
> HMAC-SHA256 context.
> > +  @param[in]       Data              Pointer to the
> buffer containing the data to be
> > digested.
> > +  @param[in]       DataSize          Size of Data
> buffer in bytes.
> > +
> > +  @retval TRUE   HMAC-SHA256 data digest succeeded.
> > +  @retval FALSE  HMAC-SHA256 data digest failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacSha256Update (
> > +  IN OUT  VOID        *HmacSha256Context,
> > +  IN      CONST VOID  *Data,
> > +  IN      UINTN       DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (HmacSha256.Services.Update,
> > HmacSha256Update, (HmacSha256Context, Data,
> DataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Completes computation of the HMAC-SHA256 digest
> value.
> > +
> > +  This function completes HMAC-SHA256 hash
> computation and retrieves the
> > digest value into
> > +  the specified memory. After this function has been
> called, the HMAC-SHA256
> > context cannot
> > +  be used again.
> > +  HMAC-SHA256 context should be initialized by
> HmacSha256New(), and should
> > not be finalized
> > +  by HmacSha256Final(). Behavior with invalid HMAC-
> SHA256 context is
> > undefined.
> > +
> > +  If HmacSha256Context is NULL, then return FALSE.
> > +  If HmacValue is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  HmacSha256Context  Pointer to the
> HMAC-SHA256 context.
> > +  @param[out]      HmacValue          Pointer to a
> buffer that receives the HMAC-
> > SHA256 digest
> > +                                      value (32
> bytes).
> > +
> > +  @retval TRUE   HMAC-SHA256 digest computation
> succeeded.
> > +  @retval FALSE  HMAC-SHA256 digest computation
> failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHmacSha256Final (
> > +  IN OUT  VOID   *HmacSha256Context,
> > +  OUT     UINT8  *HmacValue
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (HmacSha256.Services.Final, HmacSha256Final,
> > (HmacSha256Context, HmacValue), FALSE);
> > +}
> > +
> >
> +//====================================================
> ==========
> > =======================
> > +//    Symmetric Cryptography Primitive
> >
> +//====================================================
> ==========
> > =======================
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for TDES operations.
> > +
> > +  If this interface is not supported, then return
> zero.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for TDES operations.
> > +  @retval  0   This interface is not supported.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceTdesGetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tdes.Services.GetContextSize,
> > TdesGetContextSize, (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory as TDES context
> for subsequent use.
> > +
> > +  This function initializes user-supplied memory
> pointed by TdesContext as TDES
> > context.
> > +  In addition, it sets up all TDES key materials for
> subsequent encryption and
> > decryption
> > +  operations.
> > +  There are 3 key options as follows:
> > +  KeyLength = 64,  Keying option 1: K1 == K2 == K3
> (Backward compatibility with
> > DES)
> > +  KeyLength = 128, Keying option 2: K1 != K2 and K3
> = K1 (Less Security)
> > +  KeyLength = 192  Keying option 3: K1 != K2 != K3
> (Strongest)
> > +
> > +  If TdesContext is NULL, then return FALSE.
> > +  If Key is NULL, then return FALSE.
> > +  If KeyLength is not valid, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  TdesContext  Pointer to TDES context
> being initialized.
> > +  @param[in]   Key          Pointer to the user-
> supplied TDES key.
> > +  @param[in]   KeyLength    Length of TDES key in
> bits.
> > +
> > +  @retval TRUE   TDES context initialization
> succeeded.
> > +  @retval FALSE  TDES context initialization failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceTdesInit (
> > +  OUT  VOID         *TdesContext,
> > +  IN   CONST UINT8  *Key,
> > +  IN   UINTN        KeyLength
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Tdes.Services.Init,
> TdesInit, (TdesContext, Key,
> > KeyLength), FALSE);
> > +}
> > +
> > +/**
> > +  Performs TDES encryption on a data buffer of the
> specified size in ECB mode.
> > +
> > +  This function performs TDES encryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize, in ECB mode.
> > +  InputSize must be multiple of block size (8
> bytes). This function does not
> > perform
> > +  padding. Caller must perform padding, if
> necessary, to ensure valid input data
> > size.
> > +  TdesContext should be already correctly
> initialized by TdesInit(). Behavior with
> > +  invalid TDES context is undefined.
> > +
> > +  If TdesContext is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If InputSize is not multiple of block size (8
> bytes), then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   TdesContext  Pointer to the TDES
> context.
> > +  @param[in]   Input        Pointer to the buffer
> containing the data to be
> > encrypted.
> > +  @param[in]   InputSize    Size of the Input buffer
> in bytes.
> > +  @param[out]  Output       Pointer to a buffer that
> receives the TDES encryption
> > output.
> > +
> > +  @retval TRUE   TDES encryption succeeded.
> > +  @retval FALSE  TDES encryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceTdesEcbEncrypt (
> > +  IN   VOID         *TdesContext,
> > +  IN   CONST UINT8  *Input,
> > +  IN   UINTN        InputSize,
> > +  OUT  UINT8        *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tdes.Services.EcbEncrypt, TdesEcbEncrypt,
> > (TdesContext, Input, InputSize, Output), FALSE);
> > +}
> > +
> > +/**
> > +  Performs TDES decryption on a data buffer of the
> specified size in ECB mode.
> > +
> > +  This function performs TDES decryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize, in ECB mode.
> > +  InputSize must be multiple of block size (8
> bytes). This function does not
> > perform
> > +  padding. Caller must perform padding, if
> necessary, to ensure valid input data
> > size.
> > +  TdesContext should be already correctly
> initialized by TdesInit(). Behavior with
> > +  invalid TDES context is undefined.
> > +
> > +  If TdesContext is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If InputSize is not multiple of block size (8
> bytes), then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   TdesContext  Pointer to the TDES
> context.
> > +  @param[in]   Input        Pointer to the buffer
> containing the data to be
> > decrypted.
> > +  @param[in]   InputSize    Size of the Input buffer
> in bytes.
> > +  @param[out]  Output       Pointer to a buffer that
> receives the TDES decryption
> > output.
> > +
> > +  @retval TRUE   TDES decryption succeeded.
> > +  @retval FALSE  TDES decryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceTdesEcbDecrypt (
> > +  IN   VOID         *TdesContext,
> > +  IN   CONST UINT8  *Input,
> > +  IN   UINTN        InputSize,
> > +  OUT  UINT8        *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tdes.Services.EcbDecrypt, TdesEcbDecrypt,
> > (TdesContext, Input, InputSize, Output), FALSE);
> > +}
> > +
> > +/**
> > +  Performs TDES encryption on a data buffer of the
> specified size in CBC mode.
> > +
> > +  This function performs TDES encryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize, in CBC mode.
> > +  InputSize must be multiple of block size (8
> bytes). This function does not
> > perform
> > +  padding. Caller must perform padding, if
> necessary, to ensure valid input data
> > size.
> > +  Initialization vector should be one block size (8
> bytes).
> > +  TdesContext should be already correctly
> initialized by TdesInit(). Behavior with
> > +  invalid TDES context is undefined.
> > +
> > +  If TdesContext is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If InputSize is not multiple of block size (8
> bytes), then return FALSE.
> > +  If Ivec is NULL, then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   TdesContext  Pointer to the TDES
> context.
> > +  @param[in]   Input        Pointer to the buffer
> containing the data to be
> > encrypted.
> > +  @param[in]   InputSize    Size of the Input buffer
> in bytes.
> > +  @param[in]   Ivec         Pointer to
> initialization vector.
> > +  @param[out]  Output       Pointer to a buffer that
> receives the TDES encryption
> > output.
> > +
> > +  @retval TRUE   TDES encryption succeeded.
> > +  @retval FALSE  TDES encryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceTdesCbcEncrypt (
> > +  IN   VOID         *TdesContext,
> > +  IN   CONST UINT8  *Input,
> > +  IN   UINTN        InputSize,
> > +  IN   CONST UINT8  *Ivec,
> > +  OUT  UINT8        *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tdes.Services.CbcEncrypt, TdesCbcEncrypt,
> > (TdesContext, Input, InputSize, Ivec, Output),
> FALSE);
> > +}
> > +
> > +/**
> > +  Performs TDES decryption on a data buffer of the
> specified size in CBC mode.
> > +
> > +  This function performs TDES decryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize, in CBC mode.
> > +  InputSize must be multiple of block size (8
> bytes). This function does not
> > perform
> > +  padding. Caller must perform padding, if
> necessary, to ensure valid input data
> > size.
> > +  Initialization vector should be one block size (8
> bytes).
> > +  TdesContext should be already correctly
> initialized by TdesInit(). Behavior with
> > +  invalid TDES context is undefined.
> > +
> > +  If TdesContext is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If InputSize is not multiple of block size (8
> bytes), then return FALSE.
> > +  If Ivec is NULL, then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   TdesContext  Pointer to the TDES
> context.
> > +  @param[in]   Input        Pointer to the buffer
> containing the data to be
> > encrypted.
> > +  @param[in]   InputSize    Size of the Input buffer
> in bytes.
> > +  @param[in]   Ivec         Pointer to
> initialization vector.
> > +  @param[out]  Output       Pointer to a buffer that
> receives the TDES encryption
> > output.
> > +
> > +  @retval TRUE   TDES decryption succeeded.
> > +  @retval FALSE  TDES decryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceTdesCbcDecrypt (
> > +  IN   VOID         *TdesContext,
> > +  IN   CONST UINT8  *Input,
> > +  IN   UINTN        InputSize,
> > +  IN   CONST UINT8  *Ivec,
> > +  OUT  UINT8        *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tdes.Services.CbcDecrypt, TdesCbcDecrypt,
> > (TdesContext, Input, InputSize, Ivec, Output),
> FALSE);
> > +}
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for AES operations.
> > +
> > +  If this interface is not supported, then return
> zero.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for AES operations.
> > +  @retval  0   This interface is not supported.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceAesGetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Aes.Services.GetContextSize, AesGetContextSize,
> > (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory as AES context
> for subsequent use.
> > +
> > +  This function initializes user-supplied memory
> pointed by AesContext as AES
> > context.
> > +  In addition, it sets up all AES key materials for
> subsequent encryption and
> > decryption
> > +  operations.
> > +  There are 3 options for key length, 128 bits, 192
> bits, and 256 bits.
> > +
> > +  If AesContext is NULL, then return FALSE.
> > +  If Key is NULL, then return FALSE.
> > +  If KeyLength is not valid, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  AesContext  Pointer to AES context
> being initialized.
> > +  @param[in]   Key         Pointer to the user-
> supplied AES key.
> > +  @param[in]   KeyLength   Length of AES key in
> bits.
> > +
> > +  @retval TRUE   AES context initialization
> succeeded.
> > +  @retval FALSE  AES context initialization failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceAesInit (
> > +  OUT  VOID         *AesContext,
> > +  IN   CONST UINT8  *Key,
> > +  IN   UINTN        KeyLength
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Aes.Services.Init,
> AesInit, (AesContext, Key,
> > KeyLength), FALSE);
> > +}
> > +
> > +/**
> > +  Performs AES encryption on a data buffer of the
> specified size in ECB mode.
> > +
> > +  This function performs AES encryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize, in ECB mode.
> > +  InputSize must be multiple of block size (16
> bytes). This function does not
> > perform
> > +  padding. Caller must perform padding, if
> necessary, to ensure valid input data
> > size.
> > +  AesContext should be already correctly initialized
> by AesInit(). Behavior with
> > +  invalid AES context is undefined.
> > +
> > +  If AesContext is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If InputSize is not multiple of block size (16
> bytes), then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   AesContext  Pointer to the AES
> context.
> > +  @param[in]   Input       Pointer to the buffer
> containing the data to be
> > encrypted.
> > +  @param[in]   InputSize   Size of the Input buffer
> in bytes.
> > +  @param[out]  Output      Pointer to a buffer that
> receives the AES encryption
> > output.
> > +
> > +  @retval TRUE   AES encryption succeeded.
> > +  @retval FALSE  AES encryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceAesEcbEncrypt (
> > +  IN   VOID         *AesContext,
> > +  IN   CONST UINT8  *Input,
> > +  IN   UINTN        InputSize,
> > +  OUT  UINT8        *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Aes.Services.EcbEncrypt,
> AesEcbEncrypt,
> > (AesContext, Input, InputSize, Output), FALSE);
> > +}
> > +
> > +/**
> > +  Performs AES decryption on a data buffer of the
> specified size in ECB mode.
> > +
> > +  This function performs AES decryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize, in ECB mode.
> > +  InputSize must be multiple of block size (16
> bytes). This function does not
> > perform
> > +  padding. Caller must perform padding, if
> necessary, to ensure valid input data
> > size.
> > +  AesContext should be already correctly initialized
> by AesInit(). Behavior with
> > +  invalid AES context is undefined.
> > +
> > +  If AesContext is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If InputSize is not multiple of block size (16
> bytes), then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   AesContext  Pointer to the AES
> context.
> > +  @param[in]   Input       Pointer to the buffer
> containing the data to be
> > decrypted.
> > +  @param[in]   InputSize   Size of the Input buffer
> in bytes.
> > +  @param[out]  Output      Pointer to a buffer that
> receives the AES decryption
> > output.
> > +
> > +  @retval TRUE   AES decryption succeeded.
> > +  @retval FALSE  AES decryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceAesEcbDecrypt (
> > +  IN   VOID         *AesContext,
> > +  IN   CONST UINT8  *Input,
> > +  IN   UINTN        InputSize,
> > +  OUT  UINT8        *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Aes.Services.EcbDecrypt,
> AesEcbDecrypt,
> > (AesContext, Input, InputSize, Output), FALSE);
> > +}
> > +
> > +/**
> > +  Performs AES encryption on a data buffer of the
> specified size in CBC mode.
> > +
> > +  This function performs AES encryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize, in CBC mode.
> > +  InputSize must be multiple of block size (16
> bytes). This function does not
> > perform
> > +  padding. Caller must perform padding, if
> necessary, to ensure valid input data
> > size.
> > +  Initialization vector should be one block size (16
> bytes).
> > +  AesContext should be already correctly initialized
> by AesInit(). Behavior with
> > +  invalid AES context is undefined.
> > +
> > +  If AesContext is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If InputSize is not multiple of block size (16
> bytes), then return FALSE.
> > +  If Ivec is NULL, then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   AesContext  Pointer to the AES
> context.
> > +  @param[in]   Input       Pointer to the buffer
> containing the data to be
> > encrypted.
> > +  @param[in]   InputSize   Size of the Input buffer
> in bytes.
> > +  @param[in]   Ivec        Pointer to initialization
> vector.
> > +  @param[out]  Output      Pointer to a buffer that
> receives the AES encryption
> > output.
> > +
> > +  @retval TRUE   AES encryption succeeded.
> > +  @retval FALSE  AES encryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceAesCbcEncrypt (
> > +  IN   VOID         *AesContext,
> > +  IN   CONST UINT8  *Input,
> > +  IN   UINTN        InputSize,
> > +  IN   CONST UINT8  *Ivec,
> > +  OUT  UINT8        *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Aes.Services.CbcEncrypt,
> AesCbcEncrypt,
> > (AesContext, Input, InputSize, Ivec, Output), FALSE);
> > +}
> > +
> > +/**
> > +  Performs AES decryption on a data buffer of the
> specified size in CBC mode.
> > +
> > +  This function performs AES decryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize, in CBC mode.
> > +  InputSize must be multiple of block size (16
> bytes). This function does not
> > perform
> > +  padding. Caller must perform padding, if
> necessary, to ensure valid input data
> > size.
> > +  Initialization vector should be one block size (16
> bytes).
> > +  AesContext should be already correctly initialized
> by AesInit(). Behavior with
> > +  invalid AES context is undefined.
> > +
> > +  If AesContext is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If InputSize is not multiple of block size (16
> bytes), then return FALSE.
> > +  If Ivec is NULL, then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]   AesContext  Pointer to the AES
> context.
> > +  @param[in]   Input       Pointer to the buffer
> containing the data to be
> > encrypted.
> > +  @param[in]   InputSize   Size of the Input buffer
> in bytes.
> > +  @param[in]   Ivec        Pointer to initialization
> vector.
> > +  @param[out]  Output      Pointer to a buffer that
> receives the AES encryption
> > output.
> > +
> > +  @retval TRUE   AES decryption succeeded.
> > +  @retval FALSE  AES decryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceAesCbcDecrypt (
> > +  IN   VOID         *AesContext,
> > +  IN   CONST UINT8  *Input,
> > +  IN   UINTN        InputSize,
> > +  IN   CONST UINT8  *Ivec,
> > +  OUT  UINT8        *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Aes.Services.CbcDecrypt,
> AesCbcDecrypt,
> > (AesContext, Input, InputSize, Ivec, Output), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieves the size, in bytes, of the context
> buffer required for ARC4 operations.
> > +
> > +  If this interface is not supported, then return
> zero.
> > +
> > +  @return  The size, in bytes, of the context buffer
> required for ARC4 operations.
> > +  @retval  0   This interface is not supported.
> > +
> > +**/
> > +UINTN
> > +EFIAPI
> > +CryptoServiceArc4GetContextSize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Arc4.Services.GetContextSize,
> > Arc4GetContextSize, (), 0);
> > +}
> > +
> > +/**
> > +  Initializes user-supplied memory as ARC4 context
> for subsequent use.
> > +
> > +  This function initializes user-supplied memory
> pointed by Arc4Context as ARC4
> > context.
> > +  In addition, it sets up all ARC4 key materials for
> subsequent encryption and
> > decryption
> > +  operations.
> > +
> > +  If Arc4Context is NULL, then return FALSE.
> > +  If Key is NULL, then return FALSE.
> > +  If KeySize does not in the range of [5, 256]
> bytes, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  Arc4Context  Pointer to ARC4 context
> being initialized.
> > +  @param[in]   Key          Pointer to the user-
> supplied ARC4 key.
> > +  @param[in]   KeySize      Size of ARC4 key in
> bytes.
> > +
> > +  @retval TRUE   ARC4 context initialization
> succeeded.
> > +  @retval FALSE  ARC4 context initialization failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceArc4Init (
> > +  OUT  VOID         *Arc4Context,
> > +  IN   CONST UINT8  *Key,
> > +  IN   UINTN        KeySize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Arc4.Services.Init,
> Arc4Init, (Arc4Context, Key,
> > KeySize), FALSE);
> > +}
> > +
> > +/**
> > +  Performs ARC4 encryption on a data buffer of the
> specified size.
> > +
> > +  This function performs ARC4 encryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize.
> > +  Arc4Context should be already correctly
> initialized by Arc4Init(). Behavior with
> > +  invalid ARC4 context is undefined.
> > +
> > +  If Arc4Context is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  Arc4Context  Pointer to the ARC4
> context.
> > +  @param[in]       Input        Pointer to the
> buffer containing the data to be
> > encrypted.
> > +  @param[in]       InputSize    Size of the Input
> buffer in bytes.
> > +  @param[out]      Output       Pointer to a buffer
> that receives the ARC4
> > encryption output.
> > +
> > +  @retval TRUE   ARC4 encryption succeeded.
> > +  @retval FALSE  ARC4 encryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceArc4Encrypt (
> > +  IN OUT  VOID         *Arc4Context,
> > +  IN      CONST UINT8  *Input,
> > +  IN      UINTN        InputSize,
> > +  OUT     UINT8        *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Arc4.Services.Encrypt,
> Arc4Encrypt, (Arc4Context,
> > Input, InputSize, Output), FALSE);
> > +}
> > +
> > +/**
> > +  Performs ARC4 decryption on a data buffer of the
> specified size.
> > +
> > +  This function performs ARC4 decryption on data
> buffer pointed by Input, of
> > specified
> > +  size of InputSize.
> > +  Arc4Context should be already correctly
> initialized by Arc4Init(). Behavior with
> > +  invalid ARC4 context is undefined.
> > +
> > +  If Arc4Context is NULL, then return FALSE.
> > +  If Input is NULL, then return FALSE.
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  Arc4Context  Pointer to the ARC4
> context.
> > +  @param[in]       Input        Pointer to the
> buffer containing the data to be
> > decrypted.
> > +  @param[in]       InputSize    Size of the Input
> buffer in bytes.
> > +  @param[out]      Output       Pointer to a buffer
> that receives the ARC4
> > decryption output.
> > +
> > +  @retval TRUE   ARC4 decryption succeeded.
> > +  @retval FALSE  ARC4 decryption failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceArc4Decrypt (
> > +  IN OUT  VOID   *Arc4Context,
> > +  IN      UINT8  *Input,
> > +  IN      UINTN  InputSize,
> > +  OUT     UINT8  *Output
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Arc4.Services.Decrypt,
> Arc4Decrypt,
> > (Arc4Context, Input, InputSize, Output), FALSE);
> > +}
> > +
> > +/**
> > +  Resets the ARC4 context to the initial state.
> > +
> > +  The function resets the ARC4 context to the state
> it had immediately after the
> > +  ARC4Init() function call.
> > +  Contrary to ARC4Init(), Arc4Reset() requires no
> secret key as input, but ARC4
> > context
> > +  should be already correctly initialized by
> ARC4Init().
> > +
> > +  If Arc4Context is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  Arc4Context  Pointer to the ARC4
> context.
> > +
> > +  @retval TRUE   ARC4 reset succeeded.
> > +  @retval FALSE  ARC4 reset failed.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceArc4Reset (
> > +  IN OUT  VOID  *Arc4Context
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Arc4.Services.Reset,
> Arc4Reset, (Arc4Context),
> > FALSE);
> > +}
> > +
> >
> +//====================================================
> ==========
> > =======================
> > +//    Asymmetric Cryptography Primitive
> >
> +//====================================================
> ==========
> > =======================
> > +
> > +/**
> > +  Allocates and initializes one RSA context for
> subsequent use.
> > +
> > +  @return  Pointer to the RSA context that has been
> initialized.
> > +           If the allocations fails, RsaNew()
> returns NULL.
> > +
> > +**/
> > +VOID *
> > +EFIAPI
> > +CryptoServiceRsaNew (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Rsa.Services.New,
> RsaNew, (), NULL);
> > +}
> > +
> > +/**
> > +  Release the specified RSA context.
> > +
> > +  If RsaContext is NULL, then return FALSE.
> > +
> > +  @param[in]  RsaContext  Pointer to the RSA context
> to be released.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceRsaFree (
> > +  IN  VOID  *RsaContext
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (Rsa.Services.Free,
> RsaFree, (RsaContext));
> > +}
> > +
> > +/**
> > +  Sets the tag-designated key component into the
> established RSA context.
> > +
> > +  This function sets the tag-designated RSA key
> component into the established
> > +  RSA context from the user-specified non-negative
> integer (octet string format
> > +  represented in RSA PKCS#1).
> > +  If BigNumber is NULL, then the specified key
> component in RSA context is
> > cleared.
> > +
> > +  If RsaContext is NULL, then return FALSE.
> > +
> > +  @param[in, out]  RsaContext  Pointer to RSA
> context being set.
> > +  @param[in]       KeyTag      Tag of RSA key
> component being set.
> > +  @param[in]       BigNumber   Pointer to octet
> integer buffer.
> > +                               If NULL, then the
> specified key component in RSA
> > +                               context is cleared.
> > +  @param[in]       BnSize      Size of big number
> buffer in bytes.
> > +                               If BigNumber is NULL,
> then it is ignored.
> > +
> > +  @retval  TRUE   RSA key component was set
> successfully.
> > +  @retval  FALSE  Invalid RSA key component tag.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRsaSetKey (
> > +  IN OUT  VOID         *RsaContext,
> > +  IN      RSA_KEY_TAG  KeyTag,
> > +  IN      CONST UINT8  *BigNumber,
> > +  IN      UINTN        BnSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Rsa.Services.SetKey,
> RsaSetKey, (RsaContext,
> > KeyTag, BigNumber, BnSize), FALSE);
> > +}
> > +
> > +/**
> > +  Gets the tag-designated RSA key component from the
> established RSA context.
> > +
> > +  This function retrieves the tag-designated RSA key
> component from the
> > +  established RSA context as a non-negative integer
> (octet string format
> > +  represented in RSA PKCS#1).
> > +  If specified key component has not been set or has
> been cleared, then
> > returned
> > +  BnSize is set to 0.
> > +  If the BigNumber buffer is too small to hold the
> contents of the key, FALSE
> > +  is returned and BnSize is set to the required
> buffer size to obtain the key.
> > +
> > +  If RsaContext is NULL, then return FALSE.
> > +  If BnSize is NULL, then return FALSE.
> > +  If BnSize is large enough but BigNumber is NULL,
> then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  RsaContext  Pointer to RSA
> context being set.
> > +  @param[in]       KeyTag      Tag of RSA key
> component being set.
> > +  @param[out]      BigNumber   Pointer to octet
> integer buffer.
> > +  @param[in, out]  BnSize      On input, the size of
> big number buffer in bytes.
> > +                               On output, the size
> of data returned in big number buffer in
> > bytes.
> > +
> > +  @retval  TRUE   RSA key component was retrieved
> successfully.
> > +  @retval  FALSE  Invalid RSA key component tag.
> > +  @retval  FALSE  BnSize is too small.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRsaGetKey (
> > +  IN OUT  VOID         *RsaContext,
> > +  IN      RSA_KEY_TAG  KeyTag,
> > +  OUT     UINT8        *BigNumber,
> > +  IN OUT  UINTN        *BnSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Rsa.Services.GetKey,
> RsaGetKey, (RsaContext,
> > KeyTag, BigNumber, BnSize), FALSE);
> > +}
> > +
> > +/**
> > +  Generates RSA key components.
> > +
> > +  This function generates RSA key components. It
> takes RSA public exponent E
> > and
> > +  length in bits of RSA modulus N as input, and
> generates all key components.
> > +  If PublicExponent is NULL, the default RSA public
> exponent (0x10001) will be
> > used.
> > +
> > +  Before this function can be invoked, pseudorandom
> number generator must
> > be correctly
> > +  initialized by RandomSeed().
> > +
> > +  If RsaContext is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  RsaContext           Pointer to
> RSA context being set.
> > +  @param[in]       ModulusLength        Length of
> RSA modulus N in bits.
> > +  @param[in]       PublicExponent       Pointer to
> RSA public exponent.
> > +  @param[in]       PublicExponentSize   Size of RSA
> public exponent buffer in
> > bytes.
> > +
> > +  @retval  TRUE   RSA key component was generated
> successfully.
> > +  @retval  FALSE  Invalid RSA key component tag.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRsaGenerateKey (
> > +  IN OUT  VOID         *RsaContext,
> > +  IN      UINTN        ModulusLength,
> > +  IN      CONST UINT8  *PublicExponent,
> > +  IN      UINTN        PublicExponentSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Rsa.Services.GenerateKey, RsaGenerateKey,
> > (RsaContext, ModulusLength, PublicExponent,
> PublicExponentSize), FALSE);
> > +}
> > +
> > +/**
> > +  Validates key components of RSA context.
> > +  NOTE: This function performs integrity checks on
> all the RSA key material, so
> > +        the RSA key structure must contain all the
> private key data.
> > +
> > +  This function validates key components of RSA
> context in following aspects:
> > +  - Whether p is a prime
> > +  - Whether q is a prime
> > +  - Whether n = p * q
> > +  - Whether d*e = 1  mod lcm(p-1,q-1)
> > +
> > +  If RsaContext is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  RsaContext  Pointer to RSA context to
> check.
> > +
> > +  @retval  TRUE   RSA key components are valid.
> > +  @retval  FALSE  RSA key components are not valid.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRsaCheckKey (
> > +  IN  VOID  *RsaContext
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Rsa.Services.CheckKey,
> RsaCheckKey,
> > (RsaContext), FALSE);
> > +}
> > +
> > +/**
> > +  Carries out the RSA-SSA signature generation with
> EMSA-PKCS1-v1_5
> > encoding scheme.
> > +
> > +  This function carries out the RSA-SSA signature
> generation with EMSA-PKCS1-
> > v1_5 encoding scheme defined in
> > +  RSA PKCS#1.
> > +  If the Signature buffer is too small to hold the
> contents of signature, FALSE
> > +  is returned and SigSize is set to the required
> buffer size to obtain the signature.
> > +
> > +  If RsaContext is NULL, then return FALSE.
> > +  If MessageHash is NULL, then return FALSE.
> > +  If HashSize is not equal to the size of MD5, SHA-1
> or SHA-256 digest, then
> > return FALSE.
> > +  If SigSize is large enough but Signature is NULL,
> then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]      RsaContext   Pointer to RSA
> context for signature generation.
> > +  @param[in]      MessageHash  Pointer to octet
> message hash to be signed.
> > +  @param[in]      HashSize     Size of the message
> hash in bytes.
> > +  @param[out]     Signature    Pointer to buffer to
> receive RSA PKCS1-v1_5
> > signature.
> > +  @param[in, out] SigSize      On input, the size of
> Signature buffer in bytes.
> > +                               On output, the size
> of data returned in Signature buffer in
> > bytes.
> > +
> > +  @retval  TRUE   Signature successfully generated
> in PKCS1-v1_5.
> > +  @retval  FALSE  Signature generation failed.
> > +  @retval  FALSE  SigSize is too small.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRsaPkcs1Sign (
> > +  IN      VOID         *RsaContext,
> > +  IN      CONST UINT8  *MessageHash,
> > +  IN      UINTN        HashSize,
> > +  OUT     UINT8        *Signature,
> > +  IN OUT  UINTN        *SigSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Rsa.Services.Pkcs1Sign,
> RsaPkcs1Sign,
> > (RsaContext, MessageHash, HashSize, Signature,
> SigSize), FALSE);
> > +}
> > +
> > +/**
> > +  Verifies the RSA-SSA signature with EMSA-PKCS1-
> v1_5 encoding scheme
> > defined in
> > +  RSA PKCS#1.
> > +
> > +  If RsaContext is NULL, then return FALSE.
> > +  If MessageHash is NULL, then return FALSE.
> > +  If Signature is NULL, then return FALSE.
> > +  If HashSize is not equal to the size of MD5, SHA-
> 1, SHA-256 digest, then return
> > FALSE.
> > +
> > +  @param[in]  RsaContext   Pointer to RSA context
> for signature verification.
> > +  @param[in]  MessageHash  Pointer to octet message
> hash to be checked.
> > +  @param[in]  HashSize     Size of the message hash
> in bytes.
> > +  @param[in]  Signature    Pointer to RSA PKCS1-v1_5
> signature to be verified.
> > +  @param[in]  SigSize      Size of signature in
> bytes.
> > +
> > +  @retval  TRUE   Valid signature encoded in PKCS1-
> v1_5.
> > +  @retval  FALSE  Invalid signature or invalid RSA
> context.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRsaPkcs1Verify (
> > +  IN  VOID         *RsaContext,
> > +  IN  CONST UINT8  *MessageHash,
> > +  IN  UINTN        HashSize,
> > +  IN  CONST UINT8  *Signature,
> > +  IN  UINTN        SigSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Rsa.Services.Pkcs1Verify, RsaPkcs1Verify,
> > (RsaContext, MessageHash, HashSize, Signature,
> SigSize), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieve the RSA Private Key from the password-
> protected PEM key data.
> > +
> > +  If PemData is NULL, then return FALSE.
> > +  If RsaContext is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  PemData      Pointer to the PEM-
> encoded key data to be
> > retrieved.
> > +  @param[in]  PemSize      Size of the PEM key data
> in bytes.
> > +  @param[in]  Password     NULL-terminated
> passphrase used for encrypted
> > PEM key data.
> > +  @param[out] RsaContext   Pointer to new-generated
> RSA context which
> > contain the retrieved
> > +                           RSA private key
> component. Use RsaFree() function to free the
> > +                           resource.
> > +
> > +  @retval  TRUE   RSA Private Key was retrieved
> successfully.
> > +  @retval  FALSE  Invalid PEM key data or incorrect
> password.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRsaGetPrivateKeyFromPem (
> > +  IN   CONST UINT8  *PemData,
> > +  IN   UINTN        PemSize,
> > +  IN   CONST CHAR8  *Password,
> > +  OUT  VOID         **RsaContext
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Rsa.Services.GetPrivateKeyFromPem,
> > RsaGetPrivateKeyFromPem, (PemData, PemSize, Password,
> RsaContext), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieve the RSA Public Key from one DER-encoded
> X509 certificate.
> > +
> > +  If Cert is NULL, then return FALSE.
> > +  If RsaContext is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Cert         Pointer to the DER-
> encoded X509 certificate.
> > +  @param[in]  CertSize     Size of the X509
> certificate in bytes.
> > +  @param[out] RsaContext   Pointer to new-generated
> RSA context which
> > contain the retrieved
> > +                           RSA public key component.
> Use RsaFree() function to free the
> > +                           resource.
> > +
> > +  @retval  TRUE   RSA Public Key was retrieved
> successfully.
> > +  @retval  FALSE  Fail to retrieve RSA public key
> from X509 certificate.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRsaGetPublicKeyFromX509 (
> > +  IN   CONST UINT8  *Cert,
> > +  IN   UINTN        CertSize,
> > +  OUT  VOID         **RsaContext
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Rsa.Services.GetPublicKeyFromX509,
> > RsaGetPublicKeyFromX509, (Cert, CertSize,
> RsaContext), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieve the subject bytes from one X.509
> certificate.
> > +
> > +  If Cert is NULL, then return FALSE.
> > +  If SubjectSize is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]      Cert         Pointer to the DER-
> encoded X509 certificate.
> > +  @param[in]      CertSize     Size of the X509
> certificate in bytes.
> > +  @param[out]     CertSubject  Pointer to the
> retrieved certificate subject bytes.
> > +  @param[in, out] SubjectSize  The size in bytes of
> the CertSubject buffer on
> > input,
> > +                               and the size of
> buffer returned CertSubject on output.
> > +
> > +  @retval  TRUE   The certificate subject retrieved
> successfully.
> > +  @retval  FALSE  Invalid certificate, or the
> SubjectSize is too small for the result.
> > +                  The SubjectSize will be updated
> with the required size.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceX509GetSubjectName (
> > +  IN      CONST UINT8  *Cert,
> > +  IN      UINTN        CertSize,
> > +  OUT     UINT8        *CertSubject,
> > +  IN OUT  UINTN        *SubjectSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (X509.Services.GetSubjectName,
> > X509GetSubjectName, (Cert, CertSize, CertSubject,
> SubjectSize), FALSE);
> > +}
> > +
> > +/**
> > +  Retrieve the common name (CN) string from one
> X.509 certificate.
> > +
> > +  @param[in]      Cert             Pointer to the
> DER-encoded X509 certificate.
> > +  @param[in]      CertSize         Size of the X509
> certificate in bytes.
> > +  @param[out]     CommonName       Buffer to contain
> the retrieved certificate
> > common
> > +                                   name string
> (UTF8). At most CommonNameSize bytes will
> > be
> > +                                   written and the
> string will be null terminated. May be
> > +                                   NULL in order to
> determine the size buffer needed.
> > +  @param[in,out]  CommonNameSize   The size in bytes
> of the CommonName
> > buffer on input,
> > +                                   and the size of
> buffer returned CommonName on output.
> > +                                   If CommonName is
> NULL then the amount of space needed
> > +                                   in buffer
> (including the final null) is returned.
> > +
> > +  @retval RETURN_SUCCESS           The certificate
> CommonName retrieved
> > successfully.
> > +  @retval RETURN_INVALID_PARAMETER If Cert is NULL.
> > +                                   If CommonNameSize
> is NULL.
> > +                                   If CommonName is
> not NULL and *CommonNameSize is 0.
> > +                                   If Certificate is
> invalid.
> > +  @retval RETURN_NOT_FOUND         If no CommonName
> entry exists.
> > +  @retval RETURN_BUFFER_TOO_SMALL  If the CommonName
> is NULL. The
> > required buffer size
> > +                                   (including the
> final null) is returned in the
> > +                                   CommonNameSize
> parameter.
> > +  @retval RETURN_UNSUPPORTED       The operation is
> not supported.
> > +
> > +**/
> > +RETURN_STATUS
> > +EFIAPI
> > +CryptoServiceX509GetCommonName (
> > +  IN      CONST UINT8  *Cert,
> > +  IN      UINTN        CertSize,
> > +  OUT     CHAR8        *CommonName,  OPTIONAL
> > +  IN OUT  UINTN        *CommonNameSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (X509.Services.GetCommonName,
> > X509GetCommonName, (Cert, CertSize, CommonName,
> CommonNameSize),
> > RETURN_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Retrieve the organization name (O) string from one
> X.509 certificate.
> > +
> > +  @param[in]      Cert             Pointer to the
> DER-encoded X509 certificate.
> > +  @param[in]      CertSize         Size of the X509
> certificate in bytes.
> > +  @param[out]     NameBuffer       Buffer to contain
> the retrieved certificate
> > organization
> > +                                   name string. At
> most NameBufferSize bytes will be
> > +                                   written and the
> string will be null terminated. May be
> > +                                   NULL in order to
> determine the size buffer needed.
> > +  @param[in,out]  NameBufferSize   The size in bytes
> of the Name buffer on
> > input,
> > +                                   and the size of
> buffer returned Name on output.
> > +                                   If NameBuffer is
> NULL then the amount of space needed
> > +                                   in buffer
> (including the final null) is returned.
> > +
> > +  @retval RETURN_SUCCESS           The certificate
> Organization Name retrieved
> > successfully.
> > +  @retval RETURN_INVALID_PARAMETER If Cert is NULL.
> > +                                   If NameBufferSize
> is NULL.
> > +                                   If NameBuffer is
> not NULL and *CommonNameSize is 0.
> > +                                   If Certificate is
> invalid.
> > +  @retval RETURN_NOT_FOUND         If no
> Organization Name entry exists.
> > +  @retval RETURN_BUFFER_TOO_SMALL  If the NameBuffer
> is NULL. The
> > required buffer size
> > +                                   (including the
> final null) is returned in the
> > +                                   CommonNameSize
> parameter.
> > +  @retval RETURN_UNSUPPORTED       The operation is
> not supported.
> > +
> > +**/
> > +RETURN_STATUS
> > +EFIAPI
> > +CryptoServiceX509GetOrganizationName (
> > +  IN      CONST UINT8   *Cert,
> > +  IN      UINTN         CertSize,
> > +  OUT     CHAR8         *NameBuffer,  OPTIONAL
> > +  IN OUT  UINTN         *NameBufferSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (X509.Services.GetOrganizationName,
> > X509GetOrganizationName, (Cert, CertSize, NameBuffer,
> NameBufferSize),
> > RETURN_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Verify one X509 certificate was issued by the
> trusted CA.
> > +
> > +  If Cert is NULL, then return FALSE.
> > +  If CACert is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]      Cert         Pointer to the DER-
> encoded X509 certificate to be
> > verified.
> > +  @param[in]      CertSize     Size of the X509
> certificate in bytes.
> > +  @param[in]      CACert       Pointer to the DER-
> encoded trusted CA certificate.
> > +  @param[in]      CACertSize   Size of the CA
> Certificate in bytes.
> > +
> > +  @retval  TRUE   The certificate was issued by the
> trusted CA.
> > +  @retval  FALSE  Invalid certificate or the
> certificate was not issued by the
> > given
> > +                  trusted CA.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceX509VerifyCert (
> > +  IN  CONST UINT8  *Cert,
> > +  IN  UINTN        CertSize,
> > +  IN  CONST UINT8  *CACert,
> > +  IN  UINTN        CACertSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (X509.Services.VerifyCert, X509VerifyCert, (Cert,
> > CertSize, CACert, CACertSize), FALSE);
> > +}
> > +
> > +/**
> > +  Construct a X509 object from DER-encoded
> certificate data.
> > +
> > +  If Cert is NULL, then return FALSE.
> > +  If SingleX509Cert is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Cert            Pointer to the DER-
> encoded certificate data.
> > +  @param[in]  CertSize        The size of
> certificate data in bytes.
> > +  @param[out] SingleX509Cert  The generated X509
> object.
> > +
> > +  @retval     TRUE            The X509 object
> generation succeeded.
> > +  @retval     FALSE           The operation failed.
> > +  @retval     FALSE           This interface is not
> supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceX509ConstructCertificate (
> > +  IN   CONST UINT8  *Cert,
> > +  IN   UINTN        CertSize,
> > +  OUT  UINT8        **SingleX509Cert
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (X509.Services.ConstructCertificate,
> > X509ConstructCertificate, (Cert, CertSize,
> SingleX509Cert), FALSE);
> > +}
> > +
> > +/**
> > +  Construct a X509 stack object from a list of DER-
> encoded certificate data.
> > +
> > +  If X509Stack is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  X509Stack  On input, pointer to
> an existing or NULL X509
> > stack object.
> > +                              On output, pointer to
> the X509 stack object with new
> > +                              inserted X509
> certificate.
> > +  @param[in]       Args       VA_LIST marker for the
> variable argument list.
> > +                              A list of DER-encoded
> single certificate data followed
> > +                              by certificate size. A
> NULL terminates the list. The
> > +                              pairs are the
> arguments to X509ConstructCertificate().
> > +
> > +  @retval     TRUE            The X509 stack
> construction succeeded.
> > +  @retval     FALSE           The construction
> operation failed.
> > +  @retval     FALSE           This interface is not
> supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceX509ConstructCertificateStackV (
> > +  IN OUT  UINT8    **X509Stack,
> > +  IN      VA_LIST  Args
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (X509.Services.ConstructCertificateStackV,
> > X509ConstructCertificateStackV, (X509Stack, Args),
> FALSE);
> > +}
> > +
> > +/**
> > +  Construct a X509 stack object from a list of DER-
> encoded certificate data.
> > +
> > +  If X509Stack is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  X509Stack  On input, pointer to
> an existing or NULL X509
> > stack object.
> > +                              On output, pointer to
> the X509 stack object with new
> > +                              inserted X509
> certificate.
> > +  @param           ...        A list of DER-encoded
> single certificate data followed
> > +                              by certificate size. A
> NULL terminates the list. The
> > +                              pairs are the
> arguments to X509ConstructCertificate().
> > +
> > +  @retval     TRUE            The X509 stack
> construction succeeded.
> > +  @retval     FALSE           The construction
> operation failed.
> > +  @retval     FALSE           This interface is not
> supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceX509ConstructCertificateStack (
> > +  IN OUT  UINT8  **X509Stack,
> > +  ...
> > +  )
> > +{
> > +  VA_LIST  Args;
> > +  BOOLEAN  Result;
> > +
> > +  VA_START (Args, X509Stack);
> > +  Result =
> CryptoServiceX509ConstructCertificateStackV (X509Stack,
> Args);
> > +  VA_END (Args);
> > +  return Result;
> > +}
> > +
> > +/**
> > +  Release the specified X509 object.
> > +
> > +  If the interface is not supported, then ASSERT().
> > +
> > +  @param[in]  X509Cert  Pointer to the X509 object
> to be released.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceX509Free (
> > +  IN  VOID  *X509Cert
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (X509.Services.Free,
> X509Free, (X509Cert));
> > +}
> > +
> > +/**
> > +  Release the specified X509 stack object.
> > +
> > +  If the interface is not supported, then ASSERT().
> > +
> > +  @param[in]  X509Stack  Pointer to the X509 stack
> object to be released.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceX509StackFree (
> > +  IN  VOID  *X509Stack
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (X509.Services.StackFree,
> X509StackFree,
> > (X509Stack));
> > +}
> > +
> > +/**
> > +  Retrieve the TBSCertificate from one given X.509
> certificate.
> > +
> > +  @param[in]      Cert         Pointer to the given
> DER-encoded X509 certificate.
> > +  @param[in]      CertSize     Size of the X509
> certificate in bytes.
> > +  @param[out]     TBSCert      DER-Encoded To-Be-
> Signed certificate.
> > +  @param[out]     TBSCertSize  Size of the TBS
> certificate in bytes.
> > +
> > +  If Cert is NULL, then return FALSE.
> > +  If TBSCert is NULL, then return FALSE.
> > +  If TBSCertSize is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @retval  TRUE   The TBSCertificate was retrieved
> successfully.
> > +  @retval  FALSE  Invalid X.509 certificate.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceX509GetTBSCert (
> > +  IN  CONST UINT8  *Cert,
> > +  IN  UINTN        CertSize,
> > +  OUT UINT8        **TBSCert,
> > +  OUT UINTN        *TBSCertSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (X509.Services.GetTBSCert, X509GetTBSCert,
> > (Cert, CertSize, TBSCert, TBSCertSize), FALSE);
> > +}
> > +
> > +/**
> > +  Derives a key from a password using a salt and
> iteration count, based on
> > PKCS#5 v2.0
> > +  password based encryption key derivation function
> PBKDF2, as specified in
> > RFC 2898.
> > +
> > +  If Password or Salt or OutKey is NULL, then return
> FALSE.
> > +  If the hash algorithm could not be determined,
> then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  PasswordLength  Length of input
> password in bytes.
> > +  @param[in]  Password        Pointer to the array
> for the password.
> > +  @param[in]  SaltLength      Size of the Salt in
> bytes.
> > +  @param[in]  Salt            Pointer to the Salt.
> > +  @param[in]  IterationCount  Number of iterations
> to perform. Its value should
> > be
> > +                              greater than or equal
> to 1.
> > +  @param[in]  DigestSize      Size of the message
> digest to be used (eg.
> > SHA256_DIGEST_SIZE).
> > +                              NOTE: DigestSize will
> be used to determine the hash algorithm.
> > +                                    Only
> SHA1_DIGEST_SIZE or SHA256_DIGEST_SIZE is
> > supported.
> > +  @param[in]  KeyLength       Size of the derived
> key buffer in bytes.
> > +  @param[out] OutKey          Pointer to the output
> derived key buffer.
> > +
> > +  @retval  TRUE   A key was derived successfully.
> > +  @retval  FALSE  One of the pointers was NULL or
> one of the sizes was too
> > large.
> > +  @retval  FALSE  The hash algorithm could not be
> determined from the digest
> > size.
> > +  @retval  FALSE  The key derivation operation
> failed.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServicePkcs5HashPassword (
> > +  IN  UINTN        PasswordLength,
> > +  IN  CONST CHAR8  *Password,
> > +  IN  UINTN        SaltLength,
> > +  IN  CONST UINT8  *Salt,
> > +  IN  UINTN        IterationCount,
> > +  IN  UINTN        DigestSize,
> > +  IN  UINTN        KeyLength,
> > +  OUT UINT8        *OutKey
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Pkcs.Services.Pkcs5HashPassword,
> > Pkcs5HashPassword, (PasswordLength, Password,
> SaltLength, Salt,
> > IterationCount, DigestSize, KeyLength, OutKey),
> FALSE);
> > +}
> > +
> > +/**
> > +  Encrypts a blob using PKCS1v2 (RSAES-OAEP) schema.
> On success, will return
> > the
> > +  encrypted message in a newly allocated buffer.
> > +
> > +  Things that can cause a failure include:
> > +  - X509 key size does not match any known key size.
> > +  - Fail to parse X509 certificate.
> > +  - Fail to allocate an intermediate buffer.
> > +  - Null pointer provided for a non-optional
> parameter.
> > +  - Data size is too large for the provided key size
> (max size is a function of key
> > size
> > +    and hash digest size).
> > +
> > +  @param[in]  PublicKey           A pointer to the
> DER-encoded X509 certificate
> > that
> > +                                  will be used to
> encrypt the data.
> > +  @param[in]  PublicKeySize       Size of the X509
> cert buffer.
> > +  @param[in]  InData              Data to be
> encrypted.
> > +  @param[in]  InDataSize          Size of the data
> buffer.
> > +  @param[in]  PrngSeed            [Optional] If
> provided, a pointer to a random
> > seed buffer
> > +                                  to be used when
> initializing the PRNG. NULL otherwise.
> > +  @param[in]  PrngSeedSize        [Optional] If
> provided, size of the random seed
> > buffer.
> > +                                  0 otherwise.
> > +  @param[out] EncryptedData       Pointer to an
> allocated buffer containing the
> > encrypted
> > +                                  message.
> > +  @param[out] EncryptedDataSize   Size of the
> encrypted message buffer.
> > +
> > +  @retval     TRUE                Encryption was
> successful.
> > +  @retval     FALSE               Encryption failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServicePkcs1v2Encrypt (
> > +  IN   CONST UINT8  *PublicKey,
> > +  IN   UINTN        PublicKeySize,
> > +  IN   UINT8        *InData,
> > +  IN   UINTN        InDataSize,
> > +  IN   CONST UINT8  *PrngSeed,  OPTIONAL
> > +  IN   UINTN        PrngSeedSize,  OPTIONAL
> > +  OUT  UINT8        **EncryptedData,
> > +  OUT  UINTN        *EncryptedDataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Pkcs.Services.Pkcs1v2Encrypt, Pkcs1v2Encrypt,
> > (PublicKey, PublicKeySize, InData, InDataSize,
> PrngSeed, PrngSeedSize,
> > EncryptedData, EncryptedDataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Get the signer's certificates from PKCS#7 signed
> data as described in "PKCS #7:
> > +  Cryptographic Message Syntax Standard". The input
> signed data could be
> > wrapped
> > +  in a ContentInfo structure.
> > +
> > +  If P7Data, CertStack, StackLength, TrustedCert or
> CertLength is NULL, then
> > +  return FALSE. If P7Length overflow, then return
> FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  P7Data       Pointer to the PKCS#7
> message to verify.
> > +  @param[in]  P7Length     Length of the PKCS#7
> message in bytes.
> > +  @param[out] CertStack    Pointer to Signer's
> certificates retrieved from
> > P7Data.
> > +                           It's caller's
> responsibility to free the buffer with
> > +                           Pkcs7FreeSigners().
> > +                           This data structure is
> EFI_CERT_STACK type.
> > +  @param[out] StackLength  Length of signer's
> certificates in bytes.
> > +  @param[out] TrustedCert  Pointer to a trusted
> certificate from Signer's
> > certificates.
> > +                           It's caller's
> responsibility to free the buffer with
> > +                           Pkcs7FreeSigners().
> > +  @param[out] CertLength   Length of the trusted
> certificate in bytes.
> > +
> > +  @retval  TRUE            The operation is finished
> successfully.
> > +  @retval  FALSE           Error occurs during the
> operation.
> > +  @retval  FALSE           This interface is not
> supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServicePkcs7GetSigners (
> > +  IN  CONST UINT8  *P7Data,
> > +  IN  UINTN        P7Length,
> > +  OUT UINT8        **CertStack,
> > +  OUT UINTN        *StackLength,
> > +  OUT UINT8        **TrustedCert,
> > +  OUT UINTN        *CertLength
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Pkcs.Services.Pkcs7GetSigners, Pkcs7GetSigners,
> > (P7Data, P7Length, CertStack, StackLength,
> TrustedCert, CertLength), FALSE);
> > +}
> > +
> > +/**
> > +  Wrap function to use free() to free allocated
> memory for certificates.
> > +
> > +  If this interface is not supported, then ASSERT().
> > +
> > +  @param[in]  Certs        Pointer to the
> certificates to be freed.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServicePkcs7FreeSigners (
> > +  IN  UINT8        *Certs
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB
> (Pkcs.Services.Pkcs7FreeSigners, Pkcs7FreeSigners,
> > (Certs));
> > +}
> > +
> > +/**
> > +  Retrieves all embedded certificates from PKCS#7
> signed data as described in
> > "PKCS #7:
> > +  Cryptographic Message Syntax Standard", and
> outputs two certificate lists
> > chained and
> > +  unchained to the signer's certificates.
> > +  The input signed data could be wrapped in a
> ContentInfo structure.
> > +
> > +  @param[in]  P7Data            Pointer to the
> PKCS#7 message.
> > +  @param[in]  P7Length          Length of the PKCS#7
> message in bytes.
> > +  @param[out] SignerChainCerts  Pointer to the
> certificates list chained to
> > signer's
> > +                                certificate. It's
> caller's responsibility to free the buffer
> > +                                with
> Pkcs7FreeSigners().
> > +                                This data structure
> is EFI_CERT_STACK type.
> > +  @param[out] ChainLength       Length of the
> chained certificates list buffer in
> > bytes.
> > +  @param[out] UnchainCerts      Pointer to the
> unchained certificates lists. It's
> > caller's
> > +                                responsibility to
> free the buffer with Pkcs7FreeSigners().
> > +                                This data structure
> is EFI_CERT_STACK type.
> > +  @param[out] UnchainLength     Length of the
> unchained certificates list buffer
> > in bytes.
> > +
> > +  @retval  TRUE         The operation is finished
> successfully.
> > +  @retval  FALSE        Error occurs during the
> operation.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServicePkcs7GetCertificatesList (
> > +  IN  CONST UINT8  *P7Data,
> > +  IN  UINTN        P7Length,
> > +  OUT UINT8        **SignerChainCerts,
> > +  OUT UINTN        *ChainLength,
> > +  OUT UINT8        **UnchainCerts,
> > +  OUT UINTN        *UnchainLength
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Pkcs.Services.Pkcs7GetCertificatesList,
> > Pkcs7GetCertificatesList, (P7Data, P7Length,
> SignerChainCerts, ChainLength,
> > UnchainCerts, UnchainLength), FALSE);
> > +}
> > +
> > +/**
> > +  Creates a PKCS#7 signedData as described in "PKCS
> #7: Cryptographic
> > Message
> > +  Syntax Standard, version 1.5". This interface is
> only intended to be used for
> > +  application to perform PKCS#7 functionality
> validation.
> > +
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  PrivateKey       Pointer to the PEM-
> formatted private key data for
> > +                               data signing.
> > +  @param[in]  PrivateKeySize   Size of the PEM
> private key data in bytes.
> > +  @param[in]  KeyPassword      NULL-terminated
> passphrase used for encrypted
> > PEM
> > +                               key data.
> > +  @param[in]  InData           Pointer to the
> content to be signed.
> > +  @param[in]  InDataSize       Size of InData in
> bytes.
> > +  @param[in]  SignCert         Pointer to signer's
> DER-encoded certificate to sign
> > with.
> > +  @param[in]  OtherCerts       Pointer to an
> optional additional set of
> > certificates to
> > +                               include in the PKCS#7
> signedData (e.g. any intermediate
> > +                               CAs in the chain).
> > +  @param[out] SignedData       Pointer to output
> PKCS#7 signedData. It's caller's
> > +                               responsibility to
> free the buffer with FreePool().
> > +  @param[out] SignedDataSize   Size of SignedData in
> bytes.
> > +
> > +  @retval     TRUE             PKCS#7 data signing
> succeeded.
> > +  @retval     FALSE            PKCS#7 data signing
> failed.
> > +  @retval     FALSE            This interface is not
> supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServicePkcs7Sign (
> > +  IN   CONST UINT8  *PrivateKey,
> > +  IN   UINTN        PrivateKeySize,
> > +  IN   CONST UINT8  *KeyPassword,
> > +  IN   UINT8        *InData,
> > +  IN   UINTN        InDataSize,
> > +  IN   UINT8        *SignCert,
> > +  IN   UINT8        *OtherCerts      OPTIONAL,
> > +  OUT  UINT8        **SignedData,
> > +  OUT  UINTN        *SignedDataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Pkcs.Services.Pkcs7Sign,
> Pkcs7Sign, (PrivateKey,
> > PrivateKeySize, KeyPassword, InData, InDataSize,
> SignCert, OtherCerts,
> > SignedData, SignedDataSize), FALSE);
> > +}
> > +
> > +/**
> > +  Verifies the validity of a PKCS#7 signed data as
> described in "PKCS #7:
> > +  Cryptographic Message Syntax Standard". The input
> signed data could be
> > wrapped
> > +  in a ContentInfo structure.
> > +
> > +  If P7Data, TrustedCert or InData is NULL, then
> return FALSE.
> > +  If P7Length, CertLength or DataLength overflow,
> then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  P7Data       Pointer to the PKCS#7
> message to verify.
> > +  @param[in]  P7Length     Length of the PKCS#7
> message in bytes.
> > +  @param[in]  TrustedCert  Pointer to a trusted/root
> certificate encoded in DER,
> > which
> > +                           is used for certificate
> chain verification.
> > +  @param[in]  CertLength   Length of the trusted
> certificate in bytes.
> > +  @param[in]  InData       Pointer to the content to
> be verified.
> > +  @param[in]  DataLength   Length of InData in
> bytes.
> > +
> > +  @retval  TRUE  The specified PKCS#7 signed data is
> valid.
> > +  @retval  FALSE Invalid PKCS#7 signed data.
> > +  @retval  FALSE This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServicePkcs7Verify (
> > +  IN  CONST UINT8  *P7Data,
> > +  IN  UINTN        P7Length,
> > +  IN  CONST UINT8  *TrustedCert,
> > +  IN  UINTN        CertLength,
> > +  IN  CONST UINT8  *InData,
> > +  IN  UINTN        DataLength
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Pkcs.Services.Pkcs7Verify, Pkcs7Verify, (P7Data,
> > P7Length, TrustedCert, CertLength, InData,
> DataLength), FALSE);
> > +}
> > +
> > +/**
> > +  This function receives a PKCS7 formatted
> signature, and then verifies that
> > +  the specified Enhanced or Extended Key Usages
> (EKU's) are present in the end-
> > entity
> > +  leaf signing certificate.
> > +  Note that this function does not validate the
> certificate chain.
> > +
> > +  Applications for custom EKU's are quite flexible.
> For example, a policy EKU
> > +  may be present in an Issuing Certificate Authority
> (CA), and any sub-ordinate
> > +  certificate issued might also contain this EKU,
> thus constraining the
> > +  sub-ordinate certificate.  Other applications
> might allow a certificate
> > +  embedded in a device to specify that other Object
> Identifiers (OIDs) are
> > +  present which contains binary data specifying
> custom capabilities that
> > +  the device is able to do.
> > +
> > +  @param[in]  Pkcs7Signature       The PKCS#7 signed
> information content block.
> > An array
> > +                                   containing the
> content block with both the signature,
> > +                                   the signer's
> certificate, and any necessary intermediate
> > +                                   certificates.
> > +  @param[in]  Pkcs7SignatureSize   Number of bytes
> in Pkcs7Signature.
> > +  @param[in]  RequiredEKUs         Array of null-
> terminated strings listing OIDs of
> > +                                   required EKUs
> that must be present in the signature.
> > +  @param[in]  RequiredEKUsSize     Number of
> elements in the RequiredEKUs
> > string array.
> > +  @param[in]  RequireAllPresent    If this is TRUE,
> then all of the specified EKU's
> > +                                   must be present
> in the leaf signer.  If it is
> > +                                   FALSE, then we
> will succeed if we find any
> > +                                   of the specified
> EKU's.
> > +
> > +  @retval EFI_SUCCESS              The required EKUs
> were found in the signature.
> > +  @retval EFI_INVALID_PARAMETER    A parameter was
> invalid.
> > +  @retval EFI_NOT_FOUND            One or more EKU's
> were not found in the
> > signature.
> > +
> > +**/
> > +RETURN_STATUS
> > +EFIAPI
> > +CryptoServiceVerifyEKUsInPkcs7Signature (
> > +  IN  CONST UINT8   *Pkcs7Signature,
> > +  IN  CONST UINT32  SignatureSize,
> > +  IN  CONST CHAR8   *RequiredEKUs[],
> > +  IN  CONST UINT32  RequiredEKUsSize,
> > +  IN  BOOLEAN       RequireAllPresent
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Pkcs.Services.VerifyEKUsInPkcs7Signature,
> > VerifyEKUsInPkcs7Signature, (Pkcs7Signature,
> SignatureSize, RequiredEKUs,
> > RequiredEKUsSize, RequireAllPresent), FALSE);
> > +}
> > +
> > +
> > +/**
> > +  Extracts the attached content from a PKCS#7 signed
> data if existed. The input
> > signed
> > +  data could be wrapped in a ContentInfo structure.
> > +
> > +  If P7Data, Content, or ContentSize is NULL, then
> return FALSE. If P7Length
> > overflow,
> > +  then return FALSE. If the P7Data is not correctly
> formatted, then return FALSE.
> > +
> > +  Caution: This function may receive untrusted
> input. So this function will do
> > +           basic check for PKCS#7 data structure.
> > +
> > +  @param[in]   P7Data       Pointer to the PKCS#7
> signed data to process.
> > +  @param[in]   P7Length     Length of the PKCS#7
> signed data in bytes.
> > +  @param[out]  Content      Pointer to the extracted
> content from the PKCS#7
> > signedData.
> > +                            It's caller's
> responsibility to free the buffer with FreePool().
> > +  @param[out]  ContentSize  The size of the
> extracted content in bytes.
> > +
> > +  @retval     TRUE          The P7Data was correctly
> formatted for processing.
> > +  @retval     FALSE         The P7Data was not
> correctly formatted for processing.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServicePkcs7GetAttachedContent (
> > +  IN  CONST UINT8  *P7Data,
> > +  IN  UINTN        P7Length,
> > +  OUT VOID         **Content,
> > +  OUT UINTN        *ContentSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Pkcs.Services.Pkcs7GetAttachedContent,
> > Pkcs7GetAttachedContent, (P7Data, P7Length, Content,
> ContentSize), FALSE);
> > +}
> > +
> > +/**
> > +  Verifies the validity of a PE/COFF Authenticode
> Signature as described in
> > "Windows
> > +  Authenticode Portable Executable Signature
> Format".
> > +
> > +  If AuthData is NULL, then return FALSE.
> > +  If ImageHash is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  AuthData     Pointer to the
> Authenticode Signature retrieved from
> > signed
> > +                           PE/COFF image to be
> verified.
> > +  @param[in]  DataSize     Size of the Authenticode
> Signature in bytes.
> > +  @param[in]  TrustedCert  Pointer to a trusted/root
> certificate encoded in DER,
> > which
> > +                           is used for certificate
> chain verification.
> > +  @param[in]  CertSize     Size of the trusted
> certificate in bytes.
> > +  @param[in]  ImageHash    Pointer to the original
> image file hash value. The
> > procedure
> > +                           for calculating the image
> hash value is described in Authenticode
> > +                           specification.
> > +  @param[in]  HashSize     Size of Image hash value
> in bytes.
> > +
> > +  @retval  TRUE   The specified Authenticode
> Signature is valid.
> > +  @retval  FALSE  Invalid Authenticode Signature.
> > +  @retval  FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceAuthenticodeVerify (
> > +  IN  CONST UINT8  *AuthData,
> > +  IN  UINTN        DataSize,
> > +  IN  CONST UINT8  *TrustedCert,
> > +  IN  UINTN        CertSize,
> > +  IN  CONST UINT8  *ImageHash,
> > +  IN  UINTN        HashSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Pkcs.Services.AuthenticodeVerify,
> > AuthenticodeVerify, (AuthData, DataSize, TrustedCert,
> CertSize, ImageHash,
> > HashSize), FALSE);
> > +}
> > +
> > +/**
> > +  Verifies the validity of a RFC3161 Timestamp
> CounterSignature embedded in
> > PE/COFF Authenticode
> > +  signature.
> > +
> > +  If AuthData is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  AuthData     Pointer to the
> Authenticode Signature retrieved from
> > signed
> > +                           PE/COFF image to be
> verified.
> > +  @param[in]  DataSize     Size of the Authenticode
> Signature in bytes.
> > +  @param[in]  TsaCert      Pointer to a trusted/root
> TSA certificate encoded in
> > DER, which
> > +                           is used for TSA
> certificate chain verification.
> > +  @param[in]  CertSize     Size of the trusted
> certificate in bytes.
> > +  @param[out] SigningTime  Return the time of
> timestamp generation time if
> > the timestamp
> > +                           signature is valid.
> > +
> > +  @retval  TRUE   The specified Authenticode
> includes a valid RFC3161
> > Timestamp CounterSignature.
> > +  @retval  FALSE  No valid RFC3161 Timestamp
> CounterSignature in the
> > specified Authenticode data.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceImageTimestampVerify (
> > +  IN  CONST UINT8  *AuthData,
> > +  IN  UINTN        DataSize,
> > +  IN  CONST UINT8  *TsaCert,
> > +  IN  UINTN        CertSize,
> > +  OUT EFI_TIME     *SigningTime
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Pkcs.Services.ImageTimestampVerify,
> > ImageTimestampVerify, (AuthData, DataSize, TsaCert,
> CertSize, SigningTime),
> > FALSE);
> > +}
> > +
> >
> +//====================================================
> ==========
> > =======================
> > +//    DH Key Exchange Primitive
> >
> +//====================================================
> ==========
> > =======================
> > +
> > +/**
> > +  Allocates and Initializes one Diffie-Hellman
> Context for subsequent use.
> > +
> > +  @return  Pointer to the Diffie-Hellman Context
> that has been initialized.
> > +           If the allocations fails, DhNew() returns
> NULL.
> > +           If the interface is not supported,
> DhNew() returns NULL.
> > +
> > +**/
> > +VOID *
> > +EFIAPI
> > +CryptoServiceDhNew (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Dh.Services.New, DhNew,
> (), NULL);
> > +}
> > +
> > +/**
> > +  Release the specified DH context.
> > +
> > +  If the interface is not supported, then ASSERT().
> > +
> > +  @param[in]  DhContext  Pointer to the DH context
> to be released.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceDhFree (
> > +  IN  VOID  *DhContext
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (Dh.Services.Free, DhFree,
> (DhContext));
> > +}
> > +
> > +/**
> > +  Generates DH parameter.
> > +
> > +  Given generator g, and length of prime number p in
> bits, this function
> > generates p,
> > +  and sets DH context according to value of g and p.
> > +
> > +  Before this function can be invoked, pseudorandom
> number generator must
> > be correctly
> > +  initialized by RandomSeed().
> > +
> > +  If DhContext is NULL, then return FALSE.
> > +  If Prime is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  DhContext    Pointer to the DH
> context.
> > +  @param[in]       Generator    Value of generator.
> > +  @param[in]       PrimeLength  Length in bits of
> prime to be generated.
> > +  @param[out]      Prime        Pointer to the
> buffer to receive the generated
> > prime number.
> > +
> > +  @retval TRUE   DH parameter generation succeeded.
> > +  @retval FALSE  Value of Generator is not
> supported.
> > +  @retval FALSE  PRNG fails to generate random prime
> number with
> > PrimeLength.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceDhGenerateParameter (
> > +  IN OUT  VOID   *DhContext,
> > +  IN      UINTN  Generator,
> > +  IN      UINTN  PrimeLength,
> > +  OUT     UINT8  *Prime
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Dh.Services.GenerateParameter,
> > DhGenerateParameter, (DhContext, Generator,
> PrimeLength, Prime), FALSE);
> > +}
> > +
> > +/**
> > +  Sets generator and prime parameters for DH.
> > +
> > +  Given generator g, and prime number p, this
> function and sets DH
> > +  context accordingly.
> > +
> > +  If DhContext is NULL, then return FALSE.
> > +  If Prime is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  DhContext    Pointer to the DH
> context.
> > +  @param[in]       Generator    Value of generator.
> > +  @param[in]       PrimeLength  Length in bits of
> prime to be generated.
> > +  @param[in]       Prime        Pointer to the prime
> number.
> > +
> > +  @retval TRUE   DH parameter setting succeeded.
> > +  @retval FALSE  Value of Generator is not
> supported.
> > +  @retval FALSE  Value of Generator is not suitable
> for the Prime.
> > +  @retval FALSE  Value of Prime is not a prime
> number.
> > +  @retval FALSE  Value of Prime is not a safe prime
> number.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceDhSetParameter (
> > +  IN OUT  VOID         *DhContext,
> > +  IN      UINTN        Generator,
> > +  IN      UINTN        PrimeLength,
> > +  IN      CONST UINT8  *Prime
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Dh.Services.SetParameter, DhSetParameter,
> > (DhContext, Generator, PrimeLength, Prime), FALSE);
> > +}
> > +
> > +/**
> > +  Generates DH public key.
> > +
> > +  This function generates random secret exponent,
> and computes the public key,
> > which is
> > +  returned via parameter PublicKey and
> PublicKeySize. DH context is updated
> > accordingly.
> > +  If the PublicKey buffer is too small to hold the
> public key, FALSE is returned
> > and
> > +  PublicKeySize is set to the required buffer size
> to obtain the public key.
> > +
> > +  If DhContext is NULL, then return FALSE.
> > +  If PublicKeySize is NULL, then return FALSE.
> > +  If PublicKeySize is large enough but PublicKey is
> NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  DhContext      Pointer to the DH
> context.
> > +  @param[out]      PublicKey      Pointer to the
> buffer to receive generated public
> > key.
> > +  @param[in, out]  PublicKeySize  On input, the size
> of PublicKey buffer in bytes.
> > +                                 On output, the size
> of data returned in PublicKey buffer in
> > bytes.
> > +
> > +  @retval TRUE   DH public key generation succeeded.
> > +  @retval FALSE  DH public key generation failed.
> > +  @retval FALSE  PublicKeySize is not large enough.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceDhGenerateKey (
> > +  IN OUT  VOID   *DhContext,
> > +  OUT     UINT8  *PublicKey,
> > +  IN OUT  UINTN  *PublicKeySize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Dh.Services.GenerateKey,
> DhGenerateKey,
> > (DhContext, PublicKey, PublicKeySize), FALSE);
> > +}
> > +
> > +/**
> > +  Computes exchanged common key.
> > +
> > +  Given peer's public key, this function computes
> the exchanged common key,
> > based on its own
> > +  context including value of prime modulus and
> random secret exponent.
> > +
> > +  If DhContext is NULL, then return FALSE.
> > +  If PeerPublicKey is NULL, then return FALSE.
> > +  If KeySize is NULL, then return FALSE.
> > +  If Key is NULL, then return FALSE.
> > +  If KeySize is not large enough, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in, out]  DhContext          Pointer to the
> DH context.
> > +  @param[in]       PeerPublicKey      Pointer to the
> peer's public key.
> > +  @param[in]       PeerPublicKeySize  Size of peer's
> public key in bytes.
> > +  @param[out]      Key                Pointer to the
> buffer to receive generated key.
> > +  @param[in, out]  KeySize            On input, the
> size of Key buffer in bytes.
> > +                                     On output, the
> size of data returned in Key buffer in bytes.
> > +
> > +  @retval TRUE   DH exchanged key generation
> succeeded.
> > +  @retval FALSE  DH exchanged key generation failed.
> > +  @retval FALSE  KeySize is not large enough.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceDhComputeKey (
> > +  IN OUT  VOID         *DhContext,
> > +  IN      CONST UINT8  *PeerPublicKey,
> > +  IN      UINTN        PeerPublicKeySize,
> > +  OUT     UINT8        *Key,
> > +  IN OUT  UINTN        *KeySize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Dh.Services.ComputeKey,
> DhComputeKey,
> > (DhContext, PeerPublicKey, PeerPublicKeySize, Key,
> KeySize), FALSE);
> > +}
> > +
> >
> +//====================================================
> ==========
> > =======================
> > +//    Pseudo-Random Generation Primitive
> >
> +//====================================================
> ==========
> > =======================
> > +
> > +/**
> > +  Sets up the seed value for the pseudorandom number
> generator.
> > +
> > +  This function sets up the seed value for the
> pseudorandom number generator.
> > +  If Seed is not NULL, then the seed passed in is
> used.
> > +  If Seed is NULL, then default seed is used.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[in]  Seed      Pointer to seed value.
> > +                        If NULL, default seed is
> used.
> > +  @param[in]  SeedSize  Size of seed value.
> > +                        If Seed is NULL, this
> parameter is ignored.
> > +
> > +  @retval TRUE   Pseudorandom number generator has
> enough entropy for
> > random generation.
> > +  @retval FALSE  Pseudorandom number generator does
> not have enough
> > entropy for random generation.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRandomSeed (
> > +  IN  CONST  UINT8  *Seed  OPTIONAL,
> > +  IN  UINTN         SeedSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Random.Services.Seed,
> RandomSeed, (Seed,
> > SeedSize), FALSE);
> > +}
> > +
> > +/**
> > +  Generates a pseudorandom byte stream of the
> specified size.
> > +
> > +  If Output is NULL, then return FALSE.
> > +  If this interface is not supported, then return
> FALSE.
> > +
> > +  @param[out]  Output  Pointer to buffer to receive
> random value.
> > +  @param[in]   Size    Size of random bytes to
> generate.
> > +
> > +  @retval TRUE   Pseudorandom byte stream generated
> successfully.
> > +  @retval FALSE  Pseudorandom number generator fails
> to generate due to lack
> > of entropy.
> > +  @retval FALSE  This interface is not supported.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceRandomBytes (
> > +  OUT  UINT8  *Output,
> > +  IN   UINTN  Size
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Random.Services.Bytes,
> RandomBytes, (Output,
> > Size), FALSE);
> > +}
> > +
> >
> +//====================================================
> ==========
> > =======================
> > +//    Key Derivation Function Primitive
> >
> +//====================================================
> ==========
> > =======================
> > +
> > +/**
> > +  Derive key data using HMAC-SHA256 based KDF.
> > +
> > +  @param[in]   Key              Pointer to the user-
> supplied key.
> > +  @param[in]   KeySize          Key size in bytes.
> > +  @param[in]   Salt             Pointer to the
> salt(non-secret) value.
> > +  @param[in]   SaltSize         Salt size in bytes.
> > +  @param[in]   Info             Pointer to the
> application specific info.
> > +  @param[in]   InfoSize         Info size in bytes.
> > +  @param[out]  Out              Pointer to buffer to
> receive hkdf value.
> > +  @param[in]   OutSize          Size of hkdf bytes
> to generate.
> > +
> > +  @retval TRUE   Hkdf generated successfully.
> > +  @retval FALSE  Hkdf generation failed.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceHkdfSha256ExtractAndExpand (
> > +  IN   CONST UINT8  *Key,
> > +  IN   UINTN        KeySize,
> > +  IN   CONST UINT8  *Salt,
> > +  IN   UINTN        SaltSize,
> > +  IN   CONST UINT8  *Info,
> > +  IN   UINTN        InfoSize,
> > +  OUT  UINT8        *Out,
> > +  IN   UINTN        OutSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Hkdf.Services.Sha256ExtractAndExpand,
> > HkdfSha256ExtractAndExpand, (Key, KeySize, Salt,
> SaltSize, Info, InfoSize, Out,
> > OutSize), FALSE);
> > +}
> > +
> > +/**
> > +  Initializes the OpenSSL library.
> > +
> > +  This function registers ciphers and digests used
> directly and indirectly
> > +  by SSL/TLS, and initializes the readable error
> messages.
> > +  This function must be called before any other
> action takes places.
> > +
> > +  @retval TRUE   The OpenSSL library has been
> initialized.
> > +  @retval FALSE  Failed to initialize the OpenSSL
> library.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceTlsInitialize (
> > +  VOID
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Tls.Services.Initialize,
> TlsInitialize, (), FALSE);
> > +}
> > +
> > +/**
> > +  Free an allocated SSL_CTX object.
> > +
> > +  @param[in]  TlsCtx    Pointer to the SSL_CTX
> object to be released.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceTlsCtxFree (
> > +  IN   VOID                  *TlsCtx
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (Tls.Services.CtxFree,
> TlsCtxFree, (TlsCtx));
> > +}
> > +
> > +/**
> > +  Creates a new SSL_CTX object as framework to
> establish TLS/SSL enabled
> > +  connections.
> > +
> > +  @param[in]  MajorVer    Major Version of TLS/SSL
> Protocol.
> > +  @param[in]  MinorVer    Minor Version of TLS/SSL
> Protocol.
> > +
> > +  @return  Pointer to an allocated SSL_CTX object.
> > +           If the creation failed, TlsCtxNew()
> returns NULL.
> > +
> > +**/
> > +VOID *
> > +EFIAPI
> > +CryptoServiceTlsCtxNew (
> > +  IN     UINT8                    MajorVer,
> > +  IN     UINT8                    MinorVer
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Tls.Services.CtxNew,
> TlsCtxNew, (MajorVer,
> > MinorVer), NULL);
> > +}
> > +
> > +/**
> > +  Free an allocated TLS object.
> > +
> > +  This function removes the TLS object pointed to by
> Tls and frees up the
> > +  allocated memory. If Tls is NULL, nothing is done.
> > +
> > +  @param[in]  Tls    Pointer to the TLS object to be
> freed.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceTlsFree (
> > +  IN     VOID                     *Tls
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (Tls.Services.Free,
> TlsFree, (Tls));
> > +}
> > +
> > +/**
> > +  Create a new TLS object for a connection.
> > +
> > +  This function creates a new TLS object for a
> connection. The new object
> > +  inherits the setting of the underlying context
> TlsCtx: connection method,
> > +  options, verification setting.
> > +
> > +  @param[in]  TlsCtx    Pointer to the SSL_CTX
> object.
> > +
> > +  @return  Pointer to an allocated SSL object.
> > +           If the creation failed, TlsNew() returns
> NULL.
> > +
> > +**/
> > +VOID *
> > +EFIAPI
> > +CryptoServiceTlsNew (
> > +  IN     VOID                     *TlsCtx
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Tls.Services.New,
> TlsNew, (TlsCtx), NULL);
> > +}
> > +
> > +/**
> > +  Checks if the TLS handshake was done.
> > +
> > +  This function will check if the specified TLS
> handshake was done.
> > +
> > +  @param[in]  Tls    Pointer to the TLS object for
> handshake state checking.
> > +
> > +  @retval  TRUE     The TLS handshake was done.
> > +  @retval  FALSE    The TLS handshake was not done.
> > +
> > +**/
> > +BOOLEAN
> > +EFIAPI
> > +CryptoServiceTlsInHandshake (
> > +  IN     VOID                     *Tls
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tls.Services.InHandshake, TlsInHandshake, (Tls),
> > FALSE);
> > +}
> > +
> > +/**
> > +  Perform a TLS/SSL handshake.
> > +
> > +  This function will perform a TLS/SSL handshake.
> > +
> > +  @param[in]       Tls            Pointer to the TLS
> object for handshake operation.
> > +  @param[in]       BufferIn       Pointer to the
> most recently received TLS
> > Handshake packet.
> > +  @param[in]       BufferInSize   Packet size in
> bytes for the most recently
> > received TLS
> > +                                  Handshake packet.
> > +  @param[out]      BufferOut      Pointer to the
> buffer to hold the built packet.
> > +  @param[in, out]  BufferOutSize  Pointer to the
> buffer size in bytes. On input, it
> > is
> > +                                  the buffer size
> provided by the caller. On output, it
> > +                                  is the buffer size
> in fact needed to contain the
> > +                                  packet.
> > +
> > +  @retval EFI_SUCCESS             The required TLS
> packet is built successfully.
> > +  @retval EFI_INVALID_PARAMETER   One or more of the
> following conditions
> > is TRUE:
> > +                                  Tls is NULL.
> > +                                  BufferIn is NULL
> but BufferInSize is NOT 0.
> > +                                  BufferInSize is 0
> but BufferIn is NOT NULL.
> > +                                  BufferOutSize is
> NULL.
> > +                                  BufferOut is NULL
> if *BufferOutSize is not zero.
> > +  @retval EFI_BUFFER_TOO_SMALL    BufferOutSize is
> too small to hold the
> > response packet.
> > +  @retval EFI_ABORTED             Something wrong
> during handshake.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsDoHandshake (
> > +  IN     VOID                     *Tls,
> > +  IN     UINT8                    *BufferIn,
> OPTIONAL
> > +  IN     UINTN                    BufferInSize,
> OPTIONAL
> > +     OUT UINT8                    *BufferOut,
> OPTIONAL
> > +  IN OUT UINTN                    *BufferOutSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tls.Services.DoHandshake, TlsDoHandshake, (Tls,
> > BufferIn, BufferInSize, BufferOut, BufferOutSize),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Handle Alert message recorded in BufferIn. If
> BufferIn is NULL and
> > BufferInSize is zero,
> > +  TLS session has errors and the response packet
> needs to be Alert message
> > based on error type.
> > +
> > +  @param[in]       Tls            Pointer to the TLS
> object for state checking.
> > +  @param[in]       BufferIn       Pointer to the
> most recently received TLS Alert
> > packet.
> > +  @param[in]       BufferInSize   Packet size in
> bytes for the most recently
> > received TLS
> > +                                  Alert packet.
> > +  @param[out]      BufferOut      Pointer to the
> buffer to hold the built packet.
> > +  @param[in, out]  BufferOutSize  Pointer to the
> buffer size in bytes. On input, it
> > is
> > +                                  the buffer size
> provided by the caller. On output, it
> > +                                  is the buffer size
> in fact needed to contain the
> > +                                  packet.
> > +
> > +  @retval EFI_SUCCESS             The required TLS
> packet is built successfully.
> > +  @retval EFI_INVALID_PARAMETER   One or more of the
> following conditions
> > is TRUE:
> > +                                  Tls is NULL.
> > +                                  BufferIn is NULL
> but BufferInSize is NOT 0.
> > +                                  BufferInSize is 0
> but BufferIn is NOT NULL.
> > +                                  BufferOutSize is
> NULL.
> > +                                  BufferOut is NULL
> if *BufferOutSize is not zero.
> > +  @retval EFI_ABORTED             An error occurred.
> > +  @retval EFI_BUFFER_TOO_SMALL    BufferOutSize is
> too small to hold the
> > response packet.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsHandleAlert (
> > +  IN     VOID                     *Tls,
> > +  IN     UINT8                    *BufferIn,
> OPTIONAL
> > +  IN     UINTN                    BufferInSize,
> OPTIONAL
> > +     OUT UINT8                    *BufferOut,
> OPTIONAL
> > +  IN OUT UINTN                    *BufferOutSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tls.Services.HandleAlert, TlsHandleAlert, (Tls,
> > BufferIn, BufferInSize, BufferOut, BufferOutSize),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Build the CloseNotify packet.
> > +
> > +  @param[in]       Tls            Pointer to the TLS
> object for state checking.
> > +  @param[in, out]  Buffer         Pointer to the
> buffer to hold the built packet.
> > +  @param[in, out]  BufferSize     Pointer to the
> buffer size in bytes. On input, it is
> > +                                  the buffer size
> provided by the caller. On output, it
> > +                                  is the buffer size
> in fact needed to contain the
> > +                                  packet.
> > +
> > +  @retval EFI_SUCCESS             The required TLS
> packet is built successfully.
> > +  @retval EFI_INVALID_PARAMETER   One or more of the
> following conditions
> > is TRUE:
> > +                                  Tls is NULL.
> > +                                  BufferSize is
> NULL.
> > +                                  Buffer is NULL if
> *BufferSize is not zero.
> > +  @retval EFI_BUFFER_TOO_SMALL    BufferSize is too
> small to hold the
> > response packet.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsCloseNotify (
> > +  IN     VOID                     *Tls,
> > +  IN OUT UINT8                    *Buffer,
> > +  IN OUT UINTN                    *BufferSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tls.Services.CloseNotify, TlsCloseNotify, (Tls,
> > Buffer, BufferSize), EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Attempts to read bytes from one TLS object and
> places the data in Buffer.
> > +
> > +  This function will attempt to read BufferSize
> bytes from the TLS object
> > +  and places the data in Buffer.
> > +
> > +  @param[in]      Tls           Pointer to the TLS
> object.
> > +  @param[in,out]  Buffer        Pointer to the
> buffer to store the data.
> > +  @param[in]      BufferSize    The size of Buffer
> in bytes.
> > +
> > +  @retval  >0    The amount of data successfully
> read from the TLS object.
> > +  @retval  <=0   No data was successfully read.
> > +
> > +**/
> > +INTN
> > +EFIAPI
> > +CryptoServiceTlsCtrlTrafficOut (
> > +  IN     VOID                     *Tls,
> > +  IN OUT VOID                     *Buffer,
> > +  IN     UINTN                    BufferSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tls.Services.CtrlTrafficOut, TlsCtrlTrafficOut, (Tls,
> > Buffer, BufferSize), 0);
> > +}
> > +
> > +/**
> > +  Attempts to write data from the buffer to TLS
> object.
> > +
> > +  This function will attempt to write BufferSize
> bytes data from the Buffer
> > +  to the TLS object.
> > +
> > +  @param[in]  Tls           Pointer to the TLS
> object.
> > +  @param[in]  Buffer        Pointer to the data
> buffer.
> > +  @param[in]  BufferSize    The size of Buffer in
> bytes.
> > +
> > +  @retval  >0    The amount of data successfully
> written to the TLS object.
> > +  @retval <=0    No data was successfully written.
> > +
> > +**/
> > +INTN
> > +EFIAPI
> > +CryptoServiceTlsCtrlTrafficIn (
> > +  IN     VOID                     *Tls,
> > +  IN     VOID                     *Buffer,
> > +  IN     UINTN                    BufferSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (Tls.Services.CtrlTrafficIn, TlsCtrlTrafficIn, (Tls,
> > Buffer, BufferSize), 0);
> > +}
> > +
> > +/**
> > +  Attempts to read bytes from the specified TLS
> connection into the buffer.
> > +
> > +  This function tries to read BufferSize bytes data
> from the specified TLS
> > +  connection into the Buffer.
> > +
> > +  @param[in]      Tls           Pointer to the TLS
> connection for data reading.
> > +  @param[in,out]  Buffer        Pointer to the data
> buffer.
> > +  @param[in]      BufferSize    The size of Buffer
> in bytes.
> > +
> > +  @retval  >0    The read operation was successful,
> and return value is the
> > +                 number of bytes actually read from
> the TLS connection.
> > +  @retval  <=0   The read operation was not
> successful.
> > +
> > +**/
> > +INTN
> > +EFIAPI
> > +CryptoServiceTlsRead (
> > +  IN     VOID                     *Tls,
> > +  IN OUT VOID                     *Buffer,
> > +  IN     UINTN                    BufferSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Tls.Services.Read,
> TlsRead, (Tls, Buffer,
> > BufferSize), 0);
> > +}
> > +
> > +/**
> > +  Attempts to write data to a TLS connection.
> > +
> > +  This function tries to write BufferSize bytes data
> from the Buffer into the
> > +  specified TLS connection.
> > +
> > +  @param[in]  Tls           Pointer to the TLS
> connection for data writing.
> > +  @param[in]  Buffer        Pointer to the data
> buffer.
> > +  @param[in]  BufferSize    The size of Buffer in
> bytes.
> > +
> > +  @retval  >0    The write operation was successful,
> and return value is the
> > +                 number of bytes actually written to
> the TLS connection.
> > +  @retval <=0    The write operation was not
> successful.
> > +
> > +**/
> > +INTN
> > +EFIAPI
> > +CryptoServiceTlsWrite (
> > +  IN     VOID                     *Tls,
> > +  IN     VOID                     *Buffer,
> > +  IN     UINTN                    BufferSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (Tls.Services.Write,
> TlsWrite, (Tls, Buffer,
> > BufferSize), 0);
> > +}
> > +
> > +/**
> > +  Set a new TLS/SSL method for a particular TLS
> object.
> > +
> > +  This function sets a new TLS/SSL method for a
> particular TLS object.
> > +
> > +  @param[in]  Tls         Pointer to a TLS object.
> > +  @param[in]  MajorVer    Major Version of TLS/SSL
> Protocol.
> > +  @param[in]  MinorVer    Minor Version of TLS/SSL
> Protocol.
> > +
> > +  @retval  EFI_SUCCESS           The TLS/SSL method
> was set successfully.
> > +  @retval  EFI_INVALID_PARAMETER The parameter is
> invalid.
> > +  @retval  EFI_UNSUPPORTED       Unsupported TLS/SSL
> method.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetVersion (
> > +  IN     VOID                     *Tls,
> > +  IN     UINT8                    MajorVer,
> > +  IN     UINT8                    MinorVer
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (TlsSet.Services.Version,
> TlsSetVersion, (Tls,
> > MajorVer, MinorVer), EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Set TLS object to work in client or server mode.
> > +
> > +  This function prepares a TLS object to work in
> client or server mode.
> > +
> > +  @param[in]  Tls         Pointer to a TLS object.
> > +  @param[in]  IsServer    Work in server mode.
> > +
> > +  @retval  EFI_SUCCESS           The TLS/SSL work
> mode was set successfully.
> > +  @retval  EFI_INVALID_PARAMETER The parameter is
> invalid.
> > +  @retval  EFI_UNSUPPORTED       Unsupported TLS/SSL
> work mode.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetConnectionEnd (
> > +  IN     VOID                     *Tls,
> > +  IN     BOOLEAN                  IsServer
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsSet.Services.ConnectionEnd,
> > TlsSetConnectionEnd, (Tls, IsServer),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Set the ciphers list to be used by the TLS object.
> > +
> > +  This function sets the ciphers for use by a
> specified TLS object.
> > +
> > +  @param[in]  Tls          Pointer to a TLS object.
> > +  @param[in]  CipherId     Array of UINT16 cipher
> identifiers. Each UINT16
> > +                           cipher identifier comes
> from the TLS Cipher Suite
> > +                           Registry of the IANA,
> interpreting Byte1 and Byte2
> > +                           in network (big endian)
> byte order.
> > +  @param[in]  CipherNum    The number of cipher in
> the list.
> > +
> > +  @retval  EFI_SUCCESS           The ciphers list
> was set successfully.
> > +  @retval  EFI_INVALID_PARAMETER The parameter is
> invalid.
> > +  @retval  EFI_UNSUPPORTED       No supported TLS
> cipher was found in
> > CipherId.
> > +  @retval  EFI_OUT_OF_RESOURCES  Memory allocation
> failed.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetCipherList (
> > +  IN     VOID                     *Tls,
> > +  IN     UINT16                   *CipherId,
> > +  IN     UINTN                    CipherNum
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsSet.Services.CipherList, TlsSetCipherList, (Tls,
> > CipherId, CipherNum), EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Set the compression method for TLS/SSL operations.
> > +
> > +  This function handles TLS/SSL integrated
> compression methods.
> > +
> > +  @param[in]  CompMethod    The compression method
> ID.
> > +
> > +  @retval  EFI_SUCCESS        The compression method
> for the communication
> > was
> > +                              set successfully.
> > +  @retval  EFI_UNSUPPORTED    Unsupported
> compression method.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetCompressionMethod (
> > +  IN     UINT8                    CompMethod
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsSet.Services.CompressionMethod,
> > TlsSetCompressionMethod, (CompMethod),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Set peer certificate verification mode for the TLS
> connection.
> > +
> > +  This function sets the verification mode flags for
> the TLS connection.
> > +
> > +  @param[in]  Tls           Pointer to the TLS
> object.
> > +  @param[in]  VerifyMode    A set of logically or'ed
> verification mode flags.
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceTlsSetVerify (
> > +  IN     VOID                     *Tls,
> > +  IN     UINT32                   VerifyMode
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB (TlsSet.Services.Verify,
> TlsSetVerify, (Tls,
> > VerifyMode));
> > +}
> > +
> > +/**
> > +  Set the specified host name to be verified.
> > +
> > +  @param[in]  Tls           Pointer to the TLS
> object.
> > +  @param[in]  Flags         The setting flags during
> the validation.
> > +  @param[in]  HostName      The specified host name
> to be verified.
> > +
> > +  @retval  EFI_SUCCESS           The HostName
> setting was set successfully.
> > +  @retval  EFI_INVALID_PARAMETER The parameter is
> invalid.
> > +  @retval  EFI_ABORTED           Invalid HostName
> setting.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetVerifyHost (
> > +  IN     VOID                     *Tls,
> > +  IN     UINT32                   Flags,
> > +  IN     CHAR8                    *HostName
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsSet.Services.VerifyHost, TlsSetVerifyHost, (Tls,
> > Flags, HostName), EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Sets a TLS/SSL session ID to be used during
> TLS/SSL connect.
> > +
> > +  This function sets a session ID to be used when
> the TLS/SSL connection is
> > +  to be established.
> > +
> > +  @param[in]  Tls             Pointer to the TLS
> object.
> > +  @param[in]  SessionId       Session ID data used
> for session resumption.
> > +  @param[in]  SessionIdLen    Length of Session ID
> in bytes.
> > +
> > +  @retval  EFI_SUCCESS           Session ID was set
> successfully.
> > +  @retval  EFI_INVALID_PARAMETER The parameter is
> invalid.
> > +  @retval  EFI_UNSUPPORTED       No available
> session for ID setting.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetSessionId (
> > +  IN     VOID                     *Tls,
> > +  IN     UINT8                    *SessionId,
> > +  IN     UINT16                   SessionIdLen
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsSet.Services.SessionId, TlsSetSessionId, (Tls,
> > SessionId, SessionIdLen), EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Adds the CA to the cert store when requesting
> Server or Client authentication.
> > +
> > +  This function adds the CA certificate to the list
> of CAs when requesting
> > +  Server or Client authentication for the chosen TLS
> connection.
> > +
> > +  @param[in]  Tls         Pointer to the TLS object.
> > +  @param[in]  Data        Pointer to the data buffer
> of a DER-encoded binary
> > +                          X.509 certificate or PEM-
> encoded X.509 certificate.
> > +  @param[in]  DataSize    The size of data buffer in
> bytes.
> > +
> > +  @retval  EFI_SUCCESS             The operation
> succeeded.
> > +  @retval  EFI_INVALID_PARAMETER   The parameter is
> invalid.
> > +  @retval  EFI_OUT_OF_RESOURCES    Required
> resources could not be
> > allocated.
> > +  @retval  EFI_ABORTED             Invalid X.509
> certificate.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetCaCertificate (
> > +  IN     VOID                     *Tls,
> > +  IN     VOID                     *Data,
> > +  IN     UINTN                    DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsSet.Services.CaCertificate, TlsSetCaCertificate,
> > (Tls, Data, DataSize), EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Loads the local public certificate into the
> specified TLS object.
> > +
> > +  This function loads the X.509 certificate into the
> specified TLS object
> > +  for TLS negotiation.
> > +
> > +  @param[in]  Tls         Pointer to the TLS object.
> > +  @param[in]  Data        Pointer to the data buffer
> of a DER-encoded binary
> > +                          X.509 certificate or PEM-
> encoded X.509 certificate.
> > +  @param[in]  DataSize    The size of data buffer in
> bytes.
> > +
> > +  @retval  EFI_SUCCESS             The operation
> succeeded.
> > +  @retval  EFI_INVALID_PARAMETER   The parameter is
> invalid.
> > +  @retval  EFI_OUT_OF_RESOURCES    Required
> resources could not be
> > allocated.
> > +  @retval  EFI_ABORTED             Invalid X.509
> certificate.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetHostPublicCert (
> > +  IN     VOID                     *Tls,
> > +  IN     VOID                     *Data,
> > +  IN     UINTN                    DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsSet.Services.HostPublicCert,
> > TlsSetHostPublicCert, (Tls, Data, DataSize),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Adds the local private key to the specified TLS
> object.
> > +
> > +  This function adds the local private key (PEM-
> encoded RSA or PKCS#8 private
> > +  key) into the specified TLS object for TLS
> negotiation.
> > +
> > +  @param[in]  Tls         Pointer to the TLS object.
> > +  @param[in]  Data        Pointer to the data buffer
> of a PEM-encoded RSA
> > +                          or PKCS#8 private key.
> > +  @param[in]  DataSize    The size of data buffer in
> bytes.
> > +
> > +  @retval  EFI_SUCCESS     The operation succeeded.
> > +  @retval  EFI_UNSUPPORTED This function is not
> supported.
> > +  @retval  EFI_ABORTED     Invalid private key data.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetHostPrivateKey (
> > +  IN     VOID                     *Tls,
> > +  IN     VOID                     *Data,
> > +  IN     UINTN                    DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsSet.Services.HostPrivateKey,
> > TlsSetHostPrivateKey, (Tls, Data, DataSize),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Adds the CA-supplied certificate revocation list
> for certificate validation.
> > +
> > +  This function adds the CA-supplied certificate
> revocation list data for
> > +  certificate validity checking.
> > +
> > +  @param[in]  Data        Pointer to the data buffer
> of a DER-encoded CRL data.
> > +  @param[in]  DataSize    The size of data buffer in
> bytes.
> > +
> > +  @retval  EFI_SUCCESS     The operation succeeded.
> > +  @retval  EFI_UNSUPPORTED This function is not
> supported.
> > +  @retval  EFI_ABORTED     Invalid CRL data.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsSetCertRevocationList (
> > +  IN     VOID                     *Data,
> > +  IN     UINTN                    DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsSet.Services.CertRevocationList,
> > TlsSetCertRevocationList, (Data, DataSize),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Gets the protocol version used by the specified
> TLS connection.
> > +
> > +  This function returns the protocol version used by
> the specified TLS
> > +  connection.
> > +
> > +  If Tls is NULL, then ASSERT().
> > +
> > +  @param[in]  Tls    Pointer to the TLS object.
> > +
> > +  @return  The protocol version of the specified TLS
> connection.
> > +
> > +**/
> > +UINT16
> > +EFIAPI
> > +CryptoServiceTlsGetVersion (
> > +  IN     VOID                     *Tls
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (TlsGet.Services.Version,
> TlsGetVersion, (Tls), 0);
> > +}
> > +
> > +/**
> > +  Gets the connection end of the specified TLS
> connection.
> > +
> > +  This function returns the connection end (as
> client or as server) used by
> > +  the specified TLS connection.
> > +
> > +  If Tls is NULL, then ASSERT().
> > +
> > +  @param[in]  Tls    Pointer to the TLS object.
> > +
> > +  @return  The connection end used by the specified
> TLS connection.
> > +
> > +**/
> > +UINT8
> > +EFIAPI
> > +CryptoServiceTlsGetConnectionEnd (
> > +  IN     VOID                     *Tls
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsGet.Services.ConnectionEnd,
> > TlsGetConnectionEnd, (Tls), 0);
> > +}
> > +
> > +/**
> > +  Gets the cipher suite used by the specified TLS
> connection.
> > +
> > +  This function returns current cipher suite used by
> the specified
> > +  TLS connection.
> > +
> > +  @param[in]      Tls         Pointer to the TLS
> object.
> > +  @param[in,out]  CipherId    The cipher suite used
> by the TLS object.
> > +
> > +  @retval  EFI_SUCCESS           The cipher suite
> was returned successfully.
> > +  @retval  EFI_INVALID_PARAMETER The parameter is
> invalid.
> > +  @retval  EFI_UNSUPPORTED       Unsupported cipher
> suite.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsGetCurrentCipher (
> > +  IN     VOID                     *Tls,
> > +  IN OUT UINT16                   *CipherId
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsGet.Services.CurrentCipher,
> > TlsGetCurrentCipher, (Tls, CipherId),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Gets the compression methods used by the specified
> TLS connection.
> > +
> > +  This function returns current integrated
> compression methods used by
> > +  the specified TLS connection.
> > +
> > +  @param[in]      Tls              Pointer to the
> TLS object.
> > +  @param[in,out]  CompressionId    The current
> compression method used by
> > +                                   the TLS object.
> > +
> > +  @retval  EFI_SUCCESS           The compression
> method was returned
> > successfully.
> > +  @retval  EFI_INVALID_PARAMETER The parameter is
> invalid.
> > +  @retval  EFI_ABORTED           Invalid Compression
> method.
> > +  @retval  EFI_UNSUPPORTED       This function is
> not supported.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsGetCurrentCompressionId (
> > +  IN     VOID                     *Tls,
> > +  IN OUT UINT8                    *CompressionId
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsGet.Services.CurrentCompressionId,
> > TlsGetCurrentCompressionId, (Tls, CompressionId),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Gets the verification mode currently set in the
> TLS connection.
> > +
> > +  This function returns the peer verification mode
> currently set in the
> > +  specified TLS connection.
> > +
> > +  If Tls is NULL, then ASSERT().
> > +
> > +  @param[in]  Tls    Pointer to the TLS object.
> > +
> > +  @return  The verification mode set in the
> specified TLS connection.
> > +
> > +**/
> > +UINT32
> > +EFIAPI
> > +CryptoServiceTlsGetVerify (
> > +  IN     VOID                     *Tls
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB (TlsGet.Services.Verify,
> TlsGetVerify, (Tls), 0);
> > +}
> > +
> > +/**
> > +  Gets the session ID used by the specified TLS
> connection.
> > +
> > +  This function returns the TLS/SSL session ID
> currently used by the
> > +  specified TLS connection.
> > +
> > +  @param[in]      Tls             Pointer to the TLS
> object.
> > +  @param[in,out]  SessionId       Buffer to contain
> the returned session ID.
> > +  @param[in,out]  SessionIdLen    The length of
> Session ID in bytes.
> > +
> > +  @retval  EFI_SUCCESS           The Session ID was
> returned successfully.
> > +  @retval  EFI_INVALID_PARAMETER The parameter is
> invalid.
> > +  @retval  EFI_UNSUPPORTED       Invalid TLS/SSL
> session.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsGetSessionId (
> > +  IN     VOID                     *Tls,
> > +  IN OUT UINT8                    *SessionId,
> > +  IN OUT UINT16                   *SessionIdLen
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsGet.Services.SessionId, TlsGetSessionId, (Tls,
> > SessionId, SessionIdLen), EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Gets the client random data used in the specified
> TLS connection.
> > +
> > +  This function returns the TLS/SSL client random
> data currently used in
> > +  the specified TLS connection.
> > +
> > +  @param[in]      Tls             Pointer to the TLS
> object.
> > +  @param[in,out]  ClientRandom    Buffer to contain
> the returned client
> > +                                  random data (32
> bytes).
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceTlsGetClientRandom (
> > +  IN     VOID                     *Tls,
> > +  IN OUT UINT8                    *ClientRandom
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB
> (TlsGet.Services.ClientRandom,
> > TlsGetClientRandom, (Tls, ClientRandom));
> > +}
> > +
> > +/**
> > +  Gets the server random data used in the specified
> TLS connection.
> > +
> > +  This function returns the TLS/SSL server random
> data currently used in
> > +  the specified TLS connection.
> > +
> > +  @param[in]      Tls             Pointer to the TLS
> object.
> > +  @param[in,out]  ServerRandom    Buffer to contain
> the returned server
> > +                                  random data (32
> bytes).
> > +
> > +**/
> > +VOID
> > +EFIAPI
> > +CryptoServiceTlsGetServerRandom (
> > +  IN     VOID                     *Tls,
> > +  IN OUT UINT8                    *ServerRandom
> > +  )
> > +{
> > +  CALL_VOID_BASECRYPTLIB
> (TlsGet.Services.ServerRandom,
> > TlsGetServerRandom, (Tls, ServerRandom));
> > +}
> > +
> > +/**
> > +  Gets the master key data used in the specified TLS
> connection.
> > +
> > +  This function returns the TLS/SSL master key
> material currently used in
> > +  the specified TLS connection.
> > +
> > +  @param[in]      Tls            Pointer to the TLS
> object.
> > +  @param[in,out]  KeyMaterial    Buffer to contain
> the returned key material.
> > +
> > +  @retval  EFI_SUCCESS           Key material was
> returned successfully.
> > +  @retval  EFI_INVALID_PARAMETER The parameter is
> invalid.
> > +  @retval  EFI_UNSUPPORTED       Invalid TLS/SSL
> session.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsGetKeyMaterial (
> > +  IN     VOID                     *Tls,
> > +  IN OUT UINT8                    *KeyMaterial
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsGet.Services.KeyMaterial, TlsGetKeyMaterial,
> > (Tls, KeyMaterial), EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Gets the CA Certificate from the cert store.
> > +
> > +  This function returns the CA certificate for the
> chosen
> > +  TLS connection.
> > +
> > +  @param[in]      Tls         Pointer to the TLS
> object.
> > +  @param[out]     Data        Pointer to the data
> buffer to receive the CA
> > +                              certificate data sent
> to the client.
> > +  @param[in,out]  DataSize    The size of data
> buffer in bytes.
> > +
> > +  @retval  EFI_SUCCESS             The operation
> succeeded.
> > +  @retval  EFI_UNSUPPORTED         This function is
> not supported.
> > +  @retval  EFI_BUFFER_TOO_SMALL    The Data is too
> small to hold the data.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsGetCaCertificate (
> > +  IN     VOID                     *Tls,
> > +  OUT    VOID                     *Data,
> > +  IN OUT UINTN                    *DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsGet.Services.CaCertificate,
> > TlsGetCaCertificate, (Tls, Data, DataSize),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Gets the local public Certificate set in the
> specified TLS object.
> > +
> > +  This function returns the local public certificate
> which was currently set
> > +  in the specified TLS object.
> > +
> > +  @param[in]      Tls         Pointer to the TLS
> object.
> > +  @param[out]     Data        Pointer to the data
> buffer to receive the local
> > +                              public certificate.
> > +  @param[in,out]  DataSize    The size of data
> buffer in bytes.
> > +
> > +  @retval  EFI_SUCCESS             The operation
> succeeded.
> > +  @retval  EFI_INVALID_PARAMETER   The parameter is
> invalid.
> > +  @retval  EFI_NOT_FOUND           The certificate
> is not found.
> > +  @retval  EFI_BUFFER_TOO_SMALL    The Data is too
> small to hold the data.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsGetHostPublicCert (
> > +  IN     VOID                     *Tls,
> > +  OUT    VOID                     *Data,
> > +  IN OUT UINTN                    *DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsGet.Services.HostPublicCert,
> > TlsGetHostPublicCert, (Tls, Data, DataSize),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Gets the local private key set in the specified
> TLS object.
> > +
> > +  This function returns the local private key data
> which was currently set
> > +  in the specified TLS object.
> > +
> > +  @param[in]      Tls         Pointer to the TLS
> object.
> > +  @param[out]     Data        Pointer to the data
> buffer to receive the local
> > +                              private key data.
> > +  @param[in,out]  DataSize    The size of data
> buffer in bytes.
> > +
> > +  @retval  EFI_SUCCESS             The operation
> succeeded.
> > +  @retval  EFI_UNSUPPORTED         This function is
> not supported.
> > +  @retval  EFI_BUFFER_TOO_SMALL    The Data is too
> small to hold the data.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsGetHostPrivateKey (
> > +  IN     VOID                     *Tls,
> > +  OUT    VOID                     *Data,
> > +  IN OUT UINTN                    *DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsGet.Services.HostPrivateKey,
> > TlsGetHostPrivateKey, (Tls, Data, DataSize),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +/**
> > +  Gets the CA-supplied certificate revocation list
> data set in the specified
> > +  TLS object.
> > +
> > +  This function returns the CA-supplied certificate
> revocation list data which
> > +  was currently set in the specified TLS object.
> > +
> > +  @param[out]     Data        Pointer to the data
> buffer to receive the CRL data.
> > +  @param[in,out]  DataSize    The size of data
> buffer in bytes.
> > +
> > +  @retval  EFI_SUCCESS             The operation
> succeeded.
> > +  @retval  EFI_UNSUPPORTED         This function is
> not supported.
> > +  @retval  EFI_BUFFER_TOO_SMALL    The Data is too
> small to hold the data.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoServiceTlsGetCertRevocationList (
> > +  OUT    VOID                     *Data,
> > +  IN OUT UINTN                    *DataSize
> > +  )
> > +{
> > +  return CALL_BASECRYPTLIB
> (TlsGet.Services.CertRevocationList,
> > TlsGetCertRevocationList, (Data, DataSize),
> EFI_UNSUPPORTED);
> > +}
> > +
> > +const EDKII_CRYPTO_PROTOCOL mEdkiiCrypto = {
> > +  /// Version
> > +  CryptoServiceGetCryptoVersion,
> > +  /// HMAC MD5
> > +  CryptoServiceHmacMd5New,
> > +  CryptoServiceHmacMd5Free,
> > +  CryptoServiceHmacMd5SetKey,
> > +  CryptoServiceHmacMd5Duplicate,
> > +  CryptoServiceHmacMd5Update,
> > +  CryptoServiceHmacMd5Final,
> > +  /// HMAC SHA1
> > +  CryptoServiceHmacSha1New,
> > +  CryptoServiceHmacSha1Free,
> > +  CryptoServiceHmacSha1SetKey,
> > +  CryptoServiceHmacSha1Duplicate,
> > +  CryptoServiceHmacSha1Update,
> > +  CryptoServiceHmacSha1Final,
> > +  /// HMAC SHA256
> > +  CryptoServiceHmacSha256New,
> > +  CryptoServiceHmacSha256Free,
> > +  CryptoServiceHmacSha256SetKey,
> > +  CryptoServiceHmacSha256Duplicate,
> > +  CryptoServiceHmacSha256Update,
> > +  CryptoServiceHmacSha256Final,
> > +  /// Md4
> > +  CryptoServiceMd4GetContextSize,
> > +  CryptoServiceMd4Init,
> > +  CryptoServiceMd4Duplicate,
> > +  CryptoServiceMd4Update,
> > +  CryptoServiceMd4Final,
> > +  CryptoServiceMd4HashAll,
> > +  /// Md5
> > +  CryptoServiceMd5GetContextSize,
> > +  CryptoServiceMd5Init,
> > +  CryptoServiceMd5Duplicate,
> > +  CryptoServiceMd5Update,
> > +  CryptoServiceMd5Final,
> > +  CryptoServiceMd5HashAll,
> > +  /// Pkcs
> > +  CryptoServicePkcs1v2Encrypt,
> > +  CryptoServicePkcs5HashPassword,
> > +  CryptoServicePkcs7Verify,
> > +  CryptoServiceVerifyEKUsInPkcs7Signature,
> > +  CryptoServicePkcs7GetSigners,
> > +  CryptoServicePkcs7FreeSigners,
> > +  CryptoServicePkcs7Sign,
> > +  CryptoServicePkcs7GetAttachedContent,
> > +  CryptoServicePkcs7GetCertificatesList,
> > +  CryptoServiceAuthenticodeVerify,
> > +  CryptoServiceImageTimestampVerify,
> > +  /// DH
> > +  CryptoServiceDhNew,
> > +  CryptoServiceDhFree,
> > +  CryptoServiceDhGenerateParameter,
> > +  CryptoServiceDhSetParameter,
> > +  CryptoServiceDhGenerateKey,
> > +  CryptoServiceDhComputeKey,
> > +  /// Random
> > +  CryptoServiceRandomSeed,
> > +  CryptoServiceRandomBytes,
> > +  /// RSA
> > +  CryptoServiceRsaPkcs1Verify,
> > +  CryptoServiceRsaNew,
> > +  CryptoServiceRsaFree,
> > +  CryptoServiceRsaSetKey,
> > +  CryptoServiceRsaGetKey,
> > +  CryptoServiceRsaGenerateKey,
> > +  CryptoServiceRsaCheckKey,
> > +  CryptoServiceRsaPkcs1Sign,
> > +  CryptoServiceRsaPkcs1Verify,
> > +  CryptoServiceRsaGetPrivateKeyFromPem,
> > +  CryptoServiceRsaGetPublicKeyFromX509,
> > +  /// Sha1
> > +  CryptoServiceSha1GetContextSize,
> > +  CryptoServiceSha1Init,
> > +  CryptoServiceSha1Duplicate,
> > +  CryptoServiceSha1Update,
> > +  CryptoServiceSha1Final,
> > +  CryptoServiceSha1HashAll,
> > +  /// Sha256
> > +  CryptoServiceSha256GetContextSize,
> > +  CryptoServiceSha256Init,
> > +  CryptoServiceSha256Duplicate,
> > +  CryptoServiceSha256Update,
> > +  CryptoServiceSha256Final,
> > +  CryptoServiceSha256HashAll,
> > +  /// Sha384
> > +  CryptoServiceSha384GetContextSize,
> > +  CryptoServiceSha384Init,
> > +  CryptoServiceSha384Duplicate,
> > +  CryptoServiceSha384Update,
> > +  CryptoServiceSha384Final,
> > +  CryptoServiceSha384HashAll,
> > +  /// Sha512
> > +  CryptoServiceSha512GetContextSize,
> > +  CryptoServiceSha512Init,
> > +  CryptoServiceSha512Duplicate,
> > +  CryptoServiceSha512Update,
> > +  CryptoServiceSha512Final,
> > +  CryptoServiceSha512HashAll,
> > +  /// X509
> > +  CryptoServiceX509GetSubjectName,
> > +  CryptoServiceX509GetCommonName,
> > +  CryptoServiceX509GetOrganizationName,
> > +  CryptoServiceX509VerifyCert,
> > +  CryptoServiceX509ConstructCertificate,
> > +  CryptoServiceX509ConstructCertificateStack,
> > +  CryptoServiceX509Free,
> > +  CryptoServiceX509StackFree,
> > +  CryptoServiceX509GetTBSCert,
> > +  /// TDES
> > +  CryptoServiceTdesGetContextSize,
> > +  CryptoServiceTdesInit,
> > +  CryptoServiceTdesEcbEncrypt,
> > +  CryptoServiceTdesEcbDecrypt,
> > +  CryptoServiceTdesCbcEncrypt,
> > +  CryptoServiceTdesCbcDecrypt,
> > +  /// AES
> > +  CryptoServiceAesGetContextSize,
> > +  CryptoServiceAesInit,
> > +  CryptoServiceAesEcbEncrypt,
> > +  CryptoServiceAesEcbDecrypt,
> > +  CryptoServiceAesCbcEncrypt,
> > +  CryptoServiceAesCbcDecrypt,
> > +  /// Arc4
> > +  CryptoServiceArc4GetContextSize,
> > +  CryptoServiceArc4Init,
> > +  CryptoServiceArc4Encrypt,
> > +  CryptoServiceArc4Decrypt,
> > +  CryptoServiceArc4Reset,
> > +  /// SM3
> > +  CryptoServiceSm3GetContextSize,
> > +  CryptoServiceSm3Init,
> > +  CryptoServiceSm3Duplicate,
> > +  CryptoServiceSm3Update,
> > +  CryptoServiceSm3Final,
> > +  CryptoServiceSm3HashAll,
> > +  /// HKDF
> > +  CryptoServiceHkdfSha256ExtractAndExpand,
> > +  /// X509 (Continued)
> > +  CryptoServiceX509ConstructCertificateStackV,
> > +  /// TLS
> > +  CryptoServiceTlsInitialize,
> > +  CryptoServiceTlsCtxFree,
> > +  CryptoServiceTlsCtxNew,
> > +  CryptoServiceTlsFree,
> > +  CryptoServiceTlsNew,
> > +  CryptoServiceTlsInHandshake,
> > +  CryptoServiceTlsDoHandshake,
> > +  CryptoServiceTlsHandleAlert,
> > +  CryptoServiceTlsCloseNotify,
> > +  CryptoServiceTlsCtrlTrafficOut,
> > +  CryptoServiceTlsCtrlTrafficIn,
> > +  CryptoServiceTlsRead,
> > +  CryptoServiceTlsWrite,
> > +  /// TLS Set
> > +  CryptoServiceTlsSetVersion,
> > +  CryptoServiceTlsSetConnectionEnd,
> > +  CryptoServiceTlsSetCipherList,
> > +  CryptoServiceTlsSetCompressionMethod,
> > +  CryptoServiceTlsSetVerify,
> > +  CryptoServiceTlsSetVerifyHost,
> > +  CryptoServiceTlsSetSessionId,
> > +  CryptoServiceTlsSetCaCertificate,
> > +  CryptoServiceTlsSetHostPublicCert,
> > +  CryptoServiceTlsSetHostPrivateKey,
> > +  CryptoServiceTlsSetCertRevocationList,
> > +  /// TLS Get
> > +  CryptoServiceTlsGetVersion,
> > +  CryptoServiceTlsGetConnectionEnd,
> > +  CryptoServiceTlsGetCurrentCipher,
> > +  CryptoServiceTlsGetCurrentCompressionId,
> > +  CryptoServiceTlsGetVerify,
> > +  CryptoServiceTlsGetSessionId,
> > +  CryptoServiceTlsGetClientRandom,
> > +  CryptoServiceTlsGetServerRandom,
> > +  CryptoServiceTlsGetKeyMaterial,
> > +  CryptoServiceTlsGetCaCertificate,
> > +  CryptoServiceTlsGetHostPublicCert,
> > +  CryptoServiceTlsGetHostPrivateKey,
> > +  CryptoServiceTlsGetCertRevocationList
> > +};
> > diff --git a/CryptoPkg/Driver/Crypto.uni
> b/CryptoPkg/Driver/Crypto.uni
> > new file mode 100644
> > index 0000000000..3e83f9c22a
> > --- /dev/null
> > +++ b/CryptoPkg/Driver/Crypto.uni
> > @@ -0,0 +1,13 @@
> > +// /** @file
> > +// Module that produces the EDK II Crypto
> Protocol/PPI using the library
> > +// services from BaseCryptLib and TlsLib.
> > +//
> > +// Copyright (c) 2020, Intel Corporation. All rights
> reserved.<BR>
> > +//
> > +// SPDX-License-Identifier: BSD-2-Clause-Patent
> > +//
> > +// **/
> > +
> > +#string STR_MODULE_ABSTRACT             #language
> en-US "Module that
> > produces the EDK II Crypto Protocol/PPI using the
> library services from
> > BaseCryptLib and TlsLib"
> > +
> > +#string STR_MODULE_DESCRIPTION          #language
> en-US "Module that
> > produces the EDK II Crypto Protocol/PPI using the
> library services from
> > BaseCryptLib and TlsLib."
> > diff --git a/CryptoPkg/Driver/CryptoDxe.c
> b/CryptoPkg/Driver/CryptoDxe.c
> > new file mode 100644
> > index 0000000000..ee44c03cc4
> > --- /dev/null
> > +++ b/CryptoPkg/Driver/CryptoDxe.c
> > @@ -0,0 +1,38 @@
> > +/** @file
> > +  Installs the EDK II Crypto Protocol
> > +
> > +  Copyright (C) Microsoft Corporation. All rights
> reserved.
> > +  SPDX-License-Identifier: BSD-2-Clause-Patent
> > +
> > +**/
> > +
> > +#include <PiDxe.h>
> > +#include <Library/UefiBootServicesTableLib.h>
> > +#include <Protocol/Crypto.h>
> > +
> > +extern CONST EDKII_CRYPTO_PROTOCOL  mEdkiiCrypto;
> > +
> > +/**
> > +  The module Entry Point of the Crypto Dxe Driver.
> > +
> > +  @param[in]  ImageHandle    The firmware allocated
> handle for the EFI image.
> > +  @param[in]  SystemTable    A pointer to the EFI
> System Table.
> > +
> > +  @retval EFI_SUCCESS    The entry point is executed
> successfully.
> > +  @retval Other          Some error occurs when
> executing this entry point.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoDxeEntry (
> > +  IN EFI_HANDLE        ImageHandle,
> > +  IN EFI_SYSTEM_TABLE  *SystemTable
> > +  )
> > +{
> > +  return gBS->InstallMultipleProtocolInterfaces(
> > +                &ImageHandle,
> > +                &gEdkiiCryptoProtocolGuid,
> > +                (EDKII_CRYPTO_PROTOCOL *)
> &mEdkiiCrypto,
> > +                NULL
> > +                );
> > +}
> > diff --git a/CryptoPkg/Driver/CryptoDxe.inf
> b/CryptoPkg/Driver/CryptoDxe.inf
> > new file mode 100644
> > index 0000000000..8f8492c949
> > --- /dev/null
> > +++ b/CryptoPkg/Driver/CryptoDxe.inf
> > @@ -0,0 +1,49 @@
> > +## @file
> > +#  Produces the EDK II Crypto Protocol using the
> library services from
> > +#  BaseCryptLib and TlsLib.
> PcdCryptoServiceFamilyEnable is used to enable the
> > +#  subset of available services.
> > +#
> > +#  Copyright (C) Microsoft Corporation. All rights
> reserved.
> > +#  SPDX-License-Identifier: BSD-2-Clause-Patent
> > +#
> > +##
> > +
> > +[Defines]
> > +  INF_VERSION                    = 0x0001001B
> > +  PI_SPECIFICATION_VERSION       = 0x0001000A
> > +  BASE_NAME                      = CryptoDxe
> > +  MODULE_UNI_FILE                = Crypto.uni
> > +  FILE_GUID                      = FEA01457-E381-
> 4135-9475-C6AFD0076C61
> > +  MODULE_TYPE                    = DXE_DRIVER
> > +  VERSION_STRING                 = 1.0
> > +  ENTRY_POINT                    = CryptoDxeEntry
> > +
> > +#
> > +# The following information is for reference only
> and not required by the build
> > tools.
> > +#
> > +#  VALID_ARCHITECTURES           = IA32 X64 AARCH64
> > +#
> > +
> > +[Sources]
> > +  Crypto.c
> > +  CryptoDxe.c
> > +
> > +[Packages]
> > +  MdePkg/MdePkg.dec
> > +  CryptoPkg/CryptoPkg.dec
> > +
> > +[LibraryClasses]
> > +  UefiDriverEntryPoint
> > +  UefiBootServicesTableLib
> > +  DebugLib
> > +  BaseCryptLib
> > +  TlsLib
> > +
> > +[Protocols]
> > +  gEdkiiCryptoProtocolGuid  ## PRODUCES
> > +
> > +[Pcd]
> > +
> gEfiCryptoPkgTokenSpaceGuid.PcdCryptoServiceFamilyEnabl
> e  #CONSUMES
> > +
> > +[Depex]
> > +  TRUE
> > diff --git a/CryptoPkg/Driver/CryptoPei.c
> b/CryptoPkg/Driver/CryptoPei.c
> > new file mode 100644
> > index 0000000000..8b2771802c
> > --- /dev/null
> > +++ b/CryptoPkg/Driver/CryptoPei.c
> > @@ -0,0 +1,99 @@
> > +/** @file
> > +  Installs the EDK II Crypto PPI.  If this PEIM is
> dispatched before memory is
> > +  discovered, the RegisterForShadow() feature is
> used to reload this PEIM into
> > +  memory after memory is discovered.
> > +
> > +  Copyright (C) Microsoft Corporation. All rights
> reserved.
> > +  SPDX-License-Identifier: BSD-2-Clause-Patent
> > +
> > +**/
> > +
> > +#include <PiPei.h>
> > +#include <Library/PeiServicesLib.h>
> > +#include <Library/DebugLib.h>
> > +#include <Ppi/Crypto.h>
> > +
> > +extern CONST EDKII_CRYPTO_PROTOCOL  mEdkiiCrypto;
> > +
> > +CONST EFI_PEI_PPI_DESCRIPTOR  mEdkiiCryptoPpiList =
> {
> > +  (EFI_PEI_PPI_DESCRIPTOR_PPI |
> EFI_PEI_PPI_DESCRIPTOR_TERMINATE_LIST),
> > +  &gEdkiiCryptoPpiGuid,
> > +  (EDKII_CRYPTO_PPI *) &mEdkiiCrypto
> > +};
> > +
> > +/**
> > +Entry to CryptoPeiEntry.
> > +
> > +@param FileHandle   The image handle.
> > +@param PeiServices  The PEI services table.
> > +
> > +@retval Status      From internal routine or boot
> object, should not fail
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoPeiEntry (
> > +  IN       EFI_PEI_FILE_HANDLE  FileHandle,
> > +  IN CONST EFI_PEI_SERVICES     **PeiServices
> > +  )
> > +{
> > +  EFI_STATUS              Status;
> > +  VOID                    *MemoryDiscoveredPpi;
> > +  EDKII_CRYPTO_PPI        *EdkiiCryptoPpi;
> > +  EFI_PEI_PPI_DESCRIPTOR  *EdkiiCryptoPpiDescriptor;
> > +
> > +  //
> > +  // Not all Open SSL services support XIP due to
> use of global variables.
> > +  // Use gEfiPeiMemoryDiscoveredPpiGuid to detect
> Pre-Mem and Post-Mem
> > and
> > +  // always shadow this module in memory in Post-
> Mem.
> > +  //
> > +  Status = PeiServicesLocatePpi (
> > +              &gEfiPeiMemoryDiscoveredPpiGuid,
> > +              0,
> > +              NULL,
> > +              (VOID **)&MemoryDiscoveredPpi
> > +              );
> > +  if (Status == EFI_NOT_FOUND) {
> > +    //
> > +    // CryptoPei is dispatched before
> gEfiPeiMemoryDiscoveredPpiGuid
> > +    //
> > +    Status = PeiServicesRegisterForShadow
> (FileHandle);
> > +    ASSERT_EFI_ERROR (Status);
> > +    if (!EFI_ERROR (Status)) {
> > +      //
> > +      // First CryptoPpi installation. CryptoPei
> could come from memory or flash
> > +      // it will be re-installed after
> gEfiPeiMemoryDiscoveredPpiGuid
> > +      //
> > +      DEBUG ((DEBUG_INFO, "CryptoPeiEntry: Install
> Pre-Memory Crypto PPI\n"));
> > +      Status = PeiServicesInstallPpi
> (&mEdkiiCryptoPpiList);
> > +      ASSERT_EFI_ERROR (Status);
> > +    }
> > +  } else if (Status == EFI_SUCCESS) {
> > +    //
> > +    // CryptoPei is dispatched after
> gEfiPeiMemoryDiscoveredPpiGuid
> > +    //
> > +    Status = PeiServicesLocatePpi (
> > +               &gEdkiiCryptoPpiGuid,
> > +               0,
> > +               &EdkiiCryptoPpiDescriptor,
> > +               (VOID **)&EdkiiCryptoPpi
> > +               );
> > +    if (!EFI_ERROR (Status)) {
> > +      //
> > +      // CryptoPei was also dispatched before
> gEfiPeiMemoryDiscoveredPpiGuid
> > +      //
> > +      DEBUG((DEBUG_INFO, "CryptoPeiEntry: ReInstall
> Post-Memmory Crypto
> > PPI\n"));
> > +      Status = PeiServicesReInstallPpi (
> > +                 EdkiiCryptoPpiDescriptor,
> > +                 &mEdkiiCryptoPpiList
> > +                 );
> > +      ASSERT_EFI_ERROR (Status);
> > +    } else {
> > +      DEBUG ((DEBUG_INFO, "CryptoPeiEntry: Install
> Post-Memmory Crypto
> > PPI\n"));
> > +      Status = PeiServicesInstallPpi
> (&mEdkiiCryptoPpiList);
> > +    }
> > +  } else {
> > +    ASSERT_EFI_ERROR (Status);
> > +  }
> > +
> > +  return Status;
> > +}
> > diff --git a/CryptoPkg/Driver/CryptoPei.inf
> b/CryptoPkg/Driver/CryptoPei.inf
> > new file mode 100644
> > index 0000000000..ca11cbb16c
> > --- /dev/null
> > +++ b/CryptoPkg/Driver/CryptoPei.inf
> > @@ -0,0 +1,51 @@
> > +## @file
> > +#  Produces the EDK II Crypto PPI using the library
> services from BaseCryptLib
> > +#  and TlsLib.  PcdCryptoServiceFamilyEnable is used
> to enable the subset of
> > +#  available services.  If this PEIM is dispatched
> before memory is discovered,
> > +#  the RegisterForShadow() feature is used to reload
> this PEIM into memory
> > after
> > +#  memory is discovered.
> > +#
> > +#  Copyright (C) Microsoft Corporation. All rights
> reserved.
> > +#  SPDX-License-Identifier: BSD-2-Clause-Patent
> > +#
> > +##
> > +
> > +[Defines]
> > +  INF_VERSION                    = 0x0001001B
> > +  BASE_NAME                      = CryptoPei
> > +  MODULE_UNI_FILE                = Crypto.uni
> > +  FILE_GUID                      = 0D1CE46B-72D9-
> 4BA7-95DA-23511865E661
> > +  MODULE_TYPE                    = PEIM
> > +  VERSION_STRING                 = 1.0
> > +  ENTRY_POINT                    = CryptoPeiEntry
> > +
> > +#
> > +# The following information is for reference only
> and not required by the build
> > tools.
> > +#
> > +#  VALID_ARCHITECTURES           = IA32 X64
> > +#
> > +
> > +[Sources]
> > +  Crypto.c
> > +  CryptoPei.c
> > +
> > +[Packages]
> > +  MdePkg/MdePkg.dec
> > +  CryptoPkg/CryptoPkg.dec
> > +
> > +[LibraryClasses]
> > +  PeimEntryPoint
> > +  PeiServicesLib
> > +  DebugLib
> > +  BaseCryptLib
> > +  TlsLib
> > +
> > +[Ppis]
> > +  gEfiPeiMemoryDiscoveredPpiGuid  ## CONSUMES
> > +  gEdkiiCryptoPpiGuid             ## PRODUCES
> > +
> > +[Pcd]
> > +
> gEfiCryptoPkgTokenSpaceGuid.PcdCryptoServiceFamilyEnabl
> e  ## CONSUMES
> > +
> > +[Depex]
> > +  TRUE
> > diff --git a/CryptoPkg/Driver/CryptoSmm.c
> b/CryptoPkg/Driver/CryptoSmm.c
> > new file mode 100644
> > index 0000000000..83b9bcf8b0
> > --- /dev/null
> > +++ b/CryptoPkg/Driver/CryptoSmm.c
> > @@ -0,0 +1,41 @@
> > +/** @file
> > +  Installs the EDK II Crypto SMM Protocol
> > +
> > +  Copyright (C) Microsoft Corporation. All rights
> reserved.
> > +  SPDX-License-Identifier: BSD-2-Clause-Patent
> > +
> > +**/
> > +
> > +#include <PiSmm.h>
> > +#include <Library/SmmServicesTableLib.h>
> > +#include <Protocol/SmmCrypto.h>
> > +
> > +extern CONST EDKII_CRYPTO_PROTOCOL  mEdkiiCrypto;
> > +
> > +/**
> > +  The module Entry Point of the Crypto SMM Driver.
> > +
> > +  @param[in]  ImageHandle    The firmware allocated
> handle for the EFI image.
> > +  @param[in]  SystemTable    A pointer to the EFI
> System Table.
> > +
> > +  @retval EFI_SUCCESS    The entry point is executed
> successfully.
> > +  @retval Other          Some error occurs when
> executing this entry point.
> > +
> > +**/
> > +EFI_STATUS
> > +EFIAPI
> > +CryptoSmmEntry (
> > +  IN EFI_HANDLE        ImageHandle,
> > +  IN EFI_SYSTEM_TABLE  *SystemTable
> > +  )
> > +{
> > +  EFI_HANDLE  Handle;
> > +
> > +  Handle = NULL;
> > +  return gSmst->SmmInstallProtocolInterface (
> > +                  &Handle,
> > +                  &gEdkiiSmmCryptoProtocolGuid,
> > +                  EFI_NATIVE_INTERFACE,
> > +                  (EDKII_CRYPTO_PROTOCOL *)
> &mEdkiiCrypto
> > +                  );
> > +}
> > diff --git a/CryptoPkg/Driver/CryptoSmm.inf
> b/CryptoPkg/Driver/CryptoSmm.inf
> > new file mode 100644
> > index 0000000000..c7f7fab26e
> > --- /dev/null
> > +++ b/CryptoPkg/Driver/CryptoSmm.inf
> > @@ -0,0 +1,49 @@
> > +## @file
> > +#  Produces the EDK II SMM Crypto Protocol using the
> library services from
> > +#  BaseCryptLib and TlsLib.
> PcdCryptoServiceFamilyEnable is used to enable the
> > +#  subset of available services.
> > +#
> > +#  Copyright (C) Microsoft Corporation. All rights
> reserved.
> > +#  SPDX-License-Identifier: BSD-2-Clause-Patent
> > +#
> > +##
> > +
> > +[Defines]
> > +  INF_VERSION                    = 0x0001001B
> > +  PI_SPECIFICATION_VERSION       = 0x00010014
> > +  BASE_NAME                      = CryptoSmm
> > +  MODULE_UNI_FILE                = Crypto.uni
> > +  FILE_GUID                      = 391B853F-F488-
> 479B-A3D6-870766C7A38F
> > +  MODULE_TYPE                    = DXE_SMM_DRIVER
> > +  VERSION_STRING                 = 1.0
> > +  ENTRY_POINT                    = CryptoSmmEntry
> > +
> > +#
> > +# The following information is for reference only
> and not required by the build
> > tools.
> > +#
> > +#  VALID_ARCHITECTURES           = IA32 X64
> > +#
> > +
> > +[Sources]
> > +  Crypto.c
> > +  CryptoSmm.c
> > +
> > +[Packages]
> > +  MdePkg/MdePkg.dec
> > +  CryptoPkg/CryptoPkg.dec
> > +
> > +[LibraryClasses]
> > +  UefiDriverEntryPoint
> > +  SmmServicesTableLib
> > +  DebugLib
> > +  BaseCryptLib
> > +  TlsLib
> > +
> > +[Protocols]
> > +  gEdkiiSmmCryptoProtocolGuid  ## PRODUCES
> > +
> > +[Pcd]
> > +
> gEfiCryptoPkgTokenSpaceGuid.PcdCryptoServiceFamilyEnabl
> e  ## CONSUMES
> > +
> > +[Depex]
> > +  TRUE
> > --
> > 2.21.0.windows.1


  reply	other threads:[~2020-02-05  1:38 UTC|newest]

Thread overview: 17+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2020-01-30  7:00 [Patch 0/5] CryptoPkg: Add modules that produce BaseCryptLib services Michael D Kinney
2020-01-30  7:00 ` [Patch 1/5] CryptoPkg/BaseCryptLib: Add X509ConstructCertificateStackV() Michael D Kinney
2020-02-04  7:31   ` Wang, Jian J
2020-01-30  7:00 ` [Patch 2/5] CryptoPkg: Add EDK II Crypto Protocols/PPIs/PCDs Michael D Kinney
2020-02-04  7:59   ` Wang, Jian J
2020-02-05  1:04     ` Michael D Kinney
2020-01-30  7:00 ` [Patch 3/5] CryptoPkg/Driver: Add Crypto PEIM, DXE, and SMM modules Michael D Kinney
2020-01-30 13:53   ` [edk2-devel] " Laszlo Ersek
2020-01-30 17:10     ` Michael D Kinney
2020-01-30 17:25       ` Laszlo Ersek
2020-02-04  8:16   ` Wang, Jian J
2020-02-05  1:38     ` Michael D Kinney [this message]
2020-01-30  7:00 ` [Patch 4/5] CryptoPkg/Library: Add BaseCryptLibOnProtocolPpi instances Michael D Kinney
2020-02-04  9:00   ` Wang, Jian J
2020-02-05  1:39     ` Michael D Kinney
2020-01-30  7:00 ` [Patch 5/5] CryptoPkg/CryptoPkg.dsc: Add build of Crypto libraries/modules Michael D Kinney
2020-02-04  9:01   ` Wang, Jian J

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-list from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=E92EE9817A31E24EB0585FDF735412F5B9E86C91@ORSMSX113.amr.corp.intel.com \
    --to=devel@edk2.groups.io \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox