module Stratosphere.IoT.SoftwarePackageVersion.SbomProperty (
        module Exports, SbomProperty(..), mkSbomProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.IoT.SoftwarePackageVersion.S3LocationProperty as Exports
import Stratosphere.ResourceProperties
data SbomProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iot-softwarepackageversion-sbom.html>
    SbomProperty {SbomProperty -> ()
haddock_workaround_ :: (),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iot-softwarepackageversion-sbom.html#cfn-iot-softwarepackageversion-sbom-s3location>
                  SbomProperty -> S3LocationProperty
s3Location :: S3LocationProperty}
  deriving stock (SbomProperty -> SbomProperty -> Bool
(SbomProperty -> SbomProperty -> Bool)
-> (SbomProperty -> SbomProperty -> Bool) -> Eq SbomProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SbomProperty -> SbomProperty -> Bool
== :: SbomProperty -> SbomProperty -> Bool
$c/= :: SbomProperty -> SbomProperty -> Bool
/= :: SbomProperty -> SbomProperty -> Bool
Prelude.Eq, Int -> SbomProperty -> ShowS
[SbomProperty] -> ShowS
SbomProperty -> String
(Int -> SbomProperty -> ShowS)
-> (SbomProperty -> String)
-> ([SbomProperty] -> ShowS)
-> Show SbomProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SbomProperty -> ShowS
showsPrec :: Int -> SbomProperty -> ShowS
$cshow :: SbomProperty -> String
show :: SbomProperty -> String
$cshowList :: [SbomProperty] -> ShowS
showList :: [SbomProperty] -> ShowS
Prelude.Show)
mkSbomProperty :: S3LocationProperty -> SbomProperty
mkSbomProperty :: S3LocationProperty -> SbomProperty
mkSbomProperty S3LocationProperty
s3Location
  = SbomProperty {haddock_workaround_ :: ()
haddock_workaround_ = (), s3Location :: S3LocationProperty
s3Location = S3LocationProperty
s3Location}
instance ToResourceProperties SbomProperty where
  toResourceProperties :: SbomProperty -> ResourceProperties
toResourceProperties SbomProperty {()
S3LocationProperty
haddock_workaround_ :: SbomProperty -> ()
s3Location :: SbomProperty -> S3LocationProperty
haddock_workaround_ :: ()
s3Location :: S3LocationProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::IoT::SoftwarePackageVersion.Sbom",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"S3Location" Key -> S3LocationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= S3LocationProperty
s3Location]}
instance JSON.ToJSON SbomProperty where
  toJSON :: SbomProperty -> Value
toJSON SbomProperty {()
S3LocationProperty
haddock_workaround_ :: SbomProperty -> ()
s3Location :: SbomProperty -> S3LocationProperty
haddock_workaround_ :: ()
s3Location :: S3LocationProperty
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"S3Location" Key -> S3LocationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= S3LocationProperty
s3Location]
instance Property "S3Location" SbomProperty where
  type PropertyType "S3Location" SbomProperty = S3LocationProperty
  set :: PropertyType "S3Location" SbomProperty
-> SbomProperty -> SbomProperty
set PropertyType "S3Location" SbomProperty
newValue SbomProperty {()
S3LocationProperty
haddock_workaround_ :: SbomProperty -> ()
s3Location :: SbomProperty -> S3LocationProperty
haddock_workaround_ :: ()
s3Location :: S3LocationProperty
..}
    = SbomProperty {s3Location :: S3LocationProperty
s3Location = PropertyType "S3Location" SbomProperty
S3LocationProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}