module Stratosphere.SageMaker.Model.RepositoryAuthConfigProperty (
        RepositoryAuthConfigProperty(..), mkRepositoryAuthConfigProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data RepositoryAuthConfigProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-model-containerdefinition-imageconfig-repositoryauthconfig.html>
    RepositoryAuthConfigProperty {RepositoryAuthConfigProperty -> ()
haddock_workaround_ :: (),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-model-containerdefinition-imageconfig-repositoryauthconfig.html#cfn-sagemaker-model-containerdefinition-imageconfig-repositoryauthconfig-repositorycredentialsproviderarn>
                                  RepositoryAuthConfigProperty -> Value Text
repositoryCredentialsProviderArn :: (Value Prelude.Text)}
  deriving stock (RepositoryAuthConfigProperty
-> RepositoryAuthConfigProperty -> Bool
(RepositoryAuthConfigProperty
 -> RepositoryAuthConfigProperty -> Bool)
-> (RepositoryAuthConfigProperty
    -> RepositoryAuthConfigProperty -> Bool)
-> Eq RepositoryAuthConfigProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RepositoryAuthConfigProperty
-> RepositoryAuthConfigProperty -> Bool
== :: RepositoryAuthConfigProperty
-> RepositoryAuthConfigProperty -> Bool
$c/= :: RepositoryAuthConfigProperty
-> RepositoryAuthConfigProperty -> Bool
/= :: RepositoryAuthConfigProperty
-> RepositoryAuthConfigProperty -> Bool
Prelude.Eq, Int -> RepositoryAuthConfigProperty -> ShowS
[RepositoryAuthConfigProperty] -> ShowS
RepositoryAuthConfigProperty -> String
(Int -> RepositoryAuthConfigProperty -> ShowS)
-> (RepositoryAuthConfigProperty -> String)
-> ([RepositoryAuthConfigProperty] -> ShowS)
-> Show RepositoryAuthConfigProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RepositoryAuthConfigProperty -> ShowS
showsPrec :: Int -> RepositoryAuthConfigProperty -> ShowS
$cshow :: RepositoryAuthConfigProperty -> String
show :: RepositoryAuthConfigProperty -> String
$cshowList :: [RepositoryAuthConfigProperty] -> ShowS
showList :: [RepositoryAuthConfigProperty] -> ShowS
Prelude.Show)
mkRepositoryAuthConfigProperty ::
  Value Prelude.Text -> RepositoryAuthConfigProperty
mkRepositoryAuthConfigProperty :: Value Text -> RepositoryAuthConfigProperty
mkRepositoryAuthConfigProperty Value Text
repositoryCredentialsProviderArn
  = RepositoryAuthConfigProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       repositoryCredentialsProviderArn :: Value Text
repositoryCredentialsProviderArn = Value Text
repositoryCredentialsProviderArn}
instance ToResourceProperties RepositoryAuthConfigProperty where
  toResourceProperties :: RepositoryAuthConfigProperty -> ResourceProperties
toResourceProperties RepositoryAuthConfigProperty {()
Value Text
haddock_workaround_ :: RepositoryAuthConfigProperty -> ()
repositoryCredentialsProviderArn :: RepositoryAuthConfigProperty -> Value Text
haddock_workaround_ :: ()
repositoryCredentialsProviderArn :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::SageMaker::Model.RepositoryAuthConfig",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"RepositoryCredentialsProviderArn"
                         Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
repositoryCredentialsProviderArn]}
instance JSON.ToJSON RepositoryAuthConfigProperty where
  toJSON :: RepositoryAuthConfigProperty -> Value
toJSON RepositoryAuthConfigProperty {()
Value Text
haddock_workaround_ :: RepositoryAuthConfigProperty -> ()
repositoryCredentialsProviderArn :: RepositoryAuthConfigProperty -> Value Text
haddock_workaround_ :: ()
repositoryCredentialsProviderArn :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"RepositoryCredentialsProviderArn"
           Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
repositoryCredentialsProviderArn]
instance Property "RepositoryCredentialsProviderArn" RepositoryAuthConfigProperty where
  type PropertyType "RepositoryCredentialsProviderArn" RepositoryAuthConfigProperty = Value Prelude.Text
  set :: PropertyType
  "RepositoryCredentialsProviderArn" RepositoryAuthConfigProperty
-> RepositoryAuthConfigProperty -> RepositoryAuthConfigProperty
set PropertyType
  "RepositoryCredentialsProviderArn" RepositoryAuthConfigProperty
newValue RepositoryAuthConfigProperty {()
Value Text
haddock_workaround_ :: RepositoryAuthConfigProperty -> ()
repositoryCredentialsProviderArn :: RepositoryAuthConfigProperty -> Value Text
haddock_workaround_ :: ()
repositoryCredentialsProviderArn :: Value Text
..}
    = RepositoryAuthConfigProperty
        {repositoryCredentialsProviderArn :: Value Text
repositoryCredentialsProviderArn = PropertyType
  "RepositoryCredentialsProviderArn" RepositoryAuthConfigProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}