{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.Signer.Types.SigningPlatform
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.Signer.Types.SigningPlatform where

import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import Amazonka.Signer.Types.Category
import Amazonka.Signer.Types.SigningConfiguration
import Amazonka.Signer.Types.SigningImageFormat

-- | Contains information about the signing configurations and parameters
-- that are used to perform a code signing job.
--
-- /See:/ 'newSigningPlatform' smart constructor.
data SigningPlatform = SigningPlatform'
  { -- | The category of a code signing platform.
    SigningPlatform -> Maybe Category
category :: Prelude.Maybe Category,
    -- | The configuration of a code signing platform. This includes the
    -- designated hash algorithm and encryption algorithm of a signing
    -- platform.
    SigningPlatform -> Maybe SigningConfiguration
signingConfiguration :: Prelude.Maybe SigningConfiguration,
    -- | Any partner entities linked to a code signing platform.
    SigningPlatform -> Maybe Text
partner :: Prelude.Maybe Prelude.Text,
    -- | Indicates whether revocation is supported for the platform.
    SigningPlatform -> Maybe Bool
revocationSupported :: Prelude.Maybe Prelude.Bool,
    SigningPlatform -> Maybe SigningImageFormat
signingImageFormat :: Prelude.Maybe SigningImageFormat,
    -- | The ID of a code signing; platform.
    SigningPlatform -> Maybe Text
platformId :: Prelude.Maybe Prelude.Text,
    -- | The display name of a code signing platform.
    SigningPlatform -> Maybe Text
displayName :: Prelude.Maybe Prelude.Text,
    -- | The maximum size (in MB) of code that can be signed by a code signing
    -- platform.
    SigningPlatform -> Maybe Int
maxSizeInMB :: Prelude.Maybe Prelude.Int,
    -- | The types of targets that can be signed by a code signing platform.
    SigningPlatform -> Maybe Text
target :: Prelude.Maybe Prelude.Text
  }
  deriving (SigningPlatform -> SigningPlatform -> Bool
(SigningPlatform -> SigningPlatform -> Bool)
-> (SigningPlatform -> SigningPlatform -> Bool)
-> Eq SigningPlatform
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SigningPlatform -> SigningPlatform -> Bool
$c/= :: SigningPlatform -> SigningPlatform -> Bool
== :: SigningPlatform -> SigningPlatform -> Bool
$c== :: SigningPlatform -> SigningPlatform -> Bool
Prelude.Eq, ReadPrec [SigningPlatform]
ReadPrec SigningPlatform
Int -> ReadS SigningPlatform
ReadS [SigningPlatform]
(Int -> ReadS SigningPlatform)
-> ReadS [SigningPlatform]
-> ReadPrec SigningPlatform
-> ReadPrec [SigningPlatform]
-> Read SigningPlatform
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [SigningPlatform]
$creadListPrec :: ReadPrec [SigningPlatform]
readPrec :: ReadPrec SigningPlatform
$creadPrec :: ReadPrec SigningPlatform
readList :: ReadS [SigningPlatform]
$creadList :: ReadS [SigningPlatform]
readsPrec :: Int -> ReadS SigningPlatform
$creadsPrec :: Int -> ReadS SigningPlatform
Prelude.Read, Int -> SigningPlatform -> ShowS
[SigningPlatform] -> ShowS
SigningPlatform -> String
(Int -> SigningPlatform -> ShowS)
-> (SigningPlatform -> String)
-> ([SigningPlatform] -> ShowS)
-> Show SigningPlatform
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SigningPlatform] -> ShowS
$cshowList :: [SigningPlatform] -> ShowS
show :: SigningPlatform -> String
$cshow :: SigningPlatform -> String
showsPrec :: Int -> SigningPlatform -> ShowS
$cshowsPrec :: Int -> SigningPlatform -> ShowS
Prelude.Show, (forall x. SigningPlatform -> Rep SigningPlatform x)
-> (forall x. Rep SigningPlatform x -> SigningPlatform)
-> Generic SigningPlatform
forall x. Rep SigningPlatform x -> SigningPlatform
forall x. SigningPlatform -> Rep SigningPlatform x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep SigningPlatform x -> SigningPlatform
$cfrom :: forall x. SigningPlatform -> Rep SigningPlatform x
Prelude.Generic)

-- |
-- Create a value of 'SigningPlatform' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'category', 'signingPlatform_category' - The category of a code signing platform.
--
-- 'signingConfiguration', 'signingPlatform_signingConfiguration' - The configuration of a code signing platform. This includes the
-- designated hash algorithm and encryption algorithm of a signing
-- platform.
--
-- 'partner', 'signingPlatform_partner' - Any partner entities linked to a code signing platform.
--
-- 'revocationSupported', 'signingPlatform_revocationSupported' - Indicates whether revocation is supported for the platform.
--
-- 'signingImageFormat', 'signingPlatform_signingImageFormat' - Undocumented member.
--
-- 'platformId', 'signingPlatform_platformId' - The ID of a code signing; platform.
--
-- 'displayName', 'signingPlatform_displayName' - The display name of a code signing platform.
--
-- 'maxSizeInMB', 'signingPlatform_maxSizeInMB' - The maximum size (in MB) of code that can be signed by a code signing
-- platform.
--
-- 'target', 'signingPlatform_target' - The types of targets that can be signed by a code signing platform.
newSigningPlatform ::
  SigningPlatform
newSigningPlatform :: SigningPlatform
newSigningPlatform =
  SigningPlatform' :: Maybe Category
-> Maybe SigningConfiguration
-> Maybe Text
-> Maybe Bool
-> Maybe SigningImageFormat
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> SigningPlatform
SigningPlatform'
    { $sel:category:SigningPlatform' :: Maybe Category
category = Maybe Category
forall a. Maybe a
Prelude.Nothing,
      $sel:signingConfiguration:SigningPlatform' :: Maybe SigningConfiguration
signingConfiguration = Maybe SigningConfiguration
forall a. Maybe a
Prelude.Nothing,
      $sel:partner:SigningPlatform' :: Maybe Text
partner = Maybe Text
forall a. Maybe a
Prelude.Nothing,
      $sel:revocationSupported:SigningPlatform' :: Maybe Bool
revocationSupported = Maybe Bool
forall a. Maybe a
Prelude.Nothing,
      $sel:signingImageFormat:SigningPlatform' :: Maybe SigningImageFormat
signingImageFormat = Maybe SigningImageFormat
forall a. Maybe a
Prelude.Nothing,
      $sel:platformId:SigningPlatform' :: Maybe Text
platformId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
      $sel:displayName:SigningPlatform' :: Maybe Text
displayName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
      $sel:maxSizeInMB:SigningPlatform' :: Maybe Int
maxSizeInMB = Maybe Int
forall a. Maybe a
Prelude.Nothing,
      $sel:target:SigningPlatform' :: Maybe Text
target = Maybe Text
forall a. Maybe a
Prelude.Nothing
    }

-- | The category of a code signing platform.
signingPlatform_category :: Lens.Lens' SigningPlatform (Prelude.Maybe Category)
signingPlatform_category :: (Maybe Category -> f (Maybe Category))
-> SigningPlatform -> f SigningPlatform
signingPlatform_category = (SigningPlatform -> Maybe Category)
-> (SigningPlatform -> Maybe Category -> SigningPlatform)
-> Lens
     SigningPlatform SigningPlatform (Maybe Category) (Maybe Category)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SigningPlatform' {Maybe Category
category :: Maybe Category
$sel:category:SigningPlatform' :: SigningPlatform -> Maybe Category
category} -> Maybe Category
category) (\s :: SigningPlatform
s@SigningPlatform' {} Maybe Category
a -> SigningPlatform
s {$sel:category:SigningPlatform' :: Maybe Category
category = Maybe Category
a} :: SigningPlatform)

-- | The configuration of a code signing platform. This includes the
-- designated hash algorithm and encryption algorithm of a signing
-- platform.
signingPlatform_signingConfiguration :: Lens.Lens' SigningPlatform (Prelude.Maybe SigningConfiguration)
signingPlatform_signingConfiguration :: (Maybe SigningConfiguration -> f (Maybe SigningConfiguration))
-> SigningPlatform -> f SigningPlatform
signingPlatform_signingConfiguration = (SigningPlatform -> Maybe SigningConfiguration)
-> (SigningPlatform
    -> Maybe SigningConfiguration -> SigningPlatform)
-> Lens
     SigningPlatform
     SigningPlatform
     (Maybe SigningConfiguration)
     (Maybe SigningConfiguration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SigningPlatform' {Maybe SigningConfiguration
signingConfiguration :: Maybe SigningConfiguration
$sel:signingConfiguration:SigningPlatform' :: SigningPlatform -> Maybe SigningConfiguration
signingConfiguration} -> Maybe SigningConfiguration
signingConfiguration) (\s :: SigningPlatform
s@SigningPlatform' {} Maybe SigningConfiguration
a -> SigningPlatform
s {$sel:signingConfiguration:SigningPlatform' :: Maybe SigningConfiguration
signingConfiguration = Maybe SigningConfiguration
a} :: SigningPlatform)

-- | Any partner entities linked to a code signing platform.
signingPlatform_partner :: Lens.Lens' SigningPlatform (Prelude.Maybe Prelude.Text)
signingPlatform_partner :: (Maybe Text -> f (Maybe Text))
-> SigningPlatform -> f SigningPlatform
signingPlatform_partner = (SigningPlatform -> Maybe Text)
-> (SigningPlatform -> Maybe Text -> SigningPlatform)
-> Lens SigningPlatform SigningPlatform (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SigningPlatform' {Maybe Text
partner :: Maybe Text
$sel:partner:SigningPlatform' :: SigningPlatform -> Maybe Text
partner} -> Maybe Text
partner) (\s :: SigningPlatform
s@SigningPlatform' {} Maybe Text
a -> SigningPlatform
s {$sel:partner:SigningPlatform' :: Maybe Text
partner = Maybe Text
a} :: SigningPlatform)

-- | Indicates whether revocation is supported for the platform.
signingPlatform_revocationSupported :: Lens.Lens' SigningPlatform (Prelude.Maybe Prelude.Bool)
signingPlatform_revocationSupported :: (Maybe Bool -> f (Maybe Bool))
-> SigningPlatform -> f SigningPlatform
signingPlatform_revocationSupported = (SigningPlatform -> Maybe Bool)
-> (SigningPlatform -> Maybe Bool -> SigningPlatform)
-> Lens SigningPlatform SigningPlatform (Maybe Bool) (Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SigningPlatform' {Maybe Bool
revocationSupported :: Maybe Bool
$sel:revocationSupported:SigningPlatform' :: SigningPlatform -> Maybe Bool
revocationSupported} -> Maybe Bool
revocationSupported) (\s :: SigningPlatform
s@SigningPlatform' {} Maybe Bool
a -> SigningPlatform
s {$sel:revocationSupported:SigningPlatform' :: Maybe Bool
revocationSupported = Maybe Bool
a} :: SigningPlatform)

-- | Undocumented member.
signingPlatform_signingImageFormat :: Lens.Lens' SigningPlatform (Prelude.Maybe SigningImageFormat)
signingPlatform_signingImageFormat :: (Maybe SigningImageFormat -> f (Maybe SigningImageFormat))
-> SigningPlatform -> f SigningPlatform
signingPlatform_signingImageFormat = (SigningPlatform -> Maybe SigningImageFormat)
-> (SigningPlatform -> Maybe SigningImageFormat -> SigningPlatform)
-> Lens
     SigningPlatform
     SigningPlatform
     (Maybe SigningImageFormat)
     (Maybe SigningImageFormat)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SigningPlatform' {Maybe SigningImageFormat
signingImageFormat :: Maybe SigningImageFormat
$sel:signingImageFormat:SigningPlatform' :: SigningPlatform -> Maybe SigningImageFormat
signingImageFormat} -> Maybe SigningImageFormat
signingImageFormat) (\s :: SigningPlatform
s@SigningPlatform' {} Maybe SigningImageFormat
a -> SigningPlatform
s {$sel:signingImageFormat:SigningPlatform' :: Maybe SigningImageFormat
signingImageFormat = Maybe SigningImageFormat
a} :: SigningPlatform)

-- | The ID of a code signing; platform.
signingPlatform_platformId :: Lens.Lens' SigningPlatform (Prelude.Maybe Prelude.Text)
signingPlatform_platformId :: (Maybe Text -> f (Maybe Text))
-> SigningPlatform -> f SigningPlatform
signingPlatform_platformId = (SigningPlatform -> Maybe Text)
-> (SigningPlatform -> Maybe Text -> SigningPlatform)
-> Lens SigningPlatform SigningPlatform (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SigningPlatform' {Maybe Text
platformId :: Maybe Text
$sel:platformId:SigningPlatform' :: SigningPlatform -> Maybe Text
platformId} -> Maybe Text
platformId) (\s :: SigningPlatform
s@SigningPlatform' {} Maybe Text
a -> SigningPlatform
s {$sel:platformId:SigningPlatform' :: Maybe Text
platformId = Maybe Text
a} :: SigningPlatform)

-- | The display name of a code signing platform.
signingPlatform_displayName :: Lens.Lens' SigningPlatform (Prelude.Maybe Prelude.Text)
signingPlatform_displayName :: (Maybe Text -> f (Maybe Text))
-> SigningPlatform -> f SigningPlatform
signingPlatform_displayName = (SigningPlatform -> Maybe Text)
-> (SigningPlatform -> Maybe Text -> SigningPlatform)
-> Lens SigningPlatform SigningPlatform (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SigningPlatform' {Maybe Text
displayName :: Maybe Text
$sel:displayName:SigningPlatform' :: SigningPlatform -> Maybe Text
displayName} -> Maybe Text
displayName) (\s :: SigningPlatform
s@SigningPlatform' {} Maybe Text
a -> SigningPlatform
s {$sel:displayName:SigningPlatform' :: Maybe Text
displayName = Maybe Text
a} :: SigningPlatform)

-- | The maximum size (in MB) of code that can be signed by a code signing
-- platform.
signingPlatform_maxSizeInMB :: Lens.Lens' SigningPlatform (Prelude.Maybe Prelude.Int)
signingPlatform_maxSizeInMB :: (Maybe Int -> f (Maybe Int))
-> SigningPlatform -> f SigningPlatform
signingPlatform_maxSizeInMB = (SigningPlatform -> Maybe Int)
-> (SigningPlatform -> Maybe Int -> SigningPlatform)
-> Lens SigningPlatform SigningPlatform (Maybe Int) (Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SigningPlatform' {Maybe Int
maxSizeInMB :: Maybe Int
$sel:maxSizeInMB:SigningPlatform' :: SigningPlatform -> Maybe Int
maxSizeInMB} -> Maybe Int
maxSizeInMB) (\s :: SigningPlatform
s@SigningPlatform' {} Maybe Int
a -> SigningPlatform
s {$sel:maxSizeInMB:SigningPlatform' :: Maybe Int
maxSizeInMB = Maybe Int
a} :: SigningPlatform)

-- | The types of targets that can be signed by a code signing platform.
signingPlatform_target :: Lens.Lens' SigningPlatform (Prelude.Maybe Prelude.Text)
signingPlatform_target :: (Maybe Text -> f (Maybe Text))
-> SigningPlatform -> f SigningPlatform
signingPlatform_target = (SigningPlatform -> Maybe Text)
-> (SigningPlatform -> Maybe Text -> SigningPlatform)
-> Lens SigningPlatform SigningPlatform (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SigningPlatform' {Maybe Text
target :: Maybe Text
$sel:target:SigningPlatform' :: SigningPlatform -> Maybe Text
target} -> Maybe Text
target) (\s :: SigningPlatform
s@SigningPlatform' {} Maybe Text
a -> SigningPlatform
s {$sel:target:SigningPlatform' :: Maybe Text
target = Maybe Text
a} :: SigningPlatform)

instance Core.FromJSON SigningPlatform where
  parseJSON :: Value -> Parser SigningPlatform
parseJSON =
    String
-> (Object -> Parser SigningPlatform)
-> Value
-> Parser SigningPlatform
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
      String
"SigningPlatform"
      ( \Object
x ->
          Maybe Category
-> Maybe SigningConfiguration
-> Maybe Text
-> Maybe Bool
-> Maybe SigningImageFormat
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> SigningPlatform
SigningPlatform'
            (Maybe Category
 -> Maybe SigningConfiguration
 -> Maybe Text
 -> Maybe Bool
 -> Maybe SigningImageFormat
 -> Maybe Text
 -> Maybe Text
 -> Maybe Int
 -> Maybe Text
 -> SigningPlatform)
-> Parser (Maybe Category)
-> Parser
     (Maybe SigningConfiguration
      -> Maybe Text
      -> Maybe Bool
      -> Maybe SigningImageFormat
      -> Maybe Text
      -> Maybe Text
      -> Maybe Int
      -> Maybe Text
      -> SigningPlatform)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Category)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"category")
            Parser
  (Maybe SigningConfiguration
   -> Maybe Text
   -> Maybe Bool
   -> Maybe SigningImageFormat
   -> Maybe Text
   -> Maybe Text
   -> Maybe Int
   -> Maybe Text
   -> SigningPlatform)
-> Parser (Maybe SigningConfiguration)
-> Parser
     (Maybe Text
      -> Maybe Bool
      -> Maybe SigningImageFormat
      -> Maybe Text
      -> Maybe Text
      -> Maybe Int
      -> Maybe Text
      -> SigningPlatform)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe SigningConfiguration)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"signingConfiguration")
            Parser
  (Maybe Text
   -> Maybe Bool
   -> Maybe SigningImageFormat
   -> Maybe Text
   -> Maybe Text
   -> Maybe Int
   -> Maybe Text
   -> SigningPlatform)
-> Parser (Maybe Text)
-> Parser
     (Maybe Bool
      -> Maybe SigningImageFormat
      -> Maybe Text
      -> Maybe Text
      -> Maybe Int
      -> Maybe Text
      -> SigningPlatform)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"partner")
            Parser
  (Maybe Bool
   -> Maybe SigningImageFormat
   -> Maybe Text
   -> Maybe Text
   -> Maybe Int
   -> Maybe Text
   -> SigningPlatform)
-> Parser (Maybe Bool)
-> Parser
     (Maybe SigningImageFormat
      -> Maybe Text
      -> Maybe Text
      -> Maybe Int
      -> Maybe Text
      -> SigningPlatform)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Bool)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"revocationSupported")
            Parser
  (Maybe SigningImageFormat
   -> Maybe Text
   -> Maybe Text
   -> Maybe Int
   -> Maybe Text
   -> SigningPlatform)
-> Parser (Maybe SigningImageFormat)
-> Parser
     (Maybe Text
      -> Maybe Text -> Maybe Int -> Maybe Text -> SigningPlatform)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe SigningImageFormat)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"signingImageFormat")
            Parser
  (Maybe Text
   -> Maybe Text -> Maybe Int -> Maybe Text -> SigningPlatform)
-> Parser (Maybe Text)
-> Parser
     (Maybe Text -> Maybe Int -> Maybe Text -> SigningPlatform)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"platformId")
            Parser (Maybe Text -> Maybe Int -> Maybe Text -> SigningPlatform)
-> Parser (Maybe Text)
-> Parser (Maybe Int -> Maybe Text -> SigningPlatform)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"displayName")
            Parser (Maybe Int -> Maybe Text -> SigningPlatform)
-> Parser (Maybe Int) -> Parser (Maybe Text -> SigningPlatform)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"maxSizeInMB")
            Parser (Maybe Text -> SigningPlatform)
-> Parser (Maybe Text) -> Parser SigningPlatform
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"target")
      )

instance Prelude.Hashable SigningPlatform

instance Prelude.NFData SigningPlatform