module Crypto.WebAuthn.AttestationStatementFormat (allSupportedFormats) where
import qualified Crypto.WebAuthn.AttestationStatementFormat.AndroidKey as AndroidKey
import qualified Crypto.WebAuthn.AttestationStatementFormat.AndroidSafetyNet as AndroidSafetyNet
import qualified Crypto.WebAuthn.AttestationStatementFormat.Apple as Apple
import qualified Crypto.WebAuthn.AttestationStatementFormat.FidoU2F as FidoU2F
import qualified Crypto.WebAuthn.AttestationStatementFormat.None as None
import qualified Crypto.WebAuthn.AttestationStatementFormat.Packed as Packed
import qualified Crypto.WebAuthn.AttestationStatementFormat.TPM as TPM
import qualified Crypto.WebAuthn.Model.Types as M
allSupportedFormats :: M.SupportedAttestationStatementFormats
allSupportedFormats :: SupportedAttestationStatementFormats
allSupportedFormats =
forall (t :: * -> *) m a.
(Foldable t, Monoid m) =>
(a -> m) -> t a -> m
foldMap
SomeAttestationStatementFormat
-> SupportedAttestationStatementFormats
M.singletonAttestationStatementFormat
[ SomeAttestationStatementFormat
None.format,
SomeAttestationStatementFormat
Packed.format,
SomeAttestationStatementFormat
AndroidKey.format,
SomeAttestationStatementFormat
AndroidSafetyNet.format,
SomeAttestationStatementFormat
FidoU2F.format,
SomeAttestationStatementFormat
Apple.format,
SomeAttestationStatementFormat
TPM.format
]