{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveFoldable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveTraversable #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE TupleSections #-}
{-# LANGUAGE TypeFamilies #-}
{-# OPTIONS_GHC -fno-warn-unused-matches -fno-warn-unused-binds -fno-warn-unused-imports #-}
module Kubernetes.OpenAPI.Model (module Kubernetes.OpenAPI.Model, module Kubernetes.OpenAPI.ImportMappings) where
import Kubernetes.OpenAPI.Core
import Kubernetes.OpenAPI.MimeTypes
import Kubernetes.OpenAPI.ImportMappings
import Data.Aeson ((.:),(.:!),(.:?),(.=))
import qualified Control.Arrow as P (left)
import qualified Data.Aeson as A
import qualified Data.ByteString as B
import qualified Data.ByteString.Base64 as B64
import qualified Data.ByteString.Char8 as BC
import qualified Data.ByteString.Lazy as BL
import qualified Data.Data as P (Typeable, TypeRep, typeOf, typeRep)
import qualified Data.Foldable as P
import qualified Data.HashMap.Lazy as HM
import qualified Data.Map as Map
import qualified Data.Maybe as P
import qualified Data.Set as Set
import qualified Data.Text as T
import qualified Data.Text.Encoding as T
import qualified Data.Time as TI
import qualified Lens.Micro as L
import qualified Web.FormUrlEncoded as WH
import qualified Web.HttpApiData as WH
import Control.Applicative ((<|>))
import Control.Applicative (Alternative)
import Data.Function ((&))
import Data.Monoid ((<>))
import Data.Text (Text)
import Prelude (($),(/=),(.),(<$>),(<*>),(>>=),(=<<),Maybe(..),Bool(..),Char,Double,FilePath,Float,Int,Integer,String,fmap,undefined,mempty,maybe,pure,Monad,Applicative,Functor)
import qualified Prelude as P
newtype Body = Body { unBody :: A.Value } deriving (P.Eq, P.Show, A.ToJSON)
newtype Command = Command { unCommand :: Text } deriving (P.Eq, P.Show)
newtype Container = Container { unContainer :: Text } deriving (P.Eq, P.Show)
newtype Continue = Continue { unContinue :: Text } deriving (P.Eq, P.Show)
newtype DryRun = DryRun { unDryRun :: Text } deriving (P.Eq, P.Show)
newtype Exact = Exact { unExact :: Bool } deriving (P.Eq, P.Show)
newtype Export = Export { unExport :: Bool } deriving (P.Eq, P.Show)
newtype FieldManager = FieldManager { unFieldManager :: Text } deriving (P.Eq, P.Show)
newtype FieldSelector = FieldSelector { unFieldSelector :: Text } deriving (P.Eq, P.Show)
newtype Follow = Follow { unFollow :: Bool } deriving (P.Eq, P.Show)
newtype Force = Force { unForce :: Bool } deriving (P.Eq, P.Show)
newtype GracePeriodSeconds = GracePeriodSeconds { unGracePeriodSeconds :: Int } deriving (P.Eq, P.Show)
newtype Group = Group { unGroup :: Text } deriving (P.Eq, P.Show)
newtype LabelSelector = LabelSelector { unLabelSelector :: Text } deriving (P.Eq, P.Show)
newtype Limit = Limit { unLimit :: Int } deriving (P.Eq, P.Show)
newtype LimitBytes = LimitBytes { unLimitBytes :: Int } deriving (P.Eq, P.Show)
newtype Logpath = Logpath { unLogpath :: Text } deriving (P.Eq, P.Show)
newtype Name = Name { unName :: Text } deriving (P.Eq, P.Show)
newtype Namespace = Namespace { unNamespace :: Text } deriving (P.Eq, P.Show)
newtype OrphanDependents = OrphanDependents { unOrphanDependents :: Bool } deriving (P.Eq, P.Show)
newtype Path = Path { unPath :: Text } deriving (P.Eq, P.Show)
newtype Path2 = Path2 { unPath2 :: Text } deriving (P.Eq, P.Show)
newtype Plural = Plural { unPlural :: Text } deriving (P.Eq, P.Show)
newtype Ports = Ports { unPorts :: Int } deriving (P.Eq, P.Show)
newtype Pretty = Pretty { unPretty :: Text } deriving (P.Eq, P.Show)
newtype Previous = Previous { unPrevious :: Bool } deriving (P.Eq, P.Show)
newtype PropagationPolicy = PropagationPolicy { unPropagationPolicy :: Text } deriving (P.Eq, P.Show)
newtype ResourceVersion = ResourceVersion { unResourceVersion :: Text } deriving (P.Eq, P.Show)
newtype SinceSeconds = SinceSeconds { unSinceSeconds :: Int } deriving (P.Eq, P.Show)
newtype Stderr = Stderr { unStderr :: Bool } deriving (P.Eq, P.Show)
newtype Stdin = Stdin { unStdin :: Bool } deriving (P.Eq, P.Show)
newtype Stdout = Stdout { unStdout :: Bool } deriving (P.Eq, P.Show)
newtype TailLines = TailLines { unTailLines :: Int } deriving (P.Eq, P.Show)
newtype TimeoutSeconds = TimeoutSeconds { unTimeoutSeconds :: Int } deriving (P.Eq, P.Show)
newtype Timestamps = Timestamps { unTimestamps :: Bool } deriving (P.Eq, P.Show)
newtype Tty = Tty { unTty :: Bool } deriving (P.Eq, P.Show)
newtype Version = Version { unVersion :: Text } deriving (P.Eq, P.Show)
newtype Watch = Watch { unWatch :: Bool } deriving (P.Eq, P.Show)
data AdmissionregistrationV1beta1ServiceReference = AdmissionregistrationV1beta1ServiceReference
{ admissionregistrationV1beta1ServiceReferenceName :: !(Text)
, admissionregistrationV1beta1ServiceReferenceNamespace :: !(Text)
, admissionregistrationV1beta1ServiceReferencePath :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AdmissionregistrationV1beta1ServiceReference where
parseJSON = A.withObject "AdmissionregistrationV1beta1ServiceReference" $ \o ->
AdmissionregistrationV1beta1ServiceReference
<$> (o .: "name")
<*> (o .: "namespace")
<*> (o .:? "path")
instance A.ToJSON AdmissionregistrationV1beta1ServiceReference where
toJSON AdmissionregistrationV1beta1ServiceReference {..} =
_omitNulls
[ "name" .= admissionregistrationV1beta1ServiceReferenceName
, "namespace" .= admissionregistrationV1beta1ServiceReferenceNamespace
, "path" .= admissionregistrationV1beta1ServiceReferencePath
]
mkAdmissionregistrationV1beta1ServiceReference
:: Text
-> Text
-> AdmissionregistrationV1beta1ServiceReference
mkAdmissionregistrationV1beta1ServiceReference admissionregistrationV1beta1ServiceReferenceName admissionregistrationV1beta1ServiceReferenceNamespace =
AdmissionregistrationV1beta1ServiceReference
{ admissionregistrationV1beta1ServiceReferenceName
, admissionregistrationV1beta1ServiceReferenceNamespace
, admissionregistrationV1beta1ServiceReferencePath = Nothing
}
data AdmissionregistrationV1beta1WebhookClientConfig = AdmissionregistrationV1beta1WebhookClientConfig
{ admissionregistrationV1beta1WebhookClientConfigCaBundle :: !(Maybe ByteArray)
, admissionregistrationV1beta1WebhookClientConfigService :: !(Maybe AdmissionregistrationV1beta1ServiceReference)
, admissionregistrationV1beta1WebhookClientConfigUrl :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AdmissionregistrationV1beta1WebhookClientConfig where
parseJSON = A.withObject "AdmissionregistrationV1beta1WebhookClientConfig" $ \o ->
AdmissionregistrationV1beta1WebhookClientConfig
<$> (o .:? "caBundle")
<*> (o .:? "service")
<*> (o .:? "url")
instance A.ToJSON AdmissionregistrationV1beta1WebhookClientConfig where
toJSON AdmissionregistrationV1beta1WebhookClientConfig {..} =
_omitNulls
[ "caBundle" .= admissionregistrationV1beta1WebhookClientConfigCaBundle
, "service" .= admissionregistrationV1beta1WebhookClientConfigService
, "url" .= admissionregistrationV1beta1WebhookClientConfigUrl
]
mkAdmissionregistrationV1beta1WebhookClientConfig
:: AdmissionregistrationV1beta1WebhookClientConfig
mkAdmissionregistrationV1beta1WebhookClientConfig =
AdmissionregistrationV1beta1WebhookClientConfig
{ admissionregistrationV1beta1WebhookClientConfigCaBundle = Nothing
, admissionregistrationV1beta1WebhookClientConfigService = Nothing
, admissionregistrationV1beta1WebhookClientConfigUrl = Nothing
}
data ApiextensionsV1beta1ServiceReference = ApiextensionsV1beta1ServiceReference
{ apiextensionsV1beta1ServiceReferenceName :: !(Text)
, apiextensionsV1beta1ServiceReferenceNamespace :: !(Text)
, apiextensionsV1beta1ServiceReferencePath :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ApiextensionsV1beta1ServiceReference where
parseJSON = A.withObject "ApiextensionsV1beta1ServiceReference" $ \o ->
ApiextensionsV1beta1ServiceReference
<$> (o .: "name")
<*> (o .: "namespace")
<*> (o .:? "path")
instance A.ToJSON ApiextensionsV1beta1ServiceReference where
toJSON ApiextensionsV1beta1ServiceReference {..} =
_omitNulls
[ "name" .= apiextensionsV1beta1ServiceReferenceName
, "namespace" .= apiextensionsV1beta1ServiceReferenceNamespace
, "path" .= apiextensionsV1beta1ServiceReferencePath
]
mkApiextensionsV1beta1ServiceReference
:: Text
-> Text
-> ApiextensionsV1beta1ServiceReference
mkApiextensionsV1beta1ServiceReference apiextensionsV1beta1ServiceReferenceName apiextensionsV1beta1ServiceReferenceNamespace =
ApiextensionsV1beta1ServiceReference
{ apiextensionsV1beta1ServiceReferenceName
, apiextensionsV1beta1ServiceReferenceNamespace
, apiextensionsV1beta1ServiceReferencePath = Nothing
}
data ApiextensionsV1beta1WebhookClientConfig = ApiextensionsV1beta1WebhookClientConfig
{ apiextensionsV1beta1WebhookClientConfigCaBundle :: !(Maybe ByteArray)
, apiextensionsV1beta1WebhookClientConfigService :: !(Maybe ApiextensionsV1beta1ServiceReference)
, apiextensionsV1beta1WebhookClientConfigUrl :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ApiextensionsV1beta1WebhookClientConfig where
parseJSON = A.withObject "ApiextensionsV1beta1WebhookClientConfig" $ \o ->
ApiextensionsV1beta1WebhookClientConfig
<$> (o .:? "caBundle")
<*> (o .:? "service")
<*> (o .:? "url")
instance A.ToJSON ApiextensionsV1beta1WebhookClientConfig where
toJSON ApiextensionsV1beta1WebhookClientConfig {..} =
_omitNulls
[ "caBundle" .= apiextensionsV1beta1WebhookClientConfigCaBundle
, "service" .= apiextensionsV1beta1WebhookClientConfigService
, "url" .= apiextensionsV1beta1WebhookClientConfigUrl
]
mkApiextensionsV1beta1WebhookClientConfig
:: ApiextensionsV1beta1WebhookClientConfig
mkApiextensionsV1beta1WebhookClientConfig =
ApiextensionsV1beta1WebhookClientConfig
{ apiextensionsV1beta1WebhookClientConfigCaBundle = Nothing
, apiextensionsV1beta1WebhookClientConfigService = Nothing
, apiextensionsV1beta1WebhookClientConfigUrl = Nothing
}
data ApiregistrationV1beta1ServiceReference = ApiregistrationV1beta1ServiceReference
{ apiregistrationV1beta1ServiceReferenceName :: !(Maybe Text)
, apiregistrationV1beta1ServiceReferenceNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ApiregistrationV1beta1ServiceReference where
parseJSON = A.withObject "ApiregistrationV1beta1ServiceReference" $ \o ->
ApiregistrationV1beta1ServiceReference
<$> (o .:? "name")
<*> (o .:? "namespace")
instance A.ToJSON ApiregistrationV1beta1ServiceReference where
toJSON ApiregistrationV1beta1ServiceReference {..} =
_omitNulls
[ "name" .= apiregistrationV1beta1ServiceReferenceName
, "namespace" .= apiregistrationV1beta1ServiceReferenceNamespace
]
mkApiregistrationV1beta1ServiceReference
:: ApiregistrationV1beta1ServiceReference
mkApiregistrationV1beta1ServiceReference =
ApiregistrationV1beta1ServiceReference
{ apiregistrationV1beta1ServiceReferenceName = Nothing
, apiregistrationV1beta1ServiceReferenceNamespace = Nothing
}
data AppsV1beta1Deployment = AppsV1beta1Deployment
{ appsV1beta1DeploymentApiVersion :: !(Maybe Text)
, appsV1beta1DeploymentKind :: !(Maybe Text)
, appsV1beta1DeploymentMetadata :: !(Maybe V1ObjectMeta)
, appsV1beta1DeploymentSpec :: !(Maybe AppsV1beta1DeploymentSpec)
, appsV1beta1DeploymentStatus :: !(Maybe AppsV1beta1DeploymentStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1Deployment where
parseJSON = A.withObject "AppsV1beta1Deployment" $ \o ->
AppsV1beta1Deployment
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON AppsV1beta1Deployment where
toJSON AppsV1beta1Deployment {..} =
_omitNulls
[ "apiVersion" .= appsV1beta1DeploymentApiVersion
, "kind" .= appsV1beta1DeploymentKind
, "metadata" .= appsV1beta1DeploymentMetadata
, "spec" .= appsV1beta1DeploymentSpec
, "status" .= appsV1beta1DeploymentStatus
]
mkAppsV1beta1Deployment
:: AppsV1beta1Deployment
mkAppsV1beta1Deployment =
AppsV1beta1Deployment
{ appsV1beta1DeploymentApiVersion = Nothing
, appsV1beta1DeploymentKind = Nothing
, appsV1beta1DeploymentMetadata = Nothing
, appsV1beta1DeploymentSpec = Nothing
, appsV1beta1DeploymentStatus = Nothing
}
data AppsV1beta1DeploymentCondition = AppsV1beta1DeploymentCondition
{ appsV1beta1DeploymentConditionLastTransitionTime :: !(Maybe DateTime)
, appsV1beta1DeploymentConditionLastUpdateTime :: !(Maybe DateTime)
, appsV1beta1DeploymentConditionMessage :: !(Maybe Text)
, appsV1beta1DeploymentConditionReason :: !(Maybe Text)
, appsV1beta1DeploymentConditionStatus :: !(Text)
, appsV1beta1DeploymentConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1DeploymentCondition where
parseJSON = A.withObject "AppsV1beta1DeploymentCondition" $ \o ->
AppsV1beta1DeploymentCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "lastUpdateTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON AppsV1beta1DeploymentCondition where
toJSON AppsV1beta1DeploymentCondition {..} =
_omitNulls
[ "lastTransitionTime" .= appsV1beta1DeploymentConditionLastTransitionTime
, "lastUpdateTime" .= appsV1beta1DeploymentConditionLastUpdateTime
, "message" .= appsV1beta1DeploymentConditionMessage
, "reason" .= appsV1beta1DeploymentConditionReason
, "status" .= appsV1beta1DeploymentConditionStatus
, "type" .= appsV1beta1DeploymentConditionType
]
mkAppsV1beta1DeploymentCondition
:: Text
-> Text
-> AppsV1beta1DeploymentCondition
mkAppsV1beta1DeploymentCondition appsV1beta1DeploymentConditionStatus appsV1beta1DeploymentConditionType =
AppsV1beta1DeploymentCondition
{ appsV1beta1DeploymentConditionLastTransitionTime = Nothing
, appsV1beta1DeploymentConditionLastUpdateTime = Nothing
, appsV1beta1DeploymentConditionMessage = Nothing
, appsV1beta1DeploymentConditionReason = Nothing
, appsV1beta1DeploymentConditionStatus
, appsV1beta1DeploymentConditionType
}
data AppsV1beta1DeploymentList = AppsV1beta1DeploymentList
{ appsV1beta1DeploymentListApiVersion :: !(Maybe Text)
, appsV1beta1DeploymentListItems :: !([AppsV1beta1Deployment])
, appsV1beta1DeploymentListKind :: !(Maybe Text)
, appsV1beta1DeploymentListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1DeploymentList where
parseJSON = A.withObject "AppsV1beta1DeploymentList" $ \o ->
AppsV1beta1DeploymentList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON AppsV1beta1DeploymentList where
toJSON AppsV1beta1DeploymentList {..} =
_omitNulls
[ "apiVersion" .= appsV1beta1DeploymentListApiVersion
, "items" .= appsV1beta1DeploymentListItems
, "kind" .= appsV1beta1DeploymentListKind
, "metadata" .= appsV1beta1DeploymentListMetadata
]
mkAppsV1beta1DeploymentList
:: [AppsV1beta1Deployment]
-> AppsV1beta1DeploymentList
mkAppsV1beta1DeploymentList appsV1beta1DeploymentListItems =
AppsV1beta1DeploymentList
{ appsV1beta1DeploymentListApiVersion = Nothing
, appsV1beta1DeploymentListItems
, appsV1beta1DeploymentListKind = Nothing
, appsV1beta1DeploymentListMetadata = Nothing
}
data AppsV1beta1DeploymentRollback = AppsV1beta1DeploymentRollback
{ appsV1beta1DeploymentRollbackApiVersion :: !(Maybe Text)
, appsV1beta1DeploymentRollbackKind :: !(Maybe Text)
, appsV1beta1DeploymentRollbackName :: !(Text)
, appsV1beta1DeploymentRollbackRollbackTo :: !(AppsV1beta1RollbackConfig)
, appsV1beta1DeploymentRollbackUpdatedAnnotations :: !(Maybe (Map.Map String Text))
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1DeploymentRollback where
parseJSON = A.withObject "AppsV1beta1DeploymentRollback" $ \o ->
AppsV1beta1DeploymentRollback
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .: "name")
<*> (o .: "rollbackTo")
<*> (o .:? "updatedAnnotations")
instance A.ToJSON AppsV1beta1DeploymentRollback where
toJSON AppsV1beta1DeploymentRollback {..} =
_omitNulls
[ "apiVersion" .= appsV1beta1DeploymentRollbackApiVersion
, "kind" .= appsV1beta1DeploymentRollbackKind
, "name" .= appsV1beta1DeploymentRollbackName
, "rollbackTo" .= appsV1beta1DeploymentRollbackRollbackTo
, "updatedAnnotations" .= appsV1beta1DeploymentRollbackUpdatedAnnotations
]
mkAppsV1beta1DeploymentRollback
:: Text
-> AppsV1beta1RollbackConfig
-> AppsV1beta1DeploymentRollback
mkAppsV1beta1DeploymentRollback appsV1beta1DeploymentRollbackName appsV1beta1DeploymentRollbackRollbackTo =
AppsV1beta1DeploymentRollback
{ appsV1beta1DeploymentRollbackApiVersion = Nothing
, appsV1beta1DeploymentRollbackKind = Nothing
, appsV1beta1DeploymentRollbackName
, appsV1beta1DeploymentRollbackRollbackTo
, appsV1beta1DeploymentRollbackUpdatedAnnotations = Nothing
}
data AppsV1beta1DeploymentSpec = AppsV1beta1DeploymentSpec
{ appsV1beta1DeploymentSpecMinReadySeconds :: !(Maybe Int)
, appsV1beta1DeploymentSpecPaused :: !(Maybe Bool)
, appsV1beta1DeploymentSpecProgressDeadlineSeconds :: !(Maybe Int)
, appsV1beta1DeploymentSpecReplicas :: !(Maybe Int)
, appsV1beta1DeploymentSpecRevisionHistoryLimit :: !(Maybe Int)
, appsV1beta1DeploymentSpecRollbackTo :: !(Maybe AppsV1beta1RollbackConfig)
, appsV1beta1DeploymentSpecSelector :: !(Maybe V1LabelSelector)
, appsV1beta1DeploymentSpecStrategy :: !(Maybe AppsV1beta1DeploymentStrategy)
, appsV1beta1DeploymentSpecTemplate :: !(V1PodTemplateSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1DeploymentSpec where
parseJSON = A.withObject "AppsV1beta1DeploymentSpec" $ \o ->
AppsV1beta1DeploymentSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "paused")
<*> (o .:? "progressDeadlineSeconds")
<*> (o .:? "replicas")
<*> (o .:? "revisionHistoryLimit")
<*> (o .:? "rollbackTo")
<*> (o .:? "selector")
<*> (o .:? "strategy")
<*> (o .: "template")
instance A.ToJSON AppsV1beta1DeploymentSpec where
toJSON AppsV1beta1DeploymentSpec {..} =
_omitNulls
[ "minReadySeconds" .= appsV1beta1DeploymentSpecMinReadySeconds
, "paused" .= appsV1beta1DeploymentSpecPaused
, "progressDeadlineSeconds" .= appsV1beta1DeploymentSpecProgressDeadlineSeconds
, "replicas" .= appsV1beta1DeploymentSpecReplicas
, "revisionHistoryLimit" .= appsV1beta1DeploymentSpecRevisionHistoryLimit
, "rollbackTo" .= appsV1beta1DeploymentSpecRollbackTo
, "selector" .= appsV1beta1DeploymentSpecSelector
, "strategy" .= appsV1beta1DeploymentSpecStrategy
, "template" .= appsV1beta1DeploymentSpecTemplate
]
mkAppsV1beta1DeploymentSpec
:: V1PodTemplateSpec
-> AppsV1beta1DeploymentSpec
mkAppsV1beta1DeploymentSpec appsV1beta1DeploymentSpecTemplate =
AppsV1beta1DeploymentSpec
{ appsV1beta1DeploymentSpecMinReadySeconds = Nothing
, appsV1beta1DeploymentSpecPaused = Nothing
, appsV1beta1DeploymentSpecProgressDeadlineSeconds = Nothing
, appsV1beta1DeploymentSpecReplicas = Nothing
, appsV1beta1DeploymentSpecRevisionHistoryLimit = Nothing
, appsV1beta1DeploymentSpecRollbackTo = Nothing
, appsV1beta1DeploymentSpecSelector = Nothing
, appsV1beta1DeploymentSpecStrategy = Nothing
, appsV1beta1DeploymentSpecTemplate
}
data AppsV1beta1DeploymentStatus = AppsV1beta1DeploymentStatus
{ appsV1beta1DeploymentStatusAvailableReplicas :: !(Maybe Int)
, appsV1beta1DeploymentStatusCollisionCount :: !(Maybe Int)
, appsV1beta1DeploymentStatusConditions :: !(Maybe [AppsV1beta1DeploymentCondition])
, appsV1beta1DeploymentStatusObservedGeneration :: !(Maybe Integer)
, appsV1beta1DeploymentStatusReadyReplicas :: !(Maybe Int)
, appsV1beta1DeploymentStatusReplicas :: !(Maybe Int)
, appsV1beta1DeploymentStatusUnavailableReplicas :: !(Maybe Int)
, appsV1beta1DeploymentStatusUpdatedReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1DeploymentStatus where
parseJSON = A.withObject "AppsV1beta1DeploymentStatus" $ \o ->
AppsV1beta1DeploymentStatus
<$> (o .:? "availableReplicas")
<*> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .:? "replicas")
<*> (o .:? "unavailableReplicas")
<*> (o .:? "updatedReplicas")
instance A.ToJSON AppsV1beta1DeploymentStatus where
toJSON AppsV1beta1DeploymentStatus {..} =
_omitNulls
[ "availableReplicas" .= appsV1beta1DeploymentStatusAvailableReplicas
, "collisionCount" .= appsV1beta1DeploymentStatusCollisionCount
, "conditions" .= appsV1beta1DeploymentStatusConditions
, "observedGeneration" .= appsV1beta1DeploymentStatusObservedGeneration
, "readyReplicas" .= appsV1beta1DeploymentStatusReadyReplicas
, "replicas" .= appsV1beta1DeploymentStatusReplicas
, "unavailableReplicas" .= appsV1beta1DeploymentStatusUnavailableReplicas
, "updatedReplicas" .= appsV1beta1DeploymentStatusUpdatedReplicas
]
mkAppsV1beta1DeploymentStatus
:: AppsV1beta1DeploymentStatus
mkAppsV1beta1DeploymentStatus =
AppsV1beta1DeploymentStatus
{ appsV1beta1DeploymentStatusAvailableReplicas = Nothing
, appsV1beta1DeploymentStatusCollisionCount = Nothing
, appsV1beta1DeploymentStatusConditions = Nothing
, appsV1beta1DeploymentStatusObservedGeneration = Nothing
, appsV1beta1DeploymentStatusReadyReplicas = Nothing
, appsV1beta1DeploymentStatusReplicas = Nothing
, appsV1beta1DeploymentStatusUnavailableReplicas = Nothing
, appsV1beta1DeploymentStatusUpdatedReplicas = Nothing
}
data AppsV1beta1DeploymentStrategy = AppsV1beta1DeploymentStrategy
{ appsV1beta1DeploymentStrategyRollingUpdate :: !(Maybe AppsV1beta1RollingUpdateDeployment)
, appsV1beta1DeploymentStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1DeploymentStrategy where
parseJSON = A.withObject "AppsV1beta1DeploymentStrategy" $ \o ->
AppsV1beta1DeploymentStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON AppsV1beta1DeploymentStrategy where
toJSON AppsV1beta1DeploymentStrategy {..} =
_omitNulls
[ "rollingUpdate" .= appsV1beta1DeploymentStrategyRollingUpdate
, "type" .= appsV1beta1DeploymentStrategyType
]
mkAppsV1beta1DeploymentStrategy
:: AppsV1beta1DeploymentStrategy
mkAppsV1beta1DeploymentStrategy =
AppsV1beta1DeploymentStrategy
{ appsV1beta1DeploymentStrategyRollingUpdate = Nothing
, appsV1beta1DeploymentStrategyType = Nothing
}
data AppsV1beta1RollbackConfig = AppsV1beta1RollbackConfig
{ appsV1beta1RollbackConfigRevision :: !(Maybe Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1RollbackConfig where
parseJSON = A.withObject "AppsV1beta1RollbackConfig" $ \o ->
AppsV1beta1RollbackConfig
<$> (o .:? "revision")
instance A.ToJSON AppsV1beta1RollbackConfig where
toJSON AppsV1beta1RollbackConfig {..} =
_omitNulls
[ "revision" .= appsV1beta1RollbackConfigRevision
]
mkAppsV1beta1RollbackConfig
:: AppsV1beta1RollbackConfig
mkAppsV1beta1RollbackConfig =
AppsV1beta1RollbackConfig
{ appsV1beta1RollbackConfigRevision = Nothing
}
data AppsV1beta1RollingUpdateDeployment = AppsV1beta1RollingUpdateDeployment
{ appsV1beta1RollingUpdateDeploymentMaxSurge :: !(Maybe IntOrString)
, appsV1beta1RollingUpdateDeploymentMaxUnavailable :: !(Maybe IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1RollingUpdateDeployment where
parseJSON = A.withObject "AppsV1beta1RollingUpdateDeployment" $ \o ->
AppsV1beta1RollingUpdateDeployment
<$> (o .:? "maxSurge")
<*> (o .:? "maxUnavailable")
instance A.ToJSON AppsV1beta1RollingUpdateDeployment where
toJSON AppsV1beta1RollingUpdateDeployment {..} =
_omitNulls
[ "maxSurge" .= appsV1beta1RollingUpdateDeploymentMaxSurge
, "maxUnavailable" .= appsV1beta1RollingUpdateDeploymentMaxUnavailable
]
mkAppsV1beta1RollingUpdateDeployment
:: AppsV1beta1RollingUpdateDeployment
mkAppsV1beta1RollingUpdateDeployment =
AppsV1beta1RollingUpdateDeployment
{ appsV1beta1RollingUpdateDeploymentMaxSurge = Nothing
, appsV1beta1RollingUpdateDeploymentMaxUnavailable = Nothing
}
data AppsV1beta1Scale = AppsV1beta1Scale
{ appsV1beta1ScaleApiVersion :: !(Maybe Text)
, appsV1beta1ScaleKind :: !(Maybe Text)
, appsV1beta1ScaleMetadata :: !(Maybe V1ObjectMeta)
, appsV1beta1ScaleSpec :: !(Maybe AppsV1beta1ScaleSpec)
, appsV1beta1ScaleStatus :: !(Maybe AppsV1beta1ScaleStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1Scale where
parseJSON = A.withObject "AppsV1beta1Scale" $ \o ->
AppsV1beta1Scale
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON AppsV1beta1Scale where
toJSON AppsV1beta1Scale {..} =
_omitNulls
[ "apiVersion" .= appsV1beta1ScaleApiVersion
, "kind" .= appsV1beta1ScaleKind
, "metadata" .= appsV1beta1ScaleMetadata
, "spec" .= appsV1beta1ScaleSpec
, "status" .= appsV1beta1ScaleStatus
]
mkAppsV1beta1Scale
:: AppsV1beta1Scale
mkAppsV1beta1Scale =
AppsV1beta1Scale
{ appsV1beta1ScaleApiVersion = Nothing
, appsV1beta1ScaleKind = Nothing
, appsV1beta1ScaleMetadata = Nothing
, appsV1beta1ScaleSpec = Nothing
, appsV1beta1ScaleStatus = Nothing
}
data AppsV1beta1ScaleSpec = AppsV1beta1ScaleSpec
{ appsV1beta1ScaleSpecReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1ScaleSpec where
parseJSON = A.withObject "AppsV1beta1ScaleSpec" $ \o ->
AppsV1beta1ScaleSpec
<$> (o .:? "replicas")
instance A.ToJSON AppsV1beta1ScaleSpec where
toJSON AppsV1beta1ScaleSpec {..} =
_omitNulls
[ "replicas" .= appsV1beta1ScaleSpecReplicas
]
mkAppsV1beta1ScaleSpec
:: AppsV1beta1ScaleSpec
mkAppsV1beta1ScaleSpec =
AppsV1beta1ScaleSpec
{ appsV1beta1ScaleSpecReplicas = Nothing
}
data AppsV1beta1ScaleStatus = AppsV1beta1ScaleStatus
{ appsV1beta1ScaleStatusReplicas :: !(Int)
, appsV1beta1ScaleStatusSelector :: !(Maybe (Map.Map String Text))
, appsV1beta1ScaleStatusTargetSelector :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON AppsV1beta1ScaleStatus where
parseJSON = A.withObject "AppsV1beta1ScaleStatus" $ \o ->
AppsV1beta1ScaleStatus
<$> (o .: "replicas")
<*> (o .:? "selector")
<*> (o .:? "targetSelector")
instance A.ToJSON AppsV1beta1ScaleStatus where
toJSON AppsV1beta1ScaleStatus {..} =
_omitNulls
[ "replicas" .= appsV1beta1ScaleStatusReplicas
, "selector" .= appsV1beta1ScaleStatusSelector
, "targetSelector" .= appsV1beta1ScaleStatusTargetSelector
]
mkAppsV1beta1ScaleStatus
:: Int
-> AppsV1beta1ScaleStatus
mkAppsV1beta1ScaleStatus appsV1beta1ScaleStatusReplicas =
AppsV1beta1ScaleStatus
{ appsV1beta1ScaleStatusReplicas
, appsV1beta1ScaleStatusSelector = Nothing
, appsV1beta1ScaleStatusTargetSelector = Nothing
}
data ExtensionsV1beta1AllowedCSIDriver = ExtensionsV1beta1AllowedCSIDriver
{ extensionsV1beta1AllowedCSIDriverName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1AllowedCSIDriver where
parseJSON = A.withObject "ExtensionsV1beta1AllowedCSIDriver" $ \o ->
ExtensionsV1beta1AllowedCSIDriver
<$> (o .: "name")
instance A.ToJSON ExtensionsV1beta1AllowedCSIDriver where
toJSON ExtensionsV1beta1AllowedCSIDriver {..} =
_omitNulls
[ "name" .= extensionsV1beta1AllowedCSIDriverName
]
mkExtensionsV1beta1AllowedCSIDriver
:: Text
-> ExtensionsV1beta1AllowedCSIDriver
mkExtensionsV1beta1AllowedCSIDriver extensionsV1beta1AllowedCSIDriverName =
ExtensionsV1beta1AllowedCSIDriver
{ extensionsV1beta1AllowedCSIDriverName
}
data ExtensionsV1beta1AllowedFlexVolume = ExtensionsV1beta1AllowedFlexVolume
{ extensionsV1beta1AllowedFlexVolumeDriver :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1AllowedFlexVolume where
parseJSON = A.withObject "ExtensionsV1beta1AllowedFlexVolume" $ \o ->
ExtensionsV1beta1AllowedFlexVolume
<$> (o .: "driver")
instance A.ToJSON ExtensionsV1beta1AllowedFlexVolume where
toJSON ExtensionsV1beta1AllowedFlexVolume {..} =
_omitNulls
[ "driver" .= extensionsV1beta1AllowedFlexVolumeDriver
]
mkExtensionsV1beta1AllowedFlexVolume
:: Text
-> ExtensionsV1beta1AllowedFlexVolume
mkExtensionsV1beta1AllowedFlexVolume extensionsV1beta1AllowedFlexVolumeDriver =
ExtensionsV1beta1AllowedFlexVolume
{ extensionsV1beta1AllowedFlexVolumeDriver
}
data ExtensionsV1beta1AllowedHostPath = ExtensionsV1beta1AllowedHostPath
{ extensionsV1beta1AllowedHostPathPathPrefix :: !(Maybe Text)
, extensionsV1beta1AllowedHostPathReadOnly :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1AllowedHostPath where
parseJSON = A.withObject "ExtensionsV1beta1AllowedHostPath" $ \o ->
ExtensionsV1beta1AllowedHostPath
<$> (o .:? "pathPrefix")
<*> (o .:? "readOnly")
instance A.ToJSON ExtensionsV1beta1AllowedHostPath where
toJSON ExtensionsV1beta1AllowedHostPath {..} =
_omitNulls
[ "pathPrefix" .= extensionsV1beta1AllowedHostPathPathPrefix
, "readOnly" .= extensionsV1beta1AllowedHostPathReadOnly
]
mkExtensionsV1beta1AllowedHostPath
:: ExtensionsV1beta1AllowedHostPath
mkExtensionsV1beta1AllowedHostPath =
ExtensionsV1beta1AllowedHostPath
{ extensionsV1beta1AllowedHostPathPathPrefix = Nothing
, extensionsV1beta1AllowedHostPathReadOnly = Nothing
}
data ExtensionsV1beta1Deployment = ExtensionsV1beta1Deployment
{ extensionsV1beta1DeploymentApiVersion :: !(Maybe Text)
, extensionsV1beta1DeploymentKind :: !(Maybe Text)
, extensionsV1beta1DeploymentMetadata :: !(Maybe V1ObjectMeta)
, extensionsV1beta1DeploymentSpec :: !(Maybe ExtensionsV1beta1DeploymentSpec)
, extensionsV1beta1DeploymentStatus :: !(Maybe ExtensionsV1beta1DeploymentStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1Deployment where
parseJSON = A.withObject "ExtensionsV1beta1Deployment" $ \o ->
ExtensionsV1beta1Deployment
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON ExtensionsV1beta1Deployment where
toJSON ExtensionsV1beta1Deployment {..} =
_omitNulls
[ "apiVersion" .= extensionsV1beta1DeploymentApiVersion
, "kind" .= extensionsV1beta1DeploymentKind
, "metadata" .= extensionsV1beta1DeploymentMetadata
, "spec" .= extensionsV1beta1DeploymentSpec
, "status" .= extensionsV1beta1DeploymentStatus
]
mkExtensionsV1beta1Deployment
:: ExtensionsV1beta1Deployment
mkExtensionsV1beta1Deployment =
ExtensionsV1beta1Deployment
{ extensionsV1beta1DeploymentApiVersion = Nothing
, extensionsV1beta1DeploymentKind = Nothing
, extensionsV1beta1DeploymentMetadata = Nothing
, extensionsV1beta1DeploymentSpec = Nothing
, extensionsV1beta1DeploymentStatus = Nothing
}
data ExtensionsV1beta1DeploymentCondition = ExtensionsV1beta1DeploymentCondition
{ extensionsV1beta1DeploymentConditionLastTransitionTime :: !(Maybe DateTime)
, extensionsV1beta1DeploymentConditionLastUpdateTime :: !(Maybe DateTime)
, extensionsV1beta1DeploymentConditionMessage :: !(Maybe Text)
, extensionsV1beta1DeploymentConditionReason :: !(Maybe Text)
, extensionsV1beta1DeploymentConditionStatus :: !(Text)
, extensionsV1beta1DeploymentConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1DeploymentCondition where
parseJSON = A.withObject "ExtensionsV1beta1DeploymentCondition" $ \o ->
ExtensionsV1beta1DeploymentCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "lastUpdateTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON ExtensionsV1beta1DeploymentCondition where
toJSON ExtensionsV1beta1DeploymentCondition {..} =
_omitNulls
[ "lastTransitionTime" .= extensionsV1beta1DeploymentConditionLastTransitionTime
, "lastUpdateTime" .= extensionsV1beta1DeploymentConditionLastUpdateTime
, "message" .= extensionsV1beta1DeploymentConditionMessage
, "reason" .= extensionsV1beta1DeploymentConditionReason
, "status" .= extensionsV1beta1DeploymentConditionStatus
, "type" .= extensionsV1beta1DeploymentConditionType
]
mkExtensionsV1beta1DeploymentCondition
:: Text
-> Text
-> ExtensionsV1beta1DeploymentCondition
mkExtensionsV1beta1DeploymentCondition extensionsV1beta1DeploymentConditionStatus extensionsV1beta1DeploymentConditionType =
ExtensionsV1beta1DeploymentCondition
{ extensionsV1beta1DeploymentConditionLastTransitionTime = Nothing
, extensionsV1beta1DeploymentConditionLastUpdateTime = Nothing
, extensionsV1beta1DeploymentConditionMessage = Nothing
, extensionsV1beta1DeploymentConditionReason = Nothing
, extensionsV1beta1DeploymentConditionStatus
, extensionsV1beta1DeploymentConditionType
}
data ExtensionsV1beta1DeploymentList = ExtensionsV1beta1DeploymentList
{ extensionsV1beta1DeploymentListApiVersion :: !(Maybe Text)
, extensionsV1beta1DeploymentListItems :: !([ExtensionsV1beta1Deployment])
, extensionsV1beta1DeploymentListKind :: !(Maybe Text)
, extensionsV1beta1DeploymentListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1DeploymentList where
parseJSON = A.withObject "ExtensionsV1beta1DeploymentList" $ \o ->
ExtensionsV1beta1DeploymentList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON ExtensionsV1beta1DeploymentList where
toJSON ExtensionsV1beta1DeploymentList {..} =
_omitNulls
[ "apiVersion" .= extensionsV1beta1DeploymentListApiVersion
, "items" .= extensionsV1beta1DeploymentListItems
, "kind" .= extensionsV1beta1DeploymentListKind
, "metadata" .= extensionsV1beta1DeploymentListMetadata
]
mkExtensionsV1beta1DeploymentList
:: [ExtensionsV1beta1Deployment]
-> ExtensionsV1beta1DeploymentList
mkExtensionsV1beta1DeploymentList extensionsV1beta1DeploymentListItems =
ExtensionsV1beta1DeploymentList
{ extensionsV1beta1DeploymentListApiVersion = Nothing
, extensionsV1beta1DeploymentListItems
, extensionsV1beta1DeploymentListKind = Nothing
, extensionsV1beta1DeploymentListMetadata = Nothing
}
data ExtensionsV1beta1DeploymentRollback = ExtensionsV1beta1DeploymentRollback
{ extensionsV1beta1DeploymentRollbackApiVersion :: !(Maybe Text)
, extensionsV1beta1DeploymentRollbackKind :: !(Maybe Text)
, extensionsV1beta1DeploymentRollbackName :: !(Text)
, extensionsV1beta1DeploymentRollbackRollbackTo :: !(ExtensionsV1beta1RollbackConfig)
, extensionsV1beta1DeploymentRollbackUpdatedAnnotations :: !(Maybe (Map.Map String Text))
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1DeploymentRollback where
parseJSON = A.withObject "ExtensionsV1beta1DeploymentRollback" $ \o ->
ExtensionsV1beta1DeploymentRollback
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .: "name")
<*> (o .: "rollbackTo")
<*> (o .:? "updatedAnnotations")
instance A.ToJSON ExtensionsV1beta1DeploymentRollback where
toJSON ExtensionsV1beta1DeploymentRollback {..} =
_omitNulls
[ "apiVersion" .= extensionsV1beta1DeploymentRollbackApiVersion
, "kind" .= extensionsV1beta1DeploymentRollbackKind
, "name" .= extensionsV1beta1DeploymentRollbackName
, "rollbackTo" .= extensionsV1beta1DeploymentRollbackRollbackTo
, "updatedAnnotations" .= extensionsV1beta1DeploymentRollbackUpdatedAnnotations
]
mkExtensionsV1beta1DeploymentRollback
:: Text
-> ExtensionsV1beta1RollbackConfig
-> ExtensionsV1beta1DeploymentRollback
mkExtensionsV1beta1DeploymentRollback extensionsV1beta1DeploymentRollbackName extensionsV1beta1DeploymentRollbackRollbackTo =
ExtensionsV1beta1DeploymentRollback
{ extensionsV1beta1DeploymentRollbackApiVersion = Nothing
, extensionsV1beta1DeploymentRollbackKind = Nothing
, extensionsV1beta1DeploymentRollbackName
, extensionsV1beta1DeploymentRollbackRollbackTo
, extensionsV1beta1DeploymentRollbackUpdatedAnnotations = Nothing
}
data ExtensionsV1beta1DeploymentSpec = ExtensionsV1beta1DeploymentSpec
{ extensionsV1beta1DeploymentSpecMinReadySeconds :: !(Maybe Int)
, extensionsV1beta1DeploymentSpecPaused :: !(Maybe Bool)
, extensionsV1beta1DeploymentSpecProgressDeadlineSeconds :: !(Maybe Int)
, extensionsV1beta1DeploymentSpecReplicas :: !(Maybe Int)
, extensionsV1beta1DeploymentSpecRevisionHistoryLimit :: !(Maybe Int)
, extensionsV1beta1DeploymentSpecRollbackTo :: !(Maybe ExtensionsV1beta1RollbackConfig)
, extensionsV1beta1DeploymentSpecSelector :: !(Maybe V1LabelSelector)
, extensionsV1beta1DeploymentSpecStrategy :: !(Maybe ExtensionsV1beta1DeploymentStrategy)
, extensionsV1beta1DeploymentSpecTemplate :: !(V1PodTemplateSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1DeploymentSpec where
parseJSON = A.withObject "ExtensionsV1beta1DeploymentSpec" $ \o ->
ExtensionsV1beta1DeploymentSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "paused")
<*> (o .:? "progressDeadlineSeconds")
<*> (o .:? "replicas")
<*> (o .:? "revisionHistoryLimit")
<*> (o .:? "rollbackTo")
<*> (o .:? "selector")
<*> (o .:? "strategy")
<*> (o .: "template")
instance A.ToJSON ExtensionsV1beta1DeploymentSpec where
toJSON ExtensionsV1beta1DeploymentSpec {..} =
_omitNulls
[ "minReadySeconds" .= extensionsV1beta1DeploymentSpecMinReadySeconds
, "paused" .= extensionsV1beta1DeploymentSpecPaused
, "progressDeadlineSeconds" .= extensionsV1beta1DeploymentSpecProgressDeadlineSeconds
, "replicas" .= extensionsV1beta1DeploymentSpecReplicas
, "revisionHistoryLimit" .= extensionsV1beta1DeploymentSpecRevisionHistoryLimit
, "rollbackTo" .= extensionsV1beta1DeploymentSpecRollbackTo
, "selector" .= extensionsV1beta1DeploymentSpecSelector
, "strategy" .= extensionsV1beta1DeploymentSpecStrategy
, "template" .= extensionsV1beta1DeploymentSpecTemplate
]
mkExtensionsV1beta1DeploymentSpec
:: V1PodTemplateSpec
-> ExtensionsV1beta1DeploymentSpec
mkExtensionsV1beta1DeploymentSpec extensionsV1beta1DeploymentSpecTemplate =
ExtensionsV1beta1DeploymentSpec
{ extensionsV1beta1DeploymentSpecMinReadySeconds = Nothing
, extensionsV1beta1DeploymentSpecPaused = Nothing
, extensionsV1beta1DeploymentSpecProgressDeadlineSeconds = Nothing
, extensionsV1beta1DeploymentSpecReplicas = Nothing
, extensionsV1beta1DeploymentSpecRevisionHistoryLimit = Nothing
, extensionsV1beta1DeploymentSpecRollbackTo = Nothing
, extensionsV1beta1DeploymentSpecSelector = Nothing
, extensionsV1beta1DeploymentSpecStrategy = Nothing
, extensionsV1beta1DeploymentSpecTemplate
}
data ExtensionsV1beta1DeploymentStatus = ExtensionsV1beta1DeploymentStatus
{ extensionsV1beta1DeploymentStatusAvailableReplicas :: !(Maybe Int)
, extensionsV1beta1DeploymentStatusCollisionCount :: !(Maybe Int)
, extensionsV1beta1DeploymentStatusConditions :: !(Maybe [ExtensionsV1beta1DeploymentCondition])
, extensionsV1beta1DeploymentStatusObservedGeneration :: !(Maybe Integer)
, extensionsV1beta1DeploymentStatusReadyReplicas :: !(Maybe Int)
, extensionsV1beta1DeploymentStatusReplicas :: !(Maybe Int)
, extensionsV1beta1DeploymentStatusUnavailableReplicas :: !(Maybe Int)
, extensionsV1beta1DeploymentStatusUpdatedReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1DeploymentStatus where
parseJSON = A.withObject "ExtensionsV1beta1DeploymentStatus" $ \o ->
ExtensionsV1beta1DeploymentStatus
<$> (o .:? "availableReplicas")
<*> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .:? "replicas")
<*> (o .:? "unavailableReplicas")
<*> (o .:? "updatedReplicas")
instance A.ToJSON ExtensionsV1beta1DeploymentStatus where
toJSON ExtensionsV1beta1DeploymentStatus {..} =
_omitNulls
[ "availableReplicas" .= extensionsV1beta1DeploymentStatusAvailableReplicas
, "collisionCount" .= extensionsV1beta1DeploymentStatusCollisionCount
, "conditions" .= extensionsV1beta1DeploymentStatusConditions
, "observedGeneration" .= extensionsV1beta1DeploymentStatusObservedGeneration
, "readyReplicas" .= extensionsV1beta1DeploymentStatusReadyReplicas
, "replicas" .= extensionsV1beta1DeploymentStatusReplicas
, "unavailableReplicas" .= extensionsV1beta1DeploymentStatusUnavailableReplicas
, "updatedReplicas" .= extensionsV1beta1DeploymentStatusUpdatedReplicas
]
mkExtensionsV1beta1DeploymentStatus
:: ExtensionsV1beta1DeploymentStatus
mkExtensionsV1beta1DeploymentStatus =
ExtensionsV1beta1DeploymentStatus
{ extensionsV1beta1DeploymentStatusAvailableReplicas = Nothing
, extensionsV1beta1DeploymentStatusCollisionCount = Nothing
, extensionsV1beta1DeploymentStatusConditions = Nothing
, extensionsV1beta1DeploymentStatusObservedGeneration = Nothing
, extensionsV1beta1DeploymentStatusReadyReplicas = Nothing
, extensionsV1beta1DeploymentStatusReplicas = Nothing
, extensionsV1beta1DeploymentStatusUnavailableReplicas = Nothing
, extensionsV1beta1DeploymentStatusUpdatedReplicas = Nothing
}
data ExtensionsV1beta1DeploymentStrategy = ExtensionsV1beta1DeploymentStrategy
{ extensionsV1beta1DeploymentStrategyRollingUpdate :: !(Maybe ExtensionsV1beta1RollingUpdateDeployment)
, extensionsV1beta1DeploymentStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1DeploymentStrategy where
parseJSON = A.withObject "ExtensionsV1beta1DeploymentStrategy" $ \o ->
ExtensionsV1beta1DeploymentStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON ExtensionsV1beta1DeploymentStrategy where
toJSON ExtensionsV1beta1DeploymentStrategy {..} =
_omitNulls
[ "rollingUpdate" .= extensionsV1beta1DeploymentStrategyRollingUpdate
, "type" .= extensionsV1beta1DeploymentStrategyType
]
mkExtensionsV1beta1DeploymentStrategy
:: ExtensionsV1beta1DeploymentStrategy
mkExtensionsV1beta1DeploymentStrategy =
ExtensionsV1beta1DeploymentStrategy
{ extensionsV1beta1DeploymentStrategyRollingUpdate = Nothing
, extensionsV1beta1DeploymentStrategyType = Nothing
}
data ExtensionsV1beta1FSGroupStrategyOptions = ExtensionsV1beta1FSGroupStrategyOptions
{ extensionsV1beta1FSGroupStrategyOptionsRanges :: !(Maybe [ExtensionsV1beta1IDRange])
, extensionsV1beta1FSGroupStrategyOptionsRule :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1FSGroupStrategyOptions where
parseJSON = A.withObject "ExtensionsV1beta1FSGroupStrategyOptions" $ \o ->
ExtensionsV1beta1FSGroupStrategyOptions
<$> (o .:? "ranges")
<*> (o .:? "rule")
instance A.ToJSON ExtensionsV1beta1FSGroupStrategyOptions where
toJSON ExtensionsV1beta1FSGroupStrategyOptions {..} =
_omitNulls
[ "ranges" .= extensionsV1beta1FSGroupStrategyOptionsRanges
, "rule" .= extensionsV1beta1FSGroupStrategyOptionsRule
]
mkExtensionsV1beta1FSGroupStrategyOptions
:: ExtensionsV1beta1FSGroupStrategyOptions
mkExtensionsV1beta1FSGroupStrategyOptions =
ExtensionsV1beta1FSGroupStrategyOptions
{ extensionsV1beta1FSGroupStrategyOptionsRanges = Nothing
, extensionsV1beta1FSGroupStrategyOptionsRule = Nothing
}
data ExtensionsV1beta1HTTPIngressPath = ExtensionsV1beta1HTTPIngressPath
{ extensionsV1beta1HTTPIngressPathBackend :: !(ExtensionsV1beta1IngressBackend)
, extensionsV1beta1HTTPIngressPathPath :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1HTTPIngressPath where
parseJSON = A.withObject "ExtensionsV1beta1HTTPIngressPath" $ \o ->
ExtensionsV1beta1HTTPIngressPath
<$> (o .: "backend")
<*> (o .:? "path")
instance A.ToJSON ExtensionsV1beta1HTTPIngressPath where
toJSON ExtensionsV1beta1HTTPIngressPath {..} =
_omitNulls
[ "backend" .= extensionsV1beta1HTTPIngressPathBackend
, "path" .= extensionsV1beta1HTTPIngressPathPath
]
mkExtensionsV1beta1HTTPIngressPath
:: ExtensionsV1beta1IngressBackend
-> ExtensionsV1beta1HTTPIngressPath
mkExtensionsV1beta1HTTPIngressPath extensionsV1beta1HTTPIngressPathBackend =
ExtensionsV1beta1HTTPIngressPath
{ extensionsV1beta1HTTPIngressPathBackend
, extensionsV1beta1HTTPIngressPathPath = Nothing
}
data ExtensionsV1beta1HTTPIngressRuleValue = ExtensionsV1beta1HTTPIngressRuleValue
{ extensionsV1beta1HTTPIngressRuleValuePaths :: !([ExtensionsV1beta1HTTPIngressPath])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1HTTPIngressRuleValue where
parseJSON = A.withObject "ExtensionsV1beta1HTTPIngressRuleValue" $ \o ->
ExtensionsV1beta1HTTPIngressRuleValue
<$> (o .: "paths")
instance A.ToJSON ExtensionsV1beta1HTTPIngressRuleValue where
toJSON ExtensionsV1beta1HTTPIngressRuleValue {..} =
_omitNulls
[ "paths" .= extensionsV1beta1HTTPIngressRuleValuePaths
]
mkExtensionsV1beta1HTTPIngressRuleValue
:: [ExtensionsV1beta1HTTPIngressPath]
-> ExtensionsV1beta1HTTPIngressRuleValue
mkExtensionsV1beta1HTTPIngressRuleValue extensionsV1beta1HTTPIngressRuleValuePaths =
ExtensionsV1beta1HTTPIngressRuleValue
{ extensionsV1beta1HTTPIngressRuleValuePaths
}
data ExtensionsV1beta1HostPortRange = ExtensionsV1beta1HostPortRange
{ extensionsV1beta1HostPortRangeMax :: !(Int)
, extensionsV1beta1HostPortRangeMin :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1HostPortRange where
parseJSON = A.withObject "ExtensionsV1beta1HostPortRange" $ \o ->
ExtensionsV1beta1HostPortRange
<$> (o .: "max")
<*> (o .: "min")
instance A.ToJSON ExtensionsV1beta1HostPortRange where
toJSON ExtensionsV1beta1HostPortRange {..} =
_omitNulls
[ "max" .= extensionsV1beta1HostPortRangeMax
, "min" .= extensionsV1beta1HostPortRangeMin
]
mkExtensionsV1beta1HostPortRange
:: Int
-> Int
-> ExtensionsV1beta1HostPortRange
mkExtensionsV1beta1HostPortRange extensionsV1beta1HostPortRangeMax extensionsV1beta1HostPortRangeMin =
ExtensionsV1beta1HostPortRange
{ extensionsV1beta1HostPortRangeMax
, extensionsV1beta1HostPortRangeMin
}
data ExtensionsV1beta1IDRange = ExtensionsV1beta1IDRange
{ extensionsV1beta1IDRangeMax :: !(Integer)
, extensionsV1beta1IDRangeMin :: !(Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1IDRange where
parseJSON = A.withObject "ExtensionsV1beta1IDRange" $ \o ->
ExtensionsV1beta1IDRange
<$> (o .: "max")
<*> (o .: "min")
instance A.ToJSON ExtensionsV1beta1IDRange where
toJSON ExtensionsV1beta1IDRange {..} =
_omitNulls
[ "max" .= extensionsV1beta1IDRangeMax
, "min" .= extensionsV1beta1IDRangeMin
]
mkExtensionsV1beta1IDRange
:: Integer
-> Integer
-> ExtensionsV1beta1IDRange
mkExtensionsV1beta1IDRange extensionsV1beta1IDRangeMax extensionsV1beta1IDRangeMin =
ExtensionsV1beta1IDRange
{ extensionsV1beta1IDRangeMax
, extensionsV1beta1IDRangeMin
}
data ExtensionsV1beta1Ingress = ExtensionsV1beta1Ingress
{ extensionsV1beta1IngressApiVersion :: !(Maybe Text)
, extensionsV1beta1IngressKind :: !(Maybe Text)
, extensionsV1beta1IngressMetadata :: !(Maybe V1ObjectMeta)
, extensionsV1beta1IngressSpec :: !(Maybe ExtensionsV1beta1IngressSpec)
, extensionsV1beta1IngressStatus :: !(Maybe ExtensionsV1beta1IngressStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1Ingress where
parseJSON = A.withObject "ExtensionsV1beta1Ingress" $ \o ->
ExtensionsV1beta1Ingress
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON ExtensionsV1beta1Ingress where
toJSON ExtensionsV1beta1Ingress {..} =
_omitNulls
[ "apiVersion" .= extensionsV1beta1IngressApiVersion
, "kind" .= extensionsV1beta1IngressKind
, "metadata" .= extensionsV1beta1IngressMetadata
, "spec" .= extensionsV1beta1IngressSpec
, "status" .= extensionsV1beta1IngressStatus
]
mkExtensionsV1beta1Ingress
:: ExtensionsV1beta1Ingress
mkExtensionsV1beta1Ingress =
ExtensionsV1beta1Ingress
{ extensionsV1beta1IngressApiVersion = Nothing
, extensionsV1beta1IngressKind = Nothing
, extensionsV1beta1IngressMetadata = Nothing
, extensionsV1beta1IngressSpec = Nothing
, extensionsV1beta1IngressStatus = Nothing
}
data ExtensionsV1beta1IngressBackend = ExtensionsV1beta1IngressBackend
{ extensionsV1beta1IngressBackendServiceName :: !(Text)
, extensionsV1beta1IngressBackendServicePort :: !(IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1IngressBackend where
parseJSON = A.withObject "ExtensionsV1beta1IngressBackend" $ \o ->
ExtensionsV1beta1IngressBackend
<$> (o .: "serviceName")
<*> (o .: "servicePort")
instance A.ToJSON ExtensionsV1beta1IngressBackend where
toJSON ExtensionsV1beta1IngressBackend {..} =
_omitNulls
[ "serviceName" .= extensionsV1beta1IngressBackendServiceName
, "servicePort" .= extensionsV1beta1IngressBackendServicePort
]
mkExtensionsV1beta1IngressBackend
:: Text
-> IntOrString
-> ExtensionsV1beta1IngressBackend
mkExtensionsV1beta1IngressBackend extensionsV1beta1IngressBackendServiceName extensionsV1beta1IngressBackendServicePort =
ExtensionsV1beta1IngressBackend
{ extensionsV1beta1IngressBackendServiceName
, extensionsV1beta1IngressBackendServicePort
}
data ExtensionsV1beta1IngressList = ExtensionsV1beta1IngressList
{ extensionsV1beta1IngressListApiVersion :: !(Maybe Text)
, extensionsV1beta1IngressListItems :: !([ExtensionsV1beta1Ingress])
, extensionsV1beta1IngressListKind :: !(Maybe Text)
, extensionsV1beta1IngressListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1IngressList where
parseJSON = A.withObject "ExtensionsV1beta1IngressList" $ \o ->
ExtensionsV1beta1IngressList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON ExtensionsV1beta1IngressList where
toJSON ExtensionsV1beta1IngressList {..} =
_omitNulls
[ "apiVersion" .= extensionsV1beta1IngressListApiVersion
, "items" .= extensionsV1beta1IngressListItems
, "kind" .= extensionsV1beta1IngressListKind
, "metadata" .= extensionsV1beta1IngressListMetadata
]
mkExtensionsV1beta1IngressList
:: [ExtensionsV1beta1Ingress]
-> ExtensionsV1beta1IngressList
mkExtensionsV1beta1IngressList extensionsV1beta1IngressListItems =
ExtensionsV1beta1IngressList
{ extensionsV1beta1IngressListApiVersion = Nothing
, extensionsV1beta1IngressListItems
, extensionsV1beta1IngressListKind = Nothing
, extensionsV1beta1IngressListMetadata = Nothing
}
data ExtensionsV1beta1IngressRule = ExtensionsV1beta1IngressRule
{ extensionsV1beta1IngressRuleHost :: !(Maybe Text)
, extensionsV1beta1IngressRuleHttp :: !(Maybe ExtensionsV1beta1HTTPIngressRuleValue)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1IngressRule where
parseJSON = A.withObject "ExtensionsV1beta1IngressRule" $ \o ->
ExtensionsV1beta1IngressRule
<$> (o .:? "host")
<*> (o .:? "http")
instance A.ToJSON ExtensionsV1beta1IngressRule where
toJSON ExtensionsV1beta1IngressRule {..} =
_omitNulls
[ "host" .= extensionsV1beta1IngressRuleHost
, "http" .= extensionsV1beta1IngressRuleHttp
]
mkExtensionsV1beta1IngressRule
:: ExtensionsV1beta1IngressRule
mkExtensionsV1beta1IngressRule =
ExtensionsV1beta1IngressRule
{ extensionsV1beta1IngressRuleHost = Nothing
, extensionsV1beta1IngressRuleHttp = Nothing
}
data ExtensionsV1beta1IngressSpec = ExtensionsV1beta1IngressSpec
{ extensionsV1beta1IngressSpecBackend :: !(Maybe ExtensionsV1beta1IngressBackend)
, extensionsV1beta1IngressSpecRules :: !(Maybe [ExtensionsV1beta1IngressRule])
, extensionsV1beta1IngressSpecTls :: !(Maybe [ExtensionsV1beta1IngressTLS])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1IngressSpec where
parseJSON = A.withObject "ExtensionsV1beta1IngressSpec" $ \o ->
ExtensionsV1beta1IngressSpec
<$> (o .:? "backend")
<*> (o .:? "rules")
<*> (o .:? "tls")
instance A.ToJSON ExtensionsV1beta1IngressSpec where
toJSON ExtensionsV1beta1IngressSpec {..} =
_omitNulls
[ "backend" .= extensionsV1beta1IngressSpecBackend
, "rules" .= extensionsV1beta1IngressSpecRules
, "tls" .= extensionsV1beta1IngressSpecTls
]
mkExtensionsV1beta1IngressSpec
:: ExtensionsV1beta1IngressSpec
mkExtensionsV1beta1IngressSpec =
ExtensionsV1beta1IngressSpec
{ extensionsV1beta1IngressSpecBackend = Nothing
, extensionsV1beta1IngressSpecRules = Nothing
, extensionsV1beta1IngressSpecTls = Nothing
}
data ExtensionsV1beta1IngressStatus = ExtensionsV1beta1IngressStatus
{ extensionsV1beta1IngressStatusLoadBalancer :: !(Maybe V1LoadBalancerStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1IngressStatus where
parseJSON = A.withObject "ExtensionsV1beta1IngressStatus" $ \o ->
ExtensionsV1beta1IngressStatus
<$> (o .:? "loadBalancer")
instance A.ToJSON ExtensionsV1beta1IngressStatus where
toJSON ExtensionsV1beta1IngressStatus {..} =
_omitNulls
[ "loadBalancer" .= extensionsV1beta1IngressStatusLoadBalancer
]
mkExtensionsV1beta1IngressStatus
:: ExtensionsV1beta1IngressStatus
mkExtensionsV1beta1IngressStatus =
ExtensionsV1beta1IngressStatus
{ extensionsV1beta1IngressStatusLoadBalancer = Nothing
}
data ExtensionsV1beta1IngressTLS = ExtensionsV1beta1IngressTLS
{ extensionsV1beta1IngressTLSHosts :: !(Maybe [Text])
, extensionsV1beta1IngressTLSSecretName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1IngressTLS where
parseJSON = A.withObject "ExtensionsV1beta1IngressTLS" $ \o ->
ExtensionsV1beta1IngressTLS
<$> (o .:? "hosts")
<*> (o .:? "secretName")
instance A.ToJSON ExtensionsV1beta1IngressTLS where
toJSON ExtensionsV1beta1IngressTLS {..} =
_omitNulls
[ "hosts" .= extensionsV1beta1IngressTLSHosts
, "secretName" .= extensionsV1beta1IngressTLSSecretName
]
mkExtensionsV1beta1IngressTLS
:: ExtensionsV1beta1IngressTLS
mkExtensionsV1beta1IngressTLS =
ExtensionsV1beta1IngressTLS
{ extensionsV1beta1IngressTLSHosts = Nothing
, extensionsV1beta1IngressTLSSecretName = Nothing
}
data ExtensionsV1beta1PodSecurityPolicy = ExtensionsV1beta1PodSecurityPolicy
{ extensionsV1beta1PodSecurityPolicyApiVersion :: !(Maybe Text)
, extensionsV1beta1PodSecurityPolicyKind :: !(Maybe Text)
, extensionsV1beta1PodSecurityPolicyMetadata :: !(Maybe V1ObjectMeta)
, extensionsV1beta1PodSecurityPolicySpec :: !(Maybe ExtensionsV1beta1PodSecurityPolicySpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1PodSecurityPolicy where
parseJSON = A.withObject "ExtensionsV1beta1PodSecurityPolicy" $ \o ->
ExtensionsV1beta1PodSecurityPolicy
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON ExtensionsV1beta1PodSecurityPolicy where
toJSON ExtensionsV1beta1PodSecurityPolicy {..} =
_omitNulls
[ "apiVersion" .= extensionsV1beta1PodSecurityPolicyApiVersion
, "kind" .= extensionsV1beta1PodSecurityPolicyKind
, "metadata" .= extensionsV1beta1PodSecurityPolicyMetadata
, "spec" .= extensionsV1beta1PodSecurityPolicySpec
]
mkExtensionsV1beta1PodSecurityPolicy
:: ExtensionsV1beta1PodSecurityPolicy
mkExtensionsV1beta1PodSecurityPolicy =
ExtensionsV1beta1PodSecurityPolicy
{ extensionsV1beta1PodSecurityPolicyApiVersion = Nothing
, extensionsV1beta1PodSecurityPolicyKind = Nothing
, extensionsV1beta1PodSecurityPolicyMetadata = Nothing
, extensionsV1beta1PodSecurityPolicySpec = Nothing
}
data ExtensionsV1beta1PodSecurityPolicyList = ExtensionsV1beta1PodSecurityPolicyList
{ extensionsV1beta1PodSecurityPolicyListApiVersion :: !(Maybe Text)
, extensionsV1beta1PodSecurityPolicyListItems :: !([ExtensionsV1beta1PodSecurityPolicy])
, extensionsV1beta1PodSecurityPolicyListKind :: !(Maybe Text)
, extensionsV1beta1PodSecurityPolicyListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1PodSecurityPolicyList where
parseJSON = A.withObject "ExtensionsV1beta1PodSecurityPolicyList" $ \o ->
ExtensionsV1beta1PodSecurityPolicyList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON ExtensionsV1beta1PodSecurityPolicyList where
toJSON ExtensionsV1beta1PodSecurityPolicyList {..} =
_omitNulls
[ "apiVersion" .= extensionsV1beta1PodSecurityPolicyListApiVersion
, "items" .= extensionsV1beta1PodSecurityPolicyListItems
, "kind" .= extensionsV1beta1PodSecurityPolicyListKind
, "metadata" .= extensionsV1beta1PodSecurityPolicyListMetadata
]
mkExtensionsV1beta1PodSecurityPolicyList
:: [ExtensionsV1beta1PodSecurityPolicy]
-> ExtensionsV1beta1PodSecurityPolicyList
mkExtensionsV1beta1PodSecurityPolicyList extensionsV1beta1PodSecurityPolicyListItems =
ExtensionsV1beta1PodSecurityPolicyList
{ extensionsV1beta1PodSecurityPolicyListApiVersion = Nothing
, extensionsV1beta1PodSecurityPolicyListItems
, extensionsV1beta1PodSecurityPolicyListKind = Nothing
, extensionsV1beta1PodSecurityPolicyListMetadata = Nothing
}
data ExtensionsV1beta1PodSecurityPolicySpec = ExtensionsV1beta1PodSecurityPolicySpec
{ extensionsV1beta1PodSecurityPolicySpecAllowPrivilegeEscalation :: !(Maybe Bool)
, extensionsV1beta1PodSecurityPolicySpecAllowedCsiDrivers :: !(Maybe [ExtensionsV1beta1AllowedCSIDriver])
, extensionsV1beta1PodSecurityPolicySpecAllowedCapabilities :: !(Maybe [Text])
, extensionsV1beta1PodSecurityPolicySpecAllowedFlexVolumes :: !(Maybe [ExtensionsV1beta1AllowedFlexVolume])
, extensionsV1beta1PodSecurityPolicySpecAllowedHostPaths :: !(Maybe [ExtensionsV1beta1AllowedHostPath])
, extensionsV1beta1PodSecurityPolicySpecAllowedProcMountTypes :: !(Maybe [Text])
, extensionsV1beta1PodSecurityPolicySpecAllowedUnsafeSysctls :: !(Maybe [Text])
, extensionsV1beta1PodSecurityPolicySpecDefaultAddCapabilities :: !(Maybe [Text])
, extensionsV1beta1PodSecurityPolicySpecDefaultAllowPrivilegeEscalation :: !(Maybe Bool)
, extensionsV1beta1PodSecurityPolicySpecForbiddenSysctls :: !(Maybe [Text])
, extensionsV1beta1PodSecurityPolicySpecFsGroup :: !(ExtensionsV1beta1FSGroupStrategyOptions)
, extensionsV1beta1PodSecurityPolicySpecHostIpc :: !(Maybe Bool)
, extensionsV1beta1PodSecurityPolicySpecHostNetwork :: !(Maybe Bool)
, extensionsV1beta1PodSecurityPolicySpecHostPid :: !(Maybe Bool)
, extensionsV1beta1PodSecurityPolicySpecHostPorts :: !(Maybe [ExtensionsV1beta1HostPortRange])
, extensionsV1beta1PodSecurityPolicySpecPrivileged :: !(Maybe Bool)
, extensionsV1beta1PodSecurityPolicySpecReadOnlyRootFilesystem :: !(Maybe Bool)
, extensionsV1beta1PodSecurityPolicySpecRequiredDropCapabilities :: !(Maybe [Text])
, extensionsV1beta1PodSecurityPolicySpecRunAsGroup :: !(Maybe ExtensionsV1beta1RunAsGroupStrategyOptions)
, extensionsV1beta1PodSecurityPolicySpecRunAsUser :: !(ExtensionsV1beta1RunAsUserStrategyOptions)
, extensionsV1beta1PodSecurityPolicySpecSeLinux :: !(ExtensionsV1beta1SELinuxStrategyOptions)
, extensionsV1beta1PodSecurityPolicySpecSupplementalGroups :: !(ExtensionsV1beta1SupplementalGroupsStrategyOptions)
, extensionsV1beta1PodSecurityPolicySpecVolumes :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1PodSecurityPolicySpec where
parseJSON = A.withObject "ExtensionsV1beta1PodSecurityPolicySpec" $ \o ->
ExtensionsV1beta1PodSecurityPolicySpec
<$> (o .:? "allowPrivilegeEscalation")
<*> (o .:? "allowedCSIDrivers")
<*> (o .:? "allowedCapabilities")
<*> (o .:? "allowedFlexVolumes")
<*> (o .:? "allowedHostPaths")
<*> (o .:? "allowedProcMountTypes")
<*> (o .:? "allowedUnsafeSysctls")
<*> (o .:? "defaultAddCapabilities")
<*> (o .:? "defaultAllowPrivilegeEscalation")
<*> (o .:? "forbiddenSysctls")
<*> (o .: "fsGroup")
<*> (o .:? "hostIPC")
<*> (o .:? "hostNetwork")
<*> (o .:? "hostPID")
<*> (o .:? "hostPorts")
<*> (o .:? "privileged")
<*> (o .:? "readOnlyRootFilesystem")
<*> (o .:? "requiredDropCapabilities")
<*> (o .:? "runAsGroup")
<*> (o .: "runAsUser")
<*> (o .: "seLinux")
<*> (o .: "supplementalGroups")
<*> (o .:? "volumes")
instance A.ToJSON ExtensionsV1beta1PodSecurityPolicySpec where
toJSON ExtensionsV1beta1PodSecurityPolicySpec {..} =
_omitNulls
[ "allowPrivilegeEscalation" .= extensionsV1beta1PodSecurityPolicySpecAllowPrivilegeEscalation
, "allowedCSIDrivers" .= extensionsV1beta1PodSecurityPolicySpecAllowedCsiDrivers
, "allowedCapabilities" .= extensionsV1beta1PodSecurityPolicySpecAllowedCapabilities
, "allowedFlexVolumes" .= extensionsV1beta1PodSecurityPolicySpecAllowedFlexVolumes
, "allowedHostPaths" .= extensionsV1beta1PodSecurityPolicySpecAllowedHostPaths
, "allowedProcMountTypes" .= extensionsV1beta1PodSecurityPolicySpecAllowedProcMountTypes
, "allowedUnsafeSysctls" .= extensionsV1beta1PodSecurityPolicySpecAllowedUnsafeSysctls
, "defaultAddCapabilities" .= extensionsV1beta1PodSecurityPolicySpecDefaultAddCapabilities
, "defaultAllowPrivilegeEscalation" .= extensionsV1beta1PodSecurityPolicySpecDefaultAllowPrivilegeEscalation
, "forbiddenSysctls" .= extensionsV1beta1PodSecurityPolicySpecForbiddenSysctls
, "fsGroup" .= extensionsV1beta1PodSecurityPolicySpecFsGroup
, "hostIPC" .= extensionsV1beta1PodSecurityPolicySpecHostIpc
, "hostNetwork" .= extensionsV1beta1PodSecurityPolicySpecHostNetwork
, "hostPID" .= extensionsV1beta1PodSecurityPolicySpecHostPid
, "hostPorts" .= extensionsV1beta1PodSecurityPolicySpecHostPorts
, "privileged" .= extensionsV1beta1PodSecurityPolicySpecPrivileged
, "readOnlyRootFilesystem" .= extensionsV1beta1PodSecurityPolicySpecReadOnlyRootFilesystem
, "requiredDropCapabilities" .= extensionsV1beta1PodSecurityPolicySpecRequiredDropCapabilities
, "runAsGroup" .= extensionsV1beta1PodSecurityPolicySpecRunAsGroup
, "runAsUser" .= extensionsV1beta1PodSecurityPolicySpecRunAsUser
, "seLinux" .= extensionsV1beta1PodSecurityPolicySpecSeLinux
, "supplementalGroups" .= extensionsV1beta1PodSecurityPolicySpecSupplementalGroups
, "volumes" .= extensionsV1beta1PodSecurityPolicySpecVolumes
]
mkExtensionsV1beta1PodSecurityPolicySpec
:: ExtensionsV1beta1FSGroupStrategyOptions
-> ExtensionsV1beta1RunAsUserStrategyOptions
-> ExtensionsV1beta1SELinuxStrategyOptions
-> ExtensionsV1beta1SupplementalGroupsStrategyOptions
-> ExtensionsV1beta1PodSecurityPolicySpec
mkExtensionsV1beta1PodSecurityPolicySpec extensionsV1beta1PodSecurityPolicySpecFsGroup extensionsV1beta1PodSecurityPolicySpecRunAsUser extensionsV1beta1PodSecurityPolicySpecSeLinux extensionsV1beta1PodSecurityPolicySpecSupplementalGroups =
ExtensionsV1beta1PodSecurityPolicySpec
{ extensionsV1beta1PodSecurityPolicySpecAllowPrivilegeEscalation = Nothing
, extensionsV1beta1PodSecurityPolicySpecAllowedCsiDrivers = Nothing
, extensionsV1beta1PodSecurityPolicySpecAllowedCapabilities = Nothing
, extensionsV1beta1PodSecurityPolicySpecAllowedFlexVolumes = Nothing
, extensionsV1beta1PodSecurityPolicySpecAllowedHostPaths = Nothing
, extensionsV1beta1PodSecurityPolicySpecAllowedProcMountTypes = Nothing
, extensionsV1beta1PodSecurityPolicySpecAllowedUnsafeSysctls = Nothing
, extensionsV1beta1PodSecurityPolicySpecDefaultAddCapabilities = Nothing
, extensionsV1beta1PodSecurityPolicySpecDefaultAllowPrivilegeEscalation = Nothing
, extensionsV1beta1PodSecurityPolicySpecForbiddenSysctls = Nothing
, extensionsV1beta1PodSecurityPolicySpecFsGroup
, extensionsV1beta1PodSecurityPolicySpecHostIpc = Nothing
, extensionsV1beta1PodSecurityPolicySpecHostNetwork = Nothing
, extensionsV1beta1PodSecurityPolicySpecHostPid = Nothing
, extensionsV1beta1PodSecurityPolicySpecHostPorts = Nothing
, extensionsV1beta1PodSecurityPolicySpecPrivileged = Nothing
, extensionsV1beta1PodSecurityPolicySpecReadOnlyRootFilesystem = Nothing
, extensionsV1beta1PodSecurityPolicySpecRequiredDropCapabilities = Nothing
, extensionsV1beta1PodSecurityPolicySpecRunAsGroup = Nothing
, extensionsV1beta1PodSecurityPolicySpecRunAsUser
, extensionsV1beta1PodSecurityPolicySpecSeLinux
, extensionsV1beta1PodSecurityPolicySpecSupplementalGroups
, extensionsV1beta1PodSecurityPolicySpecVolumes = Nothing
}
data ExtensionsV1beta1RollbackConfig = ExtensionsV1beta1RollbackConfig
{ extensionsV1beta1RollbackConfigRevision :: !(Maybe Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1RollbackConfig where
parseJSON = A.withObject "ExtensionsV1beta1RollbackConfig" $ \o ->
ExtensionsV1beta1RollbackConfig
<$> (o .:? "revision")
instance A.ToJSON ExtensionsV1beta1RollbackConfig where
toJSON ExtensionsV1beta1RollbackConfig {..} =
_omitNulls
[ "revision" .= extensionsV1beta1RollbackConfigRevision
]
mkExtensionsV1beta1RollbackConfig
:: ExtensionsV1beta1RollbackConfig
mkExtensionsV1beta1RollbackConfig =
ExtensionsV1beta1RollbackConfig
{ extensionsV1beta1RollbackConfigRevision = Nothing
}
data ExtensionsV1beta1RollingUpdateDeployment = ExtensionsV1beta1RollingUpdateDeployment
{ extensionsV1beta1RollingUpdateDeploymentMaxSurge :: !(Maybe IntOrString)
, extensionsV1beta1RollingUpdateDeploymentMaxUnavailable :: !(Maybe IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1RollingUpdateDeployment where
parseJSON = A.withObject "ExtensionsV1beta1RollingUpdateDeployment" $ \o ->
ExtensionsV1beta1RollingUpdateDeployment
<$> (o .:? "maxSurge")
<*> (o .:? "maxUnavailable")
instance A.ToJSON ExtensionsV1beta1RollingUpdateDeployment where
toJSON ExtensionsV1beta1RollingUpdateDeployment {..} =
_omitNulls
[ "maxSurge" .= extensionsV1beta1RollingUpdateDeploymentMaxSurge
, "maxUnavailable" .= extensionsV1beta1RollingUpdateDeploymentMaxUnavailable
]
mkExtensionsV1beta1RollingUpdateDeployment
:: ExtensionsV1beta1RollingUpdateDeployment
mkExtensionsV1beta1RollingUpdateDeployment =
ExtensionsV1beta1RollingUpdateDeployment
{ extensionsV1beta1RollingUpdateDeploymentMaxSurge = Nothing
, extensionsV1beta1RollingUpdateDeploymentMaxUnavailable = Nothing
}
data ExtensionsV1beta1RunAsGroupStrategyOptions = ExtensionsV1beta1RunAsGroupStrategyOptions
{ extensionsV1beta1RunAsGroupStrategyOptionsRanges :: !(Maybe [ExtensionsV1beta1IDRange])
, extensionsV1beta1RunAsGroupStrategyOptionsRule :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1RunAsGroupStrategyOptions where
parseJSON = A.withObject "ExtensionsV1beta1RunAsGroupStrategyOptions" $ \o ->
ExtensionsV1beta1RunAsGroupStrategyOptions
<$> (o .:? "ranges")
<*> (o .: "rule")
instance A.ToJSON ExtensionsV1beta1RunAsGroupStrategyOptions where
toJSON ExtensionsV1beta1RunAsGroupStrategyOptions {..} =
_omitNulls
[ "ranges" .= extensionsV1beta1RunAsGroupStrategyOptionsRanges
, "rule" .= extensionsV1beta1RunAsGroupStrategyOptionsRule
]
mkExtensionsV1beta1RunAsGroupStrategyOptions
:: Text
-> ExtensionsV1beta1RunAsGroupStrategyOptions
mkExtensionsV1beta1RunAsGroupStrategyOptions extensionsV1beta1RunAsGroupStrategyOptionsRule =
ExtensionsV1beta1RunAsGroupStrategyOptions
{ extensionsV1beta1RunAsGroupStrategyOptionsRanges = Nothing
, extensionsV1beta1RunAsGroupStrategyOptionsRule
}
data ExtensionsV1beta1RunAsUserStrategyOptions = ExtensionsV1beta1RunAsUserStrategyOptions
{ extensionsV1beta1RunAsUserStrategyOptionsRanges :: !(Maybe [ExtensionsV1beta1IDRange])
, extensionsV1beta1RunAsUserStrategyOptionsRule :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1RunAsUserStrategyOptions where
parseJSON = A.withObject "ExtensionsV1beta1RunAsUserStrategyOptions" $ \o ->
ExtensionsV1beta1RunAsUserStrategyOptions
<$> (o .:? "ranges")
<*> (o .: "rule")
instance A.ToJSON ExtensionsV1beta1RunAsUserStrategyOptions where
toJSON ExtensionsV1beta1RunAsUserStrategyOptions {..} =
_omitNulls
[ "ranges" .= extensionsV1beta1RunAsUserStrategyOptionsRanges
, "rule" .= extensionsV1beta1RunAsUserStrategyOptionsRule
]
mkExtensionsV1beta1RunAsUserStrategyOptions
:: Text
-> ExtensionsV1beta1RunAsUserStrategyOptions
mkExtensionsV1beta1RunAsUserStrategyOptions extensionsV1beta1RunAsUserStrategyOptionsRule =
ExtensionsV1beta1RunAsUserStrategyOptions
{ extensionsV1beta1RunAsUserStrategyOptionsRanges = Nothing
, extensionsV1beta1RunAsUserStrategyOptionsRule
}
data ExtensionsV1beta1SELinuxStrategyOptions = ExtensionsV1beta1SELinuxStrategyOptions
{ extensionsV1beta1SELinuxStrategyOptionsRule :: !(Text)
, extensionsV1beta1SELinuxStrategyOptionsSeLinuxOptions :: !(Maybe V1SELinuxOptions)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1SELinuxStrategyOptions where
parseJSON = A.withObject "ExtensionsV1beta1SELinuxStrategyOptions" $ \o ->
ExtensionsV1beta1SELinuxStrategyOptions
<$> (o .: "rule")
<*> (o .:? "seLinuxOptions")
instance A.ToJSON ExtensionsV1beta1SELinuxStrategyOptions where
toJSON ExtensionsV1beta1SELinuxStrategyOptions {..} =
_omitNulls
[ "rule" .= extensionsV1beta1SELinuxStrategyOptionsRule
, "seLinuxOptions" .= extensionsV1beta1SELinuxStrategyOptionsSeLinuxOptions
]
mkExtensionsV1beta1SELinuxStrategyOptions
:: Text
-> ExtensionsV1beta1SELinuxStrategyOptions
mkExtensionsV1beta1SELinuxStrategyOptions extensionsV1beta1SELinuxStrategyOptionsRule =
ExtensionsV1beta1SELinuxStrategyOptions
{ extensionsV1beta1SELinuxStrategyOptionsRule
, extensionsV1beta1SELinuxStrategyOptionsSeLinuxOptions = Nothing
}
data ExtensionsV1beta1Scale = ExtensionsV1beta1Scale
{ extensionsV1beta1ScaleApiVersion :: !(Maybe Text)
, extensionsV1beta1ScaleKind :: !(Maybe Text)
, extensionsV1beta1ScaleMetadata :: !(Maybe V1ObjectMeta)
, extensionsV1beta1ScaleSpec :: !(Maybe ExtensionsV1beta1ScaleSpec)
, extensionsV1beta1ScaleStatus :: !(Maybe ExtensionsV1beta1ScaleStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1Scale where
parseJSON = A.withObject "ExtensionsV1beta1Scale" $ \o ->
ExtensionsV1beta1Scale
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON ExtensionsV1beta1Scale where
toJSON ExtensionsV1beta1Scale {..} =
_omitNulls
[ "apiVersion" .= extensionsV1beta1ScaleApiVersion
, "kind" .= extensionsV1beta1ScaleKind
, "metadata" .= extensionsV1beta1ScaleMetadata
, "spec" .= extensionsV1beta1ScaleSpec
, "status" .= extensionsV1beta1ScaleStatus
]
mkExtensionsV1beta1Scale
:: ExtensionsV1beta1Scale
mkExtensionsV1beta1Scale =
ExtensionsV1beta1Scale
{ extensionsV1beta1ScaleApiVersion = Nothing
, extensionsV1beta1ScaleKind = Nothing
, extensionsV1beta1ScaleMetadata = Nothing
, extensionsV1beta1ScaleSpec = Nothing
, extensionsV1beta1ScaleStatus = Nothing
}
data ExtensionsV1beta1ScaleSpec = ExtensionsV1beta1ScaleSpec
{ extensionsV1beta1ScaleSpecReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1ScaleSpec where
parseJSON = A.withObject "ExtensionsV1beta1ScaleSpec" $ \o ->
ExtensionsV1beta1ScaleSpec
<$> (o .:? "replicas")
instance A.ToJSON ExtensionsV1beta1ScaleSpec where
toJSON ExtensionsV1beta1ScaleSpec {..} =
_omitNulls
[ "replicas" .= extensionsV1beta1ScaleSpecReplicas
]
mkExtensionsV1beta1ScaleSpec
:: ExtensionsV1beta1ScaleSpec
mkExtensionsV1beta1ScaleSpec =
ExtensionsV1beta1ScaleSpec
{ extensionsV1beta1ScaleSpecReplicas = Nothing
}
data ExtensionsV1beta1ScaleStatus = ExtensionsV1beta1ScaleStatus
{ extensionsV1beta1ScaleStatusReplicas :: !(Int)
, extensionsV1beta1ScaleStatusSelector :: !(Maybe (Map.Map String Text))
, extensionsV1beta1ScaleStatusTargetSelector :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1ScaleStatus where
parseJSON = A.withObject "ExtensionsV1beta1ScaleStatus" $ \o ->
ExtensionsV1beta1ScaleStatus
<$> (o .: "replicas")
<*> (o .:? "selector")
<*> (o .:? "targetSelector")
instance A.ToJSON ExtensionsV1beta1ScaleStatus where
toJSON ExtensionsV1beta1ScaleStatus {..} =
_omitNulls
[ "replicas" .= extensionsV1beta1ScaleStatusReplicas
, "selector" .= extensionsV1beta1ScaleStatusSelector
, "targetSelector" .= extensionsV1beta1ScaleStatusTargetSelector
]
mkExtensionsV1beta1ScaleStatus
:: Int
-> ExtensionsV1beta1ScaleStatus
mkExtensionsV1beta1ScaleStatus extensionsV1beta1ScaleStatusReplicas =
ExtensionsV1beta1ScaleStatus
{ extensionsV1beta1ScaleStatusReplicas
, extensionsV1beta1ScaleStatusSelector = Nothing
, extensionsV1beta1ScaleStatusTargetSelector = Nothing
}
data ExtensionsV1beta1SupplementalGroupsStrategyOptions = ExtensionsV1beta1SupplementalGroupsStrategyOptions
{ extensionsV1beta1SupplementalGroupsStrategyOptionsRanges :: !(Maybe [ExtensionsV1beta1IDRange])
, extensionsV1beta1SupplementalGroupsStrategyOptionsRule :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON ExtensionsV1beta1SupplementalGroupsStrategyOptions where
parseJSON = A.withObject "ExtensionsV1beta1SupplementalGroupsStrategyOptions" $ \o ->
ExtensionsV1beta1SupplementalGroupsStrategyOptions
<$> (o .:? "ranges")
<*> (o .:? "rule")
instance A.ToJSON ExtensionsV1beta1SupplementalGroupsStrategyOptions where
toJSON ExtensionsV1beta1SupplementalGroupsStrategyOptions {..} =
_omitNulls
[ "ranges" .= extensionsV1beta1SupplementalGroupsStrategyOptionsRanges
, "rule" .= extensionsV1beta1SupplementalGroupsStrategyOptionsRule
]
mkExtensionsV1beta1SupplementalGroupsStrategyOptions
:: ExtensionsV1beta1SupplementalGroupsStrategyOptions
mkExtensionsV1beta1SupplementalGroupsStrategyOptions =
ExtensionsV1beta1SupplementalGroupsStrategyOptions
{ extensionsV1beta1SupplementalGroupsStrategyOptionsRanges = Nothing
, extensionsV1beta1SupplementalGroupsStrategyOptionsRule = Nothing
}
data NetworkingV1beta1HTTPIngressPath = NetworkingV1beta1HTTPIngressPath
{ networkingV1beta1HTTPIngressPathBackend :: !(NetworkingV1beta1IngressBackend)
, networkingV1beta1HTTPIngressPathPath :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON NetworkingV1beta1HTTPIngressPath where
parseJSON = A.withObject "NetworkingV1beta1HTTPIngressPath" $ \o ->
NetworkingV1beta1HTTPIngressPath
<$> (o .: "backend")
<*> (o .:? "path")
instance A.ToJSON NetworkingV1beta1HTTPIngressPath where
toJSON NetworkingV1beta1HTTPIngressPath {..} =
_omitNulls
[ "backend" .= networkingV1beta1HTTPIngressPathBackend
, "path" .= networkingV1beta1HTTPIngressPathPath
]
mkNetworkingV1beta1HTTPIngressPath
:: NetworkingV1beta1IngressBackend
-> NetworkingV1beta1HTTPIngressPath
mkNetworkingV1beta1HTTPIngressPath networkingV1beta1HTTPIngressPathBackend =
NetworkingV1beta1HTTPIngressPath
{ networkingV1beta1HTTPIngressPathBackend
, networkingV1beta1HTTPIngressPathPath = Nothing
}
data NetworkingV1beta1HTTPIngressRuleValue = NetworkingV1beta1HTTPIngressRuleValue
{ networkingV1beta1HTTPIngressRuleValuePaths :: !([NetworkingV1beta1HTTPIngressPath])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON NetworkingV1beta1HTTPIngressRuleValue where
parseJSON = A.withObject "NetworkingV1beta1HTTPIngressRuleValue" $ \o ->
NetworkingV1beta1HTTPIngressRuleValue
<$> (o .: "paths")
instance A.ToJSON NetworkingV1beta1HTTPIngressRuleValue where
toJSON NetworkingV1beta1HTTPIngressRuleValue {..} =
_omitNulls
[ "paths" .= networkingV1beta1HTTPIngressRuleValuePaths
]
mkNetworkingV1beta1HTTPIngressRuleValue
:: [NetworkingV1beta1HTTPIngressPath]
-> NetworkingV1beta1HTTPIngressRuleValue
mkNetworkingV1beta1HTTPIngressRuleValue networkingV1beta1HTTPIngressRuleValuePaths =
NetworkingV1beta1HTTPIngressRuleValue
{ networkingV1beta1HTTPIngressRuleValuePaths
}
data NetworkingV1beta1Ingress = NetworkingV1beta1Ingress
{ networkingV1beta1IngressApiVersion :: !(Maybe Text)
, networkingV1beta1IngressKind :: !(Maybe Text)
, networkingV1beta1IngressMetadata :: !(Maybe V1ObjectMeta)
, networkingV1beta1IngressSpec :: !(Maybe NetworkingV1beta1IngressSpec)
, networkingV1beta1IngressStatus :: !(Maybe NetworkingV1beta1IngressStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON NetworkingV1beta1Ingress where
parseJSON = A.withObject "NetworkingV1beta1Ingress" $ \o ->
NetworkingV1beta1Ingress
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON NetworkingV1beta1Ingress where
toJSON NetworkingV1beta1Ingress {..} =
_omitNulls
[ "apiVersion" .= networkingV1beta1IngressApiVersion
, "kind" .= networkingV1beta1IngressKind
, "metadata" .= networkingV1beta1IngressMetadata
, "spec" .= networkingV1beta1IngressSpec
, "status" .= networkingV1beta1IngressStatus
]
mkNetworkingV1beta1Ingress
:: NetworkingV1beta1Ingress
mkNetworkingV1beta1Ingress =
NetworkingV1beta1Ingress
{ networkingV1beta1IngressApiVersion = Nothing
, networkingV1beta1IngressKind = Nothing
, networkingV1beta1IngressMetadata = Nothing
, networkingV1beta1IngressSpec = Nothing
, networkingV1beta1IngressStatus = Nothing
}
data NetworkingV1beta1IngressBackend = NetworkingV1beta1IngressBackend
{ networkingV1beta1IngressBackendServiceName :: !(Text)
, networkingV1beta1IngressBackendServicePort :: !(IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON NetworkingV1beta1IngressBackend where
parseJSON = A.withObject "NetworkingV1beta1IngressBackend" $ \o ->
NetworkingV1beta1IngressBackend
<$> (o .: "serviceName")
<*> (o .: "servicePort")
instance A.ToJSON NetworkingV1beta1IngressBackend where
toJSON NetworkingV1beta1IngressBackend {..} =
_omitNulls
[ "serviceName" .= networkingV1beta1IngressBackendServiceName
, "servicePort" .= networkingV1beta1IngressBackendServicePort
]
mkNetworkingV1beta1IngressBackend
:: Text
-> IntOrString
-> NetworkingV1beta1IngressBackend
mkNetworkingV1beta1IngressBackend networkingV1beta1IngressBackendServiceName networkingV1beta1IngressBackendServicePort =
NetworkingV1beta1IngressBackend
{ networkingV1beta1IngressBackendServiceName
, networkingV1beta1IngressBackendServicePort
}
data NetworkingV1beta1IngressList = NetworkingV1beta1IngressList
{ networkingV1beta1IngressListApiVersion :: !(Maybe Text)
, networkingV1beta1IngressListItems :: !([NetworkingV1beta1Ingress])
, networkingV1beta1IngressListKind :: !(Maybe Text)
, networkingV1beta1IngressListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON NetworkingV1beta1IngressList where
parseJSON = A.withObject "NetworkingV1beta1IngressList" $ \o ->
NetworkingV1beta1IngressList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON NetworkingV1beta1IngressList where
toJSON NetworkingV1beta1IngressList {..} =
_omitNulls
[ "apiVersion" .= networkingV1beta1IngressListApiVersion
, "items" .= networkingV1beta1IngressListItems
, "kind" .= networkingV1beta1IngressListKind
, "metadata" .= networkingV1beta1IngressListMetadata
]
mkNetworkingV1beta1IngressList
:: [NetworkingV1beta1Ingress]
-> NetworkingV1beta1IngressList
mkNetworkingV1beta1IngressList networkingV1beta1IngressListItems =
NetworkingV1beta1IngressList
{ networkingV1beta1IngressListApiVersion = Nothing
, networkingV1beta1IngressListItems
, networkingV1beta1IngressListKind = Nothing
, networkingV1beta1IngressListMetadata = Nothing
}
data NetworkingV1beta1IngressRule = NetworkingV1beta1IngressRule
{ networkingV1beta1IngressRuleHost :: !(Maybe Text)
, networkingV1beta1IngressRuleHttp :: !(Maybe NetworkingV1beta1HTTPIngressRuleValue)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON NetworkingV1beta1IngressRule where
parseJSON = A.withObject "NetworkingV1beta1IngressRule" $ \o ->
NetworkingV1beta1IngressRule
<$> (o .:? "host")
<*> (o .:? "http")
instance A.ToJSON NetworkingV1beta1IngressRule where
toJSON NetworkingV1beta1IngressRule {..} =
_omitNulls
[ "host" .= networkingV1beta1IngressRuleHost
, "http" .= networkingV1beta1IngressRuleHttp
]
mkNetworkingV1beta1IngressRule
:: NetworkingV1beta1IngressRule
mkNetworkingV1beta1IngressRule =
NetworkingV1beta1IngressRule
{ networkingV1beta1IngressRuleHost = Nothing
, networkingV1beta1IngressRuleHttp = Nothing
}
data NetworkingV1beta1IngressSpec = NetworkingV1beta1IngressSpec
{ networkingV1beta1IngressSpecBackend :: !(Maybe NetworkingV1beta1IngressBackend)
, networkingV1beta1IngressSpecRules :: !(Maybe [NetworkingV1beta1IngressRule])
, networkingV1beta1IngressSpecTls :: !(Maybe [NetworkingV1beta1IngressTLS])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON NetworkingV1beta1IngressSpec where
parseJSON = A.withObject "NetworkingV1beta1IngressSpec" $ \o ->
NetworkingV1beta1IngressSpec
<$> (o .:? "backend")
<*> (o .:? "rules")
<*> (o .:? "tls")
instance A.ToJSON NetworkingV1beta1IngressSpec where
toJSON NetworkingV1beta1IngressSpec {..} =
_omitNulls
[ "backend" .= networkingV1beta1IngressSpecBackend
, "rules" .= networkingV1beta1IngressSpecRules
, "tls" .= networkingV1beta1IngressSpecTls
]
mkNetworkingV1beta1IngressSpec
:: NetworkingV1beta1IngressSpec
mkNetworkingV1beta1IngressSpec =
NetworkingV1beta1IngressSpec
{ networkingV1beta1IngressSpecBackend = Nothing
, networkingV1beta1IngressSpecRules = Nothing
, networkingV1beta1IngressSpecTls = Nothing
}
data NetworkingV1beta1IngressStatus = NetworkingV1beta1IngressStatus
{ networkingV1beta1IngressStatusLoadBalancer :: !(Maybe V1LoadBalancerStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON NetworkingV1beta1IngressStatus where
parseJSON = A.withObject "NetworkingV1beta1IngressStatus" $ \o ->
NetworkingV1beta1IngressStatus
<$> (o .:? "loadBalancer")
instance A.ToJSON NetworkingV1beta1IngressStatus where
toJSON NetworkingV1beta1IngressStatus {..} =
_omitNulls
[ "loadBalancer" .= networkingV1beta1IngressStatusLoadBalancer
]
mkNetworkingV1beta1IngressStatus
:: NetworkingV1beta1IngressStatus
mkNetworkingV1beta1IngressStatus =
NetworkingV1beta1IngressStatus
{ networkingV1beta1IngressStatusLoadBalancer = Nothing
}
data NetworkingV1beta1IngressTLS = NetworkingV1beta1IngressTLS
{ networkingV1beta1IngressTLSHosts :: !(Maybe [Text])
, networkingV1beta1IngressTLSSecretName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON NetworkingV1beta1IngressTLS where
parseJSON = A.withObject "NetworkingV1beta1IngressTLS" $ \o ->
NetworkingV1beta1IngressTLS
<$> (o .:? "hosts")
<*> (o .:? "secretName")
instance A.ToJSON NetworkingV1beta1IngressTLS where
toJSON NetworkingV1beta1IngressTLS {..} =
_omitNulls
[ "hosts" .= networkingV1beta1IngressTLSHosts
, "secretName" .= networkingV1beta1IngressTLSSecretName
]
mkNetworkingV1beta1IngressTLS
:: NetworkingV1beta1IngressTLS
mkNetworkingV1beta1IngressTLS =
NetworkingV1beta1IngressTLS
{ networkingV1beta1IngressTLSHosts = Nothing
, networkingV1beta1IngressTLSSecretName = Nothing
}
data PolicyV1beta1AllowedCSIDriver = PolicyV1beta1AllowedCSIDriver
{ policyV1beta1AllowedCSIDriverName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1AllowedCSIDriver where
parseJSON = A.withObject "PolicyV1beta1AllowedCSIDriver" $ \o ->
PolicyV1beta1AllowedCSIDriver
<$> (o .: "name")
instance A.ToJSON PolicyV1beta1AllowedCSIDriver where
toJSON PolicyV1beta1AllowedCSIDriver {..} =
_omitNulls
[ "name" .= policyV1beta1AllowedCSIDriverName
]
mkPolicyV1beta1AllowedCSIDriver
:: Text
-> PolicyV1beta1AllowedCSIDriver
mkPolicyV1beta1AllowedCSIDriver policyV1beta1AllowedCSIDriverName =
PolicyV1beta1AllowedCSIDriver
{ policyV1beta1AllowedCSIDriverName
}
data PolicyV1beta1AllowedFlexVolume = PolicyV1beta1AllowedFlexVolume
{ policyV1beta1AllowedFlexVolumeDriver :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1AllowedFlexVolume where
parseJSON = A.withObject "PolicyV1beta1AllowedFlexVolume" $ \o ->
PolicyV1beta1AllowedFlexVolume
<$> (o .: "driver")
instance A.ToJSON PolicyV1beta1AllowedFlexVolume where
toJSON PolicyV1beta1AllowedFlexVolume {..} =
_omitNulls
[ "driver" .= policyV1beta1AllowedFlexVolumeDriver
]
mkPolicyV1beta1AllowedFlexVolume
:: Text
-> PolicyV1beta1AllowedFlexVolume
mkPolicyV1beta1AllowedFlexVolume policyV1beta1AllowedFlexVolumeDriver =
PolicyV1beta1AllowedFlexVolume
{ policyV1beta1AllowedFlexVolumeDriver
}
data PolicyV1beta1AllowedHostPath = PolicyV1beta1AllowedHostPath
{ policyV1beta1AllowedHostPathPathPrefix :: !(Maybe Text)
, policyV1beta1AllowedHostPathReadOnly :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1AllowedHostPath where
parseJSON = A.withObject "PolicyV1beta1AllowedHostPath" $ \o ->
PolicyV1beta1AllowedHostPath
<$> (o .:? "pathPrefix")
<*> (o .:? "readOnly")
instance A.ToJSON PolicyV1beta1AllowedHostPath where
toJSON PolicyV1beta1AllowedHostPath {..} =
_omitNulls
[ "pathPrefix" .= policyV1beta1AllowedHostPathPathPrefix
, "readOnly" .= policyV1beta1AllowedHostPathReadOnly
]
mkPolicyV1beta1AllowedHostPath
:: PolicyV1beta1AllowedHostPath
mkPolicyV1beta1AllowedHostPath =
PolicyV1beta1AllowedHostPath
{ policyV1beta1AllowedHostPathPathPrefix = Nothing
, policyV1beta1AllowedHostPathReadOnly = Nothing
}
data PolicyV1beta1FSGroupStrategyOptions = PolicyV1beta1FSGroupStrategyOptions
{ policyV1beta1FSGroupStrategyOptionsRanges :: !(Maybe [PolicyV1beta1IDRange])
, policyV1beta1FSGroupStrategyOptionsRule :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1FSGroupStrategyOptions where
parseJSON = A.withObject "PolicyV1beta1FSGroupStrategyOptions" $ \o ->
PolicyV1beta1FSGroupStrategyOptions
<$> (o .:? "ranges")
<*> (o .:? "rule")
instance A.ToJSON PolicyV1beta1FSGroupStrategyOptions where
toJSON PolicyV1beta1FSGroupStrategyOptions {..} =
_omitNulls
[ "ranges" .= policyV1beta1FSGroupStrategyOptionsRanges
, "rule" .= policyV1beta1FSGroupStrategyOptionsRule
]
mkPolicyV1beta1FSGroupStrategyOptions
:: PolicyV1beta1FSGroupStrategyOptions
mkPolicyV1beta1FSGroupStrategyOptions =
PolicyV1beta1FSGroupStrategyOptions
{ policyV1beta1FSGroupStrategyOptionsRanges = Nothing
, policyV1beta1FSGroupStrategyOptionsRule = Nothing
}
data PolicyV1beta1HostPortRange = PolicyV1beta1HostPortRange
{ policyV1beta1HostPortRangeMax :: !(Int)
, policyV1beta1HostPortRangeMin :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1HostPortRange where
parseJSON = A.withObject "PolicyV1beta1HostPortRange" $ \o ->
PolicyV1beta1HostPortRange
<$> (o .: "max")
<*> (o .: "min")
instance A.ToJSON PolicyV1beta1HostPortRange where
toJSON PolicyV1beta1HostPortRange {..} =
_omitNulls
[ "max" .= policyV1beta1HostPortRangeMax
, "min" .= policyV1beta1HostPortRangeMin
]
mkPolicyV1beta1HostPortRange
:: Int
-> Int
-> PolicyV1beta1HostPortRange
mkPolicyV1beta1HostPortRange policyV1beta1HostPortRangeMax policyV1beta1HostPortRangeMin =
PolicyV1beta1HostPortRange
{ policyV1beta1HostPortRangeMax
, policyV1beta1HostPortRangeMin
}
data PolicyV1beta1IDRange = PolicyV1beta1IDRange
{ policyV1beta1IDRangeMax :: !(Integer)
, policyV1beta1IDRangeMin :: !(Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1IDRange where
parseJSON = A.withObject "PolicyV1beta1IDRange" $ \o ->
PolicyV1beta1IDRange
<$> (o .: "max")
<*> (o .: "min")
instance A.ToJSON PolicyV1beta1IDRange where
toJSON PolicyV1beta1IDRange {..} =
_omitNulls
[ "max" .= policyV1beta1IDRangeMax
, "min" .= policyV1beta1IDRangeMin
]
mkPolicyV1beta1IDRange
:: Integer
-> Integer
-> PolicyV1beta1IDRange
mkPolicyV1beta1IDRange policyV1beta1IDRangeMax policyV1beta1IDRangeMin =
PolicyV1beta1IDRange
{ policyV1beta1IDRangeMax
, policyV1beta1IDRangeMin
}
data PolicyV1beta1PodSecurityPolicy = PolicyV1beta1PodSecurityPolicy
{ policyV1beta1PodSecurityPolicyApiVersion :: !(Maybe Text)
, policyV1beta1PodSecurityPolicyKind :: !(Maybe Text)
, policyV1beta1PodSecurityPolicyMetadata :: !(Maybe V1ObjectMeta)
, policyV1beta1PodSecurityPolicySpec :: !(Maybe PolicyV1beta1PodSecurityPolicySpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1PodSecurityPolicy where
parseJSON = A.withObject "PolicyV1beta1PodSecurityPolicy" $ \o ->
PolicyV1beta1PodSecurityPolicy
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON PolicyV1beta1PodSecurityPolicy where
toJSON PolicyV1beta1PodSecurityPolicy {..} =
_omitNulls
[ "apiVersion" .= policyV1beta1PodSecurityPolicyApiVersion
, "kind" .= policyV1beta1PodSecurityPolicyKind
, "metadata" .= policyV1beta1PodSecurityPolicyMetadata
, "spec" .= policyV1beta1PodSecurityPolicySpec
]
mkPolicyV1beta1PodSecurityPolicy
:: PolicyV1beta1PodSecurityPolicy
mkPolicyV1beta1PodSecurityPolicy =
PolicyV1beta1PodSecurityPolicy
{ policyV1beta1PodSecurityPolicyApiVersion = Nothing
, policyV1beta1PodSecurityPolicyKind = Nothing
, policyV1beta1PodSecurityPolicyMetadata = Nothing
, policyV1beta1PodSecurityPolicySpec = Nothing
}
data PolicyV1beta1PodSecurityPolicyList = PolicyV1beta1PodSecurityPolicyList
{ policyV1beta1PodSecurityPolicyListApiVersion :: !(Maybe Text)
, policyV1beta1PodSecurityPolicyListItems :: !([PolicyV1beta1PodSecurityPolicy])
, policyV1beta1PodSecurityPolicyListKind :: !(Maybe Text)
, policyV1beta1PodSecurityPolicyListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1PodSecurityPolicyList where
parseJSON = A.withObject "PolicyV1beta1PodSecurityPolicyList" $ \o ->
PolicyV1beta1PodSecurityPolicyList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON PolicyV1beta1PodSecurityPolicyList where
toJSON PolicyV1beta1PodSecurityPolicyList {..} =
_omitNulls
[ "apiVersion" .= policyV1beta1PodSecurityPolicyListApiVersion
, "items" .= policyV1beta1PodSecurityPolicyListItems
, "kind" .= policyV1beta1PodSecurityPolicyListKind
, "metadata" .= policyV1beta1PodSecurityPolicyListMetadata
]
mkPolicyV1beta1PodSecurityPolicyList
:: [PolicyV1beta1PodSecurityPolicy]
-> PolicyV1beta1PodSecurityPolicyList
mkPolicyV1beta1PodSecurityPolicyList policyV1beta1PodSecurityPolicyListItems =
PolicyV1beta1PodSecurityPolicyList
{ policyV1beta1PodSecurityPolicyListApiVersion = Nothing
, policyV1beta1PodSecurityPolicyListItems
, policyV1beta1PodSecurityPolicyListKind = Nothing
, policyV1beta1PodSecurityPolicyListMetadata = Nothing
}
data PolicyV1beta1PodSecurityPolicySpec = PolicyV1beta1PodSecurityPolicySpec
{ policyV1beta1PodSecurityPolicySpecAllowPrivilegeEscalation :: !(Maybe Bool)
, policyV1beta1PodSecurityPolicySpecAllowedCsiDrivers :: !(Maybe [PolicyV1beta1AllowedCSIDriver])
, policyV1beta1PodSecurityPolicySpecAllowedCapabilities :: !(Maybe [Text])
, policyV1beta1PodSecurityPolicySpecAllowedFlexVolumes :: !(Maybe [PolicyV1beta1AllowedFlexVolume])
, policyV1beta1PodSecurityPolicySpecAllowedHostPaths :: !(Maybe [PolicyV1beta1AllowedHostPath])
, policyV1beta1PodSecurityPolicySpecAllowedProcMountTypes :: !(Maybe [Text])
, policyV1beta1PodSecurityPolicySpecAllowedUnsafeSysctls :: !(Maybe [Text])
, policyV1beta1PodSecurityPolicySpecDefaultAddCapabilities :: !(Maybe [Text])
, policyV1beta1PodSecurityPolicySpecDefaultAllowPrivilegeEscalation :: !(Maybe Bool)
, policyV1beta1PodSecurityPolicySpecForbiddenSysctls :: !(Maybe [Text])
, policyV1beta1PodSecurityPolicySpecFsGroup :: !(PolicyV1beta1FSGroupStrategyOptions)
, policyV1beta1PodSecurityPolicySpecHostIpc :: !(Maybe Bool)
, policyV1beta1PodSecurityPolicySpecHostNetwork :: !(Maybe Bool)
, policyV1beta1PodSecurityPolicySpecHostPid :: !(Maybe Bool)
, policyV1beta1PodSecurityPolicySpecHostPorts :: !(Maybe [PolicyV1beta1HostPortRange])
, policyV1beta1PodSecurityPolicySpecPrivileged :: !(Maybe Bool)
, policyV1beta1PodSecurityPolicySpecReadOnlyRootFilesystem :: !(Maybe Bool)
, policyV1beta1PodSecurityPolicySpecRequiredDropCapabilities :: !(Maybe [Text])
, policyV1beta1PodSecurityPolicySpecRunAsGroup :: !(Maybe PolicyV1beta1RunAsGroupStrategyOptions)
, policyV1beta1PodSecurityPolicySpecRunAsUser :: !(PolicyV1beta1RunAsUserStrategyOptions)
, policyV1beta1PodSecurityPolicySpecSeLinux :: !(PolicyV1beta1SELinuxStrategyOptions)
, policyV1beta1PodSecurityPolicySpecSupplementalGroups :: !(PolicyV1beta1SupplementalGroupsStrategyOptions)
, policyV1beta1PodSecurityPolicySpecVolumes :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1PodSecurityPolicySpec where
parseJSON = A.withObject "PolicyV1beta1PodSecurityPolicySpec" $ \o ->
PolicyV1beta1PodSecurityPolicySpec
<$> (o .:? "allowPrivilegeEscalation")
<*> (o .:? "allowedCSIDrivers")
<*> (o .:? "allowedCapabilities")
<*> (o .:? "allowedFlexVolumes")
<*> (o .:? "allowedHostPaths")
<*> (o .:? "allowedProcMountTypes")
<*> (o .:? "allowedUnsafeSysctls")
<*> (o .:? "defaultAddCapabilities")
<*> (o .:? "defaultAllowPrivilegeEscalation")
<*> (o .:? "forbiddenSysctls")
<*> (o .: "fsGroup")
<*> (o .:? "hostIPC")
<*> (o .:? "hostNetwork")
<*> (o .:? "hostPID")
<*> (o .:? "hostPorts")
<*> (o .:? "privileged")
<*> (o .:? "readOnlyRootFilesystem")
<*> (o .:? "requiredDropCapabilities")
<*> (o .:? "runAsGroup")
<*> (o .: "runAsUser")
<*> (o .: "seLinux")
<*> (o .: "supplementalGroups")
<*> (o .:? "volumes")
instance A.ToJSON PolicyV1beta1PodSecurityPolicySpec where
toJSON PolicyV1beta1PodSecurityPolicySpec {..} =
_omitNulls
[ "allowPrivilegeEscalation" .= policyV1beta1PodSecurityPolicySpecAllowPrivilegeEscalation
, "allowedCSIDrivers" .= policyV1beta1PodSecurityPolicySpecAllowedCsiDrivers
, "allowedCapabilities" .= policyV1beta1PodSecurityPolicySpecAllowedCapabilities
, "allowedFlexVolumes" .= policyV1beta1PodSecurityPolicySpecAllowedFlexVolumes
, "allowedHostPaths" .= policyV1beta1PodSecurityPolicySpecAllowedHostPaths
, "allowedProcMountTypes" .= policyV1beta1PodSecurityPolicySpecAllowedProcMountTypes
, "allowedUnsafeSysctls" .= policyV1beta1PodSecurityPolicySpecAllowedUnsafeSysctls
, "defaultAddCapabilities" .= policyV1beta1PodSecurityPolicySpecDefaultAddCapabilities
, "defaultAllowPrivilegeEscalation" .= policyV1beta1PodSecurityPolicySpecDefaultAllowPrivilegeEscalation
, "forbiddenSysctls" .= policyV1beta1PodSecurityPolicySpecForbiddenSysctls
, "fsGroup" .= policyV1beta1PodSecurityPolicySpecFsGroup
, "hostIPC" .= policyV1beta1PodSecurityPolicySpecHostIpc
, "hostNetwork" .= policyV1beta1PodSecurityPolicySpecHostNetwork
, "hostPID" .= policyV1beta1PodSecurityPolicySpecHostPid
, "hostPorts" .= policyV1beta1PodSecurityPolicySpecHostPorts
, "privileged" .= policyV1beta1PodSecurityPolicySpecPrivileged
, "readOnlyRootFilesystem" .= policyV1beta1PodSecurityPolicySpecReadOnlyRootFilesystem
, "requiredDropCapabilities" .= policyV1beta1PodSecurityPolicySpecRequiredDropCapabilities
, "runAsGroup" .= policyV1beta1PodSecurityPolicySpecRunAsGroup
, "runAsUser" .= policyV1beta1PodSecurityPolicySpecRunAsUser
, "seLinux" .= policyV1beta1PodSecurityPolicySpecSeLinux
, "supplementalGroups" .= policyV1beta1PodSecurityPolicySpecSupplementalGroups
, "volumes" .= policyV1beta1PodSecurityPolicySpecVolumes
]
mkPolicyV1beta1PodSecurityPolicySpec
:: PolicyV1beta1FSGroupStrategyOptions
-> PolicyV1beta1RunAsUserStrategyOptions
-> PolicyV1beta1SELinuxStrategyOptions
-> PolicyV1beta1SupplementalGroupsStrategyOptions
-> PolicyV1beta1PodSecurityPolicySpec
mkPolicyV1beta1PodSecurityPolicySpec policyV1beta1PodSecurityPolicySpecFsGroup policyV1beta1PodSecurityPolicySpecRunAsUser policyV1beta1PodSecurityPolicySpecSeLinux policyV1beta1PodSecurityPolicySpecSupplementalGroups =
PolicyV1beta1PodSecurityPolicySpec
{ policyV1beta1PodSecurityPolicySpecAllowPrivilegeEscalation = Nothing
, policyV1beta1PodSecurityPolicySpecAllowedCsiDrivers = Nothing
, policyV1beta1PodSecurityPolicySpecAllowedCapabilities = Nothing
, policyV1beta1PodSecurityPolicySpecAllowedFlexVolumes = Nothing
, policyV1beta1PodSecurityPolicySpecAllowedHostPaths = Nothing
, policyV1beta1PodSecurityPolicySpecAllowedProcMountTypes = Nothing
, policyV1beta1PodSecurityPolicySpecAllowedUnsafeSysctls = Nothing
, policyV1beta1PodSecurityPolicySpecDefaultAddCapabilities = Nothing
, policyV1beta1PodSecurityPolicySpecDefaultAllowPrivilegeEscalation = Nothing
, policyV1beta1PodSecurityPolicySpecForbiddenSysctls = Nothing
, policyV1beta1PodSecurityPolicySpecFsGroup
, policyV1beta1PodSecurityPolicySpecHostIpc = Nothing
, policyV1beta1PodSecurityPolicySpecHostNetwork = Nothing
, policyV1beta1PodSecurityPolicySpecHostPid = Nothing
, policyV1beta1PodSecurityPolicySpecHostPorts = Nothing
, policyV1beta1PodSecurityPolicySpecPrivileged = Nothing
, policyV1beta1PodSecurityPolicySpecReadOnlyRootFilesystem = Nothing
, policyV1beta1PodSecurityPolicySpecRequiredDropCapabilities = Nothing
, policyV1beta1PodSecurityPolicySpecRunAsGroup = Nothing
, policyV1beta1PodSecurityPolicySpecRunAsUser
, policyV1beta1PodSecurityPolicySpecSeLinux
, policyV1beta1PodSecurityPolicySpecSupplementalGroups
, policyV1beta1PodSecurityPolicySpecVolumes = Nothing
}
data PolicyV1beta1RunAsGroupStrategyOptions = PolicyV1beta1RunAsGroupStrategyOptions
{ policyV1beta1RunAsGroupStrategyOptionsRanges :: !(Maybe [PolicyV1beta1IDRange])
, policyV1beta1RunAsGroupStrategyOptionsRule :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1RunAsGroupStrategyOptions where
parseJSON = A.withObject "PolicyV1beta1RunAsGroupStrategyOptions" $ \o ->
PolicyV1beta1RunAsGroupStrategyOptions
<$> (o .:? "ranges")
<*> (o .: "rule")
instance A.ToJSON PolicyV1beta1RunAsGroupStrategyOptions where
toJSON PolicyV1beta1RunAsGroupStrategyOptions {..} =
_omitNulls
[ "ranges" .= policyV1beta1RunAsGroupStrategyOptionsRanges
, "rule" .= policyV1beta1RunAsGroupStrategyOptionsRule
]
mkPolicyV1beta1RunAsGroupStrategyOptions
:: Text
-> PolicyV1beta1RunAsGroupStrategyOptions
mkPolicyV1beta1RunAsGroupStrategyOptions policyV1beta1RunAsGroupStrategyOptionsRule =
PolicyV1beta1RunAsGroupStrategyOptions
{ policyV1beta1RunAsGroupStrategyOptionsRanges = Nothing
, policyV1beta1RunAsGroupStrategyOptionsRule
}
data PolicyV1beta1RunAsUserStrategyOptions = PolicyV1beta1RunAsUserStrategyOptions
{ policyV1beta1RunAsUserStrategyOptionsRanges :: !(Maybe [PolicyV1beta1IDRange])
, policyV1beta1RunAsUserStrategyOptionsRule :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1RunAsUserStrategyOptions where
parseJSON = A.withObject "PolicyV1beta1RunAsUserStrategyOptions" $ \o ->
PolicyV1beta1RunAsUserStrategyOptions
<$> (o .:? "ranges")
<*> (o .: "rule")
instance A.ToJSON PolicyV1beta1RunAsUserStrategyOptions where
toJSON PolicyV1beta1RunAsUserStrategyOptions {..} =
_omitNulls
[ "ranges" .= policyV1beta1RunAsUserStrategyOptionsRanges
, "rule" .= policyV1beta1RunAsUserStrategyOptionsRule
]
mkPolicyV1beta1RunAsUserStrategyOptions
:: Text
-> PolicyV1beta1RunAsUserStrategyOptions
mkPolicyV1beta1RunAsUserStrategyOptions policyV1beta1RunAsUserStrategyOptionsRule =
PolicyV1beta1RunAsUserStrategyOptions
{ policyV1beta1RunAsUserStrategyOptionsRanges = Nothing
, policyV1beta1RunAsUserStrategyOptionsRule
}
data PolicyV1beta1SELinuxStrategyOptions = PolicyV1beta1SELinuxStrategyOptions
{ policyV1beta1SELinuxStrategyOptionsRule :: !(Text)
, policyV1beta1SELinuxStrategyOptionsSeLinuxOptions :: !(Maybe V1SELinuxOptions)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1SELinuxStrategyOptions where
parseJSON = A.withObject "PolicyV1beta1SELinuxStrategyOptions" $ \o ->
PolicyV1beta1SELinuxStrategyOptions
<$> (o .: "rule")
<*> (o .:? "seLinuxOptions")
instance A.ToJSON PolicyV1beta1SELinuxStrategyOptions where
toJSON PolicyV1beta1SELinuxStrategyOptions {..} =
_omitNulls
[ "rule" .= policyV1beta1SELinuxStrategyOptionsRule
, "seLinuxOptions" .= policyV1beta1SELinuxStrategyOptionsSeLinuxOptions
]
mkPolicyV1beta1SELinuxStrategyOptions
:: Text
-> PolicyV1beta1SELinuxStrategyOptions
mkPolicyV1beta1SELinuxStrategyOptions policyV1beta1SELinuxStrategyOptionsRule =
PolicyV1beta1SELinuxStrategyOptions
{ policyV1beta1SELinuxStrategyOptionsRule
, policyV1beta1SELinuxStrategyOptionsSeLinuxOptions = Nothing
}
data PolicyV1beta1SupplementalGroupsStrategyOptions = PolicyV1beta1SupplementalGroupsStrategyOptions
{ policyV1beta1SupplementalGroupsStrategyOptionsRanges :: !(Maybe [PolicyV1beta1IDRange])
, policyV1beta1SupplementalGroupsStrategyOptionsRule :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON PolicyV1beta1SupplementalGroupsStrategyOptions where
parseJSON = A.withObject "PolicyV1beta1SupplementalGroupsStrategyOptions" $ \o ->
PolicyV1beta1SupplementalGroupsStrategyOptions
<$> (o .:? "ranges")
<*> (o .:? "rule")
instance A.ToJSON PolicyV1beta1SupplementalGroupsStrategyOptions where
toJSON PolicyV1beta1SupplementalGroupsStrategyOptions {..} =
_omitNulls
[ "ranges" .= policyV1beta1SupplementalGroupsStrategyOptionsRanges
, "rule" .= policyV1beta1SupplementalGroupsStrategyOptionsRule
]
mkPolicyV1beta1SupplementalGroupsStrategyOptions
:: PolicyV1beta1SupplementalGroupsStrategyOptions
mkPolicyV1beta1SupplementalGroupsStrategyOptions =
PolicyV1beta1SupplementalGroupsStrategyOptions
{ policyV1beta1SupplementalGroupsStrategyOptionsRanges = Nothing
, policyV1beta1SupplementalGroupsStrategyOptionsRule = Nothing
}
data RuntimeRawExtension = RuntimeRawExtension
{ runtimeRawExtensionRaw :: !(ByteArray)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON RuntimeRawExtension where
parseJSON = A.withObject "RuntimeRawExtension" $ \o ->
RuntimeRawExtension
<$> (o .: "Raw")
instance A.ToJSON RuntimeRawExtension where
toJSON RuntimeRawExtension {..} =
_omitNulls
[ "Raw" .= runtimeRawExtensionRaw
]
mkRuntimeRawExtension
:: ByteArray
-> RuntimeRawExtension
mkRuntimeRawExtension runtimeRawExtensionRaw =
RuntimeRawExtension
{ runtimeRawExtensionRaw
}
data V1APIGroup = V1APIGroup
{ v1APIGroupApiVersion :: !(Maybe Text)
, v1APIGroupKind :: !(Maybe Text)
, v1APIGroupName :: !(Text)
, v1APIGroupPreferredVersion :: !(Maybe V1GroupVersionForDiscovery)
, v1APIGroupServerAddressByClientCidRs :: !(Maybe [V1ServerAddressByClientCIDR])
, v1APIGroupVersions :: !([V1GroupVersionForDiscovery])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIGroup where
parseJSON = A.withObject "V1APIGroup" $ \o ->
V1APIGroup
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .: "name")
<*> (o .:? "preferredVersion")
<*> (o .:? "serverAddressByClientCIDRs")
<*> (o .: "versions")
instance A.ToJSON V1APIGroup where
toJSON V1APIGroup {..} =
_omitNulls
[ "apiVersion" .= v1APIGroupApiVersion
, "kind" .= v1APIGroupKind
, "name" .= v1APIGroupName
, "preferredVersion" .= v1APIGroupPreferredVersion
, "serverAddressByClientCIDRs" .= v1APIGroupServerAddressByClientCidRs
, "versions" .= v1APIGroupVersions
]
mkV1APIGroup
:: Text
-> [V1GroupVersionForDiscovery]
-> V1APIGroup
mkV1APIGroup v1APIGroupName v1APIGroupVersions =
V1APIGroup
{ v1APIGroupApiVersion = Nothing
, v1APIGroupKind = Nothing
, v1APIGroupName
, v1APIGroupPreferredVersion = Nothing
, v1APIGroupServerAddressByClientCidRs = Nothing
, v1APIGroupVersions
}
data V1APIGroupList = V1APIGroupList
{ v1APIGroupListApiVersion :: !(Maybe Text)
, v1APIGroupListGroups :: !([V1APIGroup])
, v1APIGroupListKind :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIGroupList where
parseJSON = A.withObject "V1APIGroupList" $ \o ->
V1APIGroupList
<$> (o .:? "apiVersion")
<*> (o .: "groups")
<*> (o .:? "kind")
instance A.ToJSON V1APIGroupList where
toJSON V1APIGroupList {..} =
_omitNulls
[ "apiVersion" .= v1APIGroupListApiVersion
, "groups" .= v1APIGroupListGroups
, "kind" .= v1APIGroupListKind
]
mkV1APIGroupList
:: [V1APIGroup]
-> V1APIGroupList
mkV1APIGroupList v1APIGroupListGroups =
V1APIGroupList
{ v1APIGroupListApiVersion = Nothing
, v1APIGroupListGroups
, v1APIGroupListKind = Nothing
}
data V1APIResource = V1APIResource
{ v1APIResourceCategories :: !(Maybe [Text])
, v1APIResourceGroup :: !(Maybe Text)
, v1APIResourceKind :: !(Text)
, v1APIResourceName :: !(Text)
, v1APIResourceNamespaced :: !(Bool)
, v1APIResourceShortNames :: !(Maybe [Text])
, v1APIResourceSingularName :: !(Text)
, v1APIResourceStorageVersionHash :: !(Maybe Text)
, v1APIResourceVerbs :: !([Text])
, v1APIResourceVersion :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIResource where
parseJSON = A.withObject "V1APIResource" $ \o ->
V1APIResource
<$> (o .:? "categories")
<*> (o .:? "group")
<*> (o .: "kind")
<*> (o .: "name")
<*> (o .: "namespaced")
<*> (o .:? "shortNames")
<*> (o .: "singularName")
<*> (o .:? "storageVersionHash")
<*> (o .: "verbs")
<*> (o .:? "version")
instance A.ToJSON V1APIResource where
toJSON V1APIResource {..} =
_omitNulls
[ "categories" .= v1APIResourceCategories
, "group" .= v1APIResourceGroup
, "kind" .= v1APIResourceKind
, "name" .= v1APIResourceName
, "namespaced" .= v1APIResourceNamespaced
, "shortNames" .= v1APIResourceShortNames
, "singularName" .= v1APIResourceSingularName
, "storageVersionHash" .= v1APIResourceStorageVersionHash
, "verbs" .= v1APIResourceVerbs
, "version" .= v1APIResourceVersion
]
mkV1APIResource
:: Text
-> Text
-> Bool
-> Text
-> [Text]
-> V1APIResource
mkV1APIResource v1APIResourceKind v1APIResourceName v1APIResourceNamespaced v1APIResourceSingularName v1APIResourceVerbs =
V1APIResource
{ v1APIResourceCategories = Nothing
, v1APIResourceGroup = Nothing
, v1APIResourceKind
, v1APIResourceName
, v1APIResourceNamespaced
, v1APIResourceShortNames = Nothing
, v1APIResourceSingularName
, v1APIResourceStorageVersionHash = Nothing
, v1APIResourceVerbs
, v1APIResourceVersion = Nothing
}
data V1APIResourceList = V1APIResourceList
{ v1APIResourceListApiVersion :: !(Maybe Text)
, v1APIResourceListGroupVersion :: !(Text)
, v1APIResourceListKind :: !(Maybe Text)
, v1APIResourceListResources :: !([V1APIResource])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIResourceList where
parseJSON = A.withObject "V1APIResourceList" $ \o ->
V1APIResourceList
<$> (o .:? "apiVersion")
<*> (o .: "groupVersion")
<*> (o .:? "kind")
<*> (o .: "resources")
instance A.ToJSON V1APIResourceList where
toJSON V1APIResourceList {..} =
_omitNulls
[ "apiVersion" .= v1APIResourceListApiVersion
, "groupVersion" .= v1APIResourceListGroupVersion
, "kind" .= v1APIResourceListKind
, "resources" .= v1APIResourceListResources
]
mkV1APIResourceList
:: Text
-> [V1APIResource]
-> V1APIResourceList
mkV1APIResourceList v1APIResourceListGroupVersion v1APIResourceListResources =
V1APIResourceList
{ v1APIResourceListApiVersion = Nothing
, v1APIResourceListGroupVersion
, v1APIResourceListKind = Nothing
, v1APIResourceListResources
}
data V1APIService = V1APIService
{ v1APIServiceApiVersion :: !(Maybe Text)
, v1APIServiceKind :: !(Maybe Text)
, v1APIServiceMetadata :: !(Maybe V1ObjectMeta)
, v1APIServiceSpec :: !(Maybe V1APIServiceSpec)
, v1APIServiceStatus :: !(Maybe V1APIServiceStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIService where
parseJSON = A.withObject "V1APIService" $ \o ->
V1APIService
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1APIService where
toJSON V1APIService {..} =
_omitNulls
[ "apiVersion" .= v1APIServiceApiVersion
, "kind" .= v1APIServiceKind
, "metadata" .= v1APIServiceMetadata
, "spec" .= v1APIServiceSpec
, "status" .= v1APIServiceStatus
]
mkV1APIService
:: V1APIService
mkV1APIService =
V1APIService
{ v1APIServiceApiVersion = Nothing
, v1APIServiceKind = Nothing
, v1APIServiceMetadata = Nothing
, v1APIServiceSpec = Nothing
, v1APIServiceStatus = Nothing
}
data V1APIServiceCondition = V1APIServiceCondition
{ v1APIServiceConditionLastTransitionTime :: !(Maybe DateTime)
, v1APIServiceConditionMessage :: !(Maybe Text)
, v1APIServiceConditionReason :: !(Maybe Text)
, v1APIServiceConditionStatus :: !(Text)
, v1APIServiceConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIServiceCondition where
parseJSON = A.withObject "V1APIServiceCondition" $ \o ->
V1APIServiceCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1APIServiceCondition where
toJSON V1APIServiceCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1APIServiceConditionLastTransitionTime
, "message" .= v1APIServiceConditionMessage
, "reason" .= v1APIServiceConditionReason
, "status" .= v1APIServiceConditionStatus
, "type" .= v1APIServiceConditionType
]
mkV1APIServiceCondition
:: Text
-> Text
-> V1APIServiceCondition
mkV1APIServiceCondition v1APIServiceConditionStatus v1APIServiceConditionType =
V1APIServiceCondition
{ v1APIServiceConditionLastTransitionTime = Nothing
, v1APIServiceConditionMessage = Nothing
, v1APIServiceConditionReason = Nothing
, v1APIServiceConditionStatus
, v1APIServiceConditionType
}
data V1APIServiceList = V1APIServiceList
{ v1APIServiceListApiVersion :: !(Maybe Text)
, v1APIServiceListItems :: !([V1APIService])
, v1APIServiceListKind :: !(Maybe Text)
, v1APIServiceListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIServiceList where
parseJSON = A.withObject "V1APIServiceList" $ \o ->
V1APIServiceList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1APIServiceList where
toJSON V1APIServiceList {..} =
_omitNulls
[ "apiVersion" .= v1APIServiceListApiVersion
, "items" .= v1APIServiceListItems
, "kind" .= v1APIServiceListKind
, "metadata" .= v1APIServiceListMetadata
]
mkV1APIServiceList
:: [V1APIService]
-> V1APIServiceList
mkV1APIServiceList v1APIServiceListItems =
V1APIServiceList
{ v1APIServiceListApiVersion = Nothing
, v1APIServiceListItems
, v1APIServiceListKind = Nothing
, v1APIServiceListMetadata = Nothing
}
data V1APIServiceSpec = V1APIServiceSpec
{ v1APIServiceSpecCaBundle :: !(Maybe ByteArray)
, v1APIServiceSpecGroup :: !(Maybe Text)
, v1APIServiceSpecGroupPriorityMinimum :: !(Int)
, v1APIServiceSpecInsecureSkipTlsVerify :: !(Maybe Bool)
, v1APIServiceSpecService :: !(V1ServiceReference)
, v1APIServiceSpecVersion :: !(Maybe Text)
, v1APIServiceSpecVersionPriority :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIServiceSpec where
parseJSON = A.withObject "V1APIServiceSpec" $ \o ->
V1APIServiceSpec
<$> (o .:? "caBundle")
<*> (o .:? "group")
<*> (o .: "groupPriorityMinimum")
<*> (o .:? "insecureSkipTLSVerify")
<*> (o .: "service")
<*> (o .:? "version")
<*> (o .: "versionPriority")
instance A.ToJSON V1APIServiceSpec where
toJSON V1APIServiceSpec {..} =
_omitNulls
[ "caBundle" .= v1APIServiceSpecCaBundle
, "group" .= v1APIServiceSpecGroup
, "groupPriorityMinimum" .= v1APIServiceSpecGroupPriorityMinimum
, "insecureSkipTLSVerify" .= v1APIServiceSpecInsecureSkipTlsVerify
, "service" .= v1APIServiceSpecService
, "version" .= v1APIServiceSpecVersion
, "versionPriority" .= v1APIServiceSpecVersionPriority
]
mkV1APIServiceSpec
:: Int
-> V1ServiceReference
-> Int
-> V1APIServiceSpec
mkV1APIServiceSpec v1APIServiceSpecGroupPriorityMinimum v1APIServiceSpecService v1APIServiceSpecVersionPriority =
V1APIServiceSpec
{ v1APIServiceSpecCaBundle = Nothing
, v1APIServiceSpecGroup = Nothing
, v1APIServiceSpecGroupPriorityMinimum
, v1APIServiceSpecInsecureSkipTlsVerify = Nothing
, v1APIServiceSpecService
, v1APIServiceSpecVersion = Nothing
, v1APIServiceSpecVersionPriority
}
data V1APIServiceStatus = V1APIServiceStatus
{ v1APIServiceStatusConditions :: !(Maybe [V1APIServiceCondition])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIServiceStatus where
parseJSON = A.withObject "V1APIServiceStatus" $ \o ->
V1APIServiceStatus
<$> (o .:? "conditions")
instance A.ToJSON V1APIServiceStatus where
toJSON V1APIServiceStatus {..} =
_omitNulls
[ "conditions" .= v1APIServiceStatusConditions
]
mkV1APIServiceStatus
:: V1APIServiceStatus
mkV1APIServiceStatus =
V1APIServiceStatus
{ v1APIServiceStatusConditions = Nothing
}
data V1APIVersions = V1APIVersions
{ v1APIVersionsApiVersion :: !(Maybe Text)
, v1APIVersionsKind :: !(Maybe Text)
, v1APIVersionsServerAddressByClientCidRs :: !([V1ServerAddressByClientCIDR])
, v1APIVersionsVersions :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1APIVersions where
parseJSON = A.withObject "V1APIVersions" $ \o ->
V1APIVersions
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .: "serverAddressByClientCIDRs")
<*> (o .: "versions")
instance A.ToJSON V1APIVersions where
toJSON V1APIVersions {..} =
_omitNulls
[ "apiVersion" .= v1APIVersionsApiVersion
, "kind" .= v1APIVersionsKind
, "serverAddressByClientCIDRs" .= v1APIVersionsServerAddressByClientCidRs
, "versions" .= v1APIVersionsVersions
]
mkV1APIVersions
:: [V1ServerAddressByClientCIDR]
-> [Text]
-> V1APIVersions
mkV1APIVersions v1APIVersionsServerAddressByClientCidRs v1APIVersionsVersions =
V1APIVersions
{ v1APIVersionsApiVersion = Nothing
, v1APIVersionsKind = Nothing
, v1APIVersionsServerAddressByClientCidRs
, v1APIVersionsVersions
}
data V1AWSElasticBlockStoreVolumeSource = V1AWSElasticBlockStoreVolumeSource
{ v1AWSElasticBlockStoreVolumeSourceFsType :: !(Maybe Text)
, v1AWSElasticBlockStoreVolumeSourcePartition :: !(Maybe Int)
, v1AWSElasticBlockStoreVolumeSourceReadOnly :: !(Maybe Bool)
, v1AWSElasticBlockStoreVolumeSourceVolumeId :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1AWSElasticBlockStoreVolumeSource where
parseJSON = A.withObject "V1AWSElasticBlockStoreVolumeSource" $ \o ->
V1AWSElasticBlockStoreVolumeSource
<$> (o .:? "fsType")
<*> (o .:? "partition")
<*> (o .:? "readOnly")
<*> (o .: "volumeID")
instance A.ToJSON V1AWSElasticBlockStoreVolumeSource where
toJSON V1AWSElasticBlockStoreVolumeSource {..} =
_omitNulls
[ "fsType" .= v1AWSElasticBlockStoreVolumeSourceFsType
, "partition" .= v1AWSElasticBlockStoreVolumeSourcePartition
, "readOnly" .= v1AWSElasticBlockStoreVolumeSourceReadOnly
, "volumeID" .= v1AWSElasticBlockStoreVolumeSourceVolumeId
]
mkV1AWSElasticBlockStoreVolumeSource
:: Text
-> V1AWSElasticBlockStoreVolumeSource
mkV1AWSElasticBlockStoreVolumeSource v1AWSElasticBlockStoreVolumeSourceVolumeId =
V1AWSElasticBlockStoreVolumeSource
{ v1AWSElasticBlockStoreVolumeSourceFsType = Nothing
, v1AWSElasticBlockStoreVolumeSourcePartition = Nothing
, v1AWSElasticBlockStoreVolumeSourceReadOnly = Nothing
, v1AWSElasticBlockStoreVolumeSourceVolumeId
}
data V1Affinity = V1Affinity
{ v1AffinityNodeAffinity :: !(Maybe V1NodeAffinity)
, v1AffinityPodAffinity :: !(Maybe V1PodAffinity)
, v1AffinityPodAntiAffinity :: !(Maybe V1PodAntiAffinity)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Affinity where
parseJSON = A.withObject "V1Affinity" $ \o ->
V1Affinity
<$> (o .:? "nodeAffinity")
<*> (o .:? "podAffinity")
<*> (o .:? "podAntiAffinity")
instance A.ToJSON V1Affinity where
toJSON V1Affinity {..} =
_omitNulls
[ "nodeAffinity" .= v1AffinityNodeAffinity
, "podAffinity" .= v1AffinityPodAffinity
, "podAntiAffinity" .= v1AffinityPodAntiAffinity
]
mkV1Affinity
:: V1Affinity
mkV1Affinity =
V1Affinity
{ v1AffinityNodeAffinity = Nothing
, v1AffinityPodAffinity = Nothing
, v1AffinityPodAntiAffinity = Nothing
}
data V1AggregationRule = V1AggregationRule
{ v1AggregationRuleClusterRoleSelectors :: !(Maybe [V1LabelSelector])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1AggregationRule where
parseJSON = A.withObject "V1AggregationRule" $ \o ->
V1AggregationRule
<$> (o .:? "clusterRoleSelectors")
instance A.ToJSON V1AggregationRule where
toJSON V1AggregationRule {..} =
_omitNulls
[ "clusterRoleSelectors" .= v1AggregationRuleClusterRoleSelectors
]
mkV1AggregationRule
:: V1AggregationRule
mkV1AggregationRule =
V1AggregationRule
{ v1AggregationRuleClusterRoleSelectors = Nothing
}
data V1AttachedVolume = V1AttachedVolume
{ v1AttachedVolumeDevicePath :: !(Text)
, v1AttachedVolumeName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1AttachedVolume where
parseJSON = A.withObject "V1AttachedVolume" $ \o ->
V1AttachedVolume
<$> (o .: "devicePath")
<*> (o .: "name")
instance A.ToJSON V1AttachedVolume where
toJSON V1AttachedVolume {..} =
_omitNulls
[ "devicePath" .= v1AttachedVolumeDevicePath
, "name" .= v1AttachedVolumeName
]
mkV1AttachedVolume
:: Text
-> Text
-> V1AttachedVolume
mkV1AttachedVolume v1AttachedVolumeDevicePath v1AttachedVolumeName =
V1AttachedVolume
{ v1AttachedVolumeDevicePath
, v1AttachedVolumeName
}
data V1AzureDiskVolumeSource = V1AzureDiskVolumeSource
{ v1AzureDiskVolumeSourceCachingMode :: !(Maybe Text)
, v1AzureDiskVolumeSourceDiskName :: !(Text)
, v1AzureDiskVolumeSourceDiskUri :: !(Text)
, v1AzureDiskVolumeSourceFsType :: !(Maybe Text)
, v1AzureDiskVolumeSourceKind :: !(Maybe Text)
, v1AzureDiskVolumeSourceReadOnly :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1AzureDiskVolumeSource where
parseJSON = A.withObject "V1AzureDiskVolumeSource" $ \o ->
V1AzureDiskVolumeSource
<$> (o .:? "cachingMode")
<*> (o .: "diskName")
<*> (o .: "diskURI")
<*> (o .:? "fsType")
<*> (o .:? "kind")
<*> (o .:? "readOnly")
instance A.ToJSON V1AzureDiskVolumeSource where
toJSON V1AzureDiskVolumeSource {..} =
_omitNulls
[ "cachingMode" .= v1AzureDiskVolumeSourceCachingMode
, "diskName" .= v1AzureDiskVolumeSourceDiskName
, "diskURI" .= v1AzureDiskVolumeSourceDiskUri
, "fsType" .= v1AzureDiskVolumeSourceFsType
, "kind" .= v1AzureDiskVolumeSourceKind
, "readOnly" .= v1AzureDiskVolumeSourceReadOnly
]
mkV1AzureDiskVolumeSource
:: Text
-> Text
-> V1AzureDiskVolumeSource
mkV1AzureDiskVolumeSource v1AzureDiskVolumeSourceDiskName v1AzureDiskVolumeSourceDiskUri =
V1AzureDiskVolumeSource
{ v1AzureDiskVolumeSourceCachingMode = Nothing
, v1AzureDiskVolumeSourceDiskName
, v1AzureDiskVolumeSourceDiskUri
, v1AzureDiskVolumeSourceFsType = Nothing
, v1AzureDiskVolumeSourceKind = Nothing
, v1AzureDiskVolumeSourceReadOnly = Nothing
}
data V1AzureFilePersistentVolumeSource = V1AzureFilePersistentVolumeSource
{ v1AzureFilePersistentVolumeSourceReadOnly :: !(Maybe Bool)
, v1AzureFilePersistentVolumeSourceSecretName :: !(Text)
, v1AzureFilePersistentVolumeSourceSecretNamespace :: !(Maybe Text)
, v1AzureFilePersistentVolumeSourceShareName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1AzureFilePersistentVolumeSource where
parseJSON = A.withObject "V1AzureFilePersistentVolumeSource" $ \o ->
V1AzureFilePersistentVolumeSource
<$> (o .:? "readOnly")
<*> (o .: "secretName")
<*> (o .:? "secretNamespace")
<*> (o .: "shareName")
instance A.ToJSON V1AzureFilePersistentVolumeSource where
toJSON V1AzureFilePersistentVolumeSource {..} =
_omitNulls
[ "readOnly" .= v1AzureFilePersistentVolumeSourceReadOnly
, "secretName" .= v1AzureFilePersistentVolumeSourceSecretName
, "secretNamespace" .= v1AzureFilePersistentVolumeSourceSecretNamespace
, "shareName" .= v1AzureFilePersistentVolumeSourceShareName
]
mkV1AzureFilePersistentVolumeSource
:: Text
-> Text
-> V1AzureFilePersistentVolumeSource
mkV1AzureFilePersistentVolumeSource v1AzureFilePersistentVolumeSourceSecretName v1AzureFilePersistentVolumeSourceShareName =
V1AzureFilePersistentVolumeSource
{ v1AzureFilePersistentVolumeSourceReadOnly = Nothing
, v1AzureFilePersistentVolumeSourceSecretName
, v1AzureFilePersistentVolumeSourceSecretNamespace = Nothing
, v1AzureFilePersistentVolumeSourceShareName
}
data V1AzureFileVolumeSource = V1AzureFileVolumeSource
{ v1AzureFileVolumeSourceReadOnly :: !(Maybe Bool)
, v1AzureFileVolumeSourceSecretName :: !(Text)
, v1AzureFileVolumeSourceShareName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1AzureFileVolumeSource where
parseJSON = A.withObject "V1AzureFileVolumeSource" $ \o ->
V1AzureFileVolumeSource
<$> (o .:? "readOnly")
<*> (o .: "secretName")
<*> (o .: "shareName")
instance A.ToJSON V1AzureFileVolumeSource where
toJSON V1AzureFileVolumeSource {..} =
_omitNulls
[ "readOnly" .= v1AzureFileVolumeSourceReadOnly
, "secretName" .= v1AzureFileVolumeSourceSecretName
, "shareName" .= v1AzureFileVolumeSourceShareName
]
mkV1AzureFileVolumeSource
:: Text
-> Text
-> V1AzureFileVolumeSource
mkV1AzureFileVolumeSource v1AzureFileVolumeSourceSecretName v1AzureFileVolumeSourceShareName =
V1AzureFileVolumeSource
{ v1AzureFileVolumeSourceReadOnly = Nothing
, v1AzureFileVolumeSourceSecretName
, v1AzureFileVolumeSourceShareName
}
data V1Binding = V1Binding
{ v1BindingApiVersion :: !(Maybe Text)
, v1BindingKind :: !(Maybe Text)
, v1BindingMetadata :: !(Maybe V1ObjectMeta)
, v1BindingTarget :: !(V1ObjectReference)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Binding where
parseJSON = A.withObject "V1Binding" $ \o ->
V1Binding
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "target")
instance A.ToJSON V1Binding where
toJSON V1Binding {..} =
_omitNulls
[ "apiVersion" .= v1BindingApiVersion
, "kind" .= v1BindingKind
, "metadata" .= v1BindingMetadata
, "target" .= v1BindingTarget
]
mkV1Binding
:: V1ObjectReference
-> V1Binding
mkV1Binding v1BindingTarget =
V1Binding
{ v1BindingApiVersion = Nothing
, v1BindingKind = Nothing
, v1BindingMetadata = Nothing
, v1BindingTarget
}
data V1CSIPersistentVolumeSource = V1CSIPersistentVolumeSource
{ v1CSIPersistentVolumeSourceControllerPublishSecretRef :: !(Maybe V1SecretReference)
, v1CSIPersistentVolumeSourceDriver :: !(Text)
, v1CSIPersistentVolumeSourceFsType :: !(Maybe Text)
, v1CSIPersistentVolumeSourceNodePublishSecretRef :: !(Maybe V1SecretReference)
, v1CSIPersistentVolumeSourceNodeStageSecretRef :: !(Maybe V1SecretReference)
, v1CSIPersistentVolumeSourceReadOnly :: !(Maybe Bool)
, v1CSIPersistentVolumeSourceVolumeAttributes :: !(Maybe (Map.Map String Text))
, v1CSIPersistentVolumeSourceVolumeHandle :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1CSIPersistentVolumeSource where
parseJSON = A.withObject "V1CSIPersistentVolumeSource" $ \o ->
V1CSIPersistentVolumeSource
<$> (o .:? "controllerPublishSecretRef")
<*> (o .: "driver")
<*> (o .:? "fsType")
<*> (o .:? "nodePublishSecretRef")
<*> (o .:? "nodeStageSecretRef")
<*> (o .:? "readOnly")
<*> (o .:? "volumeAttributes")
<*> (o .: "volumeHandle")
instance A.ToJSON V1CSIPersistentVolumeSource where
toJSON V1CSIPersistentVolumeSource {..} =
_omitNulls
[ "controllerPublishSecretRef" .= v1CSIPersistentVolumeSourceControllerPublishSecretRef
, "driver" .= v1CSIPersistentVolumeSourceDriver
, "fsType" .= v1CSIPersistentVolumeSourceFsType
, "nodePublishSecretRef" .= v1CSIPersistentVolumeSourceNodePublishSecretRef
, "nodeStageSecretRef" .= v1CSIPersistentVolumeSourceNodeStageSecretRef
, "readOnly" .= v1CSIPersistentVolumeSourceReadOnly
, "volumeAttributes" .= v1CSIPersistentVolumeSourceVolumeAttributes
, "volumeHandle" .= v1CSIPersistentVolumeSourceVolumeHandle
]
mkV1CSIPersistentVolumeSource
:: Text
-> Text
-> V1CSIPersistentVolumeSource
mkV1CSIPersistentVolumeSource v1CSIPersistentVolumeSourceDriver v1CSIPersistentVolumeSourceVolumeHandle =
V1CSIPersistentVolumeSource
{ v1CSIPersistentVolumeSourceControllerPublishSecretRef = Nothing
, v1CSIPersistentVolumeSourceDriver
, v1CSIPersistentVolumeSourceFsType = Nothing
, v1CSIPersistentVolumeSourceNodePublishSecretRef = Nothing
, v1CSIPersistentVolumeSourceNodeStageSecretRef = Nothing
, v1CSIPersistentVolumeSourceReadOnly = Nothing
, v1CSIPersistentVolumeSourceVolumeAttributes = Nothing
, v1CSIPersistentVolumeSourceVolumeHandle
}
data V1CSIVolumeSource = V1CSIVolumeSource
{ v1CSIVolumeSourceDriver :: !(Text)
, v1CSIVolumeSourceFsType :: !(Maybe Text)
, v1CSIVolumeSourceNodePublishSecretRef :: !(Maybe V1LocalObjectReference)
, v1CSIVolumeSourceReadOnly :: !(Maybe Bool)
, v1CSIVolumeSourceVolumeAttributes :: !(Maybe (Map.Map String Text))
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1CSIVolumeSource where
parseJSON = A.withObject "V1CSIVolumeSource" $ \o ->
V1CSIVolumeSource
<$> (o .: "driver")
<*> (o .:? "fsType")
<*> (o .:? "nodePublishSecretRef")
<*> (o .:? "readOnly")
<*> (o .:? "volumeAttributes")
instance A.ToJSON V1CSIVolumeSource where
toJSON V1CSIVolumeSource {..} =
_omitNulls
[ "driver" .= v1CSIVolumeSourceDriver
, "fsType" .= v1CSIVolumeSourceFsType
, "nodePublishSecretRef" .= v1CSIVolumeSourceNodePublishSecretRef
, "readOnly" .= v1CSIVolumeSourceReadOnly
, "volumeAttributes" .= v1CSIVolumeSourceVolumeAttributes
]
mkV1CSIVolumeSource
:: Text
-> V1CSIVolumeSource
mkV1CSIVolumeSource v1CSIVolumeSourceDriver =
V1CSIVolumeSource
{ v1CSIVolumeSourceDriver
, v1CSIVolumeSourceFsType = Nothing
, v1CSIVolumeSourceNodePublishSecretRef = Nothing
, v1CSIVolumeSourceReadOnly = Nothing
, v1CSIVolumeSourceVolumeAttributes = Nothing
}
data V1Capabilities = V1Capabilities
{ v1CapabilitiesAdd :: !(Maybe [Text])
, v1CapabilitiesDrop :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Capabilities where
parseJSON = A.withObject "V1Capabilities" $ \o ->
V1Capabilities
<$> (o .:? "add")
<*> (o .:? "drop")
instance A.ToJSON V1Capabilities where
toJSON V1Capabilities {..} =
_omitNulls
[ "add" .= v1CapabilitiesAdd
, "drop" .= v1CapabilitiesDrop
]
mkV1Capabilities
:: V1Capabilities
mkV1Capabilities =
V1Capabilities
{ v1CapabilitiesAdd = Nothing
, v1CapabilitiesDrop = Nothing
}
data V1CephFSPersistentVolumeSource = V1CephFSPersistentVolumeSource
{ v1CephFSPersistentVolumeSourceMonitors :: !([Text])
, v1CephFSPersistentVolumeSourcePath :: !(Maybe Text)
, v1CephFSPersistentVolumeSourceReadOnly :: !(Maybe Bool)
, v1CephFSPersistentVolumeSourceSecretFile :: !(Maybe Text)
, v1CephFSPersistentVolumeSourceSecretRef :: !(Maybe V1SecretReference)
, v1CephFSPersistentVolumeSourceUser :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1CephFSPersistentVolumeSource where
parseJSON = A.withObject "V1CephFSPersistentVolumeSource" $ \o ->
V1CephFSPersistentVolumeSource
<$> (o .: "monitors")
<*> (o .:? "path")
<*> (o .:? "readOnly")
<*> (o .:? "secretFile")
<*> (o .:? "secretRef")
<*> (o .:? "user")
instance A.ToJSON V1CephFSPersistentVolumeSource where
toJSON V1CephFSPersistentVolumeSource {..} =
_omitNulls
[ "monitors" .= v1CephFSPersistentVolumeSourceMonitors
, "path" .= v1CephFSPersistentVolumeSourcePath
, "readOnly" .= v1CephFSPersistentVolumeSourceReadOnly
, "secretFile" .= v1CephFSPersistentVolumeSourceSecretFile
, "secretRef" .= v1CephFSPersistentVolumeSourceSecretRef
, "user" .= v1CephFSPersistentVolumeSourceUser
]
mkV1CephFSPersistentVolumeSource
:: [Text]
-> V1CephFSPersistentVolumeSource
mkV1CephFSPersistentVolumeSource v1CephFSPersistentVolumeSourceMonitors =
V1CephFSPersistentVolumeSource
{ v1CephFSPersistentVolumeSourceMonitors
, v1CephFSPersistentVolumeSourcePath = Nothing
, v1CephFSPersistentVolumeSourceReadOnly = Nothing
, v1CephFSPersistentVolumeSourceSecretFile = Nothing
, v1CephFSPersistentVolumeSourceSecretRef = Nothing
, v1CephFSPersistentVolumeSourceUser = Nothing
}
data V1CephFSVolumeSource = V1CephFSVolumeSource
{ v1CephFSVolumeSourceMonitors :: !([Text])
, v1CephFSVolumeSourcePath :: !(Maybe Text)
, v1CephFSVolumeSourceReadOnly :: !(Maybe Bool)
, v1CephFSVolumeSourceSecretFile :: !(Maybe Text)
, v1CephFSVolumeSourceSecretRef :: !(Maybe V1LocalObjectReference)
, v1CephFSVolumeSourceUser :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1CephFSVolumeSource where
parseJSON = A.withObject "V1CephFSVolumeSource" $ \o ->
V1CephFSVolumeSource
<$> (o .: "monitors")
<*> (o .:? "path")
<*> (o .:? "readOnly")
<*> (o .:? "secretFile")
<*> (o .:? "secretRef")
<*> (o .:? "user")
instance A.ToJSON V1CephFSVolumeSource where
toJSON V1CephFSVolumeSource {..} =
_omitNulls
[ "monitors" .= v1CephFSVolumeSourceMonitors
, "path" .= v1CephFSVolumeSourcePath
, "readOnly" .= v1CephFSVolumeSourceReadOnly
, "secretFile" .= v1CephFSVolumeSourceSecretFile
, "secretRef" .= v1CephFSVolumeSourceSecretRef
, "user" .= v1CephFSVolumeSourceUser
]
mkV1CephFSVolumeSource
:: [Text]
-> V1CephFSVolumeSource
mkV1CephFSVolumeSource v1CephFSVolumeSourceMonitors =
V1CephFSVolumeSource
{ v1CephFSVolumeSourceMonitors
, v1CephFSVolumeSourcePath = Nothing
, v1CephFSVolumeSourceReadOnly = Nothing
, v1CephFSVolumeSourceSecretFile = Nothing
, v1CephFSVolumeSourceSecretRef = Nothing
, v1CephFSVolumeSourceUser = Nothing
}
data V1CinderPersistentVolumeSource = V1CinderPersistentVolumeSource
{ v1CinderPersistentVolumeSourceFsType :: !(Maybe Text)
, v1CinderPersistentVolumeSourceReadOnly :: !(Maybe Bool)
, v1CinderPersistentVolumeSourceSecretRef :: !(Maybe V1SecretReference)
, v1CinderPersistentVolumeSourceVolumeId :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1CinderPersistentVolumeSource where
parseJSON = A.withObject "V1CinderPersistentVolumeSource" $ \o ->
V1CinderPersistentVolumeSource
<$> (o .:? "fsType")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
<*> (o .: "volumeID")
instance A.ToJSON V1CinderPersistentVolumeSource where
toJSON V1CinderPersistentVolumeSource {..} =
_omitNulls
[ "fsType" .= v1CinderPersistentVolumeSourceFsType
, "readOnly" .= v1CinderPersistentVolumeSourceReadOnly
, "secretRef" .= v1CinderPersistentVolumeSourceSecretRef
, "volumeID" .= v1CinderPersistentVolumeSourceVolumeId
]
mkV1CinderPersistentVolumeSource
:: Text
-> V1CinderPersistentVolumeSource
mkV1CinderPersistentVolumeSource v1CinderPersistentVolumeSourceVolumeId =
V1CinderPersistentVolumeSource
{ v1CinderPersistentVolumeSourceFsType = Nothing
, v1CinderPersistentVolumeSourceReadOnly = Nothing
, v1CinderPersistentVolumeSourceSecretRef = Nothing
, v1CinderPersistentVolumeSourceVolumeId
}
data V1CinderVolumeSource = V1CinderVolumeSource
{ v1CinderVolumeSourceFsType :: !(Maybe Text)
, v1CinderVolumeSourceReadOnly :: !(Maybe Bool)
, v1CinderVolumeSourceSecretRef :: !(Maybe V1LocalObjectReference)
, v1CinderVolumeSourceVolumeId :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1CinderVolumeSource where
parseJSON = A.withObject "V1CinderVolumeSource" $ \o ->
V1CinderVolumeSource
<$> (o .:? "fsType")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
<*> (o .: "volumeID")
instance A.ToJSON V1CinderVolumeSource where
toJSON V1CinderVolumeSource {..} =
_omitNulls
[ "fsType" .= v1CinderVolumeSourceFsType
, "readOnly" .= v1CinderVolumeSourceReadOnly
, "secretRef" .= v1CinderVolumeSourceSecretRef
, "volumeID" .= v1CinderVolumeSourceVolumeId
]
mkV1CinderVolumeSource
:: Text
-> V1CinderVolumeSource
mkV1CinderVolumeSource v1CinderVolumeSourceVolumeId =
V1CinderVolumeSource
{ v1CinderVolumeSourceFsType = Nothing
, v1CinderVolumeSourceReadOnly = Nothing
, v1CinderVolumeSourceSecretRef = Nothing
, v1CinderVolumeSourceVolumeId
}
data V1ClientIPConfig = V1ClientIPConfig
{ v1ClientIPConfigTimeoutSeconds :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ClientIPConfig where
parseJSON = A.withObject "V1ClientIPConfig" $ \o ->
V1ClientIPConfig
<$> (o .:? "timeoutSeconds")
instance A.ToJSON V1ClientIPConfig where
toJSON V1ClientIPConfig {..} =
_omitNulls
[ "timeoutSeconds" .= v1ClientIPConfigTimeoutSeconds
]
mkV1ClientIPConfig
:: V1ClientIPConfig
mkV1ClientIPConfig =
V1ClientIPConfig
{ v1ClientIPConfigTimeoutSeconds = Nothing
}
data V1ClusterRole = V1ClusterRole
{ v1ClusterRoleAggregationRule :: !(Maybe V1AggregationRule)
, v1ClusterRoleApiVersion :: !(Maybe Text)
, v1ClusterRoleKind :: !(Maybe Text)
, v1ClusterRoleMetadata :: !(Maybe V1ObjectMeta)
, v1ClusterRoleRules :: !(Maybe [V1PolicyRule])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ClusterRole where
parseJSON = A.withObject "V1ClusterRole" $ \o ->
V1ClusterRole
<$> (o .:? "aggregationRule")
<*> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "rules")
instance A.ToJSON V1ClusterRole where
toJSON V1ClusterRole {..} =
_omitNulls
[ "aggregationRule" .= v1ClusterRoleAggregationRule
, "apiVersion" .= v1ClusterRoleApiVersion
, "kind" .= v1ClusterRoleKind
, "metadata" .= v1ClusterRoleMetadata
, "rules" .= v1ClusterRoleRules
]
mkV1ClusterRole
:: V1ClusterRole
mkV1ClusterRole =
V1ClusterRole
{ v1ClusterRoleAggregationRule = Nothing
, v1ClusterRoleApiVersion = Nothing
, v1ClusterRoleKind = Nothing
, v1ClusterRoleMetadata = Nothing
, v1ClusterRoleRules = Nothing
}
data V1ClusterRoleBinding = V1ClusterRoleBinding
{ v1ClusterRoleBindingApiVersion :: !(Maybe Text)
, v1ClusterRoleBindingKind :: !(Maybe Text)
, v1ClusterRoleBindingMetadata :: !(Maybe V1ObjectMeta)
, v1ClusterRoleBindingRoleRef :: !(V1RoleRef)
, v1ClusterRoleBindingSubjects :: !(Maybe [V1Subject])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ClusterRoleBinding where
parseJSON = A.withObject "V1ClusterRoleBinding" $ \o ->
V1ClusterRoleBinding
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "roleRef")
<*> (o .:? "subjects")
instance A.ToJSON V1ClusterRoleBinding where
toJSON V1ClusterRoleBinding {..} =
_omitNulls
[ "apiVersion" .= v1ClusterRoleBindingApiVersion
, "kind" .= v1ClusterRoleBindingKind
, "metadata" .= v1ClusterRoleBindingMetadata
, "roleRef" .= v1ClusterRoleBindingRoleRef
, "subjects" .= v1ClusterRoleBindingSubjects
]
mkV1ClusterRoleBinding
:: V1RoleRef
-> V1ClusterRoleBinding
mkV1ClusterRoleBinding v1ClusterRoleBindingRoleRef =
V1ClusterRoleBinding
{ v1ClusterRoleBindingApiVersion = Nothing
, v1ClusterRoleBindingKind = Nothing
, v1ClusterRoleBindingMetadata = Nothing
, v1ClusterRoleBindingRoleRef
, v1ClusterRoleBindingSubjects = Nothing
}
data V1ClusterRoleBindingList = V1ClusterRoleBindingList
{ v1ClusterRoleBindingListApiVersion :: !(Maybe Text)
, v1ClusterRoleBindingListItems :: !([V1ClusterRoleBinding])
, v1ClusterRoleBindingListKind :: !(Maybe Text)
, v1ClusterRoleBindingListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ClusterRoleBindingList where
parseJSON = A.withObject "V1ClusterRoleBindingList" $ \o ->
V1ClusterRoleBindingList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ClusterRoleBindingList where
toJSON V1ClusterRoleBindingList {..} =
_omitNulls
[ "apiVersion" .= v1ClusterRoleBindingListApiVersion
, "items" .= v1ClusterRoleBindingListItems
, "kind" .= v1ClusterRoleBindingListKind
, "metadata" .= v1ClusterRoleBindingListMetadata
]
mkV1ClusterRoleBindingList
:: [V1ClusterRoleBinding]
-> V1ClusterRoleBindingList
mkV1ClusterRoleBindingList v1ClusterRoleBindingListItems =
V1ClusterRoleBindingList
{ v1ClusterRoleBindingListApiVersion = Nothing
, v1ClusterRoleBindingListItems
, v1ClusterRoleBindingListKind = Nothing
, v1ClusterRoleBindingListMetadata = Nothing
}
data V1ClusterRoleList = V1ClusterRoleList
{ v1ClusterRoleListApiVersion :: !(Maybe Text)
, v1ClusterRoleListItems :: !([V1ClusterRole])
, v1ClusterRoleListKind :: !(Maybe Text)
, v1ClusterRoleListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ClusterRoleList where
parseJSON = A.withObject "V1ClusterRoleList" $ \o ->
V1ClusterRoleList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ClusterRoleList where
toJSON V1ClusterRoleList {..} =
_omitNulls
[ "apiVersion" .= v1ClusterRoleListApiVersion
, "items" .= v1ClusterRoleListItems
, "kind" .= v1ClusterRoleListKind
, "metadata" .= v1ClusterRoleListMetadata
]
mkV1ClusterRoleList
:: [V1ClusterRole]
-> V1ClusterRoleList
mkV1ClusterRoleList v1ClusterRoleListItems =
V1ClusterRoleList
{ v1ClusterRoleListApiVersion = Nothing
, v1ClusterRoleListItems
, v1ClusterRoleListKind = Nothing
, v1ClusterRoleListMetadata = Nothing
}
data V1ComponentCondition = V1ComponentCondition
{ v1ComponentConditionError :: !(Maybe Text)
, v1ComponentConditionMessage :: !(Maybe Text)
, v1ComponentConditionStatus :: !(Text)
, v1ComponentConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ComponentCondition where
parseJSON = A.withObject "V1ComponentCondition" $ \o ->
V1ComponentCondition
<$> (o .:? "error")
<*> (o .:? "message")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1ComponentCondition where
toJSON V1ComponentCondition {..} =
_omitNulls
[ "error" .= v1ComponentConditionError
, "message" .= v1ComponentConditionMessage
, "status" .= v1ComponentConditionStatus
, "type" .= v1ComponentConditionType
]
mkV1ComponentCondition
:: Text
-> Text
-> V1ComponentCondition
mkV1ComponentCondition v1ComponentConditionStatus v1ComponentConditionType =
V1ComponentCondition
{ v1ComponentConditionError = Nothing
, v1ComponentConditionMessage = Nothing
, v1ComponentConditionStatus
, v1ComponentConditionType
}
data V1ComponentStatus = V1ComponentStatus
{ v1ComponentStatusApiVersion :: !(Maybe Text)
, v1ComponentStatusConditions :: !(Maybe [V1ComponentCondition])
, v1ComponentStatusKind :: !(Maybe Text)
, v1ComponentStatusMetadata :: !(Maybe V1ObjectMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ComponentStatus where
parseJSON = A.withObject "V1ComponentStatus" $ \o ->
V1ComponentStatus
<$> (o .:? "apiVersion")
<*> (o .:? "conditions")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ComponentStatus where
toJSON V1ComponentStatus {..} =
_omitNulls
[ "apiVersion" .= v1ComponentStatusApiVersion
, "conditions" .= v1ComponentStatusConditions
, "kind" .= v1ComponentStatusKind
, "metadata" .= v1ComponentStatusMetadata
]
mkV1ComponentStatus
:: V1ComponentStatus
mkV1ComponentStatus =
V1ComponentStatus
{ v1ComponentStatusApiVersion = Nothing
, v1ComponentStatusConditions = Nothing
, v1ComponentStatusKind = Nothing
, v1ComponentStatusMetadata = Nothing
}
data V1ComponentStatusList = V1ComponentStatusList
{ v1ComponentStatusListApiVersion :: !(Maybe Text)
, v1ComponentStatusListItems :: !([V1ComponentStatus])
, v1ComponentStatusListKind :: !(Maybe Text)
, v1ComponentStatusListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ComponentStatusList where
parseJSON = A.withObject "V1ComponentStatusList" $ \o ->
V1ComponentStatusList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ComponentStatusList where
toJSON V1ComponentStatusList {..} =
_omitNulls
[ "apiVersion" .= v1ComponentStatusListApiVersion
, "items" .= v1ComponentStatusListItems
, "kind" .= v1ComponentStatusListKind
, "metadata" .= v1ComponentStatusListMetadata
]
mkV1ComponentStatusList
:: [V1ComponentStatus]
-> V1ComponentStatusList
mkV1ComponentStatusList v1ComponentStatusListItems =
V1ComponentStatusList
{ v1ComponentStatusListApiVersion = Nothing
, v1ComponentStatusListItems
, v1ComponentStatusListKind = Nothing
, v1ComponentStatusListMetadata = Nothing
}
data V1ConfigMap = V1ConfigMap
{ v1ConfigMapApiVersion :: !(Maybe Text)
, v1ConfigMapBinaryData :: !(Maybe (Map.Map String ByteArray))
, v1ConfigMapData :: !(Maybe (Map.Map String Text))
, v1ConfigMapKind :: !(Maybe Text)
, v1ConfigMapMetadata :: !(Maybe V1ObjectMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ConfigMap where
parseJSON = A.withObject "V1ConfigMap" $ \o ->
V1ConfigMap
<$> (o .:? "apiVersion")
<*> (o .:? "binaryData")
<*> (o .:? "data")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ConfigMap where
toJSON V1ConfigMap {..} =
_omitNulls
[ "apiVersion" .= v1ConfigMapApiVersion
, "binaryData" .= v1ConfigMapBinaryData
, "data" .= v1ConfigMapData
, "kind" .= v1ConfigMapKind
, "metadata" .= v1ConfigMapMetadata
]
mkV1ConfigMap
:: V1ConfigMap
mkV1ConfigMap =
V1ConfigMap
{ v1ConfigMapApiVersion = Nothing
, v1ConfigMapBinaryData = Nothing
, v1ConfigMapData = Nothing
, v1ConfigMapKind = Nothing
, v1ConfigMapMetadata = Nothing
}
data V1ConfigMapEnvSource = V1ConfigMapEnvSource
{ v1ConfigMapEnvSourceName :: !(Maybe Text)
, v1ConfigMapEnvSourceOptional :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ConfigMapEnvSource where
parseJSON = A.withObject "V1ConfigMapEnvSource" $ \o ->
V1ConfigMapEnvSource
<$> (o .:? "name")
<*> (o .:? "optional")
instance A.ToJSON V1ConfigMapEnvSource where
toJSON V1ConfigMapEnvSource {..} =
_omitNulls
[ "name" .= v1ConfigMapEnvSourceName
, "optional" .= v1ConfigMapEnvSourceOptional
]
mkV1ConfigMapEnvSource
:: V1ConfigMapEnvSource
mkV1ConfigMapEnvSource =
V1ConfigMapEnvSource
{ v1ConfigMapEnvSourceName = Nothing
, v1ConfigMapEnvSourceOptional = Nothing
}
data V1ConfigMapKeySelector = V1ConfigMapKeySelector
{ v1ConfigMapKeySelectorKey :: !(Text)
, v1ConfigMapKeySelectorName :: !(Maybe Text)
, v1ConfigMapKeySelectorOptional :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ConfigMapKeySelector where
parseJSON = A.withObject "V1ConfigMapKeySelector" $ \o ->
V1ConfigMapKeySelector
<$> (o .: "key")
<*> (o .:? "name")
<*> (o .:? "optional")
instance A.ToJSON V1ConfigMapKeySelector where
toJSON V1ConfigMapKeySelector {..} =
_omitNulls
[ "key" .= v1ConfigMapKeySelectorKey
, "name" .= v1ConfigMapKeySelectorName
, "optional" .= v1ConfigMapKeySelectorOptional
]
mkV1ConfigMapKeySelector
:: Text
-> V1ConfigMapKeySelector
mkV1ConfigMapKeySelector v1ConfigMapKeySelectorKey =
V1ConfigMapKeySelector
{ v1ConfigMapKeySelectorKey
, v1ConfigMapKeySelectorName = Nothing
, v1ConfigMapKeySelectorOptional = Nothing
}
data V1ConfigMapList = V1ConfigMapList
{ v1ConfigMapListApiVersion :: !(Maybe Text)
, v1ConfigMapListItems :: !([V1ConfigMap])
, v1ConfigMapListKind :: !(Maybe Text)
, v1ConfigMapListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ConfigMapList where
parseJSON = A.withObject "V1ConfigMapList" $ \o ->
V1ConfigMapList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ConfigMapList where
toJSON V1ConfigMapList {..} =
_omitNulls
[ "apiVersion" .= v1ConfigMapListApiVersion
, "items" .= v1ConfigMapListItems
, "kind" .= v1ConfigMapListKind
, "metadata" .= v1ConfigMapListMetadata
]
mkV1ConfigMapList
:: [V1ConfigMap]
-> V1ConfigMapList
mkV1ConfigMapList v1ConfigMapListItems =
V1ConfigMapList
{ v1ConfigMapListApiVersion = Nothing
, v1ConfigMapListItems
, v1ConfigMapListKind = Nothing
, v1ConfigMapListMetadata = Nothing
}
data V1ConfigMapNodeConfigSource = V1ConfigMapNodeConfigSource
{ v1ConfigMapNodeConfigSourceKubeletConfigKey :: !(Text)
, v1ConfigMapNodeConfigSourceName :: !(Text)
, v1ConfigMapNodeConfigSourceNamespace :: !(Text)
, v1ConfigMapNodeConfigSourceResourceVersion :: !(Maybe Text)
, v1ConfigMapNodeConfigSourceUid :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ConfigMapNodeConfigSource where
parseJSON = A.withObject "V1ConfigMapNodeConfigSource" $ \o ->
V1ConfigMapNodeConfigSource
<$> (o .: "kubeletConfigKey")
<*> (o .: "name")
<*> (o .: "namespace")
<*> (o .:? "resourceVersion")
<*> (o .:? "uid")
instance A.ToJSON V1ConfigMapNodeConfigSource where
toJSON V1ConfigMapNodeConfigSource {..} =
_omitNulls
[ "kubeletConfigKey" .= v1ConfigMapNodeConfigSourceKubeletConfigKey
, "name" .= v1ConfigMapNodeConfigSourceName
, "namespace" .= v1ConfigMapNodeConfigSourceNamespace
, "resourceVersion" .= v1ConfigMapNodeConfigSourceResourceVersion
, "uid" .= v1ConfigMapNodeConfigSourceUid
]
mkV1ConfigMapNodeConfigSource
:: Text
-> Text
-> Text
-> V1ConfigMapNodeConfigSource
mkV1ConfigMapNodeConfigSource v1ConfigMapNodeConfigSourceKubeletConfigKey v1ConfigMapNodeConfigSourceName v1ConfigMapNodeConfigSourceNamespace =
V1ConfigMapNodeConfigSource
{ v1ConfigMapNodeConfigSourceKubeletConfigKey
, v1ConfigMapNodeConfigSourceName
, v1ConfigMapNodeConfigSourceNamespace
, v1ConfigMapNodeConfigSourceResourceVersion = Nothing
, v1ConfigMapNodeConfigSourceUid = Nothing
}
data V1ConfigMapProjection = V1ConfigMapProjection
{ v1ConfigMapProjectionItems :: !(Maybe [V1KeyToPath])
, v1ConfigMapProjectionName :: !(Maybe Text)
, v1ConfigMapProjectionOptional :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ConfigMapProjection where
parseJSON = A.withObject "V1ConfigMapProjection" $ \o ->
V1ConfigMapProjection
<$> (o .:? "items")
<*> (o .:? "name")
<*> (o .:? "optional")
instance A.ToJSON V1ConfigMapProjection where
toJSON V1ConfigMapProjection {..} =
_omitNulls
[ "items" .= v1ConfigMapProjectionItems
, "name" .= v1ConfigMapProjectionName
, "optional" .= v1ConfigMapProjectionOptional
]
mkV1ConfigMapProjection
:: V1ConfigMapProjection
mkV1ConfigMapProjection =
V1ConfigMapProjection
{ v1ConfigMapProjectionItems = Nothing
, v1ConfigMapProjectionName = Nothing
, v1ConfigMapProjectionOptional = Nothing
}
data V1ConfigMapVolumeSource = V1ConfigMapVolumeSource
{ v1ConfigMapVolumeSourceDefaultMode :: !(Maybe Int)
, v1ConfigMapVolumeSourceItems :: !(Maybe [V1KeyToPath])
, v1ConfigMapVolumeSourceName :: !(Maybe Text)
, v1ConfigMapVolumeSourceOptional :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ConfigMapVolumeSource where
parseJSON = A.withObject "V1ConfigMapVolumeSource" $ \o ->
V1ConfigMapVolumeSource
<$> (o .:? "defaultMode")
<*> (o .:? "items")
<*> (o .:? "name")
<*> (o .:? "optional")
instance A.ToJSON V1ConfigMapVolumeSource where
toJSON V1ConfigMapVolumeSource {..} =
_omitNulls
[ "defaultMode" .= v1ConfigMapVolumeSourceDefaultMode
, "items" .= v1ConfigMapVolumeSourceItems
, "name" .= v1ConfigMapVolumeSourceName
, "optional" .= v1ConfigMapVolumeSourceOptional
]
mkV1ConfigMapVolumeSource
:: V1ConfigMapVolumeSource
mkV1ConfigMapVolumeSource =
V1ConfigMapVolumeSource
{ v1ConfigMapVolumeSourceDefaultMode = Nothing
, v1ConfigMapVolumeSourceItems = Nothing
, v1ConfigMapVolumeSourceName = Nothing
, v1ConfigMapVolumeSourceOptional = Nothing
}
data V1Container = V1Container
{ v1ContainerArgs :: !(Maybe [Text])
, v1ContainerCommand :: !(Maybe [Text])
, v1ContainerEnv :: !(Maybe [V1EnvVar])
, v1ContainerEnvFrom :: !(Maybe [V1EnvFromSource])
, v1ContainerImage :: !(Maybe Text)
, v1ContainerImagePullPolicy :: !(Maybe Text)
, v1ContainerLifecycle :: !(Maybe V1Lifecycle)
, v1ContainerLivenessProbe :: !(Maybe V1Probe)
, v1ContainerName :: !(Text)
, v1ContainerPorts :: !(Maybe [V1ContainerPort])
, v1ContainerReadinessProbe :: !(Maybe V1Probe)
, v1ContainerResources :: !(Maybe V1ResourceRequirements)
, v1ContainerSecurityContext :: !(Maybe V1SecurityContext)
, v1ContainerStdin :: !(Maybe Bool)
, v1ContainerStdinOnce :: !(Maybe Bool)
, v1ContainerTerminationMessagePath :: !(Maybe Text)
, v1ContainerTerminationMessagePolicy :: !(Maybe Text)
, v1ContainerTty :: !(Maybe Bool)
, v1ContainerVolumeDevices :: !(Maybe [V1VolumeDevice])
, v1ContainerVolumeMounts :: !(Maybe [V1VolumeMount])
, v1ContainerWorkingDir :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Container where
parseJSON = A.withObject "V1Container" $ \o ->
V1Container
<$> (o .:? "args")
<*> (o .:? "command")
<*> (o .:? "env")
<*> (o .:? "envFrom")
<*> (o .:? "image")
<*> (o .:? "imagePullPolicy")
<*> (o .:? "lifecycle")
<*> (o .:? "livenessProbe")
<*> (o .: "name")
<*> (o .:? "ports")
<*> (o .:? "readinessProbe")
<*> (o .:? "resources")
<*> (o .:? "securityContext")
<*> (o .:? "stdin")
<*> (o .:? "stdinOnce")
<*> (o .:? "terminationMessagePath")
<*> (o .:? "terminationMessagePolicy")
<*> (o .:? "tty")
<*> (o .:? "volumeDevices")
<*> (o .:? "volumeMounts")
<*> (o .:? "workingDir")
instance A.ToJSON V1Container where
toJSON V1Container {..} =
_omitNulls
[ "args" .= v1ContainerArgs
, "command" .= v1ContainerCommand
, "env" .= v1ContainerEnv
, "envFrom" .= v1ContainerEnvFrom
, "image" .= v1ContainerImage
, "imagePullPolicy" .= v1ContainerImagePullPolicy
, "lifecycle" .= v1ContainerLifecycle
, "livenessProbe" .= v1ContainerLivenessProbe
, "name" .= v1ContainerName
, "ports" .= v1ContainerPorts
, "readinessProbe" .= v1ContainerReadinessProbe
, "resources" .= v1ContainerResources
, "securityContext" .= v1ContainerSecurityContext
, "stdin" .= v1ContainerStdin
, "stdinOnce" .= v1ContainerStdinOnce
, "terminationMessagePath" .= v1ContainerTerminationMessagePath
, "terminationMessagePolicy" .= v1ContainerTerminationMessagePolicy
, "tty" .= v1ContainerTty
, "volumeDevices" .= v1ContainerVolumeDevices
, "volumeMounts" .= v1ContainerVolumeMounts
, "workingDir" .= v1ContainerWorkingDir
]
mkV1Container
:: Text
-> V1Container
mkV1Container v1ContainerName =
V1Container
{ v1ContainerArgs = Nothing
, v1ContainerCommand = Nothing
, v1ContainerEnv = Nothing
, v1ContainerEnvFrom = Nothing
, v1ContainerImage = Nothing
, v1ContainerImagePullPolicy = Nothing
, v1ContainerLifecycle = Nothing
, v1ContainerLivenessProbe = Nothing
, v1ContainerName
, v1ContainerPorts = Nothing
, v1ContainerReadinessProbe = Nothing
, v1ContainerResources = Nothing
, v1ContainerSecurityContext = Nothing
, v1ContainerStdin = Nothing
, v1ContainerStdinOnce = Nothing
, v1ContainerTerminationMessagePath = Nothing
, v1ContainerTerminationMessagePolicy = Nothing
, v1ContainerTty = Nothing
, v1ContainerVolumeDevices = Nothing
, v1ContainerVolumeMounts = Nothing
, v1ContainerWorkingDir = Nothing
}
data V1ContainerImage = V1ContainerImage
{ v1ContainerImageNames :: !([Text])
, v1ContainerImageSizeBytes :: !(Maybe Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ContainerImage where
parseJSON = A.withObject "V1ContainerImage" $ \o ->
V1ContainerImage
<$> (o .: "names")
<*> (o .:? "sizeBytes")
instance A.ToJSON V1ContainerImage where
toJSON V1ContainerImage {..} =
_omitNulls
[ "names" .= v1ContainerImageNames
, "sizeBytes" .= v1ContainerImageSizeBytes
]
mkV1ContainerImage
:: [Text]
-> V1ContainerImage
mkV1ContainerImage v1ContainerImageNames =
V1ContainerImage
{ v1ContainerImageNames
, v1ContainerImageSizeBytes = Nothing
}
data V1ContainerPort = V1ContainerPort
{ v1ContainerPortContainerPort :: !(Int)
, v1ContainerPortHostIp :: !(Maybe Text)
, v1ContainerPortHostPort :: !(Maybe Int)
, v1ContainerPortName :: !(Maybe Text)
, v1ContainerPortProtocol :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ContainerPort where
parseJSON = A.withObject "V1ContainerPort" $ \o ->
V1ContainerPort
<$> (o .: "containerPort")
<*> (o .:? "hostIP")
<*> (o .:? "hostPort")
<*> (o .:? "name")
<*> (o .:? "protocol")
instance A.ToJSON V1ContainerPort where
toJSON V1ContainerPort {..} =
_omitNulls
[ "containerPort" .= v1ContainerPortContainerPort
, "hostIP" .= v1ContainerPortHostIp
, "hostPort" .= v1ContainerPortHostPort
, "name" .= v1ContainerPortName
, "protocol" .= v1ContainerPortProtocol
]
mkV1ContainerPort
:: Int
-> V1ContainerPort
mkV1ContainerPort v1ContainerPortContainerPort =
V1ContainerPort
{ v1ContainerPortContainerPort
, v1ContainerPortHostIp = Nothing
, v1ContainerPortHostPort = Nothing
, v1ContainerPortName = Nothing
, v1ContainerPortProtocol = Nothing
}
data V1ContainerState = V1ContainerState
{ v1ContainerStateRunning :: !(Maybe V1ContainerStateRunning)
, v1ContainerStateTerminated :: !(Maybe V1ContainerStateTerminated)
, v1ContainerStateWaiting :: !(Maybe V1ContainerStateWaiting)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ContainerState where
parseJSON = A.withObject "V1ContainerState" $ \o ->
V1ContainerState
<$> (o .:? "running")
<*> (o .:? "terminated")
<*> (o .:? "waiting")
instance A.ToJSON V1ContainerState where
toJSON V1ContainerState {..} =
_omitNulls
[ "running" .= v1ContainerStateRunning
, "terminated" .= v1ContainerStateTerminated
, "waiting" .= v1ContainerStateWaiting
]
mkV1ContainerState
:: V1ContainerState
mkV1ContainerState =
V1ContainerState
{ v1ContainerStateRunning = Nothing
, v1ContainerStateTerminated = Nothing
, v1ContainerStateWaiting = Nothing
}
data V1ContainerStateRunning = V1ContainerStateRunning
{ v1ContainerStateRunningStartedAt :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ContainerStateRunning where
parseJSON = A.withObject "V1ContainerStateRunning" $ \o ->
V1ContainerStateRunning
<$> (o .:? "startedAt")
instance A.ToJSON V1ContainerStateRunning where
toJSON V1ContainerStateRunning {..} =
_omitNulls
[ "startedAt" .= v1ContainerStateRunningStartedAt
]
mkV1ContainerStateRunning
:: V1ContainerStateRunning
mkV1ContainerStateRunning =
V1ContainerStateRunning
{ v1ContainerStateRunningStartedAt = Nothing
}
data V1ContainerStateTerminated = V1ContainerStateTerminated
{ v1ContainerStateTerminatedContainerId :: !(Maybe Text)
, v1ContainerStateTerminatedExitCode :: !(Int)
, v1ContainerStateTerminatedFinishedAt :: !(Maybe DateTime)
, v1ContainerStateTerminatedMessage :: !(Maybe Text)
, v1ContainerStateTerminatedReason :: !(Maybe Text)
, v1ContainerStateTerminatedSignal :: !(Maybe Int)
, v1ContainerStateTerminatedStartedAt :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ContainerStateTerminated where
parseJSON = A.withObject "V1ContainerStateTerminated" $ \o ->
V1ContainerStateTerminated
<$> (o .:? "containerID")
<*> (o .: "exitCode")
<*> (o .:? "finishedAt")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .:? "signal")
<*> (o .:? "startedAt")
instance A.ToJSON V1ContainerStateTerminated where
toJSON V1ContainerStateTerminated {..} =
_omitNulls
[ "containerID" .= v1ContainerStateTerminatedContainerId
, "exitCode" .= v1ContainerStateTerminatedExitCode
, "finishedAt" .= v1ContainerStateTerminatedFinishedAt
, "message" .= v1ContainerStateTerminatedMessage
, "reason" .= v1ContainerStateTerminatedReason
, "signal" .= v1ContainerStateTerminatedSignal
, "startedAt" .= v1ContainerStateTerminatedStartedAt
]
mkV1ContainerStateTerminated
:: Int
-> V1ContainerStateTerminated
mkV1ContainerStateTerminated v1ContainerStateTerminatedExitCode =
V1ContainerStateTerminated
{ v1ContainerStateTerminatedContainerId = Nothing
, v1ContainerStateTerminatedExitCode
, v1ContainerStateTerminatedFinishedAt = Nothing
, v1ContainerStateTerminatedMessage = Nothing
, v1ContainerStateTerminatedReason = Nothing
, v1ContainerStateTerminatedSignal = Nothing
, v1ContainerStateTerminatedStartedAt = Nothing
}
data V1ContainerStateWaiting = V1ContainerStateWaiting
{ v1ContainerStateWaitingMessage :: !(Maybe Text)
, v1ContainerStateWaitingReason :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ContainerStateWaiting where
parseJSON = A.withObject "V1ContainerStateWaiting" $ \o ->
V1ContainerStateWaiting
<$> (o .:? "message")
<*> (o .:? "reason")
instance A.ToJSON V1ContainerStateWaiting where
toJSON V1ContainerStateWaiting {..} =
_omitNulls
[ "message" .= v1ContainerStateWaitingMessage
, "reason" .= v1ContainerStateWaitingReason
]
mkV1ContainerStateWaiting
:: V1ContainerStateWaiting
mkV1ContainerStateWaiting =
V1ContainerStateWaiting
{ v1ContainerStateWaitingMessage = Nothing
, v1ContainerStateWaitingReason = Nothing
}
data V1ContainerStatus = V1ContainerStatus
{ v1ContainerStatusContainerId :: !(Maybe Text)
, v1ContainerStatusImage :: !(Text)
, v1ContainerStatusImageId :: !(Text)
, v1ContainerStatusLastState :: !(Maybe V1ContainerState)
, v1ContainerStatusName :: !(Text)
, v1ContainerStatusReady :: !(Bool)
, v1ContainerStatusRestartCount :: !(Int)
, v1ContainerStatusState :: !(Maybe V1ContainerState)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ContainerStatus where
parseJSON = A.withObject "V1ContainerStatus" $ \o ->
V1ContainerStatus
<$> (o .:? "containerID")
<*> (o .: "image")
<*> (o .: "imageID")
<*> (o .:? "lastState")
<*> (o .: "name")
<*> (o .: "ready")
<*> (o .: "restartCount")
<*> (o .:? "state")
instance A.ToJSON V1ContainerStatus where
toJSON V1ContainerStatus {..} =
_omitNulls
[ "containerID" .= v1ContainerStatusContainerId
, "image" .= v1ContainerStatusImage
, "imageID" .= v1ContainerStatusImageId
, "lastState" .= v1ContainerStatusLastState
, "name" .= v1ContainerStatusName
, "ready" .= v1ContainerStatusReady
, "restartCount" .= v1ContainerStatusRestartCount
, "state" .= v1ContainerStatusState
]
mkV1ContainerStatus
:: Text
-> Text
-> Text
-> Bool
-> Int
-> V1ContainerStatus
mkV1ContainerStatus v1ContainerStatusImage v1ContainerStatusImageId v1ContainerStatusName v1ContainerStatusReady v1ContainerStatusRestartCount =
V1ContainerStatus
{ v1ContainerStatusContainerId = Nothing
, v1ContainerStatusImage
, v1ContainerStatusImageId
, v1ContainerStatusLastState = Nothing
, v1ContainerStatusName
, v1ContainerStatusReady
, v1ContainerStatusRestartCount
, v1ContainerStatusState = Nothing
}
data V1ControllerRevision = V1ControllerRevision
{ v1ControllerRevisionApiVersion :: !(Maybe Text)
, v1ControllerRevisionData :: !(Maybe RuntimeRawExtension)
, v1ControllerRevisionKind :: !(Maybe Text)
, v1ControllerRevisionMetadata :: !(Maybe V1ObjectMeta)
, v1ControllerRevisionRevision :: !(Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ControllerRevision where
parseJSON = A.withObject "V1ControllerRevision" $ \o ->
V1ControllerRevision
<$> (o .:? "apiVersion")
<*> (o .:? "data")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "revision")
instance A.ToJSON V1ControllerRevision where
toJSON V1ControllerRevision {..} =
_omitNulls
[ "apiVersion" .= v1ControllerRevisionApiVersion
, "data" .= v1ControllerRevisionData
, "kind" .= v1ControllerRevisionKind
, "metadata" .= v1ControllerRevisionMetadata
, "revision" .= v1ControllerRevisionRevision
]
mkV1ControllerRevision
:: Integer
-> V1ControllerRevision
mkV1ControllerRevision v1ControllerRevisionRevision =
V1ControllerRevision
{ v1ControllerRevisionApiVersion = Nothing
, v1ControllerRevisionData = Nothing
, v1ControllerRevisionKind = Nothing
, v1ControllerRevisionMetadata = Nothing
, v1ControllerRevisionRevision
}
data V1ControllerRevisionList = V1ControllerRevisionList
{ v1ControllerRevisionListApiVersion :: !(Maybe Text)
, v1ControllerRevisionListItems :: !([V1ControllerRevision])
, v1ControllerRevisionListKind :: !(Maybe Text)
, v1ControllerRevisionListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ControllerRevisionList where
parseJSON = A.withObject "V1ControllerRevisionList" $ \o ->
V1ControllerRevisionList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ControllerRevisionList where
toJSON V1ControllerRevisionList {..} =
_omitNulls
[ "apiVersion" .= v1ControllerRevisionListApiVersion
, "items" .= v1ControllerRevisionListItems
, "kind" .= v1ControllerRevisionListKind
, "metadata" .= v1ControllerRevisionListMetadata
]
mkV1ControllerRevisionList
:: [V1ControllerRevision]
-> V1ControllerRevisionList
mkV1ControllerRevisionList v1ControllerRevisionListItems =
V1ControllerRevisionList
{ v1ControllerRevisionListApiVersion = Nothing
, v1ControllerRevisionListItems
, v1ControllerRevisionListKind = Nothing
, v1ControllerRevisionListMetadata = Nothing
}
data V1CrossVersionObjectReference = V1CrossVersionObjectReference
{ v1CrossVersionObjectReferenceApiVersion :: !(Maybe Text)
, v1CrossVersionObjectReferenceKind :: !(Text)
, v1CrossVersionObjectReferenceName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1CrossVersionObjectReference where
parseJSON = A.withObject "V1CrossVersionObjectReference" $ \o ->
V1CrossVersionObjectReference
<$> (o .:? "apiVersion")
<*> (o .: "kind")
<*> (o .: "name")
instance A.ToJSON V1CrossVersionObjectReference where
toJSON V1CrossVersionObjectReference {..} =
_omitNulls
[ "apiVersion" .= v1CrossVersionObjectReferenceApiVersion
, "kind" .= v1CrossVersionObjectReferenceKind
, "name" .= v1CrossVersionObjectReferenceName
]
mkV1CrossVersionObjectReference
:: Text
-> Text
-> V1CrossVersionObjectReference
mkV1CrossVersionObjectReference v1CrossVersionObjectReferenceKind v1CrossVersionObjectReferenceName =
V1CrossVersionObjectReference
{ v1CrossVersionObjectReferenceApiVersion = Nothing
, v1CrossVersionObjectReferenceKind
, v1CrossVersionObjectReferenceName
}
data V1DaemonEndpoint = V1DaemonEndpoint
{ v1DaemonEndpointPort :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DaemonEndpoint where
parseJSON = A.withObject "V1DaemonEndpoint" $ \o ->
V1DaemonEndpoint
<$> (o .: "Port")
instance A.ToJSON V1DaemonEndpoint where
toJSON V1DaemonEndpoint {..} =
_omitNulls
[ "Port" .= v1DaemonEndpointPort
]
mkV1DaemonEndpoint
:: Int
-> V1DaemonEndpoint
mkV1DaemonEndpoint v1DaemonEndpointPort =
V1DaemonEndpoint
{ v1DaemonEndpointPort
}
data V1DaemonSet = V1DaemonSet
{ v1DaemonSetApiVersion :: !(Maybe Text)
, v1DaemonSetKind :: !(Maybe Text)
, v1DaemonSetMetadata :: !(Maybe V1ObjectMeta)
, v1DaemonSetSpec :: !(Maybe V1DaemonSetSpec)
, v1DaemonSetStatus :: !(Maybe V1DaemonSetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DaemonSet where
parseJSON = A.withObject "V1DaemonSet" $ \o ->
V1DaemonSet
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1DaemonSet where
toJSON V1DaemonSet {..} =
_omitNulls
[ "apiVersion" .= v1DaemonSetApiVersion
, "kind" .= v1DaemonSetKind
, "metadata" .= v1DaemonSetMetadata
, "spec" .= v1DaemonSetSpec
, "status" .= v1DaemonSetStatus
]
mkV1DaemonSet
:: V1DaemonSet
mkV1DaemonSet =
V1DaemonSet
{ v1DaemonSetApiVersion = Nothing
, v1DaemonSetKind = Nothing
, v1DaemonSetMetadata = Nothing
, v1DaemonSetSpec = Nothing
, v1DaemonSetStatus = Nothing
}
data V1DaemonSetCondition = V1DaemonSetCondition
{ v1DaemonSetConditionLastTransitionTime :: !(Maybe DateTime)
, v1DaemonSetConditionMessage :: !(Maybe Text)
, v1DaemonSetConditionReason :: !(Maybe Text)
, v1DaemonSetConditionStatus :: !(Text)
, v1DaemonSetConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DaemonSetCondition where
parseJSON = A.withObject "V1DaemonSetCondition" $ \o ->
V1DaemonSetCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1DaemonSetCondition where
toJSON V1DaemonSetCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1DaemonSetConditionLastTransitionTime
, "message" .= v1DaemonSetConditionMessage
, "reason" .= v1DaemonSetConditionReason
, "status" .= v1DaemonSetConditionStatus
, "type" .= v1DaemonSetConditionType
]
mkV1DaemonSetCondition
:: Text
-> Text
-> V1DaemonSetCondition
mkV1DaemonSetCondition v1DaemonSetConditionStatus v1DaemonSetConditionType =
V1DaemonSetCondition
{ v1DaemonSetConditionLastTransitionTime = Nothing
, v1DaemonSetConditionMessage = Nothing
, v1DaemonSetConditionReason = Nothing
, v1DaemonSetConditionStatus
, v1DaemonSetConditionType
}
data V1DaemonSetList = V1DaemonSetList
{ v1DaemonSetListApiVersion :: !(Maybe Text)
, v1DaemonSetListItems :: !([V1DaemonSet])
, v1DaemonSetListKind :: !(Maybe Text)
, v1DaemonSetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DaemonSetList where
parseJSON = A.withObject "V1DaemonSetList" $ \o ->
V1DaemonSetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1DaemonSetList where
toJSON V1DaemonSetList {..} =
_omitNulls
[ "apiVersion" .= v1DaemonSetListApiVersion
, "items" .= v1DaemonSetListItems
, "kind" .= v1DaemonSetListKind
, "metadata" .= v1DaemonSetListMetadata
]
mkV1DaemonSetList
:: [V1DaemonSet]
-> V1DaemonSetList
mkV1DaemonSetList v1DaemonSetListItems =
V1DaemonSetList
{ v1DaemonSetListApiVersion = Nothing
, v1DaemonSetListItems
, v1DaemonSetListKind = Nothing
, v1DaemonSetListMetadata = Nothing
}
data V1DaemonSetSpec = V1DaemonSetSpec
{ v1DaemonSetSpecMinReadySeconds :: !(Maybe Int)
, v1DaemonSetSpecRevisionHistoryLimit :: !(Maybe Int)
, v1DaemonSetSpecSelector :: !(V1LabelSelector)
, v1DaemonSetSpecTemplate :: !(V1PodTemplateSpec)
, v1DaemonSetSpecUpdateStrategy :: !(Maybe V1DaemonSetUpdateStrategy)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DaemonSetSpec where
parseJSON = A.withObject "V1DaemonSetSpec" $ \o ->
V1DaemonSetSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "revisionHistoryLimit")
<*> (o .: "selector")
<*> (o .: "template")
<*> (o .:? "updateStrategy")
instance A.ToJSON V1DaemonSetSpec where
toJSON V1DaemonSetSpec {..} =
_omitNulls
[ "minReadySeconds" .= v1DaemonSetSpecMinReadySeconds
, "revisionHistoryLimit" .= v1DaemonSetSpecRevisionHistoryLimit
, "selector" .= v1DaemonSetSpecSelector
, "template" .= v1DaemonSetSpecTemplate
, "updateStrategy" .= v1DaemonSetSpecUpdateStrategy
]
mkV1DaemonSetSpec
:: V1LabelSelector
-> V1PodTemplateSpec
-> V1DaemonSetSpec
mkV1DaemonSetSpec v1DaemonSetSpecSelector v1DaemonSetSpecTemplate =
V1DaemonSetSpec
{ v1DaemonSetSpecMinReadySeconds = Nothing
, v1DaemonSetSpecRevisionHistoryLimit = Nothing
, v1DaemonSetSpecSelector
, v1DaemonSetSpecTemplate
, v1DaemonSetSpecUpdateStrategy = Nothing
}
data V1DaemonSetStatus = V1DaemonSetStatus
{ v1DaemonSetStatusCollisionCount :: !(Maybe Int)
, v1DaemonSetStatusConditions :: !(Maybe [V1DaemonSetCondition])
, v1DaemonSetStatusCurrentNumberScheduled :: !(Int)
, v1DaemonSetStatusDesiredNumberScheduled :: !(Int)
, v1DaemonSetStatusNumberAvailable :: !(Maybe Int)
, v1DaemonSetStatusNumberMisscheduled :: !(Int)
, v1DaemonSetStatusNumberReady :: !(Int)
, v1DaemonSetStatusNumberUnavailable :: !(Maybe Int)
, v1DaemonSetStatusObservedGeneration :: !(Maybe Integer)
, v1DaemonSetStatusUpdatedNumberScheduled :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DaemonSetStatus where
parseJSON = A.withObject "V1DaemonSetStatus" $ \o ->
V1DaemonSetStatus
<$> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .: "currentNumberScheduled")
<*> (o .: "desiredNumberScheduled")
<*> (o .:? "numberAvailable")
<*> (o .: "numberMisscheduled")
<*> (o .: "numberReady")
<*> (o .:? "numberUnavailable")
<*> (o .:? "observedGeneration")
<*> (o .:? "updatedNumberScheduled")
instance A.ToJSON V1DaemonSetStatus where
toJSON V1DaemonSetStatus {..} =
_omitNulls
[ "collisionCount" .= v1DaemonSetStatusCollisionCount
, "conditions" .= v1DaemonSetStatusConditions
, "currentNumberScheduled" .= v1DaemonSetStatusCurrentNumberScheduled
, "desiredNumberScheduled" .= v1DaemonSetStatusDesiredNumberScheduled
, "numberAvailable" .= v1DaemonSetStatusNumberAvailable
, "numberMisscheduled" .= v1DaemonSetStatusNumberMisscheduled
, "numberReady" .= v1DaemonSetStatusNumberReady
, "numberUnavailable" .= v1DaemonSetStatusNumberUnavailable
, "observedGeneration" .= v1DaemonSetStatusObservedGeneration
, "updatedNumberScheduled" .= v1DaemonSetStatusUpdatedNumberScheduled
]
mkV1DaemonSetStatus
:: Int
-> Int
-> Int
-> Int
-> V1DaemonSetStatus
mkV1DaemonSetStatus v1DaemonSetStatusCurrentNumberScheduled v1DaemonSetStatusDesiredNumberScheduled v1DaemonSetStatusNumberMisscheduled v1DaemonSetStatusNumberReady =
V1DaemonSetStatus
{ v1DaemonSetStatusCollisionCount = Nothing
, v1DaemonSetStatusConditions = Nothing
, v1DaemonSetStatusCurrentNumberScheduled
, v1DaemonSetStatusDesiredNumberScheduled
, v1DaemonSetStatusNumberAvailable = Nothing
, v1DaemonSetStatusNumberMisscheduled
, v1DaemonSetStatusNumberReady
, v1DaemonSetStatusNumberUnavailable = Nothing
, v1DaemonSetStatusObservedGeneration = Nothing
, v1DaemonSetStatusUpdatedNumberScheduled = Nothing
}
data V1DaemonSetUpdateStrategy = V1DaemonSetUpdateStrategy
{ v1DaemonSetUpdateStrategyRollingUpdate :: !(Maybe V1RollingUpdateDaemonSet)
, v1DaemonSetUpdateStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DaemonSetUpdateStrategy where
parseJSON = A.withObject "V1DaemonSetUpdateStrategy" $ \o ->
V1DaemonSetUpdateStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON V1DaemonSetUpdateStrategy where
toJSON V1DaemonSetUpdateStrategy {..} =
_omitNulls
[ "rollingUpdate" .= v1DaemonSetUpdateStrategyRollingUpdate
, "type" .= v1DaemonSetUpdateStrategyType
]
mkV1DaemonSetUpdateStrategy
:: V1DaemonSetUpdateStrategy
mkV1DaemonSetUpdateStrategy =
V1DaemonSetUpdateStrategy
{ v1DaemonSetUpdateStrategyRollingUpdate = Nothing
, v1DaemonSetUpdateStrategyType = Nothing
}
data V1DeleteOptions = V1DeleteOptions
{ v1DeleteOptionsApiVersion :: !(Maybe Text)
, v1DeleteOptionsDryRun :: !(Maybe [Text])
, v1DeleteOptionsGracePeriodSeconds :: !(Maybe Integer)
, v1DeleteOptionsKind :: !(Maybe Text)
, v1DeleteOptionsOrphanDependents :: !(Maybe Bool)
, v1DeleteOptionsPreconditions :: !(Maybe V1Preconditions)
, v1DeleteOptionsPropagationPolicy :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DeleteOptions where
parseJSON = A.withObject "V1DeleteOptions" $ \o ->
V1DeleteOptions
<$> (o .:? "apiVersion")
<*> (o .:? "dryRun")
<*> (o .:? "gracePeriodSeconds")
<*> (o .:? "kind")
<*> (o .:? "orphanDependents")
<*> (o .:? "preconditions")
<*> (o .:? "propagationPolicy")
instance A.ToJSON V1DeleteOptions where
toJSON V1DeleteOptions {..} =
_omitNulls
[ "apiVersion" .= v1DeleteOptionsApiVersion
, "dryRun" .= v1DeleteOptionsDryRun
, "gracePeriodSeconds" .= v1DeleteOptionsGracePeriodSeconds
, "kind" .= v1DeleteOptionsKind
, "orphanDependents" .= v1DeleteOptionsOrphanDependents
, "preconditions" .= v1DeleteOptionsPreconditions
, "propagationPolicy" .= v1DeleteOptionsPropagationPolicy
]
mkV1DeleteOptions
:: V1DeleteOptions
mkV1DeleteOptions =
V1DeleteOptions
{ v1DeleteOptionsApiVersion = Nothing
, v1DeleteOptionsDryRun = Nothing
, v1DeleteOptionsGracePeriodSeconds = Nothing
, v1DeleteOptionsKind = Nothing
, v1DeleteOptionsOrphanDependents = Nothing
, v1DeleteOptionsPreconditions = Nothing
, v1DeleteOptionsPropagationPolicy = Nothing
}
data V1Deployment = V1Deployment
{ v1DeploymentApiVersion :: !(Maybe Text)
, v1DeploymentKind :: !(Maybe Text)
, v1DeploymentMetadata :: !(Maybe V1ObjectMeta)
, v1DeploymentSpec :: !(Maybe V1DeploymentSpec)
, v1DeploymentStatus :: !(Maybe V1DeploymentStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Deployment where
parseJSON = A.withObject "V1Deployment" $ \o ->
V1Deployment
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1Deployment where
toJSON V1Deployment {..} =
_omitNulls
[ "apiVersion" .= v1DeploymentApiVersion
, "kind" .= v1DeploymentKind
, "metadata" .= v1DeploymentMetadata
, "spec" .= v1DeploymentSpec
, "status" .= v1DeploymentStatus
]
mkV1Deployment
:: V1Deployment
mkV1Deployment =
V1Deployment
{ v1DeploymentApiVersion = Nothing
, v1DeploymentKind = Nothing
, v1DeploymentMetadata = Nothing
, v1DeploymentSpec = Nothing
, v1DeploymentStatus = Nothing
}
data V1DeploymentCondition = V1DeploymentCondition
{ v1DeploymentConditionLastTransitionTime :: !(Maybe DateTime)
, v1DeploymentConditionLastUpdateTime :: !(Maybe DateTime)
, v1DeploymentConditionMessage :: !(Maybe Text)
, v1DeploymentConditionReason :: !(Maybe Text)
, v1DeploymentConditionStatus :: !(Text)
, v1DeploymentConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DeploymentCondition where
parseJSON = A.withObject "V1DeploymentCondition" $ \o ->
V1DeploymentCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "lastUpdateTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1DeploymentCondition where
toJSON V1DeploymentCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1DeploymentConditionLastTransitionTime
, "lastUpdateTime" .= v1DeploymentConditionLastUpdateTime
, "message" .= v1DeploymentConditionMessage
, "reason" .= v1DeploymentConditionReason
, "status" .= v1DeploymentConditionStatus
, "type" .= v1DeploymentConditionType
]
mkV1DeploymentCondition
:: Text
-> Text
-> V1DeploymentCondition
mkV1DeploymentCondition v1DeploymentConditionStatus v1DeploymentConditionType =
V1DeploymentCondition
{ v1DeploymentConditionLastTransitionTime = Nothing
, v1DeploymentConditionLastUpdateTime = Nothing
, v1DeploymentConditionMessage = Nothing
, v1DeploymentConditionReason = Nothing
, v1DeploymentConditionStatus
, v1DeploymentConditionType
}
data V1DeploymentList = V1DeploymentList
{ v1DeploymentListApiVersion :: !(Maybe Text)
, v1DeploymentListItems :: !([V1Deployment])
, v1DeploymentListKind :: !(Maybe Text)
, v1DeploymentListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DeploymentList where
parseJSON = A.withObject "V1DeploymentList" $ \o ->
V1DeploymentList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1DeploymentList where
toJSON V1DeploymentList {..} =
_omitNulls
[ "apiVersion" .= v1DeploymentListApiVersion
, "items" .= v1DeploymentListItems
, "kind" .= v1DeploymentListKind
, "metadata" .= v1DeploymentListMetadata
]
mkV1DeploymentList
:: [V1Deployment]
-> V1DeploymentList
mkV1DeploymentList v1DeploymentListItems =
V1DeploymentList
{ v1DeploymentListApiVersion = Nothing
, v1DeploymentListItems
, v1DeploymentListKind = Nothing
, v1DeploymentListMetadata = Nothing
}
data V1DeploymentSpec = V1DeploymentSpec
{ v1DeploymentSpecMinReadySeconds :: !(Maybe Int)
, v1DeploymentSpecPaused :: !(Maybe Bool)
, v1DeploymentSpecProgressDeadlineSeconds :: !(Maybe Int)
, v1DeploymentSpecReplicas :: !(Maybe Int)
, v1DeploymentSpecRevisionHistoryLimit :: !(Maybe Int)
, v1DeploymentSpecSelector :: !(V1LabelSelector)
, v1DeploymentSpecStrategy :: !(Maybe V1DeploymentStrategy)
, v1DeploymentSpecTemplate :: !(V1PodTemplateSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DeploymentSpec where
parseJSON = A.withObject "V1DeploymentSpec" $ \o ->
V1DeploymentSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "paused")
<*> (o .:? "progressDeadlineSeconds")
<*> (o .:? "replicas")
<*> (o .:? "revisionHistoryLimit")
<*> (o .: "selector")
<*> (o .:? "strategy")
<*> (o .: "template")
instance A.ToJSON V1DeploymentSpec where
toJSON V1DeploymentSpec {..} =
_omitNulls
[ "minReadySeconds" .= v1DeploymentSpecMinReadySeconds
, "paused" .= v1DeploymentSpecPaused
, "progressDeadlineSeconds" .= v1DeploymentSpecProgressDeadlineSeconds
, "replicas" .= v1DeploymentSpecReplicas
, "revisionHistoryLimit" .= v1DeploymentSpecRevisionHistoryLimit
, "selector" .= v1DeploymentSpecSelector
, "strategy" .= v1DeploymentSpecStrategy
, "template" .= v1DeploymentSpecTemplate
]
mkV1DeploymentSpec
:: V1LabelSelector
-> V1PodTemplateSpec
-> V1DeploymentSpec
mkV1DeploymentSpec v1DeploymentSpecSelector v1DeploymentSpecTemplate =
V1DeploymentSpec
{ v1DeploymentSpecMinReadySeconds = Nothing
, v1DeploymentSpecPaused = Nothing
, v1DeploymentSpecProgressDeadlineSeconds = Nothing
, v1DeploymentSpecReplicas = Nothing
, v1DeploymentSpecRevisionHistoryLimit = Nothing
, v1DeploymentSpecSelector
, v1DeploymentSpecStrategy = Nothing
, v1DeploymentSpecTemplate
}
data V1DeploymentStatus = V1DeploymentStatus
{ v1DeploymentStatusAvailableReplicas :: !(Maybe Int)
, v1DeploymentStatusCollisionCount :: !(Maybe Int)
, v1DeploymentStatusConditions :: !(Maybe [V1DeploymentCondition])
, v1DeploymentStatusObservedGeneration :: !(Maybe Integer)
, v1DeploymentStatusReadyReplicas :: !(Maybe Int)
, v1DeploymentStatusReplicas :: !(Maybe Int)
, v1DeploymentStatusUnavailableReplicas :: !(Maybe Int)
, v1DeploymentStatusUpdatedReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DeploymentStatus where
parseJSON = A.withObject "V1DeploymentStatus" $ \o ->
V1DeploymentStatus
<$> (o .:? "availableReplicas")
<*> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .:? "replicas")
<*> (o .:? "unavailableReplicas")
<*> (o .:? "updatedReplicas")
instance A.ToJSON V1DeploymentStatus where
toJSON V1DeploymentStatus {..} =
_omitNulls
[ "availableReplicas" .= v1DeploymentStatusAvailableReplicas
, "collisionCount" .= v1DeploymentStatusCollisionCount
, "conditions" .= v1DeploymentStatusConditions
, "observedGeneration" .= v1DeploymentStatusObservedGeneration
, "readyReplicas" .= v1DeploymentStatusReadyReplicas
, "replicas" .= v1DeploymentStatusReplicas
, "unavailableReplicas" .= v1DeploymentStatusUnavailableReplicas
, "updatedReplicas" .= v1DeploymentStatusUpdatedReplicas
]
mkV1DeploymentStatus
:: V1DeploymentStatus
mkV1DeploymentStatus =
V1DeploymentStatus
{ v1DeploymentStatusAvailableReplicas = Nothing
, v1DeploymentStatusCollisionCount = Nothing
, v1DeploymentStatusConditions = Nothing
, v1DeploymentStatusObservedGeneration = Nothing
, v1DeploymentStatusReadyReplicas = Nothing
, v1DeploymentStatusReplicas = Nothing
, v1DeploymentStatusUnavailableReplicas = Nothing
, v1DeploymentStatusUpdatedReplicas = Nothing
}
data V1DeploymentStrategy = V1DeploymentStrategy
{ v1DeploymentStrategyRollingUpdate :: !(Maybe V1RollingUpdateDeployment)
, v1DeploymentStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DeploymentStrategy where
parseJSON = A.withObject "V1DeploymentStrategy" $ \o ->
V1DeploymentStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON V1DeploymentStrategy where
toJSON V1DeploymentStrategy {..} =
_omitNulls
[ "rollingUpdate" .= v1DeploymentStrategyRollingUpdate
, "type" .= v1DeploymentStrategyType
]
mkV1DeploymentStrategy
:: V1DeploymentStrategy
mkV1DeploymentStrategy =
V1DeploymentStrategy
{ v1DeploymentStrategyRollingUpdate = Nothing
, v1DeploymentStrategyType = Nothing
}
data V1DownwardAPIProjection = V1DownwardAPIProjection
{ v1DownwardAPIProjectionItems :: !(Maybe [V1DownwardAPIVolumeFile])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DownwardAPIProjection where
parseJSON = A.withObject "V1DownwardAPIProjection" $ \o ->
V1DownwardAPIProjection
<$> (o .:? "items")
instance A.ToJSON V1DownwardAPIProjection where
toJSON V1DownwardAPIProjection {..} =
_omitNulls
[ "items" .= v1DownwardAPIProjectionItems
]
mkV1DownwardAPIProjection
:: V1DownwardAPIProjection
mkV1DownwardAPIProjection =
V1DownwardAPIProjection
{ v1DownwardAPIProjectionItems = Nothing
}
data V1DownwardAPIVolumeFile = V1DownwardAPIVolumeFile
{ v1DownwardAPIVolumeFileFieldRef :: !(Maybe V1ObjectFieldSelector)
, v1DownwardAPIVolumeFileMode :: !(Maybe Int)
, v1DownwardAPIVolumeFilePath :: !(Text)
, v1DownwardAPIVolumeFileResourceFieldRef :: !(Maybe V1ResourceFieldSelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DownwardAPIVolumeFile where
parseJSON = A.withObject "V1DownwardAPIVolumeFile" $ \o ->
V1DownwardAPIVolumeFile
<$> (o .:? "fieldRef")
<*> (o .:? "mode")
<*> (o .: "path")
<*> (o .:? "resourceFieldRef")
instance A.ToJSON V1DownwardAPIVolumeFile where
toJSON V1DownwardAPIVolumeFile {..} =
_omitNulls
[ "fieldRef" .= v1DownwardAPIVolumeFileFieldRef
, "mode" .= v1DownwardAPIVolumeFileMode
, "path" .= v1DownwardAPIVolumeFilePath
, "resourceFieldRef" .= v1DownwardAPIVolumeFileResourceFieldRef
]
mkV1DownwardAPIVolumeFile
:: Text
-> V1DownwardAPIVolumeFile
mkV1DownwardAPIVolumeFile v1DownwardAPIVolumeFilePath =
V1DownwardAPIVolumeFile
{ v1DownwardAPIVolumeFileFieldRef = Nothing
, v1DownwardAPIVolumeFileMode = Nothing
, v1DownwardAPIVolumeFilePath
, v1DownwardAPIVolumeFileResourceFieldRef = Nothing
}
data V1DownwardAPIVolumeSource = V1DownwardAPIVolumeSource
{ v1DownwardAPIVolumeSourceDefaultMode :: !(Maybe Int)
, v1DownwardAPIVolumeSourceItems :: !(Maybe [V1DownwardAPIVolumeFile])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1DownwardAPIVolumeSource where
parseJSON = A.withObject "V1DownwardAPIVolumeSource" $ \o ->
V1DownwardAPIVolumeSource
<$> (o .:? "defaultMode")
<*> (o .:? "items")
instance A.ToJSON V1DownwardAPIVolumeSource where
toJSON V1DownwardAPIVolumeSource {..} =
_omitNulls
[ "defaultMode" .= v1DownwardAPIVolumeSourceDefaultMode
, "items" .= v1DownwardAPIVolumeSourceItems
]
mkV1DownwardAPIVolumeSource
:: V1DownwardAPIVolumeSource
mkV1DownwardAPIVolumeSource =
V1DownwardAPIVolumeSource
{ v1DownwardAPIVolumeSourceDefaultMode = Nothing
, v1DownwardAPIVolumeSourceItems = Nothing
}
data V1EmptyDirVolumeSource = V1EmptyDirVolumeSource
{ v1EmptyDirVolumeSourceMedium :: !(Maybe Text)
, v1EmptyDirVolumeSourceSizeLimit :: !(Maybe Quantity)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EmptyDirVolumeSource where
parseJSON = A.withObject "V1EmptyDirVolumeSource" $ \o ->
V1EmptyDirVolumeSource
<$> (o .:? "medium")
<*> (o .:? "sizeLimit")
instance A.ToJSON V1EmptyDirVolumeSource where
toJSON V1EmptyDirVolumeSource {..} =
_omitNulls
[ "medium" .= v1EmptyDirVolumeSourceMedium
, "sizeLimit" .= v1EmptyDirVolumeSourceSizeLimit
]
mkV1EmptyDirVolumeSource
:: V1EmptyDirVolumeSource
mkV1EmptyDirVolumeSource =
V1EmptyDirVolumeSource
{ v1EmptyDirVolumeSourceMedium = Nothing
, v1EmptyDirVolumeSourceSizeLimit = Nothing
}
data V1EndpointAddress = V1EndpointAddress
{ v1EndpointAddressHostname :: !(Maybe Text)
, v1EndpointAddressIp :: !(Text)
, v1EndpointAddressNodeName :: !(Maybe Text)
, v1EndpointAddressTargetRef :: !(Maybe V1ObjectReference)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EndpointAddress where
parseJSON = A.withObject "V1EndpointAddress" $ \o ->
V1EndpointAddress
<$> (o .:? "hostname")
<*> (o .: "ip")
<*> (o .:? "nodeName")
<*> (o .:? "targetRef")
instance A.ToJSON V1EndpointAddress where
toJSON V1EndpointAddress {..} =
_omitNulls
[ "hostname" .= v1EndpointAddressHostname
, "ip" .= v1EndpointAddressIp
, "nodeName" .= v1EndpointAddressNodeName
, "targetRef" .= v1EndpointAddressTargetRef
]
mkV1EndpointAddress
:: Text
-> V1EndpointAddress
mkV1EndpointAddress v1EndpointAddressIp =
V1EndpointAddress
{ v1EndpointAddressHostname = Nothing
, v1EndpointAddressIp
, v1EndpointAddressNodeName = Nothing
, v1EndpointAddressTargetRef = Nothing
}
data V1EndpointPort = V1EndpointPort
{ v1EndpointPortName :: !(Maybe Text)
, v1EndpointPortPort :: !(Int)
, v1EndpointPortProtocol :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EndpointPort where
parseJSON = A.withObject "V1EndpointPort" $ \o ->
V1EndpointPort
<$> (o .:? "name")
<*> (o .: "port")
<*> (o .:? "protocol")
instance A.ToJSON V1EndpointPort where
toJSON V1EndpointPort {..} =
_omitNulls
[ "name" .= v1EndpointPortName
, "port" .= v1EndpointPortPort
, "protocol" .= v1EndpointPortProtocol
]
mkV1EndpointPort
:: Int
-> V1EndpointPort
mkV1EndpointPort v1EndpointPortPort =
V1EndpointPort
{ v1EndpointPortName = Nothing
, v1EndpointPortPort
, v1EndpointPortProtocol = Nothing
}
data V1EndpointSubset = V1EndpointSubset
{ v1EndpointSubsetAddresses :: !(Maybe [V1EndpointAddress])
, v1EndpointSubsetNotReadyAddresses :: !(Maybe [V1EndpointAddress])
, v1EndpointSubsetPorts :: !(Maybe [V1EndpointPort])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EndpointSubset where
parseJSON = A.withObject "V1EndpointSubset" $ \o ->
V1EndpointSubset
<$> (o .:? "addresses")
<*> (o .:? "notReadyAddresses")
<*> (o .:? "ports")
instance A.ToJSON V1EndpointSubset where
toJSON V1EndpointSubset {..} =
_omitNulls
[ "addresses" .= v1EndpointSubsetAddresses
, "notReadyAddresses" .= v1EndpointSubsetNotReadyAddresses
, "ports" .= v1EndpointSubsetPorts
]
mkV1EndpointSubset
:: V1EndpointSubset
mkV1EndpointSubset =
V1EndpointSubset
{ v1EndpointSubsetAddresses = Nothing
, v1EndpointSubsetNotReadyAddresses = Nothing
, v1EndpointSubsetPorts = Nothing
}
data V1Endpoints = V1Endpoints
{ v1EndpointsApiVersion :: !(Maybe Text)
, v1EndpointsKind :: !(Maybe Text)
, v1EndpointsMetadata :: !(Maybe V1ObjectMeta)
, v1EndpointsSubsets :: !(Maybe [V1EndpointSubset])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Endpoints where
parseJSON = A.withObject "V1Endpoints" $ \o ->
V1Endpoints
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "subsets")
instance A.ToJSON V1Endpoints where
toJSON V1Endpoints {..} =
_omitNulls
[ "apiVersion" .= v1EndpointsApiVersion
, "kind" .= v1EndpointsKind
, "metadata" .= v1EndpointsMetadata
, "subsets" .= v1EndpointsSubsets
]
mkV1Endpoints
:: V1Endpoints
mkV1Endpoints =
V1Endpoints
{ v1EndpointsApiVersion = Nothing
, v1EndpointsKind = Nothing
, v1EndpointsMetadata = Nothing
, v1EndpointsSubsets = Nothing
}
data V1EndpointsList = V1EndpointsList
{ v1EndpointsListApiVersion :: !(Maybe Text)
, v1EndpointsListItems :: !([V1Endpoints])
, v1EndpointsListKind :: !(Maybe Text)
, v1EndpointsListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EndpointsList where
parseJSON = A.withObject "V1EndpointsList" $ \o ->
V1EndpointsList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1EndpointsList where
toJSON V1EndpointsList {..} =
_omitNulls
[ "apiVersion" .= v1EndpointsListApiVersion
, "items" .= v1EndpointsListItems
, "kind" .= v1EndpointsListKind
, "metadata" .= v1EndpointsListMetadata
]
mkV1EndpointsList
:: [V1Endpoints]
-> V1EndpointsList
mkV1EndpointsList v1EndpointsListItems =
V1EndpointsList
{ v1EndpointsListApiVersion = Nothing
, v1EndpointsListItems
, v1EndpointsListKind = Nothing
, v1EndpointsListMetadata = Nothing
}
data V1EnvFromSource = V1EnvFromSource
{ v1EnvFromSourceConfigMapRef :: !(Maybe V1ConfigMapEnvSource)
, v1EnvFromSourcePrefix :: !(Maybe Text)
, v1EnvFromSourceSecretRef :: !(Maybe V1SecretEnvSource)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EnvFromSource where
parseJSON = A.withObject "V1EnvFromSource" $ \o ->
V1EnvFromSource
<$> (o .:? "configMapRef")
<*> (o .:? "prefix")
<*> (o .:? "secretRef")
instance A.ToJSON V1EnvFromSource where
toJSON V1EnvFromSource {..} =
_omitNulls
[ "configMapRef" .= v1EnvFromSourceConfigMapRef
, "prefix" .= v1EnvFromSourcePrefix
, "secretRef" .= v1EnvFromSourceSecretRef
]
mkV1EnvFromSource
:: V1EnvFromSource
mkV1EnvFromSource =
V1EnvFromSource
{ v1EnvFromSourceConfigMapRef = Nothing
, v1EnvFromSourcePrefix = Nothing
, v1EnvFromSourceSecretRef = Nothing
}
data V1EnvVar = V1EnvVar
{ v1EnvVarName :: !(Text)
, v1EnvVarValue :: !(Maybe Text)
, v1EnvVarValueFrom :: !(Maybe V1EnvVarSource)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EnvVar where
parseJSON = A.withObject "V1EnvVar" $ \o ->
V1EnvVar
<$> (o .: "name")
<*> (o .:? "value")
<*> (o .:? "valueFrom")
instance A.ToJSON V1EnvVar where
toJSON V1EnvVar {..} =
_omitNulls
[ "name" .= v1EnvVarName
, "value" .= v1EnvVarValue
, "valueFrom" .= v1EnvVarValueFrom
]
mkV1EnvVar
:: Text
-> V1EnvVar
mkV1EnvVar v1EnvVarName =
V1EnvVar
{ v1EnvVarName
, v1EnvVarValue = Nothing
, v1EnvVarValueFrom = Nothing
}
data V1EnvVarSource = V1EnvVarSource
{ v1EnvVarSourceConfigMapKeyRef :: !(Maybe V1ConfigMapKeySelector)
, v1EnvVarSourceFieldRef :: !(Maybe V1ObjectFieldSelector)
, v1EnvVarSourceResourceFieldRef :: !(Maybe V1ResourceFieldSelector)
, v1EnvVarSourceSecretKeyRef :: !(Maybe V1SecretKeySelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EnvVarSource where
parseJSON = A.withObject "V1EnvVarSource" $ \o ->
V1EnvVarSource
<$> (o .:? "configMapKeyRef")
<*> (o .:? "fieldRef")
<*> (o .:? "resourceFieldRef")
<*> (o .:? "secretKeyRef")
instance A.ToJSON V1EnvVarSource where
toJSON V1EnvVarSource {..} =
_omitNulls
[ "configMapKeyRef" .= v1EnvVarSourceConfigMapKeyRef
, "fieldRef" .= v1EnvVarSourceFieldRef
, "resourceFieldRef" .= v1EnvVarSourceResourceFieldRef
, "secretKeyRef" .= v1EnvVarSourceSecretKeyRef
]
mkV1EnvVarSource
:: V1EnvVarSource
mkV1EnvVarSource =
V1EnvVarSource
{ v1EnvVarSourceConfigMapKeyRef = Nothing
, v1EnvVarSourceFieldRef = Nothing
, v1EnvVarSourceResourceFieldRef = Nothing
, v1EnvVarSourceSecretKeyRef = Nothing
}
data V1Event = V1Event
{ v1EventAction :: !(Maybe Text)
, v1EventApiVersion :: !(Maybe Text)
, v1EventCount :: !(Maybe Int)
, v1EventEventTime :: !(Maybe DateTime)
, v1EventFirstTimestamp :: !(Maybe DateTime)
, v1EventInvolvedObject :: !(V1ObjectReference)
, v1EventKind :: !(Maybe Text)
, v1EventLastTimestamp :: !(Maybe DateTime)
, v1EventMessage :: !(Maybe Text)
, v1EventMetadata :: !(V1ObjectMeta)
, v1EventReason :: !(Maybe Text)
, v1EventRelated :: !(Maybe V1ObjectReference)
, v1EventReportingComponent :: !(Maybe Text)
, v1EventReportingInstance :: !(Maybe Text)
, v1EventSeries :: !(Maybe V1EventSeries)
, v1EventSource :: !(Maybe V1EventSource)
, v1EventType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Event where
parseJSON = A.withObject "V1Event" $ \o ->
V1Event
<$> (o .:? "action")
<*> (o .:? "apiVersion")
<*> (o .:? "count")
<*> (o .:? "eventTime")
<*> (o .:? "firstTimestamp")
<*> (o .: "involvedObject")
<*> (o .:? "kind")
<*> (o .:? "lastTimestamp")
<*> (o .:? "message")
<*> (o .: "metadata")
<*> (o .:? "reason")
<*> (o .:? "related")
<*> (o .:? "reportingComponent")
<*> (o .:? "reportingInstance")
<*> (o .:? "series")
<*> (o .:? "source")
<*> (o .:? "type")
instance A.ToJSON V1Event where
toJSON V1Event {..} =
_omitNulls
[ "action" .= v1EventAction
, "apiVersion" .= v1EventApiVersion
, "count" .= v1EventCount
, "eventTime" .= v1EventEventTime
, "firstTimestamp" .= v1EventFirstTimestamp
, "involvedObject" .= v1EventInvolvedObject
, "kind" .= v1EventKind
, "lastTimestamp" .= v1EventLastTimestamp
, "message" .= v1EventMessage
, "metadata" .= v1EventMetadata
, "reason" .= v1EventReason
, "related" .= v1EventRelated
, "reportingComponent" .= v1EventReportingComponent
, "reportingInstance" .= v1EventReportingInstance
, "series" .= v1EventSeries
, "source" .= v1EventSource
, "type" .= v1EventType
]
mkV1Event
:: V1ObjectReference
-> V1ObjectMeta
-> V1Event
mkV1Event v1EventInvolvedObject v1EventMetadata =
V1Event
{ v1EventAction = Nothing
, v1EventApiVersion = Nothing
, v1EventCount = Nothing
, v1EventEventTime = Nothing
, v1EventFirstTimestamp = Nothing
, v1EventInvolvedObject
, v1EventKind = Nothing
, v1EventLastTimestamp = Nothing
, v1EventMessage = Nothing
, v1EventMetadata
, v1EventReason = Nothing
, v1EventRelated = Nothing
, v1EventReportingComponent = Nothing
, v1EventReportingInstance = Nothing
, v1EventSeries = Nothing
, v1EventSource = Nothing
, v1EventType = Nothing
}
data V1EventList = V1EventList
{ v1EventListApiVersion :: !(Maybe Text)
, v1EventListItems :: !([V1Event])
, v1EventListKind :: !(Maybe Text)
, v1EventListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EventList where
parseJSON = A.withObject "V1EventList" $ \o ->
V1EventList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1EventList where
toJSON V1EventList {..} =
_omitNulls
[ "apiVersion" .= v1EventListApiVersion
, "items" .= v1EventListItems
, "kind" .= v1EventListKind
, "metadata" .= v1EventListMetadata
]
mkV1EventList
:: [V1Event]
-> V1EventList
mkV1EventList v1EventListItems =
V1EventList
{ v1EventListApiVersion = Nothing
, v1EventListItems
, v1EventListKind = Nothing
, v1EventListMetadata = Nothing
}
data V1EventSeries = V1EventSeries
{ v1EventSeriesCount :: !(Maybe Int)
, v1EventSeriesLastObservedTime :: !(Maybe DateTime)
, v1EventSeriesState :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EventSeries where
parseJSON = A.withObject "V1EventSeries" $ \o ->
V1EventSeries
<$> (o .:? "count")
<*> (o .:? "lastObservedTime")
<*> (o .:? "state")
instance A.ToJSON V1EventSeries where
toJSON V1EventSeries {..} =
_omitNulls
[ "count" .= v1EventSeriesCount
, "lastObservedTime" .= v1EventSeriesLastObservedTime
, "state" .= v1EventSeriesState
]
mkV1EventSeries
:: V1EventSeries
mkV1EventSeries =
V1EventSeries
{ v1EventSeriesCount = Nothing
, v1EventSeriesLastObservedTime = Nothing
, v1EventSeriesState = Nothing
}
data V1EventSource = V1EventSource
{ v1EventSourceComponent :: !(Maybe Text)
, v1EventSourceHost :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1EventSource where
parseJSON = A.withObject "V1EventSource" $ \o ->
V1EventSource
<$> (o .:? "component")
<*> (o .:? "host")
instance A.ToJSON V1EventSource where
toJSON V1EventSource {..} =
_omitNulls
[ "component" .= v1EventSourceComponent
, "host" .= v1EventSourceHost
]
mkV1EventSource
:: V1EventSource
mkV1EventSource =
V1EventSource
{ v1EventSourceComponent = Nothing
, v1EventSourceHost = Nothing
}
data V1ExecAction = V1ExecAction
{ v1ExecActionCommand :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ExecAction where
parseJSON = A.withObject "V1ExecAction" $ \o ->
V1ExecAction
<$> (o .:? "command")
instance A.ToJSON V1ExecAction where
toJSON V1ExecAction {..} =
_omitNulls
[ "command" .= v1ExecActionCommand
]
mkV1ExecAction
:: V1ExecAction
mkV1ExecAction =
V1ExecAction
{ v1ExecActionCommand = Nothing
}
data V1FCVolumeSource = V1FCVolumeSource
{ v1FCVolumeSourceFsType :: !(Maybe Text)
, v1FCVolumeSourceLun :: !(Maybe Int)
, v1FCVolumeSourceReadOnly :: !(Maybe Bool)
, v1FCVolumeSourceTargetWwNs :: !(Maybe [Text])
, v1FCVolumeSourceWwids :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1FCVolumeSource where
parseJSON = A.withObject "V1FCVolumeSource" $ \o ->
V1FCVolumeSource
<$> (o .:? "fsType")
<*> (o .:? "lun")
<*> (o .:? "readOnly")
<*> (o .:? "targetWWNs")
<*> (o .:? "wwids")
instance A.ToJSON V1FCVolumeSource where
toJSON V1FCVolumeSource {..} =
_omitNulls
[ "fsType" .= v1FCVolumeSourceFsType
, "lun" .= v1FCVolumeSourceLun
, "readOnly" .= v1FCVolumeSourceReadOnly
, "targetWWNs" .= v1FCVolumeSourceTargetWwNs
, "wwids" .= v1FCVolumeSourceWwids
]
mkV1FCVolumeSource
:: V1FCVolumeSource
mkV1FCVolumeSource =
V1FCVolumeSource
{ v1FCVolumeSourceFsType = Nothing
, v1FCVolumeSourceLun = Nothing
, v1FCVolumeSourceReadOnly = Nothing
, v1FCVolumeSourceTargetWwNs = Nothing
, v1FCVolumeSourceWwids = Nothing
}
data V1FlexPersistentVolumeSource = V1FlexPersistentVolumeSource
{ v1FlexPersistentVolumeSourceDriver :: !(Text)
, v1FlexPersistentVolumeSourceFsType :: !(Maybe Text)
, v1FlexPersistentVolumeSourceOptions :: !(Maybe (Map.Map String Text))
, v1FlexPersistentVolumeSourceReadOnly :: !(Maybe Bool)
, v1FlexPersistentVolumeSourceSecretRef :: !(Maybe V1SecretReference)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1FlexPersistentVolumeSource where
parseJSON = A.withObject "V1FlexPersistentVolumeSource" $ \o ->
V1FlexPersistentVolumeSource
<$> (o .: "driver")
<*> (o .:? "fsType")
<*> (o .:? "options")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
instance A.ToJSON V1FlexPersistentVolumeSource where
toJSON V1FlexPersistentVolumeSource {..} =
_omitNulls
[ "driver" .= v1FlexPersistentVolumeSourceDriver
, "fsType" .= v1FlexPersistentVolumeSourceFsType
, "options" .= v1FlexPersistentVolumeSourceOptions
, "readOnly" .= v1FlexPersistentVolumeSourceReadOnly
, "secretRef" .= v1FlexPersistentVolumeSourceSecretRef
]
mkV1FlexPersistentVolumeSource
:: Text
-> V1FlexPersistentVolumeSource
mkV1FlexPersistentVolumeSource v1FlexPersistentVolumeSourceDriver =
V1FlexPersistentVolumeSource
{ v1FlexPersistentVolumeSourceDriver
, v1FlexPersistentVolumeSourceFsType = Nothing
, v1FlexPersistentVolumeSourceOptions = Nothing
, v1FlexPersistentVolumeSourceReadOnly = Nothing
, v1FlexPersistentVolumeSourceSecretRef = Nothing
}
data V1FlexVolumeSource = V1FlexVolumeSource
{ v1FlexVolumeSourceDriver :: !(Text)
, v1FlexVolumeSourceFsType :: !(Maybe Text)
, v1FlexVolumeSourceOptions :: !(Maybe (Map.Map String Text))
, v1FlexVolumeSourceReadOnly :: !(Maybe Bool)
, v1FlexVolumeSourceSecretRef :: !(Maybe V1LocalObjectReference)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1FlexVolumeSource where
parseJSON = A.withObject "V1FlexVolumeSource" $ \o ->
V1FlexVolumeSource
<$> (o .: "driver")
<*> (o .:? "fsType")
<*> (o .:? "options")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
instance A.ToJSON V1FlexVolumeSource where
toJSON V1FlexVolumeSource {..} =
_omitNulls
[ "driver" .= v1FlexVolumeSourceDriver
, "fsType" .= v1FlexVolumeSourceFsType
, "options" .= v1FlexVolumeSourceOptions
, "readOnly" .= v1FlexVolumeSourceReadOnly
, "secretRef" .= v1FlexVolumeSourceSecretRef
]
mkV1FlexVolumeSource
:: Text
-> V1FlexVolumeSource
mkV1FlexVolumeSource v1FlexVolumeSourceDriver =
V1FlexVolumeSource
{ v1FlexVolumeSourceDriver
, v1FlexVolumeSourceFsType = Nothing
, v1FlexVolumeSourceOptions = Nothing
, v1FlexVolumeSourceReadOnly = Nothing
, v1FlexVolumeSourceSecretRef = Nothing
}
data V1FlockerVolumeSource = V1FlockerVolumeSource
{ v1FlockerVolumeSourceDatasetName :: !(Maybe Text)
, v1FlockerVolumeSourceDatasetUuid :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1FlockerVolumeSource where
parseJSON = A.withObject "V1FlockerVolumeSource" $ \o ->
V1FlockerVolumeSource
<$> (o .:? "datasetName")
<*> (o .:? "datasetUUID")
instance A.ToJSON V1FlockerVolumeSource where
toJSON V1FlockerVolumeSource {..} =
_omitNulls
[ "datasetName" .= v1FlockerVolumeSourceDatasetName
, "datasetUUID" .= v1FlockerVolumeSourceDatasetUuid
]
mkV1FlockerVolumeSource
:: V1FlockerVolumeSource
mkV1FlockerVolumeSource =
V1FlockerVolumeSource
{ v1FlockerVolumeSourceDatasetName = Nothing
, v1FlockerVolumeSourceDatasetUuid = Nothing
}
data V1GCEPersistentDiskVolumeSource = V1GCEPersistentDiskVolumeSource
{ v1GCEPersistentDiskVolumeSourceFsType :: !(Maybe Text)
, v1GCEPersistentDiskVolumeSourcePartition :: !(Maybe Int)
, v1GCEPersistentDiskVolumeSourcePdName :: !(Text)
, v1GCEPersistentDiskVolumeSourceReadOnly :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1GCEPersistentDiskVolumeSource where
parseJSON = A.withObject "V1GCEPersistentDiskVolumeSource" $ \o ->
V1GCEPersistentDiskVolumeSource
<$> (o .:? "fsType")
<*> (o .:? "partition")
<*> (o .: "pdName")
<*> (o .:? "readOnly")
instance A.ToJSON V1GCEPersistentDiskVolumeSource where
toJSON V1GCEPersistentDiskVolumeSource {..} =
_omitNulls
[ "fsType" .= v1GCEPersistentDiskVolumeSourceFsType
, "partition" .= v1GCEPersistentDiskVolumeSourcePartition
, "pdName" .= v1GCEPersistentDiskVolumeSourcePdName
, "readOnly" .= v1GCEPersistentDiskVolumeSourceReadOnly
]
mkV1GCEPersistentDiskVolumeSource
:: Text
-> V1GCEPersistentDiskVolumeSource
mkV1GCEPersistentDiskVolumeSource v1GCEPersistentDiskVolumeSourcePdName =
V1GCEPersistentDiskVolumeSource
{ v1GCEPersistentDiskVolumeSourceFsType = Nothing
, v1GCEPersistentDiskVolumeSourcePartition = Nothing
, v1GCEPersistentDiskVolumeSourcePdName
, v1GCEPersistentDiskVolumeSourceReadOnly = Nothing
}
data V1GitRepoVolumeSource = V1GitRepoVolumeSource
{ v1GitRepoVolumeSourceDirectory :: !(Maybe Text)
, v1GitRepoVolumeSourceRepository :: !(Text)
, v1GitRepoVolumeSourceRevision :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1GitRepoVolumeSource where
parseJSON = A.withObject "V1GitRepoVolumeSource" $ \o ->
V1GitRepoVolumeSource
<$> (o .:? "directory")
<*> (o .: "repository")
<*> (o .:? "revision")
instance A.ToJSON V1GitRepoVolumeSource where
toJSON V1GitRepoVolumeSource {..} =
_omitNulls
[ "directory" .= v1GitRepoVolumeSourceDirectory
, "repository" .= v1GitRepoVolumeSourceRepository
, "revision" .= v1GitRepoVolumeSourceRevision
]
mkV1GitRepoVolumeSource
:: Text
-> V1GitRepoVolumeSource
mkV1GitRepoVolumeSource v1GitRepoVolumeSourceRepository =
V1GitRepoVolumeSource
{ v1GitRepoVolumeSourceDirectory = Nothing
, v1GitRepoVolumeSourceRepository
, v1GitRepoVolumeSourceRevision = Nothing
}
data V1GlusterfsPersistentVolumeSource = V1GlusterfsPersistentVolumeSource
{ v1GlusterfsPersistentVolumeSourceEndpoints :: !(Text)
, v1GlusterfsPersistentVolumeSourceEndpointsNamespace :: !(Maybe Text)
, v1GlusterfsPersistentVolumeSourcePath :: !(Text)
, v1GlusterfsPersistentVolumeSourceReadOnly :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1GlusterfsPersistentVolumeSource where
parseJSON = A.withObject "V1GlusterfsPersistentVolumeSource" $ \o ->
V1GlusterfsPersistentVolumeSource
<$> (o .: "endpoints")
<*> (o .:? "endpointsNamespace")
<*> (o .: "path")
<*> (o .:? "readOnly")
instance A.ToJSON V1GlusterfsPersistentVolumeSource where
toJSON V1GlusterfsPersistentVolumeSource {..} =
_omitNulls
[ "endpoints" .= v1GlusterfsPersistentVolumeSourceEndpoints
, "endpointsNamespace" .= v1GlusterfsPersistentVolumeSourceEndpointsNamespace
, "path" .= v1GlusterfsPersistentVolumeSourcePath
, "readOnly" .= v1GlusterfsPersistentVolumeSourceReadOnly
]
mkV1GlusterfsPersistentVolumeSource
:: Text
-> Text
-> V1GlusterfsPersistentVolumeSource
mkV1GlusterfsPersistentVolumeSource v1GlusterfsPersistentVolumeSourceEndpoints v1GlusterfsPersistentVolumeSourcePath =
V1GlusterfsPersistentVolumeSource
{ v1GlusterfsPersistentVolumeSourceEndpoints
, v1GlusterfsPersistentVolumeSourceEndpointsNamespace = Nothing
, v1GlusterfsPersistentVolumeSourcePath
, v1GlusterfsPersistentVolumeSourceReadOnly = Nothing
}
data V1GlusterfsVolumeSource = V1GlusterfsVolumeSource
{ v1GlusterfsVolumeSourceEndpoints :: !(Text)
, v1GlusterfsVolumeSourcePath :: !(Text)
, v1GlusterfsVolumeSourceReadOnly :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1GlusterfsVolumeSource where
parseJSON = A.withObject "V1GlusterfsVolumeSource" $ \o ->
V1GlusterfsVolumeSource
<$> (o .: "endpoints")
<*> (o .: "path")
<*> (o .:? "readOnly")
instance A.ToJSON V1GlusterfsVolumeSource where
toJSON V1GlusterfsVolumeSource {..} =
_omitNulls
[ "endpoints" .= v1GlusterfsVolumeSourceEndpoints
, "path" .= v1GlusterfsVolumeSourcePath
, "readOnly" .= v1GlusterfsVolumeSourceReadOnly
]
mkV1GlusterfsVolumeSource
:: Text
-> Text
-> V1GlusterfsVolumeSource
mkV1GlusterfsVolumeSource v1GlusterfsVolumeSourceEndpoints v1GlusterfsVolumeSourcePath =
V1GlusterfsVolumeSource
{ v1GlusterfsVolumeSourceEndpoints
, v1GlusterfsVolumeSourcePath
, v1GlusterfsVolumeSourceReadOnly = Nothing
}
data V1GroupVersionForDiscovery = V1GroupVersionForDiscovery
{ v1GroupVersionForDiscoveryGroupVersion :: !(Text)
, v1GroupVersionForDiscoveryVersion :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1GroupVersionForDiscovery where
parseJSON = A.withObject "V1GroupVersionForDiscovery" $ \o ->
V1GroupVersionForDiscovery
<$> (o .: "groupVersion")
<*> (o .: "version")
instance A.ToJSON V1GroupVersionForDiscovery where
toJSON V1GroupVersionForDiscovery {..} =
_omitNulls
[ "groupVersion" .= v1GroupVersionForDiscoveryGroupVersion
, "version" .= v1GroupVersionForDiscoveryVersion
]
mkV1GroupVersionForDiscovery
:: Text
-> Text
-> V1GroupVersionForDiscovery
mkV1GroupVersionForDiscovery v1GroupVersionForDiscoveryGroupVersion v1GroupVersionForDiscoveryVersion =
V1GroupVersionForDiscovery
{ v1GroupVersionForDiscoveryGroupVersion
, v1GroupVersionForDiscoveryVersion
}
data V1HTTPGetAction = V1HTTPGetAction
{ v1HTTPGetActionHost :: !(Maybe Text)
, v1HTTPGetActionHttpHeaders :: !(Maybe [V1HTTPHeader])
, v1HTTPGetActionPath :: !(Maybe Text)
, v1HTTPGetActionPort :: !(IntOrString)
, v1HTTPGetActionScheme :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1HTTPGetAction where
parseJSON = A.withObject "V1HTTPGetAction" $ \o ->
V1HTTPGetAction
<$> (o .:? "host")
<*> (o .:? "httpHeaders")
<*> (o .:? "path")
<*> (o .: "port")
<*> (o .:? "scheme")
instance A.ToJSON V1HTTPGetAction where
toJSON V1HTTPGetAction {..} =
_omitNulls
[ "host" .= v1HTTPGetActionHost
, "httpHeaders" .= v1HTTPGetActionHttpHeaders
, "path" .= v1HTTPGetActionPath
, "port" .= v1HTTPGetActionPort
, "scheme" .= v1HTTPGetActionScheme
]
mkV1HTTPGetAction
:: IntOrString
-> V1HTTPGetAction
mkV1HTTPGetAction v1HTTPGetActionPort =
V1HTTPGetAction
{ v1HTTPGetActionHost = Nothing
, v1HTTPGetActionHttpHeaders = Nothing
, v1HTTPGetActionPath = Nothing
, v1HTTPGetActionPort
, v1HTTPGetActionScheme = Nothing
}
data V1HTTPHeader = V1HTTPHeader
{ v1HTTPHeaderName :: !(Text)
, v1HTTPHeaderValue :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1HTTPHeader where
parseJSON = A.withObject "V1HTTPHeader" $ \o ->
V1HTTPHeader
<$> (o .: "name")
<*> (o .: "value")
instance A.ToJSON V1HTTPHeader where
toJSON V1HTTPHeader {..} =
_omitNulls
[ "name" .= v1HTTPHeaderName
, "value" .= v1HTTPHeaderValue
]
mkV1HTTPHeader
:: Text
-> Text
-> V1HTTPHeader
mkV1HTTPHeader v1HTTPHeaderName v1HTTPHeaderValue =
V1HTTPHeader
{ v1HTTPHeaderName
, v1HTTPHeaderValue
}
data V1Handler = V1Handler
{ v1HandlerExec :: !(Maybe V1ExecAction)
, v1HandlerHttpGet :: !(Maybe V1HTTPGetAction)
, v1HandlerTcpSocket :: !(Maybe V1TCPSocketAction)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Handler where
parseJSON = A.withObject "V1Handler" $ \o ->
V1Handler
<$> (o .:? "exec")
<*> (o .:? "httpGet")
<*> (o .:? "tcpSocket")
instance A.ToJSON V1Handler where
toJSON V1Handler {..} =
_omitNulls
[ "exec" .= v1HandlerExec
, "httpGet" .= v1HandlerHttpGet
, "tcpSocket" .= v1HandlerTcpSocket
]
mkV1Handler
:: V1Handler
mkV1Handler =
V1Handler
{ v1HandlerExec = Nothing
, v1HandlerHttpGet = Nothing
, v1HandlerTcpSocket = Nothing
}
data V1HorizontalPodAutoscaler = V1HorizontalPodAutoscaler
{ v1HorizontalPodAutoscalerApiVersion :: !(Maybe Text)
, v1HorizontalPodAutoscalerKind :: !(Maybe Text)
, v1HorizontalPodAutoscalerMetadata :: !(Maybe V1ObjectMeta)
, v1HorizontalPodAutoscalerSpec :: !(Maybe V1HorizontalPodAutoscalerSpec)
, v1HorizontalPodAutoscalerStatus :: !(Maybe V1HorizontalPodAutoscalerStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1HorizontalPodAutoscaler where
parseJSON = A.withObject "V1HorizontalPodAutoscaler" $ \o ->
V1HorizontalPodAutoscaler
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1HorizontalPodAutoscaler where
toJSON V1HorizontalPodAutoscaler {..} =
_omitNulls
[ "apiVersion" .= v1HorizontalPodAutoscalerApiVersion
, "kind" .= v1HorizontalPodAutoscalerKind
, "metadata" .= v1HorizontalPodAutoscalerMetadata
, "spec" .= v1HorizontalPodAutoscalerSpec
, "status" .= v1HorizontalPodAutoscalerStatus
]
mkV1HorizontalPodAutoscaler
:: V1HorizontalPodAutoscaler
mkV1HorizontalPodAutoscaler =
V1HorizontalPodAutoscaler
{ v1HorizontalPodAutoscalerApiVersion = Nothing
, v1HorizontalPodAutoscalerKind = Nothing
, v1HorizontalPodAutoscalerMetadata = Nothing
, v1HorizontalPodAutoscalerSpec = Nothing
, v1HorizontalPodAutoscalerStatus = Nothing
}
data V1HorizontalPodAutoscalerList = V1HorizontalPodAutoscalerList
{ v1HorizontalPodAutoscalerListApiVersion :: !(Maybe Text)
, v1HorizontalPodAutoscalerListItems :: !([V1HorizontalPodAutoscaler])
, v1HorizontalPodAutoscalerListKind :: !(Maybe Text)
, v1HorizontalPodAutoscalerListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1HorizontalPodAutoscalerList where
parseJSON = A.withObject "V1HorizontalPodAutoscalerList" $ \o ->
V1HorizontalPodAutoscalerList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1HorizontalPodAutoscalerList where
toJSON V1HorizontalPodAutoscalerList {..} =
_omitNulls
[ "apiVersion" .= v1HorizontalPodAutoscalerListApiVersion
, "items" .= v1HorizontalPodAutoscalerListItems
, "kind" .= v1HorizontalPodAutoscalerListKind
, "metadata" .= v1HorizontalPodAutoscalerListMetadata
]
mkV1HorizontalPodAutoscalerList
:: [V1HorizontalPodAutoscaler]
-> V1HorizontalPodAutoscalerList
mkV1HorizontalPodAutoscalerList v1HorizontalPodAutoscalerListItems =
V1HorizontalPodAutoscalerList
{ v1HorizontalPodAutoscalerListApiVersion = Nothing
, v1HorizontalPodAutoscalerListItems
, v1HorizontalPodAutoscalerListKind = Nothing
, v1HorizontalPodAutoscalerListMetadata = Nothing
}
data V1HorizontalPodAutoscalerSpec = V1HorizontalPodAutoscalerSpec
{ v1HorizontalPodAutoscalerSpecMaxReplicas :: !(Int)
, v1HorizontalPodAutoscalerSpecMinReplicas :: !(Maybe Int)
, v1HorizontalPodAutoscalerSpecScaleTargetRef :: !(V1CrossVersionObjectReference)
, v1HorizontalPodAutoscalerSpecTargetCpuUtilizationPercentage :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1HorizontalPodAutoscalerSpec where
parseJSON = A.withObject "V1HorizontalPodAutoscalerSpec" $ \o ->
V1HorizontalPodAutoscalerSpec
<$> (o .: "maxReplicas")
<*> (o .:? "minReplicas")
<*> (o .: "scaleTargetRef")
<*> (o .:? "targetCPUUtilizationPercentage")
instance A.ToJSON V1HorizontalPodAutoscalerSpec where
toJSON V1HorizontalPodAutoscalerSpec {..} =
_omitNulls
[ "maxReplicas" .= v1HorizontalPodAutoscalerSpecMaxReplicas
, "minReplicas" .= v1HorizontalPodAutoscalerSpecMinReplicas
, "scaleTargetRef" .= v1HorizontalPodAutoscalerSpecScaleTargetRef
, "targetCPUUtilizationPercentage" .= v1HorizontalPodAutoscalerSpecTargetCpuUtilizationPercentage
]
mkV1HorizontalPodAutoscalerSpec
:: Int
-> V1CrossVersionObjectReference
-> V1HorizontalPodAutoscalerSpec
mkV1HorizontalPodAutoscalerSpec v1HorizontalPodAutoscalerSpecMaxReplicas v1HorizontalPodAutoscalerSpecScaleTargetRef =
V1HorizontalPodAutoscalerSpec
{ v1HorizontalPodAutoscalerSpecMaxReplicas
, v1HorizontalPodAutoscalerSpecMinReplicas = Nothing
, v1HorizontalPodAutoscalerSpecScaleTargetRef
, v1HorizontalPodAutoscalerSpecTargetCpuUtilizationPercentage = Nothing
}
data V1HorizontalPodAutoscalerStatus = V1HorizontalPodAutoscalerStatus
{ v1HorizontalPodAutoscalerStatusCurrentCpuUtilizationPercentage :: !(Maybe Int)
, v1HorizontalPodAutoscalerStatusCurrentReplicas :: !(Int)
, v1HorizontalPodAutoscalerStatusDesiredReplicas :: !(Int)
, v1HorizontalPodAutoscalerStatusLastScaleTime :: !(Maybe DateTime)
, v1HorizontalPodAutoscalerStatusObservedGeneration :: !(Maybe Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1HorizontalPodAutoscalerStatus where
parseJSON = A.withObject "V1HorizontalPodAutoscalerStatus" $ \o ->
V1HorizontalPodAutoscalerStatus
<$> (o .:? "currentCPUUtilizationPercentage")
<*> (o .: "currentReplicas")
<*> (o .: "desiredReplicas")
<*> (o .:? "lastScaleTime")
<*> (o .:? "observedGeneration")
instance A.ToJSON V1HorizontalPodAutoscalerStatus where
toJSON V1HorizontalPodAutoscalerStatus {..} =
_omitNulls
[ "currentCPUUtilizationPercentage" .= v1HorizontalPodAutoscalerStatusCurrentCpuUtilizationPercentage
, "currentReplicas" .= v1HorizontalPodAutoscalerStatusCurrentReplicas
, "desiredReplicas" .= v1HorizontalPodAutoscalerStatusDesiredReplicas
, "lastScaleTime" .= v1HorizontalPodAutoscalerStatusLastScaleTime
, "observedGeneration" .= v1HorizontalPodAutoscalerStatusObservedGeneration
]
mkV1HorizontalPodAutoscalerStatus
:: Int
-> Int
-> V1HorizontalPodAutoscalerStatus
mkV1HorizontalPodAutoscalerStatus v1HorizontalPodAutoscalerStatusCurrentReplicas v1HorizontalPodAutoscalerStatusDesiredReplicas =
V1HorizontalPodAutoscalerStatus
{ v1HorizontalPodAutoscalerStatusCurrentCpuUtilizationPercentage = Nothing
, v1HorizontalPodAutoscalerStatusCurrentReplicas
, v1HorizontalPodAutoscalerStatusDesiredReplicas
, v1HorizontalPodAutoscalerStatusLastScaleTime = Nothing
, v1HorizontalPodAutoscalerStatusObservedGeneration = Nothing
}
data V1HostAlias = V1HostAlias
{ v1HostAliasHostnames :: !(Maybe [Text])
, v1HostAliasIp :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1HostAlias where
parseJSON = A.withObject "V1HostAlias" $ \o ->
V1HostAlias
<$> (o .:? "hostnames")
<*> (o .:? "ip")
instance A.ToJSON V1HostAlias where
toJSON V1HostAlias {..} =
_omitNulls
[ "hostnames" .= v1HostAliasHostnames
, "ip" .= v1HostAliasIp
]
mkV1HostAlias
:: V1HostAlias
mkV1HostAlias =
V1HostAlias
{ v1HostAliasHostnames = Nothing
, v1HostAliasIp = Nothing
}
data V1HostPathVolumeSource = V1HostPathVolumeSource
{ v1HostPathVolumeSourcePath :: !(Text)
, v1HostPathVolumeSourceType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1HostPathVolumeSource where
parseJSON = A.withObject "V1HostPathVolumeSource" $ \o ->
V1HostPathVolumeSource
<$> (o .: "path")
<*> (o .:? "type")
instance A.ToJSON V1HostPathVolumeSource where
toJSON V1HostPathVolumeSource {..} =
_omitNulls
[ "path" .= v1HostPathVolumeSourcePath
, "type" .= v1HostPathVolumeSourceType
]
mkV1HostPathVolumeSource
:: Text
-> V1HostPathVolumeSource
mkV1HostPathVolumeSource v1HostPathVolumeSourcePath =
V1HostPathVolumeSource
{ v1HostPathVolumeSourcePath
, v1HostPathVolumeSourceType = Nothing
}
data V1IPBlock = V1IPBlock
{ v1IPBlockCidr :: !(Text)
, v1IPBlockExcept :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1IPBlock where
parseJSON = A.withObject "V1IPBlock" $ \o ->
V1IPBlock
<$> (o .: "cidr")
<*> (o .:? "except")
instance A.ToJSON V1IPBlock where
toJSON V1IPBlock {..} =
_omitNulls
[ "cidr" .= v1IPBlockCidr
, "except" .= v1IPBlockExcept
]
mkV1IPBlock
:: Text
-> V1IPBlock
mkV1IPBlock v1IPBlockCidr =
V1IPBlock
{ v1IPBlockCidr
, v1IPBlockExcept = Nothing
}
data V1ISCSIPersistentVolumeSource = V1ISCSIPersistentVolumeSource
{ v1ISCSIPersistentVolumeSourceChapAuthDiscovery :: !(Maybe Bool)
, v1ISCSIPersistentVolumeSourceChapAuthSession :: !(Maybe Bool)
, v1ISCSIPersistentVolumeSourceFsType :: !(Maybe Text)
, v1ISCSIPersistentVolumeSourceInitiatorName :: !(Maybe Text)
, v1ISCSIPersistentVolumeSourceIqn :: !(Text)
, v1ISCSIPersistentVolumeSourceIscsiInterface :: !(Maybe Text)
, v1ISCSIPersistentVolumeSourceLun :: !(Int)
, v1ISCSIPersistentVolumeSourcePortals :: !(Maybe [Text])
, v1ISCSIPersistentVolumeSourceReadOnly :: !(Maybe Bool)
, v1ISCSIPersistentVolumeSourceSecretRef :: !(Maybe V1SecretReference)
, v1ISCSIPersistentVolumeSourceTargetPortal :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ISCSIPersistentVolumeSource where
parseJSON = A.withObject "V1ISCSIPersistentVolumeSource" $ \o ->
V1ISCSIPersistentVolumeSource
<$> (o .:? "chapAuthDiscovery")
<*> (o .:? "chapAuthSession")
<*> (o .:? "fsType")
<*> (o .:? "initiatorName")
<*> (o .: "iqn")
<*> (o .:? "iscsiInterface")
<*> (o .: "lun")
<*> (o .:? "portals")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
<*> (o .: "targetPortal")
instance A.ToJSON V1ISCSIPersistentVolumeSource where
toJSON V1ISCSIPersistentVolumeSource {..} =
_omitNulls
[ "chapAuthDiscovery" .= v1ISCSIPersistentVolumeSourceChapAuthDiscovery
, "chapAuthSession" .= v1ISCSIPersistentVolumeSourceChapAuthSession
, "fsType" .= v1ISCSIPersistentVolumeSourceFsType
, "initiatorName" .= v1ISCSIPersistentVolumeSourceInitiatorName
, "iqn" .= v1ISCSIPersistentVolumeSourceIqn
, "iscsiInterface" .= v1ISCSIPersistentVolumeSourceIscsiInterface
, "lun" .= v1ISCSIPersistentVolumeSourceLun
, "portals" .= v1ISCSIPersistentVolumeSourcePortals
, "readOnly" .= v1ISCSIPersistentVolumeSourceReadOnly
, "secretRef" .= v1ISCSIPersistentVolumeSourceSecretRef
, "targetPortal" .= v1ISCSIPersistentVolumeSourceTargetPortal
]
mkV1ISCSIPersistentVolumeSource
:: Text
-> Int
-> Text
-> V1ISCSIPersistentVolumeSource
mkV1ISCSIPersistentVolumeSource v1ISCSIPersistentVolumeSourceIqn v1ISCSIPersistentVolumeSourceLun v1ISCSIPersistentVolumeSourceTargetPortal =
V1ISCSIPersistentVolumeSource
{ v1ISCSIPersistentVolumeSourceChapAuthDiscovery = Nothing
, v1ISCSIPersistentVolumeSourceChapAuthSession = Nothing
, v1ISCSIPersistentVolumeSourceFsType = Nothing
, v1ISCSIPersistentVolumeSourceInitiatorName = Nothing
, v1ISCSIPersistentVolumeSourceIqn
, v1ISCSIPersistentVolumeSourceIscsiInterface = Nothing
, v1ISCSIPersistentVolumeSourceLun
, v1ISCSIPersistentVolumeSourcePortals = Nothing
, v1ISCSIPersistentVolumeSourceReadOnly = Nothing
, v1ISCSIPersistentVolumeSourceSecretRef = Nothing
, v1ISCSIPersistentVolumeSourceTargetPortal
}
data V1ISCSIVolumeSource = V1ISCSIVolumeSource
{ v1ISCSIVolumeSourceChapAuthDiscovery :: !(Maybe Bool)
, v1ISCSIVolumeSourceChapAuthSession :: !(Maybe Bool)
, v1ISCSIVolumeSourceFsType :: !(Maybe Text)
, v1ISCSIVolumeSourceInitiatorName :: !(Maybe Text)
, v1ISCSIVolumeSourceIqn :: !(Text)
, v1ISCSIVolumeSourceIscsiInterface :: !(Maybe Text)
, v1ISCSIVolumeSourceLun :: !(Int)
, v1ISCSIVolumeSourcePortals :: !(Maybe [Text])
, v1ISCSIVolumeSourceReadOnly :: !(Maybe Bool)
, v1ISCSIVolumeSourceSecretRef :: !(Maybe V1LocalObjectReference)
, v1ISCSIVolumeSourceTargetPortal :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ISCSIVolumeSource where
parseJSON = A.withObject "V1ISCSIVolumeSource" $ \o ->
V1ISCSIVolumeSource
<$> (o .:? "chapAuthDiscovery")
<*> (o .:? "chapAuthSession")
<*> (o .:? "fsType")
<*> (o .:? "initiatorName")
<*> (o .: "iqn")
<*> (o .:? "iscsiInterface")
<*> (o .: "lun")
<*> (o .:? "portals")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
<*> (o .: "targetPortal")
instance A.ToJSON V1ISCSIVolumeSource where
toJSON V1ISCSIVolumeSource {..} =
_omitNulls
[ "chapAuthDiscovery" .= v1ISCSIVolumeSourceChapAuthDiscovery
, "chapAuthSession" .= v1ISCSIVolumeSourceChapAuthSession
, "fsType" .= v1ISCSIVolumeSourceFsType
, "initiatorName" .= v1ISCSIVolumeSourceInitiatorName
, "iqn" .= v1ISCSIVolumeSourceIqn
, "iscsiInterface" .= v1ISCSIVolumeSourceIscsiInterface
, "lun" .= v1ISCSIVolumeSourceLun
, "portals" .= v1ISCSIVolumeSourcePortals
, "readOnly" .= v1ISCSIVolumeSourceReadOnly
, "secretRef" .= v1ISCSIVolumeSourceSecretRef
, "targetPortal" .= v1ISCSIVolumeSourceTargetPortal
]
mkV1ISCSIVolumeSource
:: Text
-> Int
-> Text
-> V1ISCSIVolumeSource
mkV1ISCSIVolumeSource v1ISCSIVolumeSourceIqn v1ISCSIVolumeSourceLun v1ISCSIVolumeSourceTargetPortal =
V1ISCSIVolumeSource
{ v1ISCSIVolumeSourceChapAuthDiscovery = Nothing
, v1ISCSIVolumeSourceChapAuthSession = Nothing
, v1ISCSIVolumeSourceFsType = Nothing
, v1ISCSIVolumeSourceInitiatorName = Nothing
, v1ISCSIVolumeSourceIqn
, v1ISCSIVolumeSourceIscsiInterface = Nothing
, v1ISCSIVolumeSourceLun
, v1ISCSIVolumeSourcePortals = Nothing
, v1ISCSIVolumeSourceReadOnly = Nothing
, v1ISCSIVolumeSourceSecretRef = Nothing
, v1ISCSIVolumeSourceTargetPortal
}
data V1Initializer = V1Initializer
{ v1InitializerName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Initializer where
parseJSON = A.withObject "V1Initializer" $ \o ->
V1Initializer
<$> (o .: "name")
instance A.ToJSON V1Initializer where
toJSON V1Initializer {..} =
_omitNulls
[ "name" .= v1InitializerName
]
mkV1Initializer
:: Text
-> V1Initializer
mkV1Initializer v1InitializerName =
V1Initializer
{ v1InitializerName
}
data V1Initializers = V1Initializers
{ v1InitializersPending :: !([V1Initializer])
, v1InitializersResult :: !(Maybe V1Status)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Initializers where
parseJSON = A.withObject "V1Initializers" $ \o ->
V1Initializers
<$> (o .: "pending")
<*> (o .:? "result")
instance A.ToJSON V1Initializers where
toJSON V1Initializers {..} =
_omitNulls
[ "pending" .= v1InitializersPending
, "result" .= v1InitializersResult
]
mkV1Initializers
:: [V1Initializer]
-> V1Initializers
mkV1Initializers v1InitializersPending =
V1Initializers
{ v1InitializersPending
, v1InitializersResult = Nothing
}
data V1Job = V1Job
{ v1JobApiVersion :: !(Maybe Text)
, v1JobKind :: !(Maybe Text)
, v1JobMetadata :: !(Maybe V1ObjectMeta)
, v1JobSpec :: !(Maybe V1JobSpec)
, v1JobStatus :: !(Maybe V1JobStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Job where
parseJSON = A.withObject "V1Job" $ \o ->
V1Job
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1Job where
toJSON V1Job {..} =
_omitNulls
[ "apiVersion" .= v1JobApiVersion
, "kind" .= v1JobKind
, "metadata" .= v1JobMetadata
, "spec" .= v1JobSpec
, "status" .= v1JobStatus
]
mkV1Job
:: V1Job
mkV1Job =
V1Job
{ v1JobApiVersion = Nothing
, v1JobKind = Nothing
, v1JobMetadata = Nothing
, v1JobSpec = Nothing
, v1JobStatus = Nothing
}
data V1JobCondition = V1JobCondition
{ v1JobConditionLastProbeTime :: !(Maybe DateTime)
, v1JobConditionLastTransitionTime :: !(Maybe DateTime)
, v1JobConditionMessage :: !(Maybe Text)
, v1JobConditionReason :: !(Maybe Text)
, v1JobConditionStatus :: !(Text)
, v1JobConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1JobCondition where
parseJSON = A.withObject "V1JobCondition" $ \o ->
V1JobCondition
<$> (o .:? "lastProbeTime")
<*> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1JobCondition where
toJSON V1JobCondition {..} =
_omitNulls
[ "lastProbeTime" .= v1JobConditionLastProbeTime
, "lastTransitionTime" .= v1JobConditionLastTransitionTime
, "message" .= v1JobConditionMessage
, "reason" .= v1JobConditionReason
, "status" .= v1JobConditionStatus
, "type" .= v1JobConditionType
]
mkV1JobCondition
:: Text
-> Text
-> V1JobCondition
mkV1JobCondition v1JobConditionStatus v1JobConditionType =
V1JobCondition
{ v1JobConditionLastProbeTime = Nothing
, v1JobConditionLastTransitionTime = Nothing
, v1JobConditionMessage = Nothing
, v1JobConditionReason = Nothing
, v1JobConditionStatus
, v1JobConditionType
}
data V1JobList = V1JobList
{ v1JobListApiVersion :: !(Maybe Text)
, v1JobListItems :: !([V1Job])
, v1JobListKind :: !(Maybe Text)
, v1JobListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1JobList where
parseJSON = A.withObject "V1JobList" $ \o ->
V1JobList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1JobList where
toJSON V1JobList {..} =
_omitNulls
[ "apiVersion" .= v1JobListApiVersion
, "items" .= v1JobListItems
, "kind" .= v1JobListKind
, "metadata" .= v1JobListMetadata
]
mkV1JobList
:: [V1Job]
-> V1JobList
mkV1JobList v1JobListItems =
V1JobList
{ v1JobListApiVersion = Nothing
, v1JobListItems
, v1JobListKind = Nothing
, v1JobListMetadata = Nothing
}
data V1JobSpec = V1JobSpec
{ v1JobSpecActiveDeadlineSeconds :: !(Maybe Integer)
, v1JobSpecBackoffLimit :: !(Maybe Int)
, v1JobSpecCompletions :: !(Maybe Int)
, v1JobSpecManualSelector :: !(Maybe Bool)
, v1JobSpecParallelism :: !(Maybe Int)
, v1JobSpecSelector :: !(Maybe V1LabelSelector)
, v1JobSpecTemplate :: !(V1PodTemplateSpec)
, v1JobSpecTtlSecondsAfterFinished :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1JobSpec where
parseJSON = A.withObject "V1JobSpec" $ \o ->
V1JobSpec
<$> (o .:? "activeDeadlineSeconds")
<*> (o .:? "backoffLimit")
<*> (o .:? "completions")
<*> (o .:? "manualSelector")
<*> (o .:? "parallelism")
<*> (o .:? "selector")
<*> (o .: "template")
<*> (o .:? "ttlSecondsAfterFinished")
instance A.ToJSON V1JobSpec where
toJSON V1JobSpec {..} =
_omitNulls
[ "activeDeadlineSeconds" .= v1JobSpecActiveDeadlineSeconds
, "backoffLimit" .= v1JobSpecBackoffLimit
, "completions" .= v1JobSpecCompletions
, "manualSelector" .= v1JobSpecManualSelector
, "parallelism" .= v1JobSpecParallelism
, "selector" .= v1JobSpecSelector
, "template" .= v1JobSpecTemplate
, "ttlSecondsAfterFinished" .= v1JobSpecTtlSecondsAfterFinished
]
mkV1JobSpec
:: V1PodTemplateSpec
-> V1JobSpec
mkV1JobSpec v1JobSpecTemplate =
V1JobSpec
{ v1JobSpecActiveDeadlineSeconds = Nothing
, v1JobSpecBackoffLimit = Nothing
, v1JobSpecCompletions = Nothing
, v1JobSpecManualSelector = Nothing
, v1JobSpecParallelism = Nothing
, v1JobSpecSelector = Nothing
, v1JobSpecTemplate
, v1JobSpecTtlSecondsAfterFinished = Nothing
}
data V1JobStatus = V1JobStatus
{ v1JobStatusActive :: !(Maybe Int)
, v1JobStatusCompletionTime :: !(Maybe DateTime)
, v1JobStatusConditions :: !(Maybe [V1JobCondition])
, v1JobStatusFailed :: !(Maybe Int)
, v1JobStatusStartTime :: !(Maybe DateTime)
, v1JobStatusSucceeded :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1JobStatus where
parseJSON = A.withObject "V1JobStatus" $ \o ->
V1JobStatus
<$> (o .:? "active")
<*> (o .:? "completionTime")
<*> (o .:? "conditions")
<*> (o .:? "failed")
<*> (o .:? "startTime")
<*> (o .:? "succeeded")
instance A.ToJSON V1JobStatus where
toJSON V1JobStatus {..} =
_omitNulls
[ "active" .= v1JobStatusActive
, "completionTime" .= v1JobStatusCompletionTime
, "conditions" .= v1JobStatusConditions
, "failed" .= v1JobStatusFailed
, "startTime" .= v1JobStatusStartTime
, "succeeded" .= v1JobStatusSucceeded
]
mkV1JobStatus
:: V1JobStatus
mkV1JobStatus =
V1JobStatus
{ v1JobStatusActive = Nothing
, v1JobStatusCompletionTime = Nothing
, v1JobStatusConditions = Nothing
, v1JobStatusFailed = Nothing
, v1JobStatusStartTime = Nothing
, v1JobStatusSucceeded = Nothing
}
data V1KeyToPath = V1KeyToPath
{ v1KeyToPathKey :: !(Text)
, v1KeyToPathMode :: !(Maybe Int)
, v1KeyToPathPath :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1KeyToPath where
parseJSON = A.withObject "V1KeyToPath" $ \o ->
V1KeyToPath
<$> (o .: "key")
<*> (o .:? "mode")
<*> (o .: "path")
instance A.ToJSON V1KeyToPath where
toJSON V1KeyToPath {..} =
_omitNulls
[ "key" .= v1KeyToPathKey
, "mode" .= v1KeyToPathMode
, "path" .= v1KeyToPathPath
]
mkV1KeyToPath
:: Text
-> Text
-> V1KeyToPath
mkV1KeyToPath v1KeyToPathKey v1KeyToPathPath =
V1KeyToPath
{ v1KeyToPathKey
, v1KeyToPathMode = Nothing
, v1KeyToPathPath
}
data V1LabelSelector = V1LabelSelector
{ v1LabelSelectorMatchExpressions :: !(Maybe [V1LabelSelectorRequirement])
, v1LabelSelectorMatchLabels :: !(Maybe (Map.Map String Text))
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LabelSelector where
parseJSON = A.withObject "V1LabelSelector" $ \o ->
V1LabelSelector
<$> (o .:? "matchExpressions")
<*> (o .:? "matchLabels")
instance A.ToJSON V1LabelSelector where
toJSON V1LabelSelector {..} =
_omitNulls
[ "matchExpressions" .= v1LabelSelectorMatchExpressions
, "matchLabels" .= v1LabelSelectorMatchLabels
]
mkV1LabelSelector
:: V1LabelSelector
mkV1LabelSelector =
V1LabelSelector
{ v1LabelSelectorMatchExpressions = Nothing
, v1LabelSelectorMatchLabels = Nothing
}
data V1LabelSelectorRequirement = V1LabelSelectorRequirement
{ v1LabelSelectorRequirementKey :: !(Text)
, v1LabelSelectorRequirementOperator :: !(Text)
, v1LabelSelectorRequirementValues :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LabelSelectorRequirement where
parseJSON = A.withObject "V1LabelSelectorRequirement" $ \o ->
V1LabelSelectorRequirement
<$> (o .: "key")
<*> (o .: "operator")
<*> (o .:? "values")
instance A.ToJSON V1LabelSelectorRequirement where
toJSON V1LabelSelectorRequirement {..} =
_omitNulls
[ "key" .= v1LabelSelectorRequirementKey
, "operator" .= v1LabelSelectorRequirementOperator
, "values" .= v1LabelSelectorRequirementValues
]
mkV1LabelSelectorRequirement
:: Text
-> Text
-> V1LabelSelectorRequirement
mkV1LabelSelectorRequirement v1LabelSelectorRequirementKey v1LabelSelectorRequirementOperator =
V1LabelSelectorRequirement
{ v1LabelSelectorRequirementKey
, v1LabelSelectorRequirementOperator
, v1LabelSelectorRequirementValues = Nothing
}
data V1Lease = V1Lease
{ v1LeaseApiVersion :: !(Maybe Text)
, v1LeaseKind :: !(Maybe Text)
, v1LeaseMetadata :: !(Maybe V1ObjectMeta)
, v1LeaseSpec :: !(Maybe V1LeaseSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Lease where
parseJSON = A.withObject "V1Lease" $ \o ->
V1Lease
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V1Lease where
toJSON V1Lease {..} =
_omitNulls
[ "apiVersion" .= v1LeaseApiVersion
, "kind" .= v1LeaseKind
, "metadata" .= v1LeaseMetadata
, "spec" .= v1LeaseSpec
]
mkV1Lease
:: V1Lease
mkV1Lease =
V1Lease
{ v1LeaseApiVersion = Nothing
, v1LeaseKind = Nothing
, v1LeaseMetadata = Nothing
, v1LeaseSpec = Nothing
}
data V1LeaseList = V1LeaseList
{ v1LeaseListApiVersion :: !(Maybe Text)
, v1LeaseListItems :: !([V1Lease])
, v1LeaseListKind :: !(Maybe Text)
, v1LeaseListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LeaseList where
parseJSON = A.withObject "V1LeaseList" $ \o ->
V1LeaseList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1LeaseList where
toJSON V1LeaseList {..} =
_omitNulls
[ "apiVersion" .= v1LeaseListApiVersion
, "items" .= v1LeaseListItems
, "kind" .= v1LeaseListKind
, "metadata" .= v1LeaseListMetadata
]
mkV1LeaseList
:: [V1Lease]
-> V1LeaseList
mkV1LeaseList v1LeaseListItems =
V1LeaseList
{ v1LeaseListApiVersion = Nothing
, v1LeaseListItems
, v1LeaseListKind = Nothing
, v1LeaseListMetadata = Nothing
}
data V1LeaseSpec = V1LeaseSpec
{ v1LeaseSpecAcquireTime :: !(Maybe DateTime)
, v1LeaseSpecHolderIdentity :: !(Maybe Text)
, v1LeaseSpecLeaseDurationSeconds :: !(Maybe Int)
, v1LeaseSpecLeaseTransitions :: !(Maybe Int)
, v1LeaseSpecRenewTime :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LeaseSpec where
parseJSON = A.withObject "V1LeaseSpec" $ \o ->
V1LeaseSpec
<$> (o .:? "acquireTime")
<*> (o .:? "holderIdentity")
<*> (o .:? "leaseDurationSeconds")
<*> (o .:? "leaseTransitions")
<*> (o .:? "renewTime")
instance A.ToJSON V1LeaseSpec where
toJSON V1LeaseSpec {..} =
_omitNulls
[ "acquireTime" .= v1LeaseSpecAcquireTime
, "holderIdentity" .= v1LeaseSpecHolderIdentity
, "leaseDurationSeconds" .= v1LeaseSpecLeaseDurationSeconds
, "leaseTransitions" .= v1LeaseSpecLeaseTransitions
, "renewTime" .= v1LeaseSpecRenewTime
]
mkV1LeaseSpec
:: V1LeaseSpec
mkV1LeaseSpec =
V1LeaseSpec
{ v1LeaseSpecAcquireTime = Nothing
, v1LeaseSpecHolderIdentity = Nothing
, v1LeaseSpecLeaseDurationSeconds = Nothing
, v1LeaseSpecLeaseTransitions = Nothing
, v1LeaseSpecRenewTime = Nothing
}
data V1Lifecycle = V1Lifecycle
{ v1LifecyclePostStart :: !(Maybe V1Handler)
, v1LifecyclePreStop :: !(Maybe V1Handler)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Lifecycle where
parseJSON = A.withObject "V1Lifecycle" $ \o ->
V1Lifecycle
<$> (o .:? "postStart")
<*> (o .:? "preStop")
instance A.ToJSON V1Lifecycle where
toJSON V1Lifecycle {..} =
_omitNulls
[ "postStart" .= v1LifecyclePostStart
, "preStop" .= v1LifecyclePreStop
]
mkV1Lifecycle
:: V1Lifecycle
mkV1Lifecycle =
V1Lifecycle
{ v1LifecyclePostStart = Nothing
, v1LifecyclePreStop = Nothing
}
data V1LimitRange = V1LimitRange
{ v1LimitRangeApiVersion :: !(Maybe Text)
, v1LimitRangeKind :: !(Maybe Text)
, v1LimitRangeMetadata :: !(Maybe V1ObjectMeta)
, v1LimitRangeSpec :: !(Maybe V1LimitRangeSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LimitRange where
parseJSON = A.withObject "V1LimitRange" $ \o ->
V1LimitRange
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V1LimitRange where
toJSON V1LimitRange {..} =
_omitNulls
[ "apiVersion" .= v1LimitRangeApiVersion
, "kind" .= v1LimitRangeKind
, "metadata" .= v1LimitRangeMetadata
, "spec" .= v1LimitRangeSpec
]
mkV1LimitRange
:: V1LimitRange
mkV1LimitRange =
V1LimitRange
{ v1LimitRangeApiVersion = Nothing
, v1LimitRangeKind = Nothing
, v1LimitRangeMetadata = Nothing
, v1LimitRangeSpec = Nothing
}
data V1LimitRangeItem = V1LimitRangeItem
{ v1LimitRangeItemDefault :: !(Maybe (Map.Map String Quantity))
, v1LimitRangeItemDefaultRequest :: !(Maybe (Map.Map String Quantity))
, v1LimitRangeItemMax :: !(Maybe (Map.Map String Quantity))
, v1LimitRangeItemMaxLimitRequestRatio :: !(Maybe (Map.Map String Quantity))
, v1LimitRangeItemMin :: !(Maybe (Map.Map String Quantity))
, v1LimitRangeItemType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LimitRangeItem where
parseJSON = A.withObject "V1LimitRangeItem" $ \o ->
V1LimitRangeItem
<$> (o .:? "default")
<*> (o .:? "defaultRequest")
<*> (o .:? "max")
<*> (o .:? "maxLimitRequestRatio")
<*> (o .:? "min")
<*> (o .:? "type")
instance A.ToJSON V1LimitRangeItem where
toJSON V1LimitRangeItem {..} =
_omitNulls
[ "default" .= v1LimitRangeItemDefault
, "defaultRequest" .= v1LimitRangeItemDefaultRequest
, "max" .= v1LimitRangeItemMax
, "maxLimitRequestRatio" .= v1LimitRangeItemMaxLimitRequestRatio
, "min" .= v1LimitRangeItemMin
, "type" .= v1LimitRangeItemType
]
mkV1LimitRangeItem
:: V1LimitRangeItem
mkV1LimitRangeItem =
V1LimitRangeItem
{ v1LimitRangeItemDefault = Nothing
, v1LimitRangeItemDefaultRequest = Nothing
, v1LimitRangeItemMax = Nothing
, v1LimitRangeItemMaxLimitRequestRatio = Nothing
, v1LimitRangeItemMin = Nothing
, v1LimitRangeItemType = Nothing
}
data V1LimitRangeList = V1LimitRangeList
{ v1LimitRangeListApiVersion :: !(Maybe Text)
, v1LimitRangeListItems :: !([V1LimitRange])
, v1LimitRangeListKind :: !(Maybe Text)
, v1LimitRangeListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LimitRangeList where
parseJSON = A.withObject "V1LimitRangeList" $ \o ->
V1LimitRangeList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1LimitRangeList where
toJSON V1LimitRangeList {..} =
_omitNulls
[ "apiVersion" .= v1LimitRangeListApiVersion
, "items" .= v1LimitRangeListItems
, "kind" .= v1LimitRangeListKind
, "metadata" .= v1LimitRangeListMetadata
]
mkV1LimitRangeList
:: [V1LimitRange]
-> V1LimitRangeList
mkV1LimitRangeList v1LimitRangeListItems =
V1LimitRangeList
{ v1LimitRangeListApiVersion = Nothing
, v1LimitRangeListItems
, v1LimitRangeListKind = Nothing
, v1LimitRangeListMetadata = Nothing
}
data V1LimitRangeSpec = V1LimitRangeSpec
{ v1LimitRangeSpecLimits :: !([V1LimitRangeItem])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LimitRangeSpec where
parseJSON = A.withObject "V1LimitRangeSpec" $ \o ->
V1LimitRangeSpec
<$> (o .: "limits")
instance A.ToJSON V1LimitRangeSpec where
toJSON V1LimitRangeSpec {..} =
_omitNulls
[ "limits" .= v1LimitRangeSpecLimits
]
mkV1LimitRangeSpec
:: [V1LimitRangeItem]
-> V1LimitRangeSpec
mkV1LimitRangeSpec v1LimitRangeSpecLimits =
V1LimitRangeSpec
{ v1LimitRangeSpecLimits
}
data V1ListMeta = V1ListMeta
{ v1ListMetaContinue :: !(Maybe Text)
, v1ListMetaResourceVersion :: !(Maybe Text)
, v1ListMetaSelfLink :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ListMeta where
parseJSON = A.withObject "V1ListMeta" $ \o ->
V1ListMeta
<$> (o .:? "continue")
<*> (o .:? "resourceVersion")
<*> (o .:? "selfLink")
instance A.ToJSON V1ListMeta where
toJSON V1ListMeta {..} =
_omitNulls
[ "continue" .= v1ListMetaContinue
, "resourceVersion" .= v1ListMetaResourceVersion
, "selfLink" .= v1ListMetaSelfLink
]
mkV1ListMeta
:: V1ListMeta
mkV1ListMeta =
V1ListMeta
{ v1ListMetaContinue = Nothing
, v1ListMetaResourceVersion = Nothing
, v1ListMetaSelfLink = Nothing
}
data V1LoadBalancerIngress = V1LoadBalancerIngress
{ v1LoadBalancerIngressHostname :: !(Maybe Text)
, v1LoadBalancerIngressIp :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LoadBalancerIngress where
parseJSON = A.withObject "V1LoadBalancerIngress" $ \o ->
V1LoadBalancerIngress
<$> (o .:? "hostname")
<*> (o .:? "ip")
instance A.ToJSON V1LoadBalancerIngress where
toJSON V1LoadBalancerIngress {..} =
_omitNulls
[ "hostname" .= v1LoadBalancerIngressHostname
, "ip" .= v1LoadBalancerIngressIp
]
mkV1LoadBalancerIngress
:: V1LoadBalancerIngress
mkV1LoadBalancerIngress =
V1LoadBalancerIngress
{ v1LoadBalancerIngressHostname = Nothing
, v1LoadBalancerIngressIp = Nothing
}
data V1LoadBalancerStatus = V1LoadBalancerStatus
{ v1LoadBalancerStatusIngress :: !(Maybe [V1LoadBalancerIngress])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LoadBalancerStatus where
parseJSON = A.withObject "V1LoadBalancerStatus" $ \o ->
V1LoadBalancerStatus
<$> (o .:? "ingress")
instance A.ToJSON V1LoadBalancerStatus where
toJSON V1LoadBalancerStatus {..} =
_omitNulls
[ "ingress" .= v1LoadBalancerStatusIngress
]
mkV1LoadBalancerStatus
:: V1LoadBalancerStatus
mkV1LoadBalancerStatus =
V1LoadBalancerStatus
{ v1LoadBalancerStatusIngress = Nothing
}
data V1LocalObjectReference = V1LocalObjectReference
{ v1LocalObjectReferenceName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LocalObjectReference where
parseJSON = A.withObject "V1LocalObjectReference" $ \o ->
V1LocalObjectReference
<$> (o .:? "name")
instance A.ToJSON V1LocalObjectReference where
toJSON V1LocalObjectReference {..} =
_omitNulls
[ "name" .= v1LocalObjectReferenceName
]
mkV1LocalObjectReference
:: V1LocalObjectReference
mkV1LocalObjectReference =
V1LocalObjectReference
{ v1LocalObjectReferenceName = Nothing
}
data V1LocalSubjectAccessReview = V1LocalSubjectAccessReview
{ v1LocalSubjectAccessReviewApiVersion :: !(Maybe Text)
, v1LocalSubjectAccessReviewKind :: !(Maybe Text)
, v1LocalSubjectAccessReviewMetadata :: !(Maybe V1ObjectMeta)
, v1LocalSubjectAccessReviewSpec :: !(V1SubjectAccessReviewSpec)
, v1LocalSubjectAccessReviewStatus :: !(Maybe V1SubjectAccessReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LocalSubjectAccessReview where
parseJSON = A.withObject "V1LocalSubjectAccessReview" $ \o ->
V1LocalSubjectAccessReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1LocalSubjectAccessReview where
toJSON V1LocalSubjectAccessReview {..} =
_omitNulls
[ "apiVersion" .= v1LocalSubjectAccessReviewApiVersion
, "kind" .= v1LocalSubjectAccessReviewKind
, "metadata" .= v1LocalSubjectAccessReviewMetadata
, "spec" .= v1LocalSubjectAccessReviewSpec
, "status" .= v1LocalSubjectAccessReviewStatus
]
mkV1LocalSubjectAccessReview
:: V1SubjectAccessReviewSpec
-> V1LocalSubjectAccessReview
mkV1LocalSubjectAccessReview v1LocalSubjectAccessReviewSpec =
V1LocalSubjectAccessReview
{ v1LocalSubjectAccessReviewApiVersion = Nothing
, v1LocalSubjectAccessReviewKind = Nothing
, v1LocalSubjectAccessReviewMetadata = Nothing
, v1LocalSubjectAccessReviewSpec
, v1LocalSubjectAccessReviewStatus = Nothing
}
data V1LocalVolumeSource = V1LocalVolumeSource
{ v1LocalVolumeSourceFsType :: !(Maybe Text)
, v1LocalVolumeSourcePath :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1LocalVolumeSource where
parseJSON = A.withObject "V1LocalVolumeSource" $ \o ->
V1LocalVolumeSource
<$> (o .:? "fsType")
<*> (o .: "path")
instance A.ToJSON V1LocalVolumeSource where
toJSON V1LocalVolumeSource {..} =
_omitNulls
[ "fsType" .= v1LocalVolumeSourceFsType
, "path" .= v1LocalVolumeSourcePath
]
mkV1LocalVolumeSource
:: Text
-> V1LocalVolumeSource
mkV1LocalVolumeSource v1LocalVolumeSourcePath =
V1LocalVolumeSource
{ v1LocalVolumeSourceFsType = Nothing
, v1LocalVolumeSourcePath
}
data V1ManagedFieldsEntry = V1ManagedFieldsEntry
{ v1ManagedFieldsEntryApiVersion :: !(Maybe Text)
, v1ManagedFieldsEntryFields :: !(Maybe A.Value)
, v1ManagedFieldsEntryManager :: !(Maybe Text)
, v1ManagedFieldsEntryOperation :: !(Maybe Text)
, v1ManagedFieldsEntryTime :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ManagedFieldsEntry where
parseJSON = A.withObject "V1ManagedFieldsEntry" $ \o ->
V1ManagedFieldsEntry
<$> (o .:? "apiVersion")
<*> (o .:? "fields")
<*> (o .:? "manager")
<*> (o .:? "operation")
<*> (o .:? "time")
instance A.ToJSON V1ManagedFieldsEntry where
toJSON V1ManagedFieldsEntry {..} =
_omitNulls
[ "apiVersion" .= v1ManagedFieldsEntryApiVersion
, "fields" .= v1ManagedFieldsEntryFields
, "manager" .= v1ManagedFieldsEntryManager
, "operation" .= v1ManagedFieldsEntryOperation
, "time" .= v1ManagedFieldsEntryTime
]
mkV1ManagedFieldsEntry
:: V1ManagedFieldsEntry
mkV1ManagedFieldsEntry =
V1ManagedFieldsEntry
{ v1ManagedFieldsEntryApiVersion = Nothing
, v1ManagedFieldsEntryFields = Nothing
, v1ManagedFieldsEntryManager = Nothing
, v1ManagedFieldsEntryOperation = Nothing
, v1ManagedFieldsEntryTime = Nothing
}
data V1NFSVolumeSource = V1NFSVolumeSource
{ v1NFSVolumeSourcePath :: !(Text)
, v1NFSVolumeSourceReadOnly :: !(Maybe Bool)
, v1NFSVolumeSourceServer :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NFSVolumeSource where
parseJSON = A.withObject "V1NFSVolumeSource" $ \o ->
V1NFSVolumeSource
<$> (o .: "path")
<*> (o .:? "readOnly")
<*> (o .: "server")
instance A.ToJSON V1NFSVolumeSource where
toJSON V1NFSVolumeSource {..} =
_omitNulls
[ "path" .= v1NFSVolumeSourcePath
, "readOnly" .= v1NFSVolumeSourceReadOnly
, "server" .= v1NFSVolumeSourceServer
]
mkV1NFSVolumeSource
:: Text
-> Text
-> V1NFSVolumeSource
mkV1NFSVolumeSource v1NFSVolumeSourcePath v1NFSVolumeSourceServer =
V1NFSVolumeSource
{ v1NFSVolumeSourcePath
, v1NFSVolumeSourceReadOnly = Nothing
, v1NFSVolumeSourceServer
}
data V1Namespace = V1Namespace
{ v1NamespaceApiVersion :: !(Maybe Text)
, v1NamespaceKind :: !(Maybe Text)
, v1NamespaceMetadata :: !(Maybe V1ObjectMeta)
, v1NamespaceSpec :: !(Maybe V1NamespaceSpec)
, v1NamespaceStatus :: !(Maybe V1NamespaceStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Namespace where
parseJSON = A.withObject "V1Namespace" $ \o ->
V1Namespace
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1Namespace where
toJSON V1Namespace {..} =
_omitNulls
[ "apiVersion" .= v1NamespaceApiVersion
, "kind" .= v1NamespaceKind
, "metadata" .= v1NamespaceMetadata
, "spec" .= v1NamespaceSpec
, "status" .= v1NamespaceStatus
]
mkV1Namespace
:: V1Namespace
mkV1Namespace =
V1Namespace
{ v1NamespaceApiVersion = Nothing
, v1NamespaceKind = Nothing
, v1NamespaceMetadata = Nothing
, v1NamespaceSpec = Nothing
, v1NamespaceStatus = Nothing
}
data V1NamespaceList = V1NamespaceList
{ v1NamespaceListApiVersion :: !(Maybe Text)
, v1NamespaceListItems :: !([V1Namespace])
, v1NamespaceListKind :: !(Maybe Text)
, v1NamespaceListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NamespaceList where
parseJSON = A.withObject "V1NamespaceList" $ \o ->
V1NamespaceList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1NamespaceList where
toJSON V1NamespaceList {..} =
_omitNulls
[ "apiVersion" .= v1NamespaceListApiVersion
, "items" .= v1NamespaceListItems
, "kind" .= v1NamespaceListKind
, "metadata" .= v1NamespaceListMetadata
]
mkV1NamespaceList
:: [V1Namespace]
-> V1NamespaceList
mkV1NamespaceList v1NamespaceListItems =
V1NamespaceList
{ v1NamespaceListApiVersion = Nothing
, v1NamespaceListItems
, v1NamespaceListKind = Nothing
, v1NamespaceListMetadata = Nothing
}
data V1NamespaceSpec = V1NamespaceSpec
{ v1NamespaceSpecFinalizers :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NamespaceSpec where
parseJSON = A.withObject "V1NamespaceSpec" $ \o ->
V1NamespaceSpec
<$> (o .:? "finalizers")
instance A.ToJSON V1NamespaceSpec where
toJSON V1NamespaceSpec {..} =
_omitNulls
[ "finalizers" .= v1NamespaceSpecFinalizers
]
mkV1NamespaceSpec
:: V1NamespaceSpec
mkV1NamespaceSpec =
V1NamespaceSpec
{ v1NamespaceSpecFinalizers = Nothing
}
data V1NamespaceStatus = V1NamespaceStatus
{ v1NamespaceStatusPhase :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NamespaceStatus where
parseJSON = A.withObject "V1NamespaceStatus" $ \o ->
V1NamespaceStatus
<$> (o .:? "phase")
instance A.ToJSON V1NamespaceStatus where
toJSON V1NamespaceStatus {..} =
_omitNulls
[ "phase" .= v1NamespaceStatusPhase
]
mkV1NamespaceStatus
:: V1NamespaceStatus
mkV1NamespaceStatus =
V1NamespaceStatus
{ v1NamespaceStatusPhase = Nothing
}
data V1NetworkPolicy = V1NetworkPolicy
{ v1NetworkPolicyApiVersion :: !(Maybe Text)
, v1NetworkPolicyKind :: !(Maybe Text)
, v1NetworkPolicyMetadata :: !(Maybe V1ObjectMeta)
, v1NetworkPolicySpec :: !(Maybe V1NetworkPolicySpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NetworkPolicy where
parseJSON = A.withObject "V1NetworkPolicy" $ \o ->
V1NetworkPolicy
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V1NetworkPolicy where
toJSON V1NetworkPolicy {..} =
_omitNulls
[ "apiVersion" .= v1NetworkPolicyApiVersion
, "kind" .= v1NetworkPolicyKind
, "metadata" .= v1NetworkPolicyMetadata
, "spec" .= v1NetworkPolicySpec
]
mkV1NetworkPolicy
:: V1NetworkPolicy
mkV1NetworkPolicy =
V1NetworkPolicy
{ v1NetworkPolicyApiVersion = Nothing
, v1NetworkPolicyKind = Nothing
, v1NetworkPolicyMetadata = Nothing
, v1NetworkPolicySpec = Nothing
}
data V1NetworkPolicyEgressRule = V1NetworkPolicyEgressRule
{ v1NetworkPolicyEgressRulePorts :: !(Maybe [V1NetworkPolicyPort])
, v1NetworkPolicyEgressRuleTo :: !(Maybe [V1NetworkPolicyPeer])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NetworkPolicyEgressRule where
parseJSON = A.withObject "V1NetworkPolicyEgressRule" $ \o ->
V1NetworkPolicyEgressRule
<$> (o .:? "ports")
<*> (o .:? "to")
instance A.ToJSON V1NetworkPolicyEgressRule where
toJSON V1NetworkPolicyEgressRule {..} =
_omitNulls
[ "ports" .= v1NetworkPolicyEgressRulePorts
, "to" .= v1NetworkPolicyEgressRuleTo
]
mkV1NetworkPolicyEgressRule
:: V1NetworkPolicyEgressRule
mkV1NetworkPolicyEgressRule =
V1NetworkPolicyEgressRule
{ v1NetworkPolicyEgressRulePorts = Nothing
, v1NetworkPolicyEgressRuleTo = Nothing
}
data V1NetworkPolicyIngressRule = V1NetworkPolicyIngressRule
{ v1NetworkPolicyIngressRuleFrom :: !(Maybe [V1NetworkPolicyPeer])
, v1NetworkPolicyIngressRulePorts :: !(Maybe [V1NetworkPolicyPort])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NetworkPolicyIngressRule where
parseJSON = A.withObject "V1NetworkPolicyIngressRule" $ \o ->
V1NetworkPolicyIngressRule
<$> (o .:? "from")
<*> (o .:? "ports")
instance A.ToJSON V1NetworkPolicyIngressRule where
toJSON V1NetworkPolicyIngressRule {..} =
_omitNulls
[ "from" .= v1NetworkPolicyIngressRuleFrom
, "ports" .= v1NetworkPolicyIngressRulePorts
]
mkV1NetworkPolicyIngressRule
:: V1NetworkPolicyIngressRule
mkV1NetworkPolicyIngressRule =
V1NetworkPolicyIngressRule
{ v1NetworkPolicyIngressRuleFrom = Nothing
, v1NetworkPolicyIngressRulePorts = Nothing
}
data V1NetworkPolicyList = V1NetworkPolicyList
{ v1NetworkPolicyListApiVersion :: !(Maybe Text)
, v1NetworkPolicyListItems :: !([V1NetworkPolicy])
, v1NetworkPolicyListKind :: !(Maybe Text)
, v1NetworkPolicyListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NetworkPolicyList where
parseJSON = A.withObject "V1NetworkPolicyList" $ \o ->
V1NetworkPolicyList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1NetworkPolicyList where
toJSON V1NetworkPolicyList {..} =
_omitNulls
[ "apiVersion" .= v1NetworkPolicyListApiVersion
, "items" .= v1NetworkPolicyListItems
, "kind" .= v1NetworkPolicyListKind
, "metadata" .= v1NetworkPolicyListMetadata
]
mkV1NetworkPolicyList
:: [V1NetworkPolicy]
-> V1NetworkPolicyList
mkV1NetworkPolicyList v1NetworkPolicyListItems =
V1NetworkPolicyList
{ v1NetworkPolicyListApiVersion = Nothing
, v1NetworkPolicyListItems
, v1NetworkPolicyListKind = Nothing
, v1NetworkPolicyListMetadata = Nothing
}
data V1NetworkPolicyPeer = V1NetworkPolicyPeer
{ v1NetworkPolicyPeerIpBlock :: !(Maybe V1IPBlock)
, v1NetworkPolicyPeerNamespaceSelector :: !(Maybe V1LabelSelector)
, v1NetworkPolicyPeerPodSelector :: !(Maybe V1LabelSelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NetworkPolicyPeer where
parseJSON = A.withObject "V1NetworkPolicyPeer" $ \o ->
V1NetworkPolicyPeer
<$> (o .:? "ipBlock")
<*> (o .:? "namespaceSelector")
<*> (o .:? "podSelector")
instance A.ToJSON V1NetworkPolicyPeer where
toJSON V1NetworkPolicyPeer {..} =
_omitNulls
[ "ipBlock" .= v1NetworkPolicyPeerIpBlock
, "namespaceSelector" .= v1NetworkPolicyPeerNamespaceSelector
, "podSelector" .= v1NetworkPolicyPeerPodSelector
]
mkV1NetworkPolicyPeer
:: V1NetworkPolicyPeer
mkV1NetworkPolicyPeer =
V1NetworkPolicyPeer
{ v1NetworkPolicyPeerIpBlock = Nothing
, v1NetworkPolicyPeerNamespaceSelector = Nothing
, v1NetworkPolicyPeerPodSelector = Nothing
}
data V1NetworkPolicyPort = V1NetworkPolicyPort
{ v1NetworkPolicyPortPort :: !(Maybe IntOrString)
, v1NetworkPolicyPortProtocol :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NetworkPolicyPort where
parseJSON = A.withObject "V1NetworkPolicyPort" $ \o ->
V1NetworkPolicyPort
<$> (o .:? "port")
<*> (o .:? "protocol")
instance A.ToJSON V1NetworkPolicyPort where
toJSON V1NetworkPolicyPort {..} =
_omitNulls
[ "port" .= v1NetworkPolicyPortPort
, "protocol" .= v1NetworkPolicyPortProtocol
]
mkV1NetworkPolicyPort
:: V1NetworkPolicyPort
mkV1NetworkPolicyPort =
V1NetworkPolicyPort
{ v1NetworkPolicyPortPort = Nothing
, v1NetworkPolicyPortProtocol = Nothing
}
data V1NetworkPolicySpec = V1NetworkPolicySpec
{ v1NetworkPolicySpecEgress :: !(Maybe [V1NetworkPolicyEgressRule])
, v1NetworkPolicySpecIngress :: !(Maybe [V1NetworkPolicyIngressRule])
, v1NetworkPolicySpecPodSelector :: !(V1LabelSelector)
, v1NetworkPolicySpecPolicyTypes :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NetworkPolicySpec where
parseJSON = A.withObject "V1NetworkPolicySpec" $ \o ->
V1NetworkPolicySpec
<$> (o .:? "egress")
<*> (o .:? "ingress")
<*> (o .: "podSelector")
<*> (o .:? "policyTypes")
instance A.ToJSON V1NetworkPolicySpec where
toJSON V1NetworkPolicySpec {..} =
_omitNulls
[ "egress" .= v1NetworkPolicySpecEgress
, "ingress" .= v1NetworkPolicySpecIngress
, "podSelector" .= v1NetworkPolicySpecPodSelector
, "policyTypes" .= v1NetworkPolicySpecPolicyTypes
]
mkV1NetworkPolicySpec
:: V1LabelSelector
-> V1NetworkPolicySpec
mkV1NetworkPolicySpec v1NetworkPolicySpecPodSelector =
V1NetworkPolicySpec
{ v1NetworkPolicySpecEgress = Nothing
, v1NetworkPolicySpecIngress = Nothing
, v1NetworkPolicySpecPodSelector
, v1NetworkPolicySpecPolicyTypes = Nothing
}
data V1Node = V1Node
{ v1NodeApiVersion :: !(Maybe Text)
, v1NodeKind :: !(Maybe Text)
, v1NodeMetadata :: !(Maybe V1ObjectMeta)
, v1NodeSpec :: !(Maybe V1NodeSpec)
, v1NodeStatus :: !(Maybe V1NodeStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Node where
parseJSON = A.withObject "V1Node" $ \o ->
V1Node
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1Node where
toJSON V1Node {..} =
_omitNulls
[ "apiVersion" .= v1NodeApiVersion
, "kind" .= v1NodeKind
, "metadata" .= v1NodeMetadata
, "spec" .= v1NodeSpec
, "status" .= v1NodeStatus
]
mkV1Node
:: V1Node
mkV1Node =
V1Node
{ v1NodeApiVersion = Nothing
, v1NodeKind = Nothing
, v1NodeMetadata = Nothing
, v1NodeSpec = Nothing
, v1NodeStatus = Nothing
}
data V1NodeAddress = V1NodeAddress
{ v1NodeAddressAddress :: !(Text)
, v1NodeAddressType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeAddress where
parseJSON = A.withObject "V1NodeAddress" $ \o ->
V1NodeAddress
<$> (o .: "address")
<*> (o .: "type")
instance A.ToJSON V1NodeAddress where
toJSON V1NodeAddress {..} =
_omitNulls
[ "address" .= v1NodeAddressAddress
, "type" .= v1NodeAddressType
]
mkV1NodeAddress
:: Text
-> Text
-> V1NodeAddress
mkV1NodeAddress v1NodeAddressAddress v1NodeAddressType =
V1NodeAddress
{ v1NodeAddressAddress
, v1NodeAddressType
}
data V1NodeAffinity = V1NodeAffinity
{ v1NodeAffinityPreferredDuringSchedulingIgnoredDuringExecution :: !(Maybe [V1PreferredSchedulingTerm])
, v1NodeAffinityRequiredDuringSchedulingIgnoredDuringExecution :: !(Maybe V1NodeSelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeAffinity where
parseJSON = A.withObject "V1NodeAffinity" $ \o ->
V1NodeAffinity
<$> (o .:? "preferredDuringSchedulingIgnoredDuringExecution")
<*> (o .:? "requiredDuringSchedulingIgnoredDuringExecution")
instance A.ToJSON V1NodeAffinity where
toJSON V1NodeAffinity {..} =
_omitNulls
[ "preferredDuringSchedulingIgnoredDuringExecution" .= v1NodeAffinityPreferredDuringSchedulingIgnoredDuringExecution
, "requiredDuringSchedulingIgnoredDuringExecution" .= v1NodeAffinityRequiredDuringSchedulingIgnoredDuringExecution
]
mkV1NodeAffinity
:: V1NodeAffinity
mkV1NodeAffinity =
V1NodeAffinity
{ v1NodeAffinityPreferredDuringSchedulingIgnoredDuringExecution = Nothing
, v1NodeAffinityRequiredDuringSchedulingIgnoredDuringExecution = Nothing
}
data V1NodeCondition = V1NodeCondition
{ v1NodeConditionLastHeartbeatTime :: !(Maybe DateTime)
, v1NodeConditionLastTransitionTime :: !(Maybe DateTime)
, v1NodeConditionMessage :: !(Maybe Text)
, v1NodeConditionReason :: !(Maybe Text)
, v1NodeConditionStatus :: !(Text)
, v1NodeConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeCondition where
parseJSON = A.withObject "V1NodeCondition" $ \o ->
V1NodeCondition
<$> (o .:? "lastHeartbeatTime")
<*> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1NodeCondition where
toJSON V1NodeCondition {..} =
_omitNulls
[ "lastHeartbeatTime" .= v1NodeConditionLastHeartbeatTime
, "lastTransitionTime" .= v1NodeConditionLastTransitionTime
, "message" .= v1NodeConditionMessage
, "reason" .= v1NodeConditionReason
, "status" .= v1NodeConditionStatus
, "type" .= v1NodeConditionType
]
mkV1NodeCondition
:: Text
-> Text
-> V1NodeCondition
mkV1NodeCondition v1NodeConditionStatus v1NodeConditionType =
V1NodeCondition
{ v1NodeConditionLastHeartbeatTime = Nothing
, v1NodeConditionLastTransitionTime = Nothing
, v1NodeConditionMessage = Nothing
, v1NodeConditionReason = Nothing
, v1NodeConditionStatus
, v1NodeConditionType
}
data V1NodeConfigSource = V1NodeConfigSource
{ v1NodeConfigSourceConfigMap :: !(Maybe V1ConfigMapNodeConfigSource)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeConfigSource where
parseJSON = A.withObject "V1NodeConfigSource" $ \o ->
V1NodeConfigSource
<$> (o .:? "configMap")
instance A.ToJSON V1NodeConfigSource where
toJSON V1NodeConfigSource {..} =
_omitNulls
[ "configMap" .= v1NodeConfigSourceConfigMap
]
mkV1NodeConfigSource
:: V1NodeConfigSource
mkV1NodeConfigSource =
V1NodeConfigSource
{ v1NodeConfigSourceConfigMap = Nothing
}
data V1NodeConfigStatus = V1NodeConfigStatus
{ v1NodeConfigStatusActive :: !(Maybe V1NodeConfigSource)
, v1NodeConfigStatusAssigned :: !(Maybe V1NodeConfigSource)
, v1NodeConfigStatusError :: !(Maybe Text)
, v1NodeConfigStatusLastKnownGood :: !(Maybe V1NodeConfigSource)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeConfigStatus where
parseJSON = A.withObject "V1NodeConfigStatus" $ \o ->
V1NodeConfigStatus
<$> (o .:? "active")
<*> (o .:? "assigned")
<*> (o .:? "error")
<*> (o .:? "lastKnownGood")
instance A.ToJSON V1NodeConfigStatus where
toJSON V1NodeConfigStatus {..} =
_omitNulls
[ "active" .= v1NodeConfigStatusActive
, "assigned" .= v1NodeConfigStatusAssigned
, "error" .= v1NodeConfigStatusError
, "lastKnownGood" .= v1NodeConfigStatusLastKnownGood
]
mkV1NodeConfigStatus
:: V1NodeConfigStatus
mkV1NodeConfigStatus =
V1NodeConfigStatus
{ v1NodeConfigStatusActive = Nothing
, v1NodeConfigStatusAssigned = Nothing
, v1NodeConfigStatusError = Nothing
, v1NodeConfigStatusLastKnownGood = Nothing
}
data V1NodeDaemonEndpoints = V1NodeDaemonEndpoints
{ v1NodeDaemonEndpointsKubeletEndpoint :: !(Maybe V1DaemonEndpoint)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeDaemonEndpoints where
parseJSON = A.withObject "V1NodeDaemonEndpoints" $ \o ->
V1NodeDaemonEndpoints
<$> (o .:? "kubeletEndpoint")
instance A.ToJSON V1NodeDaemonEndpoints where
toJSON V1NodeDaemonEndpoints {..} =
_omitNulls
[ "kubeletEndpoint" .= v1NodeDaemonEndpointsKubeletEndpoint
]
mkV1NodeDaemonEndpoints
:: V1NodeDaemonEndpoints
mkV1NodeDaemonEndpoints =
V1NodeDaemonEndpoints
{ v1NodeDaemonEndpointsKubeletEndpoint = Nothing
}
data V1NodeList = V1NodeList
{ v1NodeListApiVersion :: !(Maybe Text)
, v1NodeListItems :: !([V1Node])
, v1NodeListKind :: !(Maybe Text)
, v1NodeListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeList where
parseJSON = A.withObject "V1NodeList" $ \o ->
V1NodeList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1NodeList where
toJSON V1NodeList {..} =
_omitNulls
[ "apiVersion" .= v1NodeListApiVersion
, "items" .= v1NodeListItems
, "kind" .= v1NodeListKind
, "metadata" .= v1NodeListMetadata
]
mkV1NodeList
:: [V1Node]
-> V1NodeList
mkV1NodeList v1NodeListItems =
V1NodeList
{ v1NodeListApiVersion = Nothing
, v1NodeListItems
, v1NodeListKind = Nothing
, v1NodeListMetadata = Nothing
}
data V1NodeSelector = V1NodeSelector
{ v1NodeSelectorNodeSelectorTerms :: !([V1NodeSelectorTerm])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeSelector where
parseJSON = A.withObject "V1NodeSelector" $ \o ->
V1NodeSelector
<$> (o .: "nodeSelectorTerms")
instance A.ToJSON V1NodeSelector where
toJSON V1NodeSelector {..} =
_omitNulls
[ "nodeSelectorTerms" .= v1NodeSelectorNodeSelectorTerms
]
mkV1NodeSelector
:: [V1NodeSelectorTerm]
-> V1NodeSelector
mkV1NodeSelector v1NodeSelectorNodeSelectorTerms =
V1NodeSelector
{ v1NodeSelectorNodeSelectorTerms
}
data V1NodeSelectorRequirement = V1NodeSelectorRequirement
{ v1NodeSelectorRequirementKey :: !(Text)
, v1NodeSelectorRequirementOperator :: !(Text)
, v1NodeSelectorRequirementValues :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeSelectorRequirement where
parseJSON = A.withObject "V1NodeSelectorRequirement" $ \o ->
V1NodeSelectorRequirement
<$> (o .: "key")
<*> (o .: "operator")
<*> (o .:? "values")
instance A.ToJSON V1NodeSelectorRequirement where
toJSON V1NodeSelectorRequirement {..} =
_omitNulls
[ "key" .= v1NodeSelectorRequirementKey
, "operator" .= v1NodeSelectorRequirementOperator
, "values" .= v1NodeSelectorRequirementValues
]
mkV1NodeSelectorRequirement
:: Text
-> Text
-> V1NodeSelectorRequirement
mkV1NodeSelectorRequirement v1NodeSelectorRequirementKey v1NodeSelectorRequirementOperator =
V1NodeSelectorRequirement
{ v1NodeSelectorRequirementKey
, v1NodeSelectorRequirementOperator
, v1NodeSelectorRequirementValues = Nothing
}
data V1NodeSelectorTerm = V1NodeSelectorTerm
{ v1NodeSelectorTermMatchExpressions :: !(Maybe [V1NodeSelectorRequirement])
, v1NodeSelectorTermMatchFields :: !(Maybe [V1NodeSelectorRequirement])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeSelectorTerm where
parseJSON = A.withObject "V1NodeSelectorTerm" $ \o ->
V1NodeSelectorTerm
<$> (o .:? "matchExpressions")
<*> (o .:? "matchFields")
instance A.ToJSON V1NodeSelectorTerm where
toJSON V1NodeSelectorTerm {..} =
_omitNulls
[ "matchExpressions" .= v1NodeSelectorTermMatchExpressions
, "matchFields" .= v1NodeSelectorTermMatchFields
]
mkV1NodeSelectorTerm
:: V1NodeSelectorTerm
mkV1NodeSelectorTerm =
V1NodeSelectorTerm
{ v1NodeSelectorTermMatchExpressions = Nothing
, v1NodeSelectorTermMatchFields = Nothing
}
data V1NodeSpec = V1NodeSpec
{ v1NodeSpecConfigSource :: !(Maybe V1NodeConfigSource)
, v1NodeSpecExternalId :: !(Maybe Text)
, v1NodeSpecPodCidr :: !(Maybe Text)
, v1NodeSpecProviderId :: !(Maybe Text)
, v1NodeSpecTaints :: !(Maybe [V1Taint])
, v1NodeSpecUnschedulable :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeSpec where
parseJSON = A.withObject "V1NodeSpec" $ \o ->
V1NodeSpec
<$> (o .:? "configSource")
<*> (o .:? "externalID")
<*> (o .:? "podCIDR")
<*> (o .:? "providerID")
<*> (o .:? "taints")
<*> (o .:? "unschedulable")
instance A.ToJSON V1NodeSpec where
toJSON V1NodeSpec {..} =
_omitNulls
[ "configSource" .= v1NodeSpecConfigSource
, "externalID" .= v1NodeSpecExternalId
, "podCIDR" .= v1NodeSpecPodCidr
, "providerID" .= v1NodeSpecProviderId
, "taints" .= v1NodeSpecTaints
, "unschedulable" .= v1NodeSpecUnschedulable
]
mkV1NodeSpec
:: V1NodeSpec
mkV1NodeSpec =
V1NodeSpec
{ v1NodeSpecConfigSource = Nothing
, v1NodeSpecExternalId = Nothing
, v1NodeSpecPodCidr = Nothing
, v1NodeSpecProviderId = Nothing
, v1NodeSpecTaints = Nothing
, v1NodeSpecUnschedulable = Nothing
}
data V1NodeStatus = V1NodeStatus
{ v1NodeStatusAddresses :: !(Maybe [V1NodeAddress])
, v1NodeStatusAllocatable :: !(Maybe (Map.Map String Quantity))
, v1NodeStatusCapacity :: !(Maybe (Map.Map String Quantity))
, v1NodeStatusConditions :: !(Maybe [V1NodeCondition])
, v1NodeStatusConfig :: !(Maybe V1NodeConfigStatus)
, v1NodeStatusDaemonEndpoints :: !(Maybe V1NodeDaemonEndpoints)
, v1NodeStatusImages :: !(Maybe [V1ContainerImage])
, v1NodeStatusNodeInfo :: !(Maybe V1NodeSystemInfo)
, v1NodeStatusPhase :: !(Maybe Text)
, v1NodeStatusVolumesAttached :: !(Maybe [V1AttachedVolume])
, v1NodeStatusVolumesInUse :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeStatus where
parseJSON = A.withObject "V1NodeStatus" $ \o ->
V1NodeStatus
<$> (o .:? "addresses")
<*> (o .:? "allocatable")
<*> (o .:? "capacity")
<*> (o .:? "conditions")
<*> (o .:? "config")
<*> (o .:? "daemonEndpoints")
<*> (o .:? "images")
<*> (o .:? "nodeInfo")
<*> (o .:? "phase")
<*> (o .:? "volumesAttached")
<*> (o .:? "volumesInUse")
instance A.ToJSON V1NodeStatus where
toJSON V1NodeStatus {..} =
_omitNulls
[ "addresses" .= v1NodeStatusAddresses
, "allocatable" .= v1NodeStatusAllocatable
, "capacity" .= v1NodeStatusCapacity
, "conditions" .= v1NodeStatusConditions
, "config" .= v1NodeStatusConfig
, "daemonEndpoints" .= v1NodeStatusDaemonEndpoints
, "images" .= v1NodeStatusImages
, "nodeInfo" .= v1NodeStatusNodeInfo
, "phase" .= v1NodeStatusPhase
, "volumesAttached" .= v1NodeStatusVolumesAttached
, "volumesInUse" .= v1NodeStatusVolumesInUse
]
mkV1NodeStatus
:: V1NodeStatus
mkV1NodeStatus =
V1NodeStatus
{ v1NodeStatusAddresses = Nothing
, v1NodeStatusAllocatable = Nothing
, v1NodeStatusCapacity = Nothing
, v1NodeStatusConditions = Nothing
, v1NodeStatusConfig = Nothing
, v1NodeStatusDaemonEndpoints = Nothing
, v1NodeStatusImages = Nothing
, v1NodeStatusNodeInfo = Nothing
, v1NodeStatusPhase = Nothing
, v1NodeStatusVolumesAttached = Nothing
, v1NodeStatusVolumesInUse = Nothing
}
data V1NodeSystemInfo = V1NodeSystemInfo
{ v1NodeSystemInfoArchitecture :: !(Text)
, v1NodeSystemInfoBootId :: !(Text)
, v1NodeSystemInfoContainerRuntimeVersion :: !(Text)
, v1NodeSystemInfoKernelVersion :: !(Text)
, v1NodeSystemInfoKubeProxyVersion :: !(Text)
, v1NodeSystemInfoKubeletVersion :: !(Text)
, v1NodeSystemInfoMachineId :: !(Text)
, v1NodeSystemInfoOperatingSystem :: !(Text)
, v1NodeSystemInfoOsImage :: !(Text)
, v1NodeSystemInfoSystemUuid :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NodeSystemInfo where
parseJSON = A.withObject "V1NodeSystemInfo" $ \o ->
V1NodeSystemInfo
<$> (o .: "architecture")
<*> (o .: "bootID")
<*> (o .: "containerRuntimeVersion")
<*> (o .: "kernelVersion")
<*> (o .: "kubeProxyVersion")
<*> (o .: "kubeletVersion")
<*> (o .: "machineID")
<*> (o .: "operatingSystem")
<*> (o .: "osImage")
<*> (o .: "systemUUID")
instance A.ToJSON V1NodeSystemInfo where
toJSON V1NodeSystemInfo {..} =
_omitNulls
[ "architecture" .= v1NodeSystemInfoArchitecture
, "bootID" .= v1NodeSystemInfoBootId
, "containerRuntimeVersion" .= v1NodeSystemInfoContainerRuntimeVersion
, "kernelVersion" .= v1NodeSystemInfoKernelVersion
, "kubeProxyVersion" .= v1NodeSystemInfoKubeProxyVersion
, "kubeletVersion" .= v1NodeSystemInfoKubeletVersion
, "machineID" .= v1NodeSystemInfoMachineId
, "operatingSystem" .= v1NodeSystemInfoOperatingSystem
, "osImage" .= v1NodeSystemInfoOsImage
, "systemUUID" .= v1NodeSystemInfoSystemUuid
]
mkV1NodeSystemInfo
:: Text
-> Text
-> Text
-> Text
-> Text
-> Text
-> Text
-> Text
-> Text
-> Text
-> V1NodeSystemInfo
mkV1NodeSystemInfo v1NodeSystemInfoArchitecture v1NodeSystemInfoBootId v1NodeSystemInfoContainerRuntimeVersion v1NodeSystemInfoKernelVersion v1NodeSystemInfoKubeProxyVersion v1NodeSystemInfoKubeletVersion v1NodeSystemInfoMachineId v1NodeSystemInfoOperatingSystem v1NodeSystemInfoOsImage v1NodeSystemInfoSystemUuid =
V1NodeSystemInfo
{ v1NodeSystemInfoArchitecture
, v1NodeSystemInfoBootId
, v1NodeSystemInfoContainerRuntimeVersion
, v1NodeSystemInfoKernelVersion
, v1NodeSystemInfoKubeProxyVersion
, v1NodeSystemInfoKubeletVersion
, v1NodeSystemInfoMachineId
, v1NodeSystemInfoOperatingSystem
, v1NodeSystemInfoOsImage
, v1NodeSystemInfoSystemUuid
}
data V1NonResourceAttributes = V1NonResourceAttributes
{ v1NonResourceAttributesPath :: !(Maybe Text)
, v1NonResourceAttributesVerb :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NonResourceAttributes where
parseJSON = A.withObject "V1NonResourceAttributes" $ \o ->
V1NonResourceAttributes
<$> (o .:? "path")
<*> (o .:? "verb")
instance A.ToJSON V1NonResourceAttributes where
toJSON V1NonResourceAttributes {..} =
_omitNulls
[ "path" .= v1NonResourceAttributesPath
, "verb" .= v1NonResourceAttributesVerb
]
mkV1NonResourceAttributes
:: V1NonResourceAttributes
mkV1NonResourceAttributes =
V1NonResourceAttributes
{ v1NonResourceAttributesPath = Nothing
, v1NonResourceAttributesVerb = Nothing
}
data V1NonResourceRule = V1NonResourceRule
{ v1NonResourceRuleNonResourceUrLs :: !(Maybe [Text])
, v1NonResourceRuleVerbs :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1NonResourceRule where
parseJSON = A.withObject "V1NonResourceRule" $ \o ->
V1NonResourceRule
<$> (o .:? "nonResourceURLs")
<*> (o .: "verbs")
instance A.ToJSON V1NonResourceRule where
toJSON V1NonResourceRule {..} =
_omitNulls
[ "nonResourceURLs" .= v1NonResourceRuleNonResourceUrLs
, "verbs" .= v1NonResourceRuleVerbs
]
mkV1NonResourceRule
:: [Text]
-> V1NonResourceRule
mkV1NonResourceRule v1NonResourceRuleVerbs =
V1NonResourceRule
{ v1NonResourceRuleNonResourceUrLs = Nothing
, v1NonResourceRuleVerbs
}
data V1ObjectFieldSelector = V1ObjectFieldSelector
{ v1ObjectFieldSelectorApiVersion :: !(Maybe Text)
, v1ObjectFieldSelectorFieldPath :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ObjectFieldSelector where
parseJSON = A.withObject "V1ObjectFieldSelector" $ \o ->
V1ObjectFieldSelector
<$> (o .:? "apiVersion")
<*> (o .: "fieldPath")
instance A.ToJSON V1ObjectFieldSelector where
toJSON V1ObjectFieldSelector {..} =
_omitNulls
[ "apiVersion" .= v1ObjectFieldSelectorApiVersion
, "fieldPath" .= v1ObjectFieldSelectorFieldPath
]
mkV1ObjectFieldSelector
:: Text
-> V1ObjectFieldSelector
mkV1ObjectFieldSelector v1ObjectFieldSelectorFieldPath =
V1ObjectFieldSelector
{ v1ObjectFieldSelectorApiVersion = Nothing
, v1ObjectFieldSelectorFieldPath
}
data V1ObjectMeta = V1ObjectMeta
{ v1ObjectMetaAnnotations :: !(Maybe (Map.Map String Text))
, v1ObjectMetaClusterName :: !(Maybe Text)
, v1ObjectMetaCreationTimestamp :: !(Maybe DateTime)
, v1ObjectMetaDeletionGracePeriodSeconds :: !(Maybe Integer)
, v1ObjectMetaDeletionTimestamp :: !(Maybe DateTime)
, v1ObjectMetaFinalizers :: !(Maybe [Text])
, v1ObjectMetaGenerateName :: !(Maybe Text)
, v1ObjectMetaGeneration :: !(Maybe Integer)
, v1ObjectMetaInitializers :: !(Maybe V1Initializers)
, v1ObjectMetaLabels :: !(Maybe (Map.Map String Text))
, v1ObjectMetaManagedFields :: !(Maybe [V1ManagedFieldsEntry])
, v1ObjectMetaName :: !(Maybe Text)
, v1ObjectMetaNamespace :: !(Maybe Text)
, v1ObjectMetaOwnerReferences :: !(Maybe [V1OwnerReference])
, v1ObjectMetaResourceVersion :: !(Maybe Text)
, v1ObjectMetaSelfLink :: !(Maybe Text)
, v1ObjectMetaUid :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ObjectMeta where
parseJSON = A.withObject "V1ObjectMeta" $ \o ->
V1ObjectMeta
<$> (o .:? "annotations")
<*> (o .:? "clusterName")
<*> (o .:? "creationTimestamp")
<*> (o .:? "deletionGracePeriodSeconds")
<*> (o .:? "deletionTimestamp")
<*> (o .:? "finalizers")
<*> (o .:? "generateName")
<*> (o .:? "generation")
<*> (o .:? "initializers")
<*> (o .:? "labels")
<*> (o .:? "managedFields")
<*> (o .:? "name")
<*> (o .:? "namespace")
<*> (o .:? "ownerReferences")
<*> (o .:? "resourceVersion")
<*> (o .:? "selfLink")
<*> (o .:? "uid")
instance A.ToJSON V1ObjectMeta where
toJSON V1ObjectMeta {..} =
_omitNulls
[ "annotations" .= v1ObjectMetaAnnotations
, "clusterName" .= v1ObjectMetaClusterName
, "creationTimestamp" .= v1ObjectMetaCreationTimestamp
, "deletionGracePeriodSeconds" .= v1ObjectMetaDeletionGracePeriodSeconds
, "deletionTimestamp" .= v1ObjectMetaDeletionTimestamp
, "finalizers" .= v1ObjectMetaFinalizers
, "generateName" .= v1ObjectMetaGenerateName
, "generation" .= v1ObjectMetaGeneration
, "initializers" .= v1ObjectMetaInitializers
, "labels" .= v1ObjectMetaLabels
, "managedFields" .= v1ObjectMetaManagedFields
, "name" .= v1ObjectMetaName
, "namespace" .= v1ObjectMetaNamespace
, "ownerReferences" .= v1ObjectMetaOwnerReferences
, "resourceVersion" .= v1ObjectMetaResourceVersion
, "selfLink" .= v1ObjectMetaSelfLink
, "uid" .= v1ObjectMetaUid
]
mkV1ObjectMeta
:: V1ObjectMeta
mkV1ObjectMeta =
V1ObjectMeta
{ v1ObjectMetaAnnotations = Nothing
, v1ObjectMetaClusterName = Nothing
, v1ObjectMetaCreationTimestamp = Nothing
, v1ObjectMetaDeletionGracePeriodSeconds = Nothing
, v1ObjectMetaDeletionTimestamp = Nothing
, v1ObjectMetaFinalizers = Nothing
, v1ObjectMetaGenerateName = Nothing
, v1ObjectMetaGeneration = Nothing
, v1ObjectMetaInitializers = Nothing
, v1ObjectMetaLabels = Nothing
, v1ObjectMetaManagedFields = Nothing
, v1ObjectMetaName = Nothing
, v1ObjectMetaNamespace = Nothing
, v1ObjectMetaOwnerReferences = Nothing
, v1ObjectMetaResourceVersion = Nothing
, v1ObjectMetaSelfLink = Nothing
, v1ObjectMetaUid = Nothing
}
data V1ObjectReference = V1ObjectReference
{ v1ObjectReferenceApiVersion :: !(Maybe Text)
, v1ObjectReferenceFieldPath :: !(Maybe Text)
, v1ObjectReferenceKind :: !(Maybe Text)
, v1ObjectReferenceName :: !(Maybe Text)
, v1ObjectReferenceNamespace :: !(Maybe Text)
, v1ObjectReferenceResourceVersion :: !(Maybe Text)
, v1ObjectReferenceUid :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ObjectReference where
parseJSON = A.withObject "V1ObjectReference" $ \o ->
V1ObjectReference
<$> (o .:? "apiVersion")
<*> (o .:? "fieldPath")
<*> (o .:? "kind")
<*> (o .:? "name")
<*> (o .:? "namespace")
<*> (o .:? "resourceVersion")
<*> (o .:? "uid")
instance A.ToJSON V1ObjectReference where
toJSON V1ObjectReference {..} =
_omitNulls
[ "apiVersion" .= v1ObjectReferenceApiVersion
, "fieldPath" .= v1ObjectReferenceFieldPath
, "kind" .= v1ObjectReferenceKind
, "name" .= v1ObjectReferenceName
, "namespace" .= v1ObjectReferenceNamespace
, "resourceVersion" .= v1ObjectReferenceResourceVersion
, "uid" .= v1ObjectReferenceUid
]
mkV1ObjectReference
:: V1ObjectReference
mkV1ObjectReference =
V1ObjectReference
{ v1ObjectReferenceApiVersion = Nothing
, v1ObjectReferenceFieldPath = Nothing
, v1ObjectReferenceKind = Nothing
, v1ObjectReferenceName = Nothing
, v1ObjectReferenceNamespace = Nothing
, v1ObjectReferenceResourceVersion = Nothing
, v1ObjectReferenceUid = Nothing
}
data V1OwnerReference = V1OwnerReference
{ v1OwnerReferenceApiVersion :: !(Text)
, v1OwnerReferenceBlockOwnerDeletion :: !(Maybe Bool)
, v1OwnerReferenceController :: !(Maybe Bool)
, v1OwnerReferenceKind :: !(Text)
, v1OwnerReferenceName :: !(Text)
, v1OwnerReferenceUid :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1OwnerReference where
parseJSON = A.withObject "V1OwnerReference" $ \o ->
V1OwnerReference
<$> (o .: "apiVersion")
<*> (o .:? "blockOwnerDeletion")
<*> (o .:? "controller")
<*> (o .: "kind")
<*> (o .: "name")
<*> (o .: "uid")
instance A.ToJSON V1OwnerReference where
toJSON V1OwnerReference {..} =
_omitNulls
[ "apiVersion" .= v1OwnerReferenceApiVersion
, "blockOwnerDeletion" .= v1OwnerReferenceBlockOwnerDeletion
, "controller" .= v1OwnerReferenceController
, "kind" .= v1OwnerReferenceKind
, "name" .= v1OwnerReferenceName
, "uid" .= v1OwnerReferenceUid
]
mkV1OwnerReference
:: Text
-> Text
-> Text
-> Text
-> V1OwnerReference
mkV1OwnerReference v1OwnerReferenceApiVersion v1OwnerReferenceKind v1OwnerReferenceName v1OwnerReferenceUid =
V1OwnerReference
{ v1OwnerReferenceApiVersion
, v1OwnerReferenceBlockOwnerDeletion = Nothing
, v1OwnerReferenceController = Nothing
, v1OwnerReferenceKind
, v1OwnerReferenceName
, v1OwnerReferenceUid
}
data V1PersistentVolume = V1PersistentVolume
{ v1PersistentVolumeApiVersion :: !(Maybe Text)
, v1PersistentVolumeKind :: !(Maybe Text)
, v1PersistentVolumeMetadata :: !(Maybe V1ObjectMeta)
, v1PersistentVolumeSpec :: !(Maybe V1PersistentVolumeSpec)
, v1PersistentVolumeStatus :: !(Maybe V1PersistentVolumeStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolume where
parseJSON = A.withObject "V1PersistentVolume" $ \o ->
V1PersistentVolume
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1PersistentVolume where
toJSON V1PersistentVolume {..} =
_omitNulls
[ "apiVersion" .= v1PersistentVolumeApiVersion
, "kind" .= v1PersistentVolumeKind
, "metadata" .= v1PersistentVolumeMetadata
, "spec" .= v1PersistentVolumeSpec
, "status" .= v1PersistentVolumeStatus
]
mkV1PersistentVolume
:: V1PersistentVolume
mkV1PersistentVolume =
V1PersistentVolume
{ v1PersistentVolumeApiVersion = Nothing
, v1PersistentVolumeKind = Nothing
, v1PersistentVolumeMetadata = Nothing
, v1PersistentVolumeSpec = Nothing
, v1PersistentVolumeStatus = Nothing
}
data V1PersistentVolumeClaim = V1PersistentVolumeClaim
{ v1PersistentVolumeClaimApiVersion :: !(Maybe Text)
, v1PersistentVolumeClaimKind :: !(Maybe Text)
, v1PersistentVolumeClaimMetadata :: !(Maybe V1ObjectMeta)
, v1PersistentVolumeClaimSpec :: !(Maybe V1PersistentVolumeClaimSpec)
, v1PersistentVolumeClaimStatus :: !(Maybe V1PersistentVolumeClaimStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolumeClaim where
parseJSON = A.withObject "V1PersistentVolumeClaim" $ \o ->
V1PersistentVolumeClaim
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1PersistentVolumeClaim where
toJSON V1PersistentVolumeClaim {..} =
_omitNulls
[ "apiVersion" .= v1PersistentVolumeClaimApiVersion
, "kind" .= v1PersistentVolumeClaimKind
, "metadata" .= v1PersistentVolumeClaimMetadata
, "spec" .= v1PersistentVolumeClaimSpec
, "status" .= v1PersistentVolumeClaimStatus
]
mkV1PersistentVolumeClaim
:: V1PersistentVolumeClaim
mkV1PersistentVolumeClaim =
V1PersistentVolumeClaim
{ v1PersistentVolumeClaimApiVersion = Nothing
, v1PersistentVolumeClaimKind = Nothing
, v1PersistentVolumeClaimMetadata = Nothing
, v1PersistentVolumeClaimSpec = Nothing
, v1PersistentVolumeClaimStatus = Nothing
}
data V1PersistentVolumeClaimCondition = V1PersistentVolumeClaimCondition
{ v1PersistentVolumeClaimConditionLastProbeTime :: !(Maybe DateTime)
, v1PersistentVolumeClaimConditionLastTransitionTime :: !(Maybe DateTime)
, v1PersistentVolumeClaimConditionMessage :: !(Maybe Text)
, v1PersistentVolumeClaimConditionReason :: !(Maybe Text)
, v1PersistentVolumeClaimConditionStatus :: !(Text)
, v1PersistentVolumeClaimConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolumeClaimCondition where
parseJSON = A.withObject "V1PersistentVolumeClaimCondition" $ \o ->
V1PersistentVolumeClaimCondition
<$> (o .:? "lastProbeTime")
<*> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1PersistentVolumeClaimCondition where
toJSON V1PersistentVolumeClaimCondition {..} =
_omitNulls
[ "lastProbeTime" .= v1PersistentVolumeClaimConditionLastProbeTime
, "lastTransitionTime" .= v1PersistentVolumeClaimConditionLastTransitionTime
, "message" .= v1PersistentVolumeClaimConditionMessage
, "reason" .= v1PersistentVolumeClaimConditionReason
, "status" .= v1PersistentVolumeClaimConditionStatus
, "type" .= v1PersistentVolumeClaimConditionType
]
mkV1PersistentVolumeClaimCondition
:: Text
-> Text
-> V1PersistentVolumeClaimCondition
mkV1PersistentVolumeClaimCondition v1PersistentVolumeClaimConditionStatus v1PersistentVolumeClaimConditionType =
V1PersistentVolumeClaimCondition
{ v1PersistentVolumeClaimConditionLastProbeTime = Nothing
, v1PersistentVolumeClaimConditionLastTransitionTime = Nothing
, v1PersistentVolumeClaimConditionMessage = Nothing
, v1PersistentVolumeClaimConditionReason = Nothing
, v1PersistentVolumeClaimConditionStatus
, v1PersistentVolumeClaimConditionType
}
data V1PersistentVolumeClaimList = V1PersistentVolumeClaimList
{ v1PersistentVolumeClaimListApiVersion :: !(Maybe Text)
, v1PersistentVolumeClaimListItems :: !([V1PersistentVolumeClaim])
, v1PersistentVolumeClaimListKind :: !(Maybe Text)
, v1PersistentVolumeClaimListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolumeClaimList where
parseJSON = A.withObject "V1PersistentVolumeClaimList" $ \o ->
V1PersistentVolumeClaimList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1PersistentVolumeClaimList where
toJSON V1PersistentVolumeClaimList {..} =
_omitNulls
[ "apiVersion" .= v1PersistentVolumeClaimListApiVersion
, "items" .= v1PersistentVolumeClaimListItems
, "kind" .= v1PersistentVolumeClaimListKind
, "metadata" .= v1PersistentVolumeClaimListMetadata
]
mkV1PersistentVolumeClaimList
:: [V1PersistentVolumeClaim]
-> V1PersistentVolumeClaimList
mkV1PersistentVolumeClaimList v1PersistentVolumeClaimListItems =
V1PersistentVolumeClaimList
{ v1PersistentVolumeClaimListApiVersion = Nothing
, v1PersistentVolumeClaimListItems
, v1PersistentVolumeClaimListKind = Nothing
, v1PersistentVolumeClaimListMetadata = Nothing
}
data V1PersistentVolumeClaimSpec = V1PersistentVolumeClaimSpec
{ v1PersistentVolumeClaimSpecAccessModes :: !(Maybe [Text])
, v1PersistentVolumeClaimSpecDataSource :: !(Maybe V1TypedLocalObjectReference)
, v1PersistentVolumeClaimSpecResources :: !(Maybe V1ResourceRequirements)
, v1PersistentVolumeClaimSpecSelector :: !(Maybe V1LabelSelector)
, v1PersistentVolumeClaimSpecStorageClassName :: !(Maybe Text)
, v1PersistentVolumeClaimSpecVolumeMode :: !(Maybe Text)
, v1PersistentVolumeClaimSpecVolumeName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolumeClaimSpec where
parseJSON = A.withObject "V1PersistentVolumeClaimSpec" $ \o ->
V1PersistentVolumeClaimSpec
<$> (o .:? "accessModes")
<*> (o .:? "dataSource")
<*> (o .:? "resources")
<*> (o .:? "selector")
<*> (o .:? "storageClassName")
<*> (o .:? "volumeMode")
<*> (o .:? "volumeName")
instance A.ToJSON V1PersistentVolumeClaimSpec where
toJSON V1PersistentVolumeClaimSpec {..} =
_omitNulls
[ "accessModes" .= v1PersistentVolumeClaimSpecAccessModes
, "dataSource" .= v1PersistentVolumeClaimSpecDataSource
, "resources" .= v1PersistentVolumeClaimSpecResources
, "selector" .= v1PersistentVolumeClaimSpecSelector
, "storageClassName" .= v1PersistentVolumeClaimSpecStorageClassName
, "volumeMode" .= v1PersistentVolumeClaimSpecVolumeMode
, "volumeName" .= v1PersistentVolumeClaimSpecVolumeName
]
mkV1PersistentVolumeClaimSpec
:: V1PersistentVolumeClaimSpec
mkV1PersistentVolumeClaimSpec =
V1PersistentVolumeClaimSpec
{ v1PersistentVolumeClaimSpecAccessModes = Nothing
, v1PersistentVolumeClaimSpecDataSource = Nothing
, v1PersistentVolumeClaimSpecResources = Nothing
, v1PersistentVolumeClaimSpecSelector = Nothing
, v1PersistentVolumeClaimSpecStorageClassName = Nothing
, v1PersistentVolumeClaimSpecVolumeMode = Nothing
, v1PersistentVolumeClaimSpecVolumeName = Nothing
}
data V1PersistentVolumeClaimStatus = V1PersistentVolumeClaimStatus
{ v1PersistentVolumeClaimStatusAccessModes :: !(Maybe [Text])
, v1PersistentVolumeClaimStatusCapacity :: !(Maybe (Map.Map String Quantity))
, v1PersistentVolumeClaimStatusConditions :: !(Maybe [V1PersistentVolumeClaimCondition])
, v1PersistentVolumeClaimStatusPhase :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolumeClaimStatus where
parseJSON = A.withObject "V1PersistentVolumeClaimStatus" $ \o ->
V1PersistentVolumeClaimStatus
<$> (o .:? "accessModes")
<*> (o .:? "capacity")
<*> (o .:? "conditions")
<*> (o .:? "phase")
instance A.ToJSON V1PersistentVolumeClaimStatus where
toJSON V1PersistentVolumeClaimStatus {..} =
_omitNulls
[ "accessModes" .= v1PersistentVolumeClaimStatusAccessModes
, "capacity" .= v1PersistentVolumeClaimStatusCapacity
, "conditions" .= v1PersistentVolumeClaimStatusConditions
, "phase" .= v1PersistentVolumeClaimStatusPhase
]
mkV1PersistentVolumeClaimStatus
:: V1PersistentVolumeClaimStatus
mkV1PersistentVolumeClaimStatus =
V1PersistentVolumeClaimStatus
{ v1PersistentVolumeClaimStatusAccessModes = Nothing
, v1PersistentVolumeClaimStatusCapacity = Nothing
, v1PersistentVolumeClaimStatusConditions = Nothing
, v1PersistentVolumeClaimStatusPhase = Nothing
}
data V1PersistentVolumeClaimVolumeSource = V1PersistentVolumeClaimVolumeSource
{ v1PersistentVolumeClaimVolumeSourceClaimName :: !(Text)
, v1PersistentVolumeClaimVolumeSourceReadOnly :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolumeClaimVolumeSource where
parseJSON = A.withObject "V1PersistentVolumeClaimVolumeSource" $ \o ->
V1PersistentVolumeClaimVolumeSource
<$> (o .: "claimName")
<*> (o .:? "readOnly")
instance A.ToJSON V1PersistentVolumeClaimVolumeSource where
toJSON V1PersistentVolumeClaimVolumeSource {..} =
_omitNulls
[ "claimName" .= v1PersistentVolumeClaimVolumeSourceClaimName
, "readOnly" .= v1PersistentVolumeClaimVolumeSourceReadOnly
]
mkV1PersistentVolumeClaimVolumeSource
:: Text
-> V1PersistentVolumeClaimVolumeSource
mkV1PersistentVolumeClaimVolumeSource v1PersistentVolumeClaimVolumeSourceClaimName =
V1PersistentVolumeClaimVolumeSource
{ v1PersistentVolumeClaimVolumeSourceClaimName
, v1PersistentVolumeClaimVolumeSourceReadOnly = Nothing
}
data V1PersistentVolumeList = V1PersistentVolumeList
{ v1PersistentVolumeListApiVersion :: !(Maybe Text)
, v1PersistentVolumeListItems :: !([V1PersistentVolume])
, v1PersistentVolumeListKind :: !(Maybe Text)
, v1PersistentVolumeListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolumeList where
parseJSON = A.withObject "V1PersistentVolumeList" $ \o ->
V1PersistentVolumeList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1PersistentVolumeList where
toJSON V1PersistentVolumeList {..} =
_omitNulls
[ "apiVersion" .= v1PersistentVolumeListApiVersion
, "items" .= v1PersistentVolumeListItems
, "kind" .= v1PersistentVolumeListKind
, "metadata" .= v1PersistentVolumeListMetadata
]
mkV1PersistentVolumeList
:: [V1PersistentVolume]
-> V1PersistentVolumeList
mkV1PersistentVolumeList v1PersistentVolumeListItems =
V1PersistentVolumeList
{ v1PersistentVolumeListApiVersion = Nothing
, v1PersistentVolumeListItems
, v1PersistentVolumeListKind = Nothing
, v1PersistentVolumeListMetadata = Nothing
}
data V1PersistentVolumeSpec = V1PersistentVolumeSpec
{ v1PersistentVolumeSpecAccessModes :: !(Maybe [Text])
, v1PersistentVolumeSpecAwsElasticBlockStore :: !(Maybe V1AWSElasticBlockStoreVolumeSource)
, v1PersistentVolumeSpecAzureDisk :: !(Maybe V1AzureDiskVolumeSource)
, v1PersistentVolumeSpecAzureFile :: !(Maybe V1AzureFilePersistentVolumeSource)
, v1PersistentVolumeSpecCapacity :: !(Maybe (Map.Map String Quantity))
, v1PersistentVolumeSpecCephfs :: !(Maybe V1CephFSPersistentVolumeSource)
, v1PersistentVolumeSpecCinder :: !(Maybe V1CinderPersistentVolumeSource)
, v1PersistentVolumeSpecClaimRef :: !(Maybe V1ObjectReference)
, v1PersistentVolumeSpecCsi :: !(Maybe V1CSIPersistentVolumeSource)
, v1PersistentVolumeSpecFc :: !(Maybe V1FCVolumeSource)
, v1PersistentVolumeSpecFlexVolume :: !(Maybe V1FlexPersistentVolumeSource)
, v1PersistentVolumeSpecFlocker :: !(Maybe V1FlockerVolumeSource)
, v1PersistentVolumeSpecGcePersistentDisk :: !(Maybe V1GCEPersistentDiskVolumeSource)
, v1PersistentVolumeSpecGlusterfs :: !(Maybe V1GlusterfsPersistentVolumeSource)
, v1PersistentVolumeSpecHostPath :: !(Maybe V1HostPathVolumeSource)
, v1PersistentVolumeSpecIscsi :: !(Maybe V1ISCSIPersistentVolumeSource)
, v1PersistentVolumeSpecLocal :: !(Maybe V1LocalVolumeSource)
, v1PersistentVolumeSpecMountOptions :: !(Maybe [Text])
, v1PersistentVolumeSpecNfs :: !(Maybe V1NFSVolumeSource)
, v1PersistentVolumeSpecNodeAffinity :: !(Maybe V1VolumeNodeAffinity)
, v1PersistentVolumeSpecPersistentVolumeReclaimPolicy :: !(Maybe Text)
, v1PersistentVolumeSpecPhotonPersistentDisk :: !(Maybe V1PhotonPersistentDiskVolumeSource)
, v1PersistentVolumeSpecPortworxVolume :: !(Maybe V1PortworxVolumeSource)
, v1PersistentVolumeSpecQuobyte :: !(Maybe V1QuobyteVolumeSource)
, v1PersistentVolumeSpecRbd :: !(Maybe V1RBDPersistentVolumeSource)
, v1PersistentVolumeSpecScaleIo :: !(Maybe V1ScaleIOPersistentVolumeSource)
, v1PersistentVolumeSpecStorageClassName :: !(Maybe Text)
, v1PersistentVolumeSpecStorageos :: !(Maybe V1StorageOSPersistentVolumeSource)
, v1PersistentVolumeSpecVolumeMode :: !(Maybe Text)
, v1PersistentVolumeSpecVsphereVolume :: !(Maybe V1VsphereVirtualDiskVolumeSource)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolumeSpec where
parseJSON = A.withObject "V1PersistentVolumeSpec" $ \o ->
V1PersistentVolumeSpec
<$> (o .:? "accessModes")
<*> (o .:? "awsElasticBlockStore")
<*> (o .:? "azureDisk")
<*> (o .:? "azureFile")
<*> (o .:? "capacity")
<*> (o .:? "cephfs")
<*> (o .:? "cinder")
<*> (o .:? "claimRef")
<*> (o .:? "csi")
<*> (o .:? "fc")
<*> (o .:? "flexVolume")
<*> (o .:? "flocker")
<*> (o .:? "gcePersistentDisk")
<*> (o .:? "glusterfs")
<*> (o .:? "hostPath")
<*> (o .:? "iscsi")
<*> (o .:? "local")
<*> (o .:? "mountOptions")
<*> (o .:? "nfs")
<*> (o .:? "nodeAffinity")
<*> (o .:? "persistentVolumeReclaimPolicy")
<*> (o .:? "photonPersistentDisk")
<*> (o .:? "portworxVolume")
<*> (o .:? "quobyte")
<*> (o .:? "rbd")
<*> (o .:? "scaleIO")
<*> (o .:? "storageClassName")
<*> (o .:? "storageos")
<*> (o .:? "volumeMode")
<*> (o .:? "vsphereVolume")
instance A.ToJSON V1PersistentVolumeSpec where
toJSON V1PersistentVolumeSpec {..} =
_omitNulls
[ "accessModes" .= v1PersistentVolumeSpecAccessModes
, "awsElasticBlockStore" .= v1PersistentVolumeSpecAwsElasticBlockStore
, "azureDisk" .= v1PersistentVolumeSpecAzureDisk
, "azureFile" .= v1PersistentVolumeSpecAzureFile
, "capacity" .= v1PersistentVolumeSpecCapacity
, "cephfs" .= v1PersistentVolumeSpecCephfs
, "cinder" .= v1PersistentVolumeSpecCinder
, "claimRef" .= v1PersistentVolumeSpecClaimRef
, "csi" .= v1PersistentVolumeSpecCsi
, "fc" .= v1PersistentVolumeSpecFc
, "flexVolume" .= v1PersistentVolumeSpecFlexVolume
, "flocker" .= v1PersistentVolumeSpecFlocker
, "gcePersistentDisk" .= v1PersistentVolumeSpecGcePersistentDisk
, "glusterfs" .= v1PersistentVolumeSpecGlusterfs
, "hostPath" .= v1PersistentVolumeSpecHostPath
, "iscsi" .= v1PersistentVolumeSpecIscsi
, "local" .= v1PersistentVolumeSpecLocal
, "mountOptions" .= v1PersistentVolumeSpecMountOptions
, "nfs" .= v1PersistentVolumeSpecNfs
, "nodeAffinity" .= v1PersistentVolumeSpecNodeAffinity
, "persistentVolumeReclaimPolicy" .= v1PersistentVolumeSpecPersistentVolumeReclaimPolicy
, "photonPersistentDisk" .= v1PersistentVolumeSpecPhotonPersistentDisk
, "portworxVolume" .= v1PersistentVolumeSpecPortworxVolume
, "quobyte" .= v1PersistentVolumeSpecQuobyte
, "rbd" .= v1PersistentVolumeSpecRbd
, "scaleIO" .= v1PersistentVolumeSpecScaleIo
, "storageClassName" .= v1PersistentVolumeSpecStorageClassName
, "storageos" .= v1PersistentVolumeSpecStorageos
, "volumeMode" .= v1PersistentVolumeSpecVolumeMode
, "vsphereVolume" .= v1PersistentVolumeSpecVsphereVolume
]
mkV1PersistentVolumeSpec
:: V1PersistentVolumeSpec
mkV1PersistentVolumeSpec =
V1PersistentVolumeSpec
{ v1PersistentVolumeSpecAccessModes = Nothing
, v1PersistentVolumeSpecAwsElasticBlockStore = Nothing
, v1PersistentVolumeSpecAzureDisk = Nothing
, v1PersistentVolumeSpecAzureFile = Nothing
, v1PersistentVolumeSpecCapacity = Nothing
, v1PersistentVolumeSpecCephfs = Nothing
, v1PersistentVolumeSpecCinder = Nothing
, v1PersistentVolumeSpecClaimRef = Nothing
, v1PersistentVolumeSpecCsi = Nothing
, v1PersistentVolumeSpecFc = Nothing
, v1PersistentVolumeSpecFlexVolume = Nothing
, v1PersistentVolumeSpecFlocker = Nothing
, v1PersistentVolumeSpecGcePersistentDisk = Nothing
, v1PersistentVolumeSpecGlusterfs = Nothing
, v1PersistentVolumeSpecHostPath = Nothing
, v1PersistentVolumeSpecIscsi = Nothing
, v1PersistentVolumeSpecLocal = Nothing
, v1PersistentVolumeSpecMountOptions = Nothing
, v1PersistentVolumeSpecNfs = Nothing
, v1PersistentVolumeSpecNodeAffinity = Nothing
, v1PersistentVolumeSpecPersistentVolumeReclaimPolicy = Nothing
, v1PersistentVolumeSpecPhotonPersistentDisk = Nothing
, v1PersistentVolumeSpecPortworxVolume = Nothing
, v1PersistentVolumeSpecQuobyte = Nothing
, v1PersistentVolumeSpecRbd = Nothing
, v1PersistentVolumeSpecScaleIo = Nothing
, v1PersistentVolumeSpecStorageClassName = Nothing
, v1PersistentVolumeSpecStorageos = Nothing
, v1PersistentVolumeSpecVolumeMode = Nothing
, v1PersistentVolumeSpecVsphereVolume = Nothing
}
data V1PersistentVolumeStatus = V1PersistentVolumeStatus
{ v1PersistentVolumeStatusMessage :: !(Maybe Text)
, v1PersistentVolumeStatusPhase :: !(Maybe Text)
, v1PersistentVolumeStatusReason :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PersistentVolumeStatus where
parseJSON = A.withObject "V1PersistentVolumeStatus" $ \o ->
V1PersistentVolumeStatus
<$> (o .:? "message")
<*> (o .:? "phase")
<*> (o .:? "reason")
instance A.ToJSON V1PersistentVolumeStatus where
toJSON V1PersistentVolumeStatus {..} =
_omitNulls
[ "message" .= v1PersistentVolumeStatusMessage
, "phase" .= v1PersistentVolumeStatusPhase
, "reason" .= v1PersistentVolumeStatusReason
]
mkV1PersistentVolumeStatus
:: V1PersistentVolumeStatus
mkV1PersistentVolumeStatus =
V1PersistentVolumeStatus
{ v1PersistentVolumeStatusMessage = Nothing
, v1PersistentVolumeStatusPhase = Nothing
, v1PersistentVolumeStatusReason = Nothing
}
data V1PhotonPersistentDiskVolumeSource = V1PhotonPersistentDiskVolumeSource
{ v1PhotonPersistentDiskVolumeSourceFsType :: !(Maybe Text)
, v1PhotonPersistentDiskVolumeSourcePdId :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PhotonPersistentDiskVolumeSource where
parseJSON = A.withObject "V1PhotonPersistentDiskVolumeSource" $ \o ->
V1PhotonPersistentDiskVolumeSource
<$> (o .:? "fsType")
<*> (o .: "pdID")
instance A.ToJSON V1PhotonPersistentDiskVolumeSource where
toJSON V1PhotonPersistentDiskVolumeSource {..} =
_omitNulls
[ "fsType" .= v1PhotonPersistentDiskVolumeSourceFsType
, "pdID" .= v1PhotonPersistentDiskVolumeSourcePdId
]
mkV1PhotonPersistentDiskVolumeSource
:: Text
-> V1PhotonPersistentDiskVolumeSource
mkV1PhotonPersistentDiskVolumeSource v1PhotonPersistentDiskVolumeSourcePdId =
V1PhotonPersistentDiskVolumeSource
{ v1PhotonPersistentDiskVolumeSourceFsType = Nothing
, v1PhotonPersistentDiskVolumeSourcePdId
}
data V1Pod = V1Pod
{ v1PodApiVersion :: !(Maybe Text)
, v1PodKind :: !(Maybe Text)
, v1PodMetadata :: !(Maybe V1ObjectMeta)
, v1PodSpec :: !(Maybe V1PodSpec)
, v1PodStatus :: !(Maybe V1PodStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Pod where
parseJSON = A.withObject "V1Pod" $ \o ->
V1Pod
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1Pod where
toJSON V1Pod {..} =
_omitNulls
[ "apiVersion" .= v1PodApiVersion
, "kind" .= v1PodKind
, "metadata" .= v1PodMetadata
, "spec" .= v1PodSpec
, "status" .= v1PodStatus
]
mkV1Pod
:: V1Pod
mkV1Pod =
V1Pod
{ v1PodApiVersion = Nothing
, v1PodKind = Nothing
, v1PodMetadata = Nothing
, v1PodSpec = Nothing
, v1PodStatus = Nothing
}
data V1PodAffinity = V1PodAffinity
{ v1PodAffinityPreferredDuringSchedulingIgnoredDuringExecution :: !(Maybe [V1WeightedPodAffinityTerm])
, v1PodAffinityRequiredDuringSchedulingIgnoredDuringExecution :: !(Maybe [V1PodAffinityTerm])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodAffinity where
parseJSON = A.withObject "V1PodAffinity" $ \o ->
V1PodAffinity
<$> (o .:? "preferredDuringSchedulingIgnoredDuringExecution")
<*> (o .:? "requiredDuringSchedulingIgnoredDuringExecution")
instance A.ToJSON V1PodAffinity where
toJSON V1PodAffinity {..} =
_omitNulls
[ "preferredDuringSchedulingIgnoredDuringExecution" .= v1PodAffinityPreferredDuringSchedulingIgnoredDuringExecution
, "requiredDuringSchedulingIgnoredDuringExecution" .= v1PodAffinityRequiredDuringSchedulingIgnoredDuringExecution
]
mkV1PodAffinity
:: V1PodAffinity
mkV1PodAffinity =
V1PodAffinity
{ v1PodAffinityPreferredDuringSchedulingIgnoredDuringExecution = Nothing
, v1PodAffinityRequiredDuringSchedulingIgnoredDuringExecution = Nothing
}
data V1PodAffinityTerm = V1PodAffinityTerm
{ v1PodAffinityTermLabelSelector :: !(Maybe V1LabelSelector)
, v1PodAffinityTermNamespaces :: !(Maybe [Text])
, v1PodAffinityTermTopologyKey :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodAffinityTerm where
parseJSON = A.withObject "V1PodAffinityTerm" $ \o ->
V1PodAffinityTerm
<$> (o .:? "labelSelector")
<*> (o .:? "namespaces")
<*> (o .: "topologyKey")
instance A.ToJSON V1PodAffinityTerm where
toJSON V1PodAffinityTerm {..} =
_omitNulls
[ "labelSelector" .= v1PodAffinityTermLabelSelector
, "namespaces" .= v1PodAffinityTermNamespaces
, "topologyKey" .= v1PodAffinityTermTopologyKey
]
mkV1PodAffinityTerm
:: Text
-> V1PodAffinityTerm
mkV1PodAffinityTerm v1PodAffinityTermTopologyKey =
V1PodAffinityTerm
{ v1PodAffinityTermLabelSelector = Nothing
, v1PodAffinityTermNamespaces = Nothing
, v1PodAffinityTermTopologyKey
}
data V1PodAntiAffinity = V1PodAntiAffinity
{ v1PodAntiAffinityPreferredDuringSchedulingIgnoredDuringExecution :: !(Maybe [V1WeightedPodAffinityTerm])
, v1PodAntiAffinityRequiredDuringSchedulingIgnoredDuringExecution :: !(Maybe [V1PodAffinityTerm])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodAntiAffinity where
parseJSON = A.withObject "V1PodAntiAffinity" $ \o ->
V1PodAntiAffinity
<$> (o .:? "preferredDuringSchedulingIgnoredDuringExecution")
<*> (o .:? "requiredDuringSchedulingIgnoredDuringExecution")
instance A.ToJSON V1PodAntiAffinity where
toJSON V1PodAntiAffinity {..} =
_omitNulls
[ "preferredDuringSchedulingIgnoredDuringExecution" .= v1PodAntiAffinityPreferredDuringSchedulingIgnoredDuringExecution
, "requiredDuringSchedulingIgnoredDuringExecution" .= v1PodAntiAffinityRequiredDuringSchedulingIgnoredDuringExecution
]
mkV1PodAntiAffinity
:: V1PodAntiAffinity
mkV1PodAntiAffinity =
V1PodAntiAffinity
{ v1PodAntiAffinityPreferredDuringSchedulingIgnoredDuringExecution = Nothing
, v1PodAntiAffinityRequiredDuringSchedulingIgnoredDuringExecution = Nothing
}
data V1PodCondition = V1PodCondition
{ v1PodConditionLastProbeTime :: !(Maybe DateTime)
, v1PodConditionLastTransitionTime :: !(Maybe DateTime)
, v1PodConditionMessage :: !(Maybe Text)
, v1PodConditionReason :: !(Maybe Text)
, v1PodConditionStatus :: !(Text)
, v1PodConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodCondition where
parseJSON = A.withObject "V1PodCondition" $ \o ->
V1PodCondition
<$> (o .:? "lastProbeTime")
<*> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1PodCondition where
toJSON V1PodCondition {..} =
_omitNulls
[ "lastProbeTime" .= v1PodConditionLastProbeTime
, "lastTransitionTime" .= v1PodConditionLastTransitionTime
, "message" .= v1PodConditionMessage
, "reason" .= v1PodConditionReason
, "status" .= v1PodConditionStatus
, "type" .= v1PodConditionType
]
mkV1PodCondition
:: Text
-> Text
-> V1PodCondition
mkV1PodCondition v1PodConditionStatus v1PodConditionType =
V1PodCondition
{ v1PodConditionLastProbeTime = Nothing
, v1PodConditionLastTransitionTime = Nothing
, v1PodConditionMessage = Nothing
, v1PodConditionReason = Nothing
, v1PodConditionStatus
, v1PodConditionType
}
data V1PodDNSConfig = V1PodDNSConfig
{ v1PodDNSConfigNameservers :: !(Maybe [Text])
, v1PodDNSConfigOptions :: !(Maybe [V1PodDNSConfigOption])
, v1PodDNSConfigSearches :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodDNSConfig where
parseJSON = A.withObject "V1PodDNSConfig" $ \o ->
V1PodDNSConfig
<$> (o .:? "nameservers")
<*> (o .:? "options")
<*> (o .:? "searches")
instance A.ToJSON V1PodDNSConfig where
toJSON V1PodDNSConfig {..} =
_omitNulls
[ "nameservers" .= v1PodDNSConfigNameservers
, "options" .= v1PodDNSConfigOptions
, "searches" .= v1PodDNSConfigSearches
]
mkV1PodDNSConfig
:: V1PodDNSConfig
mkV1PodDNSConfig =
V1PodDNSConfig
{ v1PodDNSConfigNameservers = Nothing
, v1PodDNSConfigOptions = Nothing
, v1PodDNSConfigSearches = Nothing
}
data V1PodDNSConfigOption = V1PodDNSConfigOption
{ v1PodDNSConfigOptionName :: !(Maybe Text)
, v1PodDNSConfigOptionValue :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodDNSConfigOption where
parseJSON = A.withObject "V1PodDNSConfigOption" $ \o ->
V1PodDNSConfigOption
<$> (o .:? "name")
<*> (o .:? "value")
instance A.ToJSON V1PodDNSConfigOption where
toJSON V1PodDNSConfigOption {..} =
_omitNulls
[ "name" .= v1PodDNSConfigOptionName
, "value" .= v1PodDNSConfigOptionValue
]
mkV1PodDNSConfigOption
:: V1PodDNSConfigOption
mkV1PodDNSConfigOption =
V1PodDNSConfigOption
{ v1PodDNSConfigOptionName = Nothing
, v1PodDNSConfigOptionValue = Nothing
}
data V1PodList = V1PodList
{ v1PodListApiVersion :: !(Maybe Text)
, v1PodListItems :: !([V1Pod])
, v1PodListKind :: !(Maybe Text)
, v1PodListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodList where
parseJSON = A.withObject "V1PodList" $ \o ->
V1PodList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1PodList where
toJSON V1PodList {..} =
_omitNulls
[ "apiVersion" .= v1PodListApiVersion
, "items" .= v1PodListItems
, "kind" .= v1PodListKind
, "metadata" .= v1PodListMetadata
]
mkV1PodList
:: [V1Pod]
-> V1PodList
mkV1PodList v1PodListItems =
V1PodList
{ v1PodListApiVersion = Nothing
, v1PodListItems
, v1PodListKind = Nothing
, v1PodListMetadata = Nothing
}
data V1PodReadinessGate = V1PodReadinessGate
{ v1PodReadinessGateConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodReadinessGate where
parseJSON = A.withObject "V1PodReadinessGate" $ \o ->
V1PodReadinessGate
<$> (o .: "conditionType")
instance A.ToJSON V1PodReadinessGate where
toJSON V1PodReadinessGate {..} =
_omitNulls
[ "conditionType" .= v1PodReadinessGateConditionType
]
mkV1PodReadinessGate
:: Text
-> V1PodReadinessGate
mkV1PodReadinessGate v1PodReadinessGateConditionType =
V1PodReadinessGate
{ v1PodReadinessGateConditionType
}
data V1PodSecurityContext = V1PodSecurityContext
{ v1PodSecurityContextFsGroup :: !(Maybe Integer)
, v1PodSecurityContextRunAsGroup :: !(Maybe Integer)
, v1PodSecurityContextRunAsNonRoot :: !(Maybe Bool)
, v1PodSecurityContextRunAsUser :: !(Maybe Integer)
, v1PodSecurityContextSeLinuxOptions :: !(Maybe V1SELinuxOptions)
, v1PodSecurityContextSupplementalGroups :: !(Maybe [Integer])
, v1PodSecurityContextSysctls :: !(Maybe [V1Sysctl])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodSecurityContext where
parseJSON = A.withObject "V1PodSecurityContext" $ \o ->
V1PodSecurityContext
<$> (o .:? "fsGroup")
<*> (o .:? "runAsGroup")
<*> (o .:? "runAsNonRoot")
<*> (o .:? "runAsUser")
<*> (o .:? "seLinuxOptions")
<*> (o .:? "supplementalGroups")
<*> (o .:? "sysctls")
instance A.ToJSON V1PodSecurityContext where
toJSON V1PodSecurityContext {..} =
_omitNulls
[ "fsGroup" .= v1PodSecurityContextFsGroup
, "runAsGroup" .= v1PodSecurityContextRunAsGroup
, "runAsNonRoot" .= v1PodSecurityContextRunAsNonRoot
, "runAsUser" .= v1PodSecurityContextRunAsUser
, "seLinuxOptions" .= v1PodSecurityContextSeLinuxOptions
, "supplementalGroups" .= v1PodSecurityContextSupplementalGroups
, "sysctls" .= v1PodSecurityContextSysctls
]
mkV1PodSecurityContext
:: V1PodSecurityContext
mkV1PodSecurityContext =
V1PodSecurityContext
{ v1PodSecurityContextFsGroup = Nothing
, v1PodSecurityContextRunAsGroup = Nothing
, v1PodSecurityContextRunAsNonRoot = Nothing
, v1PodSecurityContextRunAsUser = Nothing
, v1PodSecurityContextSeLinuxOptions = Nothing
, v1PodSecurityContextSupplementalGroups = Nothing
, v1PodSecurityContextSysctls = Nothing
}
data V1PodSpec = V1PodSpec
{ v1PodSpecActiveDeadlineSeconds :: !(Maybe Integer)
, v1PodSpecAffinity :: !(Maybe V1Affinity)
, v1PodSpecAutomountServiceAccountToken :: !(Maybe Bool)
, v1PodSpecContainers :: !([V1Container])
, v1PodSpecDnsConfig :: !(Maybe V1PodDNSConfig)
, v1PodSpecDnsPolicy :: !(Maybe Text)
, v1PodSpecEnableServiceLinks :: !(Maybe Bool)
, v1PodSpecHostAliases :: !(Maybe [V1HostAlias])
, v1PodSpecHostIpc :: !(Maybe Bool)
, v1PodSpecHostNetwork :: !(Maybe Bool)
, v1PodSpecHostPid :: !(Maybe Bool)
, v1PodSpecHostname :: !(Maybe Text)
, v1PodSpecImagePullSecrets :: !(Maybe [V1LocalObjectReference])
, v1PodSpecInitContainers :: !(Maybe [V1Container])
, v1PodSpecNodeName :: !(Maybe Text)
, v1PodSpecNodeSelector :: !(Maybe (Map.Map String Text))
, v1PodSpecPriority :: !(Maybe Int)
, v1PodSpecPriorityClassName :: !(Maybe Text)
, v1PodSpecReadinessGates :: !(Maybe [V1PodReadinessGate])
, v1PodSpecRestartPolicy :: !(Maybe Text)
, v1PodSpecRuntimeClassName :: !(Maybe Text)
, v1PodSpecSchedulerName :: !(Maybe Text)
, v1PodSpecSecurityContext :: !(Maybe V1PodSecurityContext)
, v1PodSpecServiceAccount :: !(Maybe Text)
, v1PodSpecServiceAccountName :: !(Maybe Text)
, v1PodSpecShareProcessNamespace :: !(Maybe Bool)
, v1PodSpecSubdomain :: !(Maybe Text)
, v1PodSpecTerminationGracePeriodSeconds :: !(Maybe Integer)
, v1PodSpecTolerations :: !(Maybe [V1Toleration])
, v1PodSpecVolumes :: !(Maybe [V1Volume])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodSpec where
parseJSON = A.withObject "V1PodSpec" $ \o ->
V1PodSpec
<$> (o .:? "activeDeadlineSeconds")
<*> (o .:? "affinity")
<*> (o .:? "automountServiceAccountToken")
<*> (o .: "containers")
<*> (o .:? "dnsConfig")
<*> (o .:? "dnsPolicy")
<*> (o .:? "enableServiceLinks")
<*> (o .:? "hostAliases")
<*> (o .:? "hostIPC")
<*> (o .:? "hostNetwork")
<*> (o .:? "hostPID")
<*> (o .:? "hostname")
<*> (o .:? "imagePullSecrets")
<*> (o .:? "initContainers")
<*> (o .:? "nodeName")
<*> (o .:? "nodeSelector")
<*> (o .:? "priority")
<*> (o .:? "priorityClassName")
<*> (o .:? "readinessGates")
<*> (o .:? "restartPolicy")
<*> (o .:? "runtimeClassName")
<*> (o .:? "schedulerName")
<*> (o .:? "securityContext")
<*> (o .:? "serviceAccount")
<*> (o .:? "serviceAccountName")
<*> (o .:? "shareProcessNamespace")
<*> (o .:? "subdomain")
<*> (o .:? "terminationGracePeriodSeconds")
<*> (o .:? "tolerations")
<*> (o .:? "volumes")
instance A.ToJSON V1PodSpec where
toJSON V1PodSpec {..} =
_omitNulls
[ "activeDeadlineSeconds" .= v1PodSpecActiveDeadlineSeconds
, "affinity" .= v1PodSpecAffinity
, "automountServiceAccountToken" .= v1PodSpecAutomountServiceAccountToken
, "containers" .= v1PodSpecContainers
, "dnsConfig" .= v1PodSpecDnsConfig
, "dnsPolicy" .= v1PodSpecDnsPolicy
, "enableServiceLinks" .= v1PodSpecEnableServiceLinks
, "hostAliases" .= v1PodSpecHostAliases
, "hostIPC" .= v1PodSpecHostIpc
, "hostNetwork" .= v1PodSpecHostNetwork
, "hostPID" .= v1PodSpecHostPid
, "hostname" .= v1PodSpecHostname
, "imagePullSecrets" .= v1PodSpecImagePullSecrets
, "initContainers" .= v1PodSpecInitContainers
, "nodeName" .= v1PodSpecNodeName
, "nodeSelector" .= v1PodSpecNodeSelector
, "priority" .= v1PodSpecPriority
, "priorityClassName" .= v1PodSpecPriorityClassName
, "readinessGates" .= v1PodSpecReadinessGates
, "restartPolicy" .= v1PodSpecRestartPolicy
, "runtimeClassName" .= v1PodSpecRuntimeClassName
, "schedulerName" .= v1PodSpecSchedulerName
, "securityContext" .= v1PodSpecSecurityContext
, "serviceAccount" .= v1PodSpecServiceAccount
, "serviceAccountName" .= v1PodSpecServiceAccountName
, "shareProcessNamespace" .= v1PodSpecShareProcessNamespace
, "subdomain" .= v1PodSpecSubdomain
, "terminationGracePeriodSeconds" .= v1PodSpecTerminationGracePeriodSeconds
, "tolerations" .= v1PodSpecTolerations
, "volumes" .= v1PodSpecVolumes
]
mkV1PodSpec
:: [V1Container]
-> V1PodSpec
mkV1PodSpec v1PodSpecContainers =
V1PodSpec
{ v1PodSpecActiveDeadlineSeconds = Nothing
, v1PodSpecAffinity = Nothing
, v1PodSpecAutomountServiceAccountToken = Nothing
, v1PodSpecContainers
, v1PodSpecDnsConfig = Nothing
, v1PodSpecDnsPolicy = Nothing
, v1PodSpecEnableServiceLinks = Nothing
, v1PodSpecHostAliases = Nothing
, v1PodSpecHostIpc = Nothing
, v1PodSpecHostNetwork = Nothing
, v1PodSpecHostPid = Nothing
, v1PodSpecHostname = Nothing
, v1PodSpecImagePullSecrets = Nothing
, v1PodSpecInitContainers = Nothing
, v1PodSpecNodeName = Nothing
, v1PodSpecNodeSelector = Nothing
, v1PodSpecPriority = Nothing
, v1PodSpecPriorityClassName = Nothing
, v1PodSpecReadinessGates = Nothing
, v1PodSpecRestartPolicy = Nothing
, v1PodSpecRuntimeClassName = Nothing
, v1PodSpecSchedulerName = Nothing
, v1PodSpecSecurityContext = Nothing
, v1PodSpecServiceAccount = Nothing
, v1PodSpecServiceAccountName = Nothing
, v1PodSpecShareProcessNamespace = Nothing
, v1PodSpecSubdomain = Nothing
, v1PodSpecTerminationGracePeriodSeconds = Nothing
, v1PodSpecTolerations = Nothing
, v1PodSpecVolumes = Nothing
}
data V1PodStatus = V1PodStatus
{ v1PodStatusConditions :: !(Maybe [V1PodCondition])
, v1PodStatusContainerStatuses :: !(Maybe [V1ContainerStatus])
, v1PodStatusHostIp :: !(Maybe Text)
, v1PodStatusInitContainerStatuses :: !(Maybe [V1ContainerStatus])
, v1PodStatusMessage :: !(Maybe Text)
, v1PodStatusNominatedNodeName :: !(Maybe Text)
, v1PodStatusPhase :: !(Maybe Text)
, v1PodStatusPodIp :: !(Maybe Text)
, v1PodStatusQosClass :: !(Maybe Text)
, v1PodStatusReason :: !(Maybe Text)
, v1PodStatusStartTime :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodStatus where
parseJSON = A.withObject "V1PodStatus" $ \o ->
V1PodStatus
<$> (o .:? "conditions")
<*> (o .:? "containerStatuses")
<*> (o .:? "hostIP")
<*> (o .:? "initContainerStatuses")
<*> (o .:? "message")
<*> (o .:? "nominatedNodeName")
<*> (o .:? "phase")
<*> (o .:? "podIP")
<*> (o .:? "qosClass")
<*> (o .:? "reason")
<*> (o .:? "startTime")
instance A.ToJSON V1PodStatus where
toJSON V1PodStatus {..} =
_omitNulls
[ "conditions" .= v1PodStatusConditions
, "containerStatuses" .= v1PodStatusContainerStatuses
, "hostIP" .= v1PodStatusHostIp
, "initContainerStatuses" .= v1PodStatusInitContainerStatuses
, "message" .= v1PodStatusMessage
, "nominatedNodeName" .= v1PodStatusNominatedNodeName
, "phase" .= v1PodStatusPhase
, "podIP" .= v1PodStatusPodIp
, "qosClass" .= v1PodStatusQosClass
, "reason" .= v1PodStatusReason
, "startTime" .= v1PodStatusStartTime
]
mkV1PodStatus
:: V1PodStatus
mkV1PodStatus =
V1PodStatus
{ v1PodStatusConditions = Nothing
, v1PodStatusContainerStatuses = Nothing
, v1PodStatusHostIp = Nothing
, v1PodStatusInitContainerStatuses = Nothing
, v1PodStatusMessage = Nothing
, v1PodStatusNominatedNodeName = Nothing
, v1PodStatusPhase = Nothing
, v1PodStatusPodIp = Nothing
, v1PodStatusQosClass = Nothing
, v1PodStatusReason = Nothing
, v1PodStatusStartTime = Nothing
}
data V1PodTemplate = V1PodTemplate
{ v1PodTemplateApiVersion :: !(Maybe Text)
, v1PodTemplateKind :: !(Maybe Text)
, v1PodTemplateMetadata :: !(Maybe V1ObjectMeta)
, v1PodTemplateTemplate :: !(Maybe V1PodTemplateSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodTemplate where
parseJSON = A.withObject "V1PodTemplate" $ \o ->
V1PodTemplate
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "template")
instance A.ToJSON V1PodTemplate where
toJSON V1PodTemplate {..} =
_omitNulls
[ "apiVersion" .= v1PodTemplateApiVersion
, "kind" .= v1PodTemplateKind
, "metadata" .= v1PodTemplateMetadata
, "template" .= v1PodTemplateTemplate
]
mkV1PodTemplate
:: V1PodTemplate
mkV1PodTemplate =
V1PodTemplate
{ v1PodTemplateApiVersion = Nothing
, v1PodTemplateKind = Nothing
, v1PodTemplateMetadata = Nothing
, v1PodTemplateTemplate = Nothing
}
data V1PodTemplateList = V1PodTemplateList
{ v1PodTemplateListApiVersion :: !(Maybe Text)
, v1PodTemplateListItems :: !([V1PodTemplate])
, v1PodTemplateListKind :: !(Maybe Text)
, v1PodTemplateListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodTemplateList where
parseJSON = A.withObject "V1PodTemplateList" $ \o ->
V1PodTemplateList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1PodTemplateList where
toJSON V1PodTemplateList {..} =
_omitNulls
[ "apiVersion" .= v1PodTemplateListApiVersion
, "items" .= v1PodTemplateListItems
, "kind" .= v1PodTemplateListKind
, "metadata" .= v1PodTemplateListMetadata
]
mkV1PodTemplateList
:: [V1PodTemplate]
-> V1PodTemplateList
mkV1PodTemplateList v1PodTemplateListItems =
V1PodTemplateList
{ v1PodTemplateListApiVersion = Nothing
, v1PodTemplateListItems
, v1PodTemplateListKind = Nothing
, v1PodTemplateListMetadata = Nothing
}
data V1PodTemplateSpec = V1PodTemplateSpec
{ v1PodTemplateSpecMetadata :: !(Maybe V1ObjectMeta)
, v1PodTemplateSpecSpec :: !(Maybe V1PodSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PodTemplateSpec where
parseJSON = A.withObject "V1PodTemplateSpec" $ \o ->
V1PodTemplateSpec
<$> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V1PodTemplateSpec where
toJSON V1PodTemplateSpec {..} =
_omitNulls
[ "metadata" .= v1PodTemplateSpecMetadata
, "spec" .= v1PodTemplateSpecSpec
]
mkV1PodTemplateSpec
:: V1PodTemplateSpec
mkV1PodTemplateSpec =
V1PodTemplateSpec
{ v1PodTemplateSpecMetadata = Nothing
, v1PodTemplateSpecSpec = Nothing
}
data V1PolicyRule = V1PolicyRule
{ v1PolicyRuleApiGroups :: !(Maybe [Text])
, v1PolicyRuleNonResourceUrLs :: !(Maybe [Text])
, v1PolicyRuleResourceNames :: !(Maybe [Text])
, v1PolicyRuleResources :: !(Maybe [Text])
, v1PolicyRuleVerbs :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PolicyRule where
parseJSON = A.withObject "V1PolicyRule" $ \o ->
V1PolicyRule
<$> (o .:? "apiGroups")
<*> (o .:? "nonResourceURLs")
<*> (o .:? "resourceNames")
<*> (o .:? "resources")
<*> (o .: "verbs")
instance A.ToJSON V1PolicyRule where
toJSON V1PolicyRule {..} =
_omitNulls
[ "apiGroups" .= v1PolicyRuleApiGroups
, "nonResourceURLs" .= v1PolicyRuleNonResourceUrLs
, "resourceNames" .= v1PolicyRuleResourceNames
, "resources" .= v1PolicyRuleResources
, "verbs" .= v1PolicyRuleVerbs
]
mkV1PolicyRule
:: [Text]
-> V1PolicyRule
mkV1PolicyRule v1PolicyRuleVerbs =
V1PolicyRule
{ v1PolicyRuleApiGroups = Nothing
, v1PolicyRuleNonResourceUrLs = Nothing
, v1PolicyRuleResourceNames = Nothing
, v1PolicyRuleResources = Nothing
, v1PolicyRuleVerbs
}
data V1PortworxVolumeSource = V1PortworxVolumeSource
{ v1PortworxVolumeSourceFsType :: !(Maybe Text)
, v1PortworxVolumeSourceReadOnly :: !(Maybe Bool)
, v1PortworxVolumeSourceVolumeId :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PortworxVolumeSource where
parseJSON = A.withObject "V1PortworxVolumeSource" $ \o ->
V1PortworxVolumeSource
<$> (o .:? "fsType")
<*> (o .:? "readOnly")
<*> (o .: "volumeID")
instance A.ToJSON V1PortworxVolumeSource where
toJSON V1PortworxVolumeSource {..} =
_omitNulls
[ "fsType" .= v1PortworxVolumeSourceFsType
, "readOnly" .= v1PortworxVolumeSourceReadOnly
, "volumeID" .= v1PortworxVolumeSourceVolumeId
]
mkV1PortworxVolumeSource
:: Text
-> V1PortworxVolumeSource
mkV1PortworxVolumeSource v1PortworxVolumeSourceVolumeId =
V1PortworxVolumeSource
{ v1PortworxVolumeSourceFsType = Nothing
, v1PortworxVolumeSourceReadOnly = Nothing
, v1PortworxVolumeSourceVolumeId
}
data V1Preconditions = V1Preconditions
{ v1PreconditionsResourceVersion :: !(Maybe Text)
, v1PreconditionsUid :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Preconditions where
parseJSON = A.withObject "V1Preconditions" $ \o ->
V1Preconditions
<$> (o .:? "resourceVersion")
<*> (o .:? "uid")
instance A.ToJSON V1Preconditions where
toJSON V1Preconditions {..} =
_omitNulls
[ "resourceVersion" .= v1PreconditionsResourceVersion
, "uid" .= v1PreconditionsUid
]
mkV1Preconditions
:: V1Preconditions
mkV1Preconditions =
V1Preconditions
{ v1PreconditionsResourceVersion = Nothing
, v1PreconditionsUid = Nothing
}
data V1PreferredSchedulingTerm = V1PreferredSchedulingTerm
{ v1PreferredSchedulingTermPreference :: !(V1NodeSelectorTerm)
, v1PreferredSchedulingTermWeight :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PreferredSchedulingTerm where
parseJSON = A.withObject "V1PreferredSchedulingTerm" $ \o ->
V1PreferredSchedulingTerm
<$> (o .: "preference")
<*> (o .: "weight")
instance A.ToJSON V1PreferredSchedulingTerm where
toJSON V1PreferredSchedulingTerm {..} =
_omitNulls
[ "preference" .= v1PreferredSchedulingTermPreference
, "weight" .= v1PreferredSchedulingTermWeight
]
mkV1PreferredSchedulingTerm
:: V1NodeSelectorTerm
-> Int
-> V1PreferredSchedulingTerm
mkV1PreferredSchedulingTerm v1PreferredSchedulingTermPreference v1PreferredSchedulingTermWeight =
V1PreferredSchedulingTerm
{ v1PreferredSchedulingTermPreference
, v1PreferredSchedulingTermWeight
}
data V1PriorityClass = V1PriorityClass
{ v1PriorityClassApiVersion :: !(Maybe Text)
, v1PriorityClassDescription :: !(Maybe Text)
, v1PriorityClassGlobalDefault :: !(Maybe Bool)
, v1PriorityClassKind :: !(Maybe Text)
, v1PriorityClassMetadata :: !(Maybe V1ObjectMeta)
, v1PriorityClassValue :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PriorityClass where
parseJSON = A.withObject "V1PriorityClass" $ \o ->
V1PriorityClass
<$> (o .:? "apiVersion")
<*> (o .:? "description")
<*> (o .:? "globalDefault")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "value")
instance A.ToJSON V1PriorityClass where
toJSON V1PriorityClass {..} =
_omitNulls
[ "apiVersion" .= v1PriorityClassApiVersion
, "description" .= v1PriorityClassDescription
, "globalDefault" .= v1PriorityClassGlobalDefault
, "kind" .= v1PriorityClassKind
, "metadata" .= v1PriorityClassMetadata
, "value" .= v1PriorityClassValue
]
mkV1PriorityClass
:: Int
-> V1PriorityClass
mkV1PriorityClass v1PriorityClassValue =
V1PriorityClass
{ v1PriorityClassApiVersion = Nothing
, v1PriorityClassDescription = Nothing
, v1PriorityClassGlobalDefault = Nothing
, v1PriorityClassKind = Nothing
, v1PriorityClassMetadata = Nothing
, v1PriorityClassValue
}
data V1PriorityClassList = V1PriorityClassList
{ v1PriorityClassListApiVersion :: !(Maybe Text)
, v1PriorityClassListItems :: !([V1PriorityClass])
, v1PriorityClassListKind :: !(Maybe Text)
, v1PriorityClassListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1PriorityClassList where
parseJSON = A.withObject "V1PriorityClassList" $ \o ->
V1PriorityClassList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1PriorityClassList where
toJSON V1PriorityClassList {..} =
_omitNulls
[ "apiVersion" .= v1PriorityClassListApiVersion
, "items" .= v1PriorityClassListItems
, "kind" .= v1PriorityClassListKind
, "metadata" .= v1PriorityClassListMetadata
]
mkV1PriorityClassList
:: [V1PriorityClass]
-> V1PriorityClassList
mkV1PriorityClassList v1PriorityClassListItems =
V1PriorityClassList
{ v1PriorityClassListApiVersion = Nothing
, v1PriorityClassListItems
, v1PriorityClassListKind = Nothing
, v1PriorityClassListMetadata = Nothing
}
data V1Probe = V1Probe
{ v1ProbeExec :: !(Maybe V1ExecAction)
, v1ProbeFailureThreshold :: !(Maybe Int)
, v1ProbeHttpGet :: !(Maybe V1HTTPGetAction)
, v1ProbeInitialDelaySeconds :: !(Maybe Int)
, v1ProbePeriodSeconds :: !(Maybe Int)
, v1ProbeSuccessThreshold :: !(Maybe Int)
, v1ProbeTcpSocket :: !(Maybe V1TCPSocketAction)
, v1ProbeTimeoutSeconds :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Probe where
parseJSON = A.withObject "V1Probe" $ \o ->
V1Probe
<$> (o .:? "exec")
<*> (o .:? "failureThreshold")
<*> (o .:? "httpGet")
<*> (o .:? "initialDelaySeconds")
<*> (o .:? "periodSeconds")
<*> (o .:? "successThreshold")
<*> (o .:? "tcpSocket")
<*> (o .:? "timeoutSeconds")
instance A.ToJSON V1Probe where
toJSON V1Probe {..} =
_omitNulls
[ "exec" .= v1ProbeExec
, "failureThreshold" .= v1ProbeFailureThreshold
, "httpGet" .= v1ProbeHttpGet
, "initialDelaySeconds" .= v1ProbeInitialDelaySeconds
, "periodSeconds" .= v1ProbePeriodSeconds
, "successThreshold" .= v1ProbeSuccessThreshold
, "tcpSocket" .= v1ProbeTcpSocket
, "timeoutSeconds" .= v1ProbeTimeoutSeconds
]
mkV1Probe
:: V1Probe
mkV1Probe =
V1Probe
{ v1ProbeExec = Nothing
, v1ProbeFailureThreshold = Nothing
, v1ProbeHttpGet = Nothing
, v1ProbeInitialDelaySeconds = Nothing
, v1ProbePeriodSeconds = Nothing
, v1ProbeSuccessThreshold = Nothing
, v1ProbeTcpSocket = Nothing
, v1ProbeTimeoutSeconds = Nothing
}
data V1ProjectedVolumeSource = V1ProjectedVolumeSource
{ v1ProjectedVolumeSourceDefaultMode :: !(Maybe Int)
, v1ProjectedVolumeSourceSources :: !([V1VolumeProjection])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ProjectedVolumeSource where
parseJSON = A.withObject "V1ProjectedVolumeSource" $ \o ->
V1ProjectedVolumeSource
<$> (o .:? "defaultMode")
<*> (o .: "sources")
instance A.ToJSON V1ProjectedVolumeSource where
toJSON V1ProjectedVolumeSource {..} =
_omitNulls
[ "defaultMode" .= v1ProjectedVolumeSourceDefaultMode
, "sources" .= v1ProjectedVolumeSourceSources
]
mkV1ProjectedVolumeSource
:: [V1VolumeProjection]
-> V1ProjectedVolumeSource
mkV1ProjectedVolumeSource v1ProjectedVolumeSourceSources =
V1ProjectedVolumeSource
{ v1ProjectedVolumeSourceDefaultMode = Nothing
, v1ProjectedVolumeSourceSources
}
data V1QuobyteVolumeSource = V1QuobyteVolumeSource
{ v1QuobyteVolumeSourceGroup :: !(Maybe Text)
, v1QuobyteVolumeSourceReadOnly :: !(Maybe Bool)
, v1QuobyteVolumeSourceRegistry :: !(Text)
, v1QuobyteVolumeSourceTenant :: !(Maybe Text)
, v1QuobyteVolumeSourceUser :: !(Maybe Text)
, v1QuobyteVolumeSourceVolume :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1QuobyteVolumeSource where
parseJSON = A.withObject "V1QuobyteVolumeSource" $ \o ->
V1QuobyteVolumeSource
<$> (o .:? "group")
<*> (o .:? "readOnly")
<*> (o .: "registry")
<*> (o .:? "tenant")
<*> (o .:? "user")
<*> (o .: "volume")
instance A.ToJSON V1QuobyteVolumeSource where
toJSON V1QuobyteVolumeSource {..} =
_omitNulls
[ "group" .= v1QuobyteVolumeSourceGroup
, "readOnly" .= v1QuobyteVolumeSourceReadOnly
, "registry" .= v1QuobyteVolumeSourceRegistry
, "tenant" .= v1QuobyteVolumeSourceTenant
, "user" .= v1QuobyteVolumeSourceUser
, "volume" .= v1QuobyteVolumeSourceVolume
]
mkV1QuobyteVolumeSource
:: Text
-> Text
-> V1QuobyteVolumeSource
mkV1QuobyteVolumeSource v1QuobyteVolumeSourceRegistry v1QuobyteVolumeSourceVolume =
V1QuobyteVolumeSource
{ v1QuobyteVolumeSourceGroup = Nothing
, v1QuobyteVolumeSourceReadOnly = Nothing
, v1QuobyteVolumeSourceRegistry
, v1QuobyteVolumeSourceTenant = Nothing
, v1QuobyteVolumeSourceUser = Nothing
, v1QuobyteVolumeSourceVolume
}
data V1RBDPersistentVolumeSource = V1RBDPersistentVolumeSource
{ v1RBDPersistentVolumeSourceFsType :: !(Maybe Text)
, v1RBDPersistentVolumeSourceImage :: !(Text)
, v1RBDPersistentVolumeSourceKeyring :: !(Maybe Text)
, v1RBDPersistentVolumeSourceMonitors :: !([Text])
, v1RBDPersistentVolumeSourcePool :: !(Maybe Text)
, v1RBDPersistentVolumeSourceReadOnly :: !(Maybe Bool)
, v1RBDPersistentVolumeSourceSecretRef :: !(Maybe V1SecretReference)
, v1RBDPersistentVolumeSourceUser :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1RBDPersistentVolumeSource where
parseJSON = A.withObject "V1RBDPersistentVolumeSource" $ \o ->
V1RBDPersistentVolumeSource
<$> (o .:? "fsType")
<*> (o .: "image")
<*> (o .:? "keyring")
<*> (o .: "monitors")
<*> (o .:? "pool")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
<*> (o .:? "user")
instance A.ToJSON V1RBDPersistentVolumeSource where
toJSON V1RBDPersistentVolumeSource {..} =
_omitNulls
[ "fsType" .= v1RBDPersistentVolumeSourceFsType
, "image" .= v1RBDPersistentVolumeSourceImage
, "keyring" .= v1RBDPersistentVolumeSourceKeyring
, "monitors" .= v1RBDPersistentVolumeSourceMonitors
, "pool" .= v1RBDPersistentVolumeSourcePool
, "readOnly" .= v1RBDPersistentVolumeSourceReadOnly
, "secretRef" .= v1RBDPersistentVolumeSourceSecretRef
, "user" .= v1RBDPersistentVolumeSourceUser
]
mkV1RBDPersistentVolumeSource
:: Text
-> [Text]
-> V1RBDPersistentVolumeSource
mkV1RBDPersistentVolumeSource v1RBDPersistentVolumeSourceImage v1RBDPersistentVolumeSourceMonitors =
V1RBDPersistentVolumeSource
{ v1RBDPersistentVolumeSourceFsType = Nothing
, v1RBDPersistentVolumeSourceImage
, v1RBDPersistentVolumeSourceKeyring = Nothing
, v1RBDPersistentVolumeSourceMonitors
, v1RBDPersistentVolumeSourcePool = Nothing
, v1RBDPersistentVolumeSourceReadOnly = Nothing
, v1RBDPersistentVolumeSourceSecretRef = Nothing
, v1RBDPersistentVolumeSourceUser = Nothing
}
data V1RBDVolumeSource = V1RBDVolumeSource
{ v1RBDVolumeSourceFsType :: !(Maybe Text)
, v1RBDVolumeSourceImage :: !(Text)
, v1RBDVolumeSourceKeyring :: !(Maybe Text)
, v1RBDVolumeSourceMonitors :: !([Text])
, v1RBDVolumeSourcePool :: !(Maybe Text)
, v1RBDVolumeSourceReadOnly :: !(Maybe Bool)
, v1RBDVolumeSourceSecretRef :: !(Maybe V1LocalObjectReference)
, v1RBDVolumeSourceUser :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1RBDVolumeSource where
parseJSON = A.withObject "V1RBDVolumeSource" $ \o ->
V1RBDVolumeSource
<$> (o .:? "fsType")
<*> (o .: "image")
<*> (o .:? "keyring")
<*> (o .: "monitors")
<*> (o .:? "pool")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
<*> (o .:? "user")
instance A.ToJSON V1RBDVolumeSource where
toJSON V1RBDVolumeSource {..} =
_omitNulls
[ "fsType" .= v1RBDVolumeSourceFsType
, "image" .= v1RBDVolumeSourceImage
, "keyring" .= v1RBDVolumeSourceKeyring
, "monitors" .= v1RBDVolumeSourceMonitors
, "pool" .= v1RBDVolumeSourcePool
, "readOnly" .= v1RBDVolumeSourceReadOnly
, "secretRef" .= v1RBDVolumeSourceSecretRef
, "user" .= v1RBDVolumeSourceUser
]
mkV1RBDVolumeSource
:: Text
-> [Text]
-> V1RBDVolumeSource
mkV1RBDVolumeSource v1RBDVolumeSourceImage v1RBDVolumeSourceMonitors =
V1RBDVolumeSource
{ v1RBDVolumeSourceFsType = Nothing
, v1RBDVolumeSourceImage
, v1RBDVolumeSourceKeyring = Nothing
, v1RBDVolumeSourceMonitors
, v1RBDVolumeSourcePool = Nothing
, v1RBDVolumeSourceReadOnly = Nothing
, v1RBDVolumeSourceSecretRef = Nothing
, v1RBDVolumeSourceUser = Nothing
}
data V1ReplicaSet = V1ReplicaSet
{ v1ReplicaSetApiVersion :: !(Maybe Text)
, v1ReplicaSetKind :: !(Maybe Text)
, v1ReplicaSetMetadata :: !(Maybe V1ObjectMeta)
, v1ReplicaSetSpec :: !(Maybe V1ReplicaSetSpec)
, v1ReplicaSetStatus :: !(Maybe V1ReplicaSetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicaSet where
parseJSON = A.withObject "V1ReplicaSet" $ \o ->
V1ReplicaSet
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1ReplicaSet where
toJSON V1ReplicaSet {..} =
_omitNulls
[ "apiVersion" .= v1ReplicaSetApiVersion
, "kind" .= v1ReplicaSetKind
, "metadata" .= v1ReplicaSetMetadata
, "spec" .= v1ReplicaSetSpec
, "status" .= v1ReplicaSetStatus
]
mkV1ReplicaSet
:: V1ReplicaSet
mkV1ReplicaSet =
V1ReplicaSet
{ v1ReplicaSetApiVersion = Nothing
, v1ReplicaSetKind = Nothing
, v1ReplicaSetMetadata = Nothing
, v1ReplicaSetSpec = Nothing
, v1ReplicaSetStatus = Nothing
}
data V1ReplicaSetCondition = V1ReplicaSetCondition
{ v1ReplicaSetConditionLastTransitionTime :: !(Maybe DateTime)
, v1ReplicaSetConditionMessage :: !(Maybe Text)
, v1ReplicaSetConditionReason :: !(Maybe Text)
, v1ReplicaSetConditionStatus :: !(Text)
, v1ReplicaSetConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicaSetCondition where
parseJSON = A.withObject "V1ReplicaSetCondition" $ \o ->
V1ReplicaSetCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1ReplicaSetCondition where
toJSON V1ReplicaSetCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1ReplicaSetConditionLastTransitionTime
, "message" .= v1ReplicaSetConditionMessage
, "reason" .= v1ReplicaSetConditionReason
, "status" .= v1ReplicaSetConditionStatus
, "type" .= v1ReplicaSetConditionType
]
mkV1ReplicaSetCondition
:: Text
-> Text
-> V1ReplicaSetCondition
mkV1ReplicaSetCondition v1ReplicaSetConditionStatus v1ReplicaSetConditionType =
V1ReplicaSetCondition
{ v1ReplicaSetConditionLastTransitionTime = Nothing
, v1ReplicaSetConditionMessage = Nothing
, v1ReplicaSetConditionReason = Nothing
, v1ReplicaSetConditionStatus
, v1ReplicaSetConditionType
}
data V1ReplicaSetList = V1ReplicaSetList
{ v1ReplicaSetListApiVersion :: !(Maybe Text)
, v1ReplicaSetListItems :: !([V1ReplicaSet])
, v1ReplicaSetListKind :: !(Maybe Text)
, v1ReplicaSetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicaSetList where
parseJSON = A.withObject "V1ReplicaSetList" $ \o ->
V1ReplicaSetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ReplicaSetList where
toJSON V1ReplicaSetList {..} =
_omitNulls
[ "apiVersion" .= v1ReplicaSetListApiVersion
, "items" .= v1ReplicaSetListItems
, "kind" .= v1ReplicaSetListKind
, "metadata" .= v1ReplicaSetListMetadata
]
mkV1ReplicaSetList
:: [V1ReplicaSet]
-> V1ReplicaSetList
mkV1ReplicaSetList v1ReplicaSetListItems =
V1ReplicaSetList
{ v1ReplicaSetListApiVersion = Nothing
, v1ReplicaSetListItems
, v1ReplicaSetListKind = Nothing
, v1ReplicaSetListMetadata = Nothing
}
data V1ReplicaSetSpec = V1ReplicaSetSpec
{ v1ReplicaSetSpecMinReadySeconds :: !(Maybe Int)
, v1ReplicaSetSpecReplicas :: !(Maybe Int)
, v1ReplicaSetSpecSelector :: !(V1LabelSelector)
, v1ReplicaSetSpecTemplate :: !(Maybe V1PodTemplateSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicaSetSpec where
parseJSON = A.withObject "V1ReplicaSetSpec" $ \o ->
V1ReplicaSetSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "replicas")
<*> (o .: "selector")
<*> (o .:? "template")
instance A.ToJSON V1ReplicaSetSpec where
toJSON V1ReplicaSetSpec {..} =
_omitNulls
[ "minReadySeconds" .= v1ReplicaSetSpecMinReadySeconds
, "replicas" .= v1ReplicaSetSpecReplicas
, "selector" .= v1ReplicaSetSpecSelector
, "template" .= v1ReplicaSetSpecTemplate
]
mkV1ReplicaSetSpec
:: V1LabelSelector
-> V1ReplicaSetSpec
mkV1ReplicaSetSpec v1ReplicaSetSpecSelector =
V1ReplicaSetSpec
{ v1ReplicaSetSpecMinReadySeconds = Nothing
, v1ReplicaSetSpecReplicas = Nothing
, v1ReplicaSetSpecSelector
, v1ReplicaSetSpecTemplate = Nothing
}
data V1ReplicaSetStatus = V1ReplicaSetStatus
{ v1ReplicaSetStatusAvailableReplicas :: !(Maybe Int)
, v1ReplicaSetStatusConditions :: !(Maybe [V1ReplicaSetCondition])
, v1ReplicaSetStatusFullyLabeledReplicas :: !(Maybe Int)
, v1ReplicaSetStatusObservedGeneration :: !(Maybe Integer)
, v1ReplicaSetStatusReadyReplicas :: !(Maybe Int)
, v1ReplicaSetStatusReplicas :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicaSetStatus where
parseJSON = A.withObject "V1ReplicaSetStatus" $ \o ->
V1ReplicaSetStatus
<$> (o .:? "availableReplicas")
<*> (o .:? "conditions")
<*> (o .:? "fullyLabeledReplicas")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .: "replicas")
instance A.ToJSON V1ReplicaSetStatus where
toJSON V1ReplicaSetStatus {..} =
_omitNulls
[ "availableReplicas" .= v1ReplicaSetStatusAvailableReplicas
, "conditions" .= v1ReplicaSetStatusConditions
, "fullyLabeledReplicas" .= v1ReplicaSetStatusFullyLabeledReplicas
, "observedGeneration" .= v1ReplicaSetStatusObservedGeneration
, "readyReplicas" .= v1ReplicaSetStatusReadyReplicas
, "replicas" .= v1ReplicaSetStatusReplicas
]
mkV1ReplicaSetStatus
:: Int
-> V1ReplicaSetStatus
mkV1ReplicaSetStatus v1ReplicaSetStatusReplicas =
V1ReplicaSetStatus
{ v1ReplicaSetStatusAvailableReplicas = Nothing
, v1ReplicaSetStatusConditions = Nothing
, v1ReplicaSetStatusFullyLabeledReplicas = Nothing
, v1ReplicaSetStatusObservedGeneration = Nothing
, v1ReplicaSetStatusReadyReplicas = Nothing
, v1ReplicaSetStatusReplicas
}
data V1ReplicationController = V1ReplicationController
{ v1ReplicationControllerApiVersion :: !(Maybe Text)
, v1ReplicationControllerKind :: !(Maybe Text)
, v1ReplicationControllerMetadata :: !(Maybe V1ObjectMeta)
, v1ReplicationControllerSpec :: !(Maybe V1ReplicationControllerSpec)
, v1ReplicationControllerStatus :: !(Maybe V1ReplicationControllerStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicationController where
parseJSON = A.withObject "V1ReplicationController" $ \o ->
V1ReplicationController
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1ReplicationController where
toJSON V1ReplicationController {..} =
_omitNulls
[ "apiVersion" .= v1ReplicationControllerApiVersion
, "kind" .= v1ReplicationControllerKind
, "metadata" .= v1ReplicationControllerMetadata
, "spec" .= v1ReplicationControllerSpec
, "status" .= v1ReplicationControllerStatus
]
mkV1ReplicationController
:: V1ReplicationController
mkV1ReplicationController =
V1ReplicationController
{ v1ReplicationControllerApiVersion = Nothing
, v1ReplicationControllerKind = Nothing
, v1ReplicationControllerMetadata = Nothing
, v1ReplicationControllerSpec = Nothing
, v1ReplicationControllerStatus = Nothing
}
data V1ReplicationControllerCondition = V1ReplicationControllerCondition
{ v1ReplicationControllerConditionLastTransitionTime :: !(Maybe DateTime)
, v1ReplicationControllerConditionMessage :: !(Maybe Text)
, v1ReplicationControllerConditionReason :: !(Maybe Text)
, v1ReplicationControllerConditionStatus :: !(Text)
, v1ReplicationControllerConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicationControllerCondition where
parseJSON = A.withObject "V1ReplicationControllerCondition" $ \o ->
V1ReplicationControllerCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1ReplicationControllerCondition where
toJSON V1ReplicationControllerCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1ReplicationControllerConditionLastTransitionTime
, "message" .= v1ReplicationControllerConditionMessage
, "reason" .= v1ReplicationControllerConditionReason
, "status" .= v1ReplicationControllerConditionStatus
, "type" .= v1ReplicationControllerConditionType
]
mkV1ReplicationControllerCondition
:: Text
-> Text
-> V1ReplicationControllerCondition
mkV1ReplicationControllerCondition v1ReplicationControllerConditionStatus v1ReplicationControllerConditionType =
V1ReplicationControllerCondition
{ v1ReplicationControllerConditionLastTransitionTime = Nothing
, v1ReplicationControllerConditionMessage = Nothing
, v1ReplicationControllerConditionReason = Nothing
, v1ReplicationControllerConditionStatus
, v1ReplicationControllerConditionType
}
data V1ReplicationControllerList = V1ReplicationControllerList
{ v1ReplicationControllerListApiVersion :: !(Maybe Text)
, v1ReplicationControllerListItems :: !([V1ReplicationController])
, v1ReplicationControllerListKind :: !(Maybe Text)
, v1ReplicationControllerListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicationControllerList where
parseJSON = A.withObject "V1ReplicationControllerList" $ \o ->
V1ReplicationControllerList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ReplicationControllerList where
toJSON V1ReplicationControllerList {..} =
_omitNulls
[ "apiVersion" .= v1ReplicationControllerListApiVersion
, "items" .= v1ReplicationControllerListItems
, "kind" .= v1ReplicationControllerListKind
, "metadata" .= v1ReplicationControllerListMetadata
]
mkV1ReplicationControllerList
:: [V1ReplicationController]
-> V1ReplicationControllerList
mkV1ReplicationControllerList v1ReplicationControllerListItems =
V1ReplicationControllerList
{ v1ReplicationControllerListApiVersion = Nothing
, v1ReplicationControllerListItems
, v1ReplicationControllerListKind = Nothing
, v1ReplicationControllerListMetadata = Nothing
}
data V1ReplicationControllerSpec = V1ReplicationControllerSpec
{ v1ReplicationControllerSpecMinReadySeconds :: !(Maybe Int)
, v1ReplicationControllerSpecReplicas :: !(Maybe Int)
, v1ReplicationControllerSpecSelector :: !(Maybe (Map.Map String Text))
, v1ReplicationControllerSpecTemplate :: !(Maybe V1PodTemplateSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicationControllerSpec where
parseJSON = A.withObject "V1ReplicationControllerSpec" $ \o ->
V1ReplicationControllerSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "replicas")
<*> (o .:? "selector")
<*> (o .:? "template")
instance A.ToJSON V1ReplicationControllerSpec where
toJSON V1ReplicationControllerSpec {..} =
_omitNulls
[ "minReadySeconds" .= v1ReplicationControllerSpecMinReadySeconds
, "replicas" .= v1ReplicationControllerSpecReplicas
, "selector" .= v1ReplicationControllerSpecSelector
, "template" .= v1ReplicationControllerSpecTemplate
]
mkV1ReplicationControllerSpec
:: V1ReplicationControllerSpec
mkV1ReplicationControllerSpec =
V1ReplicationControllerSpec
{ v1ReplicationControllerSpecMinReadySeconds = Nothing
, v1ReplicationControllerSpecReplicas = Nothing
, v1ReplicationControllerSpecSelector = Nothing
, v1ReplicationControllerSpecTemplate = Nothing
}
data V1ReplicationControllerStatus = V1ReplicationControllerStatus
{ v1ReplicationControllerStatusAvailableReplicas :: !(Maybe Int)
, v1ReplicationControllerStatusConditions :: !(Maybe [V1ReplicationControllerCondition])
, v1ReplicationControllerStatusFullyLabeledReplicas :: !(Maybe Int)
, v1ReplicationControllerStatusObservedGeneration :: !(Maybe Integer)
, v1ReplicationControllerStatusReadyReplicas :: !(Maybe Int)
, v1ReplicationControllerStatusReplicas :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ReplicationControllerStatus where
parseJSON = A.withObject "V1ReplicationControllerStatus" $ \o ->
V1ReplicationControllerStatus
<$> (o .:? "availableReplicas")
<*> (o .:? "conditions")
<*> (o .:? "fullyLabeledReplicas")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .: "replicas")
instance A.ToJSON V1ReplicationControllerStatus where
toJSON V1ReplicationControllerStatus {..} =
_omitNulls
[ "availableReplicas" .= v1ReplicationControllerStatusAvailableReplicas
, "conditions" .= v1ReplicationControllerStatusConditions
, "fullyLabeledReplicas" .= v1ReplicationControllerStatusFullyLabeledReplicas
, "observedGeneration" .= v1ReplicationControllerStatusObservedGeneration
, "readyReplicas" .= v1ReplicationControllerStatusReadyReplicas
, "replicas" .= v1ReplicationControllerStatusReplicas
]
mkV1ReplicationControllerStatus
:: Int
-> V1ReplicationControllerStatus
mkV1ReplicationControllerStatus v1ReplicationControllerStatusReplicas =
V1ReplicationControllerStatus
{ v1ReplicationControllerStatusAvailableReplicas = Nothing
, v1ReplicationControllerStatusConditions = Nothing
, v1ReplicationControllerStatusFullyLabeledReplicas = Nothing
, v1ReplicationControllerStatusObservedGeneration = Nothing
, v1ReplicationControllerStatusReadyReplicas = Nothing
, v1ReplicationControllerStatusReplicas
}
data V1ResourceAttributes = V1ResourceAttributes
{ v1ResourceAttributesGroup :: !(Maybe Text)
, v1ResourceAttributesName :: !(Maybe Text)
, v1ResourceAttributesNamespace :: !(Maybe Text)
, v1ResourceAttributesResource :: !(Maybe Text)
, v1ResourceAttributesSubresource :: !(Maybe Text)
, v1ResourceAttributesVerb :: !(Maybe Text)
, v1ResourceAttributesVersion :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ResourceAttributes where
parseJSON = A.withObject "V1ResourceAttributes" $ \o ->
V1ResourceAttributes
<$> (o .:? "group")
<*> (o .:? "name")
<*> (o .:? "namespace")
<*> (o .:? "resource")
<*> (o .:? "subresource")
<*> (o .:? "verb")
<*> (o .:? "version")
instance A.ToJSON V1ResourceAttributes where
toJSON V1ResourceAttributes {..} =
_omitNulls
[ "group" .= v1ResourceAttributesGroup
, "name" .= v1ResourceAttributesName
, "namespace" .= v1ResourceAttributesNamespace
, "resource" .= v1ResourceAttributesResource
, "subresource" .= v1ResourceAttributesSubresource
, "verb" .= v1ResourceAttributesVerb
, "version" .= v1ResourceAttributesVersion
]
mkV1ResourceAttributes
:: V1ResourceAttributes
mkV1ResourceAttributes =
V1ResourceAttributes
{ v1ResourceAttributesGroup = Nothing
, v1ResourceAttributesName = Nothing
, v1ResourceAttributesNamespace = Nothing
, v1ResourceAttributesResource = Nothing
, v1ResourceAttributesSubresource = Nothing
, v1ResourceAttributesVerb = Nothing
, v1ResourceAttributesVersion = Nothing
}
data V1ResourceFieldSelector = V1ResourceFieldSelector
{ v1ResourceFieldSelectorContainerName :: !(Maybe Text)
, v1ResourceFieldSelectorDivisor :: !(Maybe Quantity)
, v1ResourceFieldSelectorResource :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ResourceFieldSelector where
parseJSON = A.withObject "V1ResourceFieldSelector" $ \o ->
V1ResourceFieldSelector
<$> (o .:? "containerName")
<*> (o .:? "divisor")
<*> (o .: "resource")
instance A.ToJSON V1ResourceFieldSelector where
toJSON V1ResourceFieldSelector {..} =
_omitNulls
[ "containerName" .= v1ResourceFieldSelectorContainerName
, "divisor" .= v1ResourceFieldSelectorDivisor
, "resource" .= v1ResourceFieldSelectorResource
]
mkV1ResourceFieldSelector
:: Text
-> V1ResourceFieldSelector
mkV1ResourceFieldSelector v1ResourceFieldSelectorResource =
V1ResourceFieldSelector
{ v1ResourceFieldSelectorContainerName = Nothing
, v1ResourceFieldSelectorDivisor = Nothing
, v1ResourceFieldSelectorResource
}
data V1ResourceQuota = V1ResourceQuota
{ v1ResourceQuotaApiVersion :: !(Maybe Text)
, v1ResourceQuotaKind :: !(Maybe Text)
, v1ResourceQuotaMetadata :: !(Maybe V1ObjectMeta)
, v1ResourceQuotaSpec :: !(Maybe V1ResourceQuotaSpec)
, v1ResourceQuotaStatus :: !(Maybe V1ResourceQuotaStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ResourceQuota where
parseJSON = A.withObject "V1ResourceQuota" $ \o ->
V1ResourceQuota
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1ResourceQuota where
toJSON V1ResourceQuota {..} =
_omitNulls
[ "apiVersion" .= v1ResourceQuotaApiVersion
, "kind" .= v1ResourceQuotaKind
, "metadata" .= v1ResourceQuotaMetadata
, "spec" .= v1ResourceQuotaSpec
, "status" .= v1ResourceQuotaStatus
]
mkV1ResourceQuota
:: V1ResourceQuota
mkV1ResourceQuota =
V1ResourceQuota
{ v1ResourceQuotaApiVersion = Nothing
, v1ResourceQuotaKind = Nothing
, v1ResourceQuotaMetadata = Nothing
, v1ResourceQuotaSpec = Nothing
, v1ResourceQuotaStatus = Nothing
}
data V1ResourceQuotaList = V1ResourceQuotaList
{ v1ResourceQuotaListApiVersion :: !(Maybe Text)
, v1ResourceQuotaListItems :: !([V1ResourceQuota])
, v1ResourceQuotaListKind :: !(Maybe Text)
, v1ResourceQuotaListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ResourceQuotaList where
parseJSON = A.withObject "V1ResourceQuotaList" $ \o ->
V1ResourceQuotaList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ResourceQuotaList where
toJSON V1ResourceQuotaList {..} =
_omitNulls
[ "apiVersion" .= v1ResourceQuotaListApiVersion
, "items" .= v1ResourceQuotaListItems
, "kind" .= v1ResourceQuotaListKind
, "metadata" .= v1ResourceQuotaListMetadata
]
mkV1ResourceQuotaList
:: [V1ResourceQuota]
-> V1ResourceQuotaList
mkV1ResourceQuotaList v1ResourceQuotaListItems =
V1ResourceQuotaList
{ v1ResourceQuotaListApiVersion = Nothing
, v1ResourceQuotaListItems
, v1ResourceQuotaListKind = Nothing
, v1ResourceQuotaListMetadata = Nothing
}
data V1ResourceQuotaSpec = V1ResourceQuotaSpec
{ v1ResourceQuotaSpecHard :: !(Maybe (Map.Map String Quantity))
, v1ResourceQuotaSpecScopeSelector :: !(Maybe V1ScopeSelector)
, v1ResourceQuotaSpecScopes :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ResourceQuotaSpec where
parseJSON = A.withObject "V1ResourceQuotaSpec" $ \o ->
V1ResourceQuotaSpec
<$> (o .:? "hard")
<*> (o .:? "scopeSelector")
<*> (o .:? "scopes")
instance A.ToJSON V1ResourceQuotaSpec where
toJSON V1ResourceQuotaSpec {..} =
_omitNulls
[ "hard" .= v1ResourceQuotaSpecHard
, "scopeSelector" .= v1ResourceQuotaSpecScopeSelector
, "scopes" .= v1ResourceQuotaSpecScopes
]
mkV1ResourceQuotaSpec
:: V1ResourceQuotaSpec
mkV1ResourceQuotaSpec =
V1ResourceQuotaSpec
{ v1ResourceQuotaSpecHard = Nothing
, v1ResourceQuotaSpecScopeSelector = Nothing
, v1ResourceQuotaSpecScopes = Nothing
}
data V1ResourceQuotaStatus = V1ResourceQuotaStatus
{ v1ResourceQuotaStatusHard :: !(Maybe (Map.Map String Quantity))
, v1ResourceQuotaStatusUsed :: !(Maybe (Map.Map String Quantity))
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ResourceQuotaStatus where
parseJSON = A.withObject "V1ResourceQuotaStatus" $ \o ->
V1ResourceQuotaStatus
<$> (o .:? "hard")
<*> (o .:? "used")
instance A.ToJSON V1ResourceQuotaStatus where
toJSON V1ResourceQuotaStatus {..} =
_omitNulls
[ "hard" .= v1ResourceQuotaStatusHard
, "used" .= v1ResourceQuotaStatusUsed
]
mkV1ResourceQuotaStatus
:: V1ResourceQuotaStatus
mkV1ResourceQuotaStatus =
V1ResourceQuotaStatus
{ v1ResourceQuotaStatusHard = Nothing
, v1ResourceQuotaStatusUsed = Nothing
}
data V1ResourceRequirements = V1ResourceRequirements
{ v1ResourceRequirementsLimits :: !(Maybe (Map.Map String Quantity))
, v1ResourceRequirementsRequests :: !(Maybe (Map.Map String Quantity))
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ResourceRequirements where
parseJSON = A.withObject "V1ResourceRequirements" $ \o ->
V1ResourceRequirements
<$> (o .:? "limits")
<*> (o .:? "requests")
instance A.ToJSON V1ResourceRequirements where
toJSON V1ResourceRequirements {..} =
_omitNulls
[ "limits" .= v1ResourceRequirementsLimits
, "requests" .= v1ResourceRequirementsRequests
]
mkV1ResourceRequirements
:: V1ResourceRequirements
mkV1ResourceRequirements =
V1ResourceRequirements
{ v1ResourceRequirementsLimits = Nothing
, v1ResourceRequirementsRequests = Nothing
}
data V1ResourceRule = V1ResourceRule
{ v1ResourceRuleApiGroups :: !(Maybe [Text])
, v1ResourceRuleResourceNames :: !(Maybe [Text])
, v1ResourceRuleResources :: !(Maybe [Text])
, v1ResourceRuleVerbs :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ResourceRule where
parseJSON = A.withObject "V1ResourceRule" $ \o ->
V1ResourceRule
<$> (o .:? "apiGroups")
<*> (o .:? "resourceNames")
<*> (o .:? "resources")
<*> (o .: "verbs")
instance A.ToJSON V1ResourceRule where
toJSON V1ResourceRule {..} =
_omitNulls
[ "apiGroups" .= v1ResourceRuleApiGroups
, "resourceNames" .= v1ResourceRuleResourceNames
, "resources" .= v1ResourceRuleResources
, "verbs" .= v1ResourceRuleVerbs
]
mkV1ResourceRule
:: [Text]
-> V1ResourceRule
mkV1ResourceRule v1ResourceRuleVerbs =
V1ResourceRule
{ v1ResourceRuleApiGroups = Nothing
, v1ResourceRuleResourceNames = Nothing
, v1ResourceRuleResources = Nothing
, v1ResourceRuleVerbs
}
data V1Role = V1Role
{ v1RoleApiVersion :: !(Maybe Text)
, v1RoleKind :: !(Maybe Text)
, v1RoleMetadata :: !(Maybe V1ObjectMeta)
, v1RoleRules :: !(Maybe [V1PolicyRule])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Role where
parseJSON = A.withObject "V1Role" $ \o ->
V1Role
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "rules")
instance A.ToJSON V1Role where
toJSON V1Role {..} =
_omitNulls
[ "apiVersion" .= v1RoleApiVersion
, "kind" .= v1RoleKind
, "metadata" .= v1RoleMetadata
, "rules" .= v1RoleRules
]
mkV1Role
:: V1Role
mkV1Role =
V1Role
{ v1RoleApiVersion = Nothing
, v1RoleKind = Nothing
, v1RoleMetadata = Nothing
, v1RoleRules = Nothing
}
data V1RoleBinding = V1RoleBinding
{ v1RoleBindingApiVersion :: !(Maybe Text)
, v1RoleBindingKind :: !(Maybe Text)
, v1RoleBindingMetadata :: !(Maybe V1ObjectMeta)
, v1RoleBindingRoleRef :: !(V1RoleRef)
, v1RoleBindingSubjects :: !(Maybe [V1Subject])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1RoleBinding where
parseJSON = A.withObject "V1RoleBinding" $ \o ->
V1RoleBinding
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "roleRef")
<*> (o .:? "subjects")
instance A.ToJSON V1RoleBinding where
toJSON V1RoleBinding {..} =
_omitNulls
[ "apiVersion" .= v1RoleBindingApiVersion
, "kind" .= v1RoleBindingKind
, "metadata" .= v1RoleBindingMetadata
, "roleRef" .= v1RoleBindingRoleRef
, "subjects" .= v1RoleBindingSubjects
]
mkV1RoleBinding
:: V1RoleRef
-> V1RoleBinding
mkV1RoleBinding v1RoleBindingRoleRef =
V1RoleBinding
{ v1RoleBindingApiVersion = Nothing
, v1RoleBindingKind = Nothing
, v1RoleBindingMetadata = Nothing
, v1RoleBindingRoleRef
, v1RoleBindingSubjects = Nothing
}
data V1RoleBindingList = V1RoleBindingList
{ v1RoleBindingListApiVersion :: !(Maybe Text)
, v1RoleBindingListItems :: !([V1RoleBinding])
, v1RoleBindingListKind :: !(Maybe Text)
, v1RoleBindingListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1RoleBindingList where
parseJSON = A.withObject "V1RoleBindingList" $ \o ->
V1RoleBindingList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1RoleBindingList where
toJSON V1RoleBindingList {..} =
_omitNulls
[ "apiVersion" .= v1RoleBindingListApiVersion
, "items" .= v1RoleBindingListItems
, "kind" .= v1RoleBindingListKind
, "metadata" .= v1RoleBindingListMetadata
]
mkV1RoleBindingList
:: [V1RoleBinding]
-> V1RoleBindingList
mkV1RoleBindingList v1RoleBindingListItems =
V1RoleBindingList
{ v1RoleBindingListApiVersion = Nothing
, v1RoleBindingListItems
, v1RoleBindingListKind = Nothing
, v1RoleBindingListMetadata = Nothing
}
data V1RoleList = V1RoleList
{ v1RoleListApiVersion :: !(Maybe Text)
, v1RoleListItems :: !([V1Role])
, v1RoleListKind :: !(Maybe Text)
, v1RoleListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1RoleList where
parseJSON = A.withObject "V1RoleList" $ \o ->
V1RoleList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1RoleList where
toJSON V1RoleList {..} =
_omitNulls
[ "apiVersion" .= v1RoleListApiVersion
, "items" .= v1RoleListItems
, "kind" .= v1RoleListKind
, "metadata" .= v1RoleListMetadata
]
mkV1RoleList
:: [V1Role]
-> V1RoleList
mkV1RoleList v1RoleListItems =
V1RoleList
{ v1RoleListApiVersion = Nothing
, v1RoleListItems
, v1RoleListKind = Nothing
, v1RoleListMetadata = Nothing
}
data V1RoleRef = V1RoleRef
{ v1RoleRefApiGroup :: !(Text)
, v1RoleRefKind :: !(Text)
, v1RoleRefName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1RoleRef where
parseJSON = A.withObject "V1RoleRef" $ \o ->
V1RoleRef
<$> (o .: "apiGroup")
<*> (o .: "kind")
<*> (o .: "name")
instance A.ToJSON V1RoleRef where
toJSON V1RoleRef {..} =
_omitNulls
[ "apiGroup" .= v1RoleRefApiGroup
, "kind" .= v1RoleRefKind
, "name" .= v1RoleRefName
]
mkV1RoleRef
:: Text
-> Text
-> Text
-> V1RoleRef
mkV1RoleRef v1RoleRefApiGroup v1RoleRefKind v1RoleRefName =
V1RoleRef
{ v1RoleRefApiGroup
, v1RoleRefKind
, v1RoleRefName
}
data V1RollingUpdateDaemonSet = V1RollingUpdateDaemonSet
{ v1RollingUpdateDaemonSetMaxUnavailable :: !(Maybe IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1RollingUpdateDaemonSet where
parseJSON = A.withObject "V1RollingUpdateDaemonSet" $ \o ->
V1RollingUpdateDaemonSet
<$> (o .:? "maxUnavailable")
instance A.ToJSON V1RollingUpdateDaemonSet where
toJSON V1RollingUpdateDaemonSet {..} =
_omitNulls
[ "maxUnavailable" .= v1RollingUpdateDaemonSetMaxUnavailable
]
mkV1RollingUpdateDaemonSet
:: V1RollingUpdateDaemonSet
mkV1RollingUpdateDaemonSet =
V1RollingUpdateDaemonSet
{ v1RollingUpdateDaemonSetMaxUnavailable = Nothing
}
data V1RollingUpdateDeployment = V1RollingUpdateDeployment
{ v1RollingUpdateDeploymentMaxSurge :: !(Maybe IntOrString)
, v1RollingUpdateDeploymentMaxUnavailable :: !(Maybe IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1RollingUpdateDeployment where
parseJSON = A.withObject "V1RollingUpdateDeployment" $ \o ->
V1RollingUpdateDeployment
<$> (o .:? "maxSurge")
<*> (o .:? "maxUnavailable")
instance A.ToJSON V1RollingUpdateDeployment where
toJSON V1RollingUpdateDeployment {..} =
_omitNulls
[ "maxSurge" .= v1RollingUpdateDeploymentMaxSurge
, "maxUnavailable" .= v1RollingUpdateDeploymentMaxUnavailable
]
mkV1RollingUpdateDeployment
:: V1RollingUpdateDeployment
mkV1RollingUpdateDeployment =
V1RollingUpdateDeployment
{ v1RollingUpdateDeploymentMaxSurge = Nothing
, v1RollingUpdateDeploymentMaxUnavailable = Nothing
}
data V1RollingUpdateStatefulSetStrategy = V1RollingUpdateStatefulSetStrategy
{ v1RollingUpdateStatefulSetStrategyPartition :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1RollingUpdateStatefulSetStrategy where
parseJSON = A.withObject "V1RollingUpdateStatefulSetStrategy" $ \o ->
V1RollingUpdateStatefulSetStrategy
<$> (o .:? "partition")
instance A.ToJSON V1RollingUpdateStatefulSetStrategy where
toJSON V1RollingUpdateStatefulSetStrategy {..} =
_omitNulls
[ "partition" .= v1RollingUpdateStatefulSetStrategyPartition
]
mkV1RollingUpdateStatefulSetStrategy
:: V1RollingUpdateStatefulSetStrategy
mkV1RollingUpdateStatefulSetStrategy =
V1RollingUpdateStatefulSetStrategy
{ v1RollingUpdateStatefulSetStrategyPartition = Nothing
}
data V1SELinuxOptions = V1SELinuxOptions
{ v1SELinuxOptionsLevel :: !(Maybe Text)
, v1SELinuxOptionsRole :: !(Maybe Text)
, v1SELinuxOptionsType :: !(Maybe Text)
, v1SELinuxOptionsUser :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SELinuxOptions where
parseJSON = A.withObject "V1SELinuxOptions" $ \o ->
V1SELinuxOptions
<$> (o .:? "level")
<*> (o .:? "role")
<*> (o .:? "type")
<*> (o .:? "user")
instance A.ToJSON V1SELinuxOptions where
toJSON V1SELinuxOptions {..} =
_omitNulls
[ "level" .= v1SELinuxOptionsLevel
, "role" .= v1SELinuxOptionsRole
, "type" .= v1SELinuxOptionsType
, "user" .= v1SELinuxOptionsUser
]
mkV1SELinuxOptions
:: V1SELinuxOptions
mkV1SELinuxOptions =
V1SELinuxOptions
{ v1SELinuxOptionsLevel = Nothing
, v1SELinuxOptionsRole = Nothing
, v1SELinuxOptionsType = Nothing
, v1SELinuxOptionsUser = Nothing
}
data V1Scale = V1Scale
{ v1ScaleApiVersion :: !(Maybe Text)
, v1ScaleKind :: !(Maybe Text)
, v1ScaleMetadata :: !(Maybe V1ObjectMeta)
, v1ScaleSpec :: !(Maybe V1ScaleSpec)
, v1ScaleStatus :: !(Maybe V1ScaleStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Scale where
parseJSON = A.withObject "V1Scale" $ \o ->
V1Scale
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1Scale where
toJSON V1Scale {..} =
_omitNulls
[ "apiVersion" .= v1ScaleApiVersion
, "kind" .= v1ScaleKind
, "metadata" .= v1ScaleMetadata
, "spec" .= v1ScaleSpec
, "status" .= v1ScaleStatus
]
mkV1Scale
:: V1Scale
mkV1Scale =
V1Scale
{ v1ScaleApiVersion = Nothing
, v1ScaleKind = Nothing
, v1ScaleMetadata = Nothing
, v1ScaleSpec = Nothing
, v1ScaleStatus = Nothing
}
data V1ScaleIOPersistentVolumeSource = V1ScaleIOPersistentVolumeSource
{ v1ScaleIOPersistentVolumeSourceFsType :: !(Maybe Text)
, v1ScaleIOPersistentVolumeSourceGateway :: !(Text)
, v1ScaleIOPersistentVolumeSourceProtectionDomain :: !(Maybe Text)
, v1ScaleIOPersistentVolumeSourceReadOnly :: !(Maybe Bool)
, v1ScaleIOPersistentVolumeSourceSecretRef :: !(V1SecretReference)
, v1ScaleIOPersistentVolumeSourceSslEnabled :: !(Maybe Bool)
, v1ScaleIOPersistentVolumeSourceStorageMode :: !(Maybe Text)
, v1ScaleIOPersistentVolumeSourceStoragePool :: !(Maybe Text)
, v1ScaleIOPersistentVolumeSourceSystem :: !(Text)
, v1ScaleIOPersistentVolumeSourceVolumeName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ScaleIOPersistentVolumeSource where
parseJSON = A.withObject "V1ScaleIOPersistentVolumeSource" $ \o ->
V1ScaleIOPersistentVolumeSource
<$> (o .:? "fsType")
<*> (o .: "gateway")
<*> (o .:? "protectionDomain")
<*> (o .:? "readOnly")
<*> (o .: "secretRef")
<*> (o .:? "sslEnabled")
<*> (o .:? "storageMode")
<*> (o .:? "storagePool")
<*> (o .: "system")
<*> (o .:? "volumeName")
instance A.ToJSON V1ScaleIOPersistentVolumeSource where
toJSON V1ScaleIOPersistentVolumeSource {..} =
_omitNulls
[ "fsType" .= v1ScaleIOPersistentVolumeSourceFsType
, "gateway" .= v1ScaleIOPersistentVolumeSourceGateway
, "protectionDomain" .= v1ScaleIOPersistentVolumeSourceProtectionDomain
, "readOnly" .= v1ScaleIOPersistentVolumeSourceReadOnly
, "secretRef" .= v1ScaleIOPersistentVolumeSourceSecretRef
, "sslEnabled" .= v1ScaleIOPersistentVolumeSourceSslEnabled
, "storageMode" .= v1ScaleIOPersistentVolumeSourceStorageMode
, "storagePool" .= v1ScaleIOPersistentVolumeSourceStoragePool
, "system" .= v1ScaleIOPersistentVolumeSourceSystem
, "volumeName" .= v1ScaleIOPersistentVolumeSourceVolumeName
]
mkV1ScaleIOPersistentVolumeSource
:: Text
-> V1SecretReference
-> Text
-> V1ScaleIOPersistentVolumeSource
mkV1ScaleIOPersistentVolumeSource v1ScaleIOPersistentVolumeSourceGateway v1ScaleIOPersistentVolumeSourceSecretRef v1ScaleIOPersistentVolumeSourceSystem =
V1ScaleIOPersistentVolumeSource
{ v1ScaleIOPersistentVolumeSourceFsType = Nothing
, v1ScaleIOPersistentVolumeSourceGateway
, v1ScaleIOPersistentVolumeSourceProtectionDomain = Nothing
, v1ScaleIOPersistentVolumeSourceReadOnly = Nothing
, v1ScaleIOPersistentVolumeSourceSecretRef
, v1ScaleIOPersistentVolumeSourceSslEnabled = Nothing
, v1ScaleIOPersistentVolumeSourceStorageMode = Nothing
, v1ScaleIOPersistentVolumeSourceStoragePool = Nothing
, v1ScaleIOPersistentVolumeSourceSystem
, v1ScaleIOPersistentVolumeSourceVolumeName = Nothing
}
data V1ScaleIOVolumeSource = V1ScaleIOVolumeSource
{ v1ScaleIOVolumeSourceFsType :: !(Maybe Text)
, v1ScaleIOVolumeSourceGateway :: !(Text)
, v1ScaleIOVolumeSourceProtectionDomain :: !(Maybe Text)
, v1ScaleIOVolumeSourceReadOnly :: !(Maybe Bool)
, v1ScaleIOVolumeSourceSecretRef :: !(V1LocalObjectReference)
, v1ScaleIOVolumeSourceSslEnabled :: !(Maybe Bool)
, v1ScaleIOVolumeSourceStorageMode :: !(Maybe Text)
, v1ScaleIOVolumeSourceStoragePool :: !(Maybe Text)
, v1ScaleIOVolumeSourceSystem :: !(Text)
, v1ScaleIOVolumeSourceVolumeName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ScaleIOVolumeSource where
parseJSON = A.withObject "V1ScaleIOVolumeSource" $ \o ->
V1ScaleIOVolumeSource
<$> (o .:? "fsType")
<*> (o .: "gateway")
<*> (o .:? "protectionDomain")
<*> (o .:? "readOnly")
<*> (o .: "secretRef")
<*> (o .:? "sslEnabled")
<*> (o .:? "storageMode")
<*> (o .:? "storagePool")
<*> (o .: "system")
<*> (o .:? "volumeName")
instance A.ToJSON V1ScaleIOVolumeSource where
toJSON V1ScaleIOVolumeSource {..} =
_omitNulls
[ "fsType" .= v1ScaleIOVolumeSourceFsType
, "gateway" .= v1ScaleIOVolumeSourceGateway
, "protectionDomain" .= v1ScaleIOVolumeSourceProtectionDomain
, "readOnly" .= v1ScaleIOVolumeSourceReadOnly
, "secretRef" .= v1ScaleIOVolumeSourceSecretRef
, "sslEnabled" .= v1ScaleIOVolumeSourceSslEnabled
, "storageMode" .= v1ScaleIOVolumeSourceStorageMode
, "storagePool" .= v1ScaleIOVolumeSourceStoragePool
, "system" .= v1ScaleIOVolumeSourceSystem
, "volumeName" .= v1ScaleIOVolumeSourceVolumeName
]
mkV1ScaleIOVolumeSource
:: Text
-> V1LocalObjectReference
-> Text
-> V1ScaleIOVolumeSource
mkV1ScaleIOVolumeSource v1ScaleIOVolumeSourceGateway v1ScaleIOVolumeSourceSecretRef v1ScaleIOVolumeSourceSystem =
V1ScaleIOVolumeSource
{ v1ScaleIOVolumeSourceFsType = Nothing
, v1ScaleIOVolumeSourceGateway
, v1ScaleIOVolumeSourceProtectionDomain = Nothing
, v1ScaleIOVolumeSourceReadOnly = Nothing
, v1ScaleIOVolumeSourceSecretRef
, v1ScaleIOVolumeSourceSslEnabled = Nothing
, v1ScaleIOVolumeSourceStorageMode = Nothing
, v1ScaleIOVolumeSourceStoragePool = Nothing
, v1ScaleIOVolumeSourceSystem
, v1ScaleIOVolumeSourceVolumeName = Nothing
}
data V1ScaleSpec = V1ScaleSpec
{ v1ScaleSpecReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ScaleSpec where
parseJSON = A.withObject "V1ScaleSpec" $ \o ->
V1ScaleSpec
<$> (o .:? "replicas")
instance A.ToJSON V1ScaleSpec where
toJSON V1ScaleSpec {..} =
_omitNulls
[ "replicas" .= v1ScaleSpecReplicas
]
mkV1ScaleSpec
:: V1ScaleSpec
mkV1ScaleSpec =
V1ScaleSpec
{ v1ScaleSpecReplicas = Nothing
}
data V1ScaleStatus = V1ScaleStatus
{ v1ScaleStatusReplicas :: !(Int)
, v1ScaleStatusSelector :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ScaleStatus where
parseJSON = A.withObject "V1ScaleStatus" $ \o ->
V1ScaleStatus
<$> (o .: "replicas")
<*> (o .:? "selector")
instance A.ToJSON V1ScaleStatus where
toJSON V1ScaleStatus {..} =
_omitNulls
[ "replicas" .= v1ScaleStatusReplicas
, "selector" .= v1ScaleStatusSelector
]
mkV1ScaleStatus
:: Int
-> V1ScaleStatus
mkV1ScaleStatus v1ScaleStatusReplicas =
V1ScaleStatus
{ v1ScaleStatusReplicas
, v1ScaleStatusSelector = Nothing
}
data V1ScopeSelector = V1ScopeSelector
{ v1ScopeSelectorMatchExpressions :: !(Maybe [V1ScopedResourceSelectorRequirement])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ScopeSelector where
parseJSON = A.withObject "V1ScopeSelector" $ \o ->
V1ScopeSelector
<$> (o .:? "matchExpressions")
instance A.ToJSON V1ScopeSelector where
toJSON V1ScopeSelector {..} =
_omitNulls
[ "matchExpressions" .= v1ScopeSelectorMatchExpressions
]
mkV1ScopeSelector
:: V1ScopeSelector
mkV1ScopeSelector =
V1ScopeSelector
{ v1ScopeSelectorMatchExpressions = Nothing
}
data V1ScopedResourceSelectorRequirement = V1ScopedResourceSelectorRequirement
{ v1ScopedResourceSelectorRequirementOperator :: !(Text)
, v1ScopedResourceSelectorRequirementScopeName :: !(Text)
, v1ScopedResourceSelectorRequirementValues :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ScopedResourceSelectorRequirement where
parseJSON = A.withObject "V1ScopedResourceSelectorRequirement" $ \o ->
V1ScopedResourceSelectorRequirement
<$> (o .: "operator")
<*> (o .: "scopeName")
<*> (o .:? "values")
instance A.ToJSON V1ScopedResourceSelectorRequirement where
toJSON V1ScopedResourceSelectorRequirement {..} =
_omitNulls
[ "operator" .= v1ScopedResourceSelectorRequirementOperator
, "scopeName" .= v1ScopedResourceSelectorRequirementScopeName
, "values" .= v1ScopedResourceSelectorRequirementValues
]
mkV1ScopedResourceSelectorRequirement
:: Text
-> Text
-> V1ScopedResourceSelectorRequirement
mkV1ScopedResourceSelectorRequirement v1ScopedResourceSelectorRequirementOperator v1ScopedResourceSelectorRequirementScopeName =
V1ScopedResourceSelectorRequirement
{ v1ScopedResourceSelectorRequirementOperator
, v1ScopedResourceSelectorRequirementScopeName
, v1ScopedResourceSelectorRequirementValues = Nothing
}
data V1Secret = V1Secret
{ v1SecretApiVersion :: !(Maybe Text)
, v1SecretData :: !(Maybe (Map.Map String ByteArray))
, v1SecretKind :: !(Maybe Text)
, v1SecretMetadata :: !(Maybe V1ObjectMeta)
, v1SecretStringData :: !(Maybe (Map.Map String Text))
, v1SecretType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Secret where
parseJSON = A.withObject "V1Secret" $ \o ->
V1Secret
<$> (o .:? "apiVersion")
<*> (o .:? "data")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "stringData")
<*> (o .:? "type")
instance A.ToJSON V1Secret where
toJSON V1Secret {..} =
_omitNulls
[ "apiVersion" .= v1SecretApiVersion
, "data" .= v1SecretData
, "kind" .= v1SecretKind
, "metadata" .= v1SecretMetadata
, "stringData" .= v1SecretStringData
, "type" .= v1SecretType
]
mkV1Secret
:: V1Secret
mkV1Secret =
V1Secret
{ v1SecretApiVersion = Nothing
, v1SecretData = Nothing
, v1SecretKind = Nothing
, v1SecretMetadata = Nothing
, v1SecretStringData = Nothing
, v1SecretType = Nothing
}
data V1SecretEnvSource = V1SecretEnvSource
{ v1SecretEnvSourceName :: !(Maybe Text)
, v1SecretEnvSourceOptional :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SecretEnvSource where
parseJSON = A.withObject "V1SecretEnvSource" $ \o ->
V1SecretEnvSource
<$> (o .:? "name")
<*> (o .:? "optional")
instance A.ToJSON V1SecretEnvSource where
toJSON V1SecretEnvSource {..} =
_omitNulls
[ "name" .= v1SecretEnvSourceName
, "optional" .= v1SecretEnvSourceOptional
]
mkV1SecretEnvSource
:: V1SecretEnvSource
mkV1SecretEnvSource =
V1SecretEnvSource
{ v1SecretEnvSourceName = Nothing
, v1SecretEnvSourceOptional = Nothing
}
data V1SecretKeySelector = V1SecretKeySelector
{ v1SecretKeySelectorKey :: !(Text)
, v1SecretKeySelectorName :: !(Maybe Text)
, v1SecretKeySelectorOptional :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SecretKeySelector where
parseJSON = A.withObject "V1SecretKeySelector" $ \o ->
V1SecretKeySelector
<$> (o .: "key")
<*> (o .:? "name")
<*> (o .:? "optional")
instance A.ToJSON V1SecretKeySelector where
toJSON V1SecretKeySelector {..} =
_omitNulls
[ "key" .= v1SecretKeySelectorKey
, "name" .= v1SecretKeySelectorName
, "optional" .= v1SecretKeySelectorOptional
]
mkV1SecretKeySelector
:: Text
-> V1SecretKeySelector
mkV1SecretKeySelector v1SecretKeySelectorKey =
V1SecretKeySelector
{ v1SecretKeySelectorKey
, v1SecretKeySelectorName = Nothing
, v1SecretKeySelectorOptional = Nothing
}
data V1SecretList = V1SecretList
{ v1SecretListApiVersion :: !(Maybe Text)
, v1SecretListItems :: !([V1Secret])
, v1SecretListKind :: !(Maybe Text)
, v1SecretListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SecretList where
parseJSON = A.withObject "V1SecretList" $ \o ->
V1SecretList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1SecretList where
toJSON V1SecretList {..} =
_omitNulls
[ "apiVersion" .= v1SecretListApiVersion
, "items" .= v1SecretListItems
, "kind" .= v1SecretListKind
, "metadata" .= v1SecretListMetadata
]
mkV1SecretList
:: [V1Secret]
-> V1SecretList
mkV1SecretList v1SecretListItems =
V1SecretList
{ v1SecretListApiVersion = Nothing
, v1SecretListItems
, v1SecretListKind = Nothing
, v1SecretListMetadata = Nothing
}
data V1SecretProjection = V1SecretProjection
{ v1SecretProjectionItems :: !(Maybe [V1KeyToPath])
, v1SecretProjectionName :: !(Maybe Text)
, v1SecretProjectionOptional :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SecretProjection where
parseJSON = A.withObject "V1SecretProjection" $ \o ->
V1SecretProjection
<$> (o .:? "items")
<*> (o .:? "name")
<*> (o .:? "optional")
instance A.ToJSON V1SecretProjection where
toJSON V1SecretProjection {..} =
_omitNulls
[ "items" .= v1SecretProjectionItems
, "name" .= v1SecretProjectionName
, "optional" .= v1SecretProjectionOptional
]
mkV1SecretProjection
:: V1SecretProjection
mkV1SecretProjection =
V1SecretProjection
{ v1SecretProjectionItems = Nothing
, v1SecretProjectionName = Nothing
, v1SecretProjectionOptional = Nothing
}
data V1SecretReference = V1SecretReference
{ v1SecretReferenceName :: !(Maybe Text)
, v1SecretReferenceNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SecretReference where
parseJSON = A.withObject "V1SecretReference" $ \o ->
V1SecretReference
<$> (o .:? "name")
<*> (o .:? "namespace")
instance A.ToJSON V1SecretReference where
toJSON V1SecretReference {..} =
_omitNulls
[ "name" .= v1SecretReferenceName
, "namespace" .= v1SecretReferenceNamespace
]
mkV1SecretReference
:: V1SecretReference
mkV1SecretReference =
V1SecretReference
{ v1SecretReferenceName = Nothing
, v1SecretReferenceNamespace = Nothing
}
data V1SecretVolumeSource = V1SecretVolumeSource
{ v1SecretVolumeSourceDefaultMode :: !(Maybe Int)
, v1SecretVolumeSourceItems :: !(Maybe [V1KeyToPath])
, v1SecretVolumeSourceOptional :: !(Maybe Bool)
, v1SecretVolumeSourceSecretName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SecretVolumeSource where
parseJSON = A.withObject "V1SecretVolumeSource" $ \o ->
V1SecretVolumeSource
<$> (o .:? "defaultMode")
<*> (o .:? "items")
<*> (o .:? "optional")
<*> (o .:? "secretName")
instance A.ToJSON V1SecretVolumeSource where
toJSON V1SecretVolumeSource {..} =
_omitNulls
[ "defaultMode" .= v1SecretVolumeSourceDefaultMode
, "items" .= v1SecretVolumeSourceItems
, "optional" .= v1SecretVolumeSourceOptional
, "secretName" .= v1SecretVolumeSourceSecretName
]
mkV1SecretVolumeSource
:: V1SecretVolumeSource
mkV1SecretVolumeSource =
V1SecretVolumeSource
{ v1SecretVolumeSourceDefaultMode = Nothing
, v1SecretVolumeSourceItems = Nothing
, v1SecretVolumeSourceOptional = Nothing
, v1SecretVolumeSourceSecretName = Nothing
}
data V1SecurityContext = V1SecurityContext
{ v1SecurityContextAllowPrivilegeEscalation :: !(Maybe Bool)
, v1SecurityContextCapabilities :: !(Maybe V1Capabilities)
, v1SecurityContextPrivileged :: !(Maybe Bool)
, v1SecurityContextProcMount :: !(Maybe Text)
, v1SecurityContextReadOnlyRootFilesystem :: !(Maybe Bool)
, v1SecurityContextRunAsGroup :: !(Maybe Integer)
, v1SecurityContextRunAsNonRoot :: !(Maybe Bool)
, v1SecurityContextRunAsUser :: !(Maybe Integer)
, v1SecurityContextSeLinuxOptions :: !(Maybe V1SELinuxOptions)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SecurityContext where
parseJSON = A.withObject "V1SecurityContext" $ \o ->
V1SecurityContext
<$> (o .:? "allowPrivilegeEscalation")
<*> (o .:? "capabilities")
<*> (o .:? "privileged")
<*> (o .:? "procMount")
<*> (o .:? "readOnlyRootFilesystem")
<*> (o .:? "runAsGroup")
<*> (o .:? "runAsNonRoot")
<*> (o .:? "runAsUser")
<*> (o .:? "seLinuxOptions")
instance A.ToJSON V1SecurityContext where
toJSON V1SecurityContext {..} =
_omitNulls
[ "allowPrivilegeEscalation" .= v1SecurityContextAllowPrivilegeEscalation
, "capabilities" .= v1SecurityContextCapabilities
, "privileged" .= v1SecurityContextPrivileged
, "procMount" .= v1SecurityContextProcMount
, "readOnlyRootFilesystem" .= v1SecurityContextReadOnlyRootFilesystem
, "runAsGroup" .= v1SecurityContextRunAsGroup
, "runAsNonRoot" .= v1SecurityContextRunAsNonRoot
, "runAsUser" .= v1SecurityContextRunAsUser
, "seLinuxOptions" .= v1SecurityContextSeLinuxOptions
]
mkV1SecurityContext
:: V1SecurityContext
mkV1SecurityContext =
V1SecurityContext
{ v1SecurityContextAllowPrivilegeEscalation = Nothing
, v1SecurityContextCapabilities = Nothing
, v1SecurityContextPrivileged = Nothing
, v1SecurityContextProcMount = Nothing
, v1SecurityContextReadOnlyRootFilesystem = Nothing
, v1SecurityContextRunAsGroup = Nothing
, v1SecurityContextRunAsNonRoot = Nothing
, v1SecurityContextRunAsUser = Nothing
, v1SecurityContextSeLinuxOptions = Nothing
}
data V1SelfSubjectAccessReview = V1SelfSubjectAccessReview
{ v1SelfSubjectAccessReviewApiVersion :: !(Maybe Text)
, v1SelfSubjectAccessReviewKind :: !(Maybe Text)
, v1SelfSubjectAccessReviewMetadata :: !(Maybe V1ObjectMeta)
, v1SelfSubjectAccessReviewSpec :: !(V1SelfSubjectAccessReviewSpec)
, v1SelfSubjectAccessReviewStatus :: !(Maybe V1SubjectAccessReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SelfSubjectAccessReview where
parseJSON = A.withObject "V1SelfSubjectAccessReview" $ \o ->
V1SelfSubjectAccessReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1SelfSubjectAccessReview where
toJSON V1SelfSubjectAccessReview {..} =
_omitNulls
[ "apiVersion" .= v1SelfSubjectAccessReviewApiVersion
, "kind" .= v1SelfSubjectAccessReviewKind
, "metadata" .= v1SelfSubjectAccessReviewMetadata
, "spec" .= v1SelfSubjectAccessReviewSpec
, "status" .= v1SelfSubjectAccessReviewStatus
]
mkV1SelfSubjectAccessReview
:: V1SelfSubjectAccessReviewSpec
-> V1SelfSubjectAccessReview
mkV1SelfSubjectAccessReview v1SelfSubjectAccessReviewSpec =
V1SelfSubjectAccessReview
{ v1SelfSubjectAccessReviewApiVersion = Nothing
, v1SelfSubjectAccessReviewKind = Nothing
, v1SelfSubjectAccessReviewMetadata = Nothing
, v1SelfSubjectAccessReviewSpec
, v1SelfSubjectAccessReviewStatus = Nothing
}
data V1SelfSubjectAccessReviewSpec = V1SelfSubjectAccessReviewSpec
{ v1SelfSubjectAccessReviewSpecNonResourceAttributes :: !(Maybe V1NonResourceAttributes)
, v1SelfSubjectAccessReviewSpecResourceAttributes :: !(Maybe V1ResourceAttributes)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SelfSubjectAccessReviewSpec where
parseJSON = A.withObject "V1SelfSubjectAccessReviewSpec" $ \o ->
V1SelfSubjectAccessReviewSpec
<$> (o .:? "nonResourceAttributes")
<*> (o .:? "resourceAttributes")
instance A.ToJSON V1SelfSubjectAccessReviewSpec where
toJSON V1SelfSubjectAccessReviewSpec {..} =
_omitNulls
[ "nonResourceAttributes" .= v1SelfSubjectAccessReviewSpecNonResourceAttributes
, "resourceAttributes" .= v1SelfSubjectAccessReviewSpecResourceAttributes
]
mkV1SelfSubjectAccessReviewSpec
:: V1SelfSubjectAccessReviewSpec
mkV1SelfSubjectAccessReviewSpec =
V1SelfSubjectAccessReviewSpec
{ v1SelfSubjectAccessReviewSpecNonResourceAttributes = Nothing
, v1SelfSubjectAccessReviewSpecResourceAttributes = Nothing
}
data V1SelfSubjectRulesReview = V1SelfSubjectRulesReview
{ v1SelfSubjectRulesReviewApiVersion :: !(Maybe Text)
, v1SelfSubjectRulesReviewKind :: !(Maybe Text)
, v1SelfSubjectRulesReviewMetadata :: !(Maybe V1ObjectMeta)
, v1SelfSubjectRulesReviewSpec :: !(V1SelfSubjectRulesReviewSpec)
, v1SelfSubjectRulesReviewStatus :: !(Maybe V1SubjectRulesReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SelfSubjectRulesReview where
parseJSON = A.withObject "V1SelfSubjectRulesReview" $ \o ->
V1SelfSubjectRulesReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1SelfSubjectRulesReview where
toJSON V1SelfSubjectRulesReview {..} =
_omitNulls
[ "apiVersion" .= v1SelfSubjectRulesReviewApiVersion
, "kind" .= v1SelfSubjectRulesReviewKind
, "metadata" .= v1SelfSubjectRulesReviewMetadata
, "spec" .= v1SelfSubjectRulesReviewSpec
, "status" .= v1SelfSubjectRulesReviewStatus
]
mkV1SelfSubjectRulesReview
:: V1SelfSubjectRulesReviewSpec
-> V1SelfSubjectRulesReview
mkV1SelfSubjectRulesReview v1SelfSubjectRulesReviewSpec =
V1SelfSubjectRulesReview
{ v1SelfSubjectRulesReviewApiVersion = Nothing
, v1SelfSubjectRulesReviewKind = Nothing
, v1SelfSubjectRulesReviewMetadata = Nothing
, v1SelfSubjectRulesReviewSpec
, v1SelfSubjectRulesReviewStatus = Nothing
}
data V1SelfSubjectRulesReviewSpec = V1SelfSubjectRulesReviewSpec
{ v1SelfSubjectRulesReviewSpecNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SelfSubjectRulesReviewSpec where
parseJSON = A.withObject "V1SelfSubjectRulesReviewSpec" $ \o ->
V1SelfSubjectRulesReviewSpec
<$> (o .:? "namespace")
instance A.ToJSON V1SelfSubjectRulesReviewSpec where
toJSON V1SelfSubjectRulesReviewSpec {..} =
_omitNulls
[ "namespace" .= v1SelfSubjectRulesReviewSpecNamespace
]
mkV1SelfSubjectRulesReviewSpec
:: V1SelfSubjectRulesReviewSpec
mkV1SelfSubjectRulesReviewSpec =
V1SelfSubjectRulesReviewSpec
{ v1SelfSubjectRulesReviewSpecNamespace = Nothing
}
data V1ServerAddressByClientCIDR = V1ServerAddressByClientCIDR
{ v1ServerAddressByClientCIDRClientCidr :: !(Text)
, v1ServerAddressByClientCIDRServerAddress :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ServerAddressByClientCIDR where
parseJSON = A.withObject "V1ServerAddressByClientCIDR" $ \o ->
V1ServerAddressByClientCIDR
<$> (o .: "clientCIDR")
<*> (o .: "serverAddress")
instance A.ToJSON V1ServerAddressByClientCIDR where
toJSON V1ServerAddressByClientCIDR {..} =
_omitNulls
[ "clientCIDR" .= v1ServerAddressByClientCIDRClientCidr
, "serverAddress" .= v1ServerAddressByClientCIDRServerAddress
]
mkV1ServerAddressByClientCIDR
:: Text
-> Text
-> V1ServerAddressByClientCIDR
mkV1ServerAddressByClientCIDR v1ServerAddressByClientCIDRClientCidr v1ServerAddressByClientCIDRServerAddress =
V1ServerAddressByClientCIDR
{ v1ServerAddressByClientCIDRClientCidr
, v1ServerAddressByClientCIDRServerAddress
}
data V1Service = V1Service
{ v1ServiceApiVersion :: !(Maybe Text)
, v1ServiceKind :: !(Maybe Text)
, v1ServiceMetadata :: !(Maybe V1ObjectMeta)
, v1ServiceSpec :: !(Maybe V1ServiceSpec)
, v1ServiceStatus :: !(Maybe V1ServiceStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Service where
parseJSON = A.withObject "V1Service" $ \o ->
V1Service
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1Service where
toJSON V1Service {..} =
_omitNulls
[ "apiVersion" .= v1ServiceApiVersion
, "kind" .= v1ServiceKind
, "metadata" .= v1ServiceMetadata
, "spec" .= v1ServiceSpec
, "status" .= v1ServiceStatus
]
mkV1Service
:: V1Service
mkV1Service =
V1Service
{ v1ServiceApiVersion = Nothing
, v1ServiceKind = Nothing
, v1ServiceMetadata = Nothing
, v1ServiceSpec = Nothing
, v1ServiceStatus = Nothing
}
data V1ServiceAccount = V1ServiceAccount
{ v1ServiceAccountApiVersion :: !(Maybe Text)
, v1ServiceAccountAutomountServiceAccountToken :: !(Maybe Bool)
, v1ServiceAccountImagePullSecrets :: !(Maybe [V1LocalObjectReference])
, v1ServiceAccountKind :: !(Maybe Text)
, v1ServiceAccountMetadata :: !(Maybe V1ObjectMeta)
, v1ServiceAccountSecrets :: !(Maybe [V1ObjectReference])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ServiceAccount where
parseJSON = A.withObject "V1ServiceAccount" $ \o ->
V1ServiceAccount
<$> (o .:? "apiVersion")
<*> (o .:? "automountServiceAccountToken")
<*> (o .:? "imagePullSecrets")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "secrets")
instance A.ToJSON V1ServiceAccount where
toJSON V1ServiceAccount {..} =
_omitNulls
[ "apiVersion" .= v1ServiceAccountApiVersion
, "automountServiceAccountToken" .= v1ServiceAccountAutomountServiceAccountToken
, "imagePullSecrets" .= v1ServiceAccountImagePullSecrets
, "kind" .= v1ServiceAccountKind
, "metadata" .= v1ServiceAccountMetadata
, "secrets" .= v1ServiceAccountSecrets
]
mkV1ServiceAccount
:: V1ServiceAccount
mkV1ServiceAccount =
V1ServiceAccount
{ v1ServiceAccountApiVersion = Nothing
, v1ServiceAccountAutomountServiceAccountToken = Nothing
, v1ServiceAccountImagePullSecrets = Nothing
, v1ServiceAccountKind = Nothing
, v1ServiceAccountMetadata = Nothing
, v1ServiceAccountSecrets = Nothing
}
data V1ServiceAccountList = V1ServiceAccountList
{ v1ServiceAccountListApiVersion :: !(Maybe Text)
, v1ServiceAccountListItems :: !([V1ServiceAccount])
, v1ServiceAccountListKind :: !(Maybe Text)
, v1ServiceAccountListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ServiceAccountList where
parseJSON = A.withObject "V1ServiceAccountList" $ \o ->
V1ServiceAccountList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ServiceAccountList where
toJSON V1ServiceAccountList {..} =
_omitNulls
[ "apiVersion" .= v1ServiceAccountListApiVersion
, "items" .= v1ServiceAccountListItems
, "kind" .= v1ServiceAccountListKind
, "metadata" .= v1ServiceAccountListMetadata
]
mkV1ServiceAccountList
:: [V1ServiceAccount]
-> V1ServiceAccountList
mkV1ServiceAccountList v1ServiceAccountListItems =
V1ServiceAccountList
{ v1ServiceAccountListApiVersion = Nothing
, v1ServiceAccountListItems
, v1ServiceAccountListKind = Nothing
, v1ServiceAccountListMetadata = Nothing
}
data V1ServiceAccountTokenProjection = V1ServiceAccountTokenProjection
{ v1ServiceAccountTokenProjectionAudience :: !(Maybe Text)
, v1ServiceAccountTokenProjectionExpirationSeconds :: !(Maybe Integer)
, v1ServiceAccountTokenProjectionPath :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ServiceAccountTokenProjection where
parseJSON = A.withObject "V1ServiceAccountTokenProjection" $ \o ->
V1ServiceAccountTokenProjection
<$> (o .:? "audience")
<*> (o .:? "expirationSeconds")
<*> (o .: "path")
instance A.ToJSON V1ServiceAccountTokenProjection where
toJSON V1ServiceAccountTokenProjection {..} =
_omitNulls
[ "audience" .= v1ServiceAccountTokenProjectionAudience
, "expirationSeconds" .= v1ServiceAccountTokenProjectionExpirationSeconds
, "path" .= v1ServiceAccountTokenProjectionPath
]
mkV1ServiceAccountTokenProjection
:: Text
-> V1ServiceAccountTokenProjection
mkV1ServiceAccountTokenProjection v1ServiceAccountTokenProjectionPath =
V1ServiceAccountTokenProjection
{ v1ServiceAccountTokenProjectionAudience = Nothing
, v1ServiceAccountTokenProjectionExpirationSeconds = Nothing
, v1ServiceAccountTokenProjectionPath
}
data V1ServiceList = V1ServiceList
{ v1ServiceListApiVersion :: !(Maybe Text)
, v1ServiceListItems :: !([V1Service])
, v1ServiceListKind :: !(Maybe Text)
, v1ServiceListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ServiceList where
parseJSON = A.withObject "V1ServiceList" $ \o ->
V1ServiceList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1ServiceList where
toJSON V1ServiceList {..} =
_omitNulls
[ "apiVersion" .= v1ServiceListApiVersion
, "items" .= v1ServiceListItems
, "kind" .= v1ServiceListKind
, "metadata" .= v1ServiceListMetadata
]
mkV1ServiceList
:: [V1Service]
-> V1ServiceList
mkV1ServiceList v1ServiceListItems =
V1ServiceList
{ v1ServiceListApiVersion = Nothing
, v1ServiceListItems
, v1ServiceListKind = Nothing
, v1ServiceListMetadata = Nothing
}
data V1ServicePort = V1ServicePort
{ v1ServicePortName :: !(Maybe Text)
, v1ServicePortNodePort :: !(Maybe Int)
, v1ServicePortPort :: !(Int)
, v1ServicePortProtocol :: !(Maybe Text)
, v1ServicePortTargetPort :: !(Maybe IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ServicePort where
parseJSON = A.withObject "V1ServicePort" $ \o ->
V1ServicePort
<$> (o .:? "name")
<*> (o .:? "nodePort")
<*> (o .: "port")
<*> (o .:? "protocol")
<*> (o .:? "targetPort")
instance A.ToJSON V1ServicePort where
toJSON V1ServicePort {..} =
_omitNulls
[ "name" .= v1ServicePortName
, "nodePort" .= v1ServicePortNodePort
, "port" .= v1ServicePortPort
, "protocol" .= v1ServicePortProtocol
, "targetPort" .= v1ServicePortTargetPort
]
mkV1ServicePort
:: Int
-> V1ServicePort
mkV1ServicePort v1ServicePortPort =
V1ServicePort
{ v1ServicePortName = Nothing
, v1ServicePortNodePort = Nothing
, v1ServicePortPort
, v1ServicePortProtocol = Nothing
, v1ServicePortTargetPort = Nothing
}
data V1ServiceReference = V1ServiceReference
{ v1ServiceReferenceName :: !(Maybe Text)
, v1ServiceReferenceNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ServiceReference where
parseJSON = A.withObject "V1ServiceReference" $ \o ->
V1ServiceReference
<$> (o .:? "name")
<*> (o .:? "namespace")
instance A.ToJSON V1ServiceReference where
toJSON V1ServiceReference {..} =
_omitNulls
[ "name" .= v1ServiceReferenceName
, "namespace" .= v1ServiceReferenceNamespace
]
mkV1ServiceReference
:: V1ServiceReference
mkV1ServiceReference =
V1ServiceReference
{ v1ServiceReferenceName = Nothing
, v1ServiceReferenceNamespace = Nothing
}
data V1ServiceSpec = V1ServiceSpec
{ v1ServiceSpecClusterIp :: !(Maybe Text)
, v1ServiceSpecExternalIPs :: !(Maybe [Text])
, v1ServiceSpecExternalName :: !(Maybe Text)
, v1ServiceSpecExternalTrafficPolicy :: !(Maybe Text)
, v1ServiceSpecHealthCheckNodePort :: !(Maybe Int)
, v1ServiceSpecLoadBalancerIp :: !(Maybe Text)
, v1ServiceSpecLoadBalancerSourceRanges :: !(Maybe [Text])
, v1ServiceSpecPorts :: !(Maybe [V1ServicePort])
, v1ServiceSpecPublishNotReadyAddresses :: !(Maybe Bool)
, v1ServiceSpecSelector :: !(Maybe (Map.Map String Text))
, v1ServiceSpecSessionAffinity :: !(Maybe Text)
, v1ServiceSpecSessionAffinityConfig :: !(Maybe V1SessionAffinityConfig)
, v1ServiceSpecType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ServiceSpec where
parseJSON = A.withObject "V1ServiceSpec" $ \o ->
V1ServiceSpec
<$> (o .:? "clusterIP")
<*> (o .:? "externalIPs")
<*> (o .:? "externalName")
<*> (o .:? "externalTrafficPolicy")
<*> (o .:? "healthCheckNodePort")
<*> (o .:? "loadBalancerIP")
<*> (o .:? "loadBalancerSourceRanges")
<*> (o .:? "ports")
<*> (o .:? "publishNotReadyAddresses")
<*> (o .:? "selector")
<*> (o .:? "sessionAffinity")
<*> (o .:? "sessionAffinityConfig")
<*> (o .:? "type")
instance A.ToJSON V1ServiceSpec where
toJSON V1ServiceSpec {..} =
_omitNulls
[ "clusterIP" .= v1ServiceSpecClusterIp
, "externalIPs" .= v1ServiceSpecExternalIPs
, "externalName" .= v1ServiceSpecExternalName
, "externalTrafficPolicy" .= v1ServiceSpecExternalTrafficPolicy
, "healthCheckNodePort" .= v1ServiceSpecHealthCheckNodePort
, "loadBalancerIP" .= v1ServiceSpecLoadBalancerIp
, "loadBalancerSourceRanges" .= v1ServiceSpecLoadBalancerSourceRanges
, "ports" .= v1ServiceSpecPorts
, "publishNotReadyAddresses" .= v1ServiceSpecPublishNotReadyAddresses
, "selector" .= v1ServiceSpecSelector
, "sessionAffinity" .= v1ServiceSpecSessionAffinity
, "sessionAffinityConfig" .= v1ServiceSpecSessionAffinityConfig
, "type" .= v1ServiceSpecType
]
mkV1ServiceSpec
:: V1ServiceSpec
mkV1ServiceSpec =
V1ServiceSpec
{ v1ServiceSpecClusterIp = Nothing
, v1ServiceSpecExternalIPs = Nothing
, v1ServiceSpecExternalName = Nothing
, v1ServiceSpecExternalTrafficPolicy = Nothing
, v1ServiceSpecHealthCheckNodePort = Nothing
, v1ServiceSpecLoadBalancerIp = Nothing
, v1ServiceSpecLoadBalancerSourceRanges = Nothing
, v1ServiceSpecPorts = Nothing
, v1ServiceSpecPublishNotReadyAddresses = Nothing
, v1ServiceSpecSelector = Nothing
, v1ServiceSpecSessionAffinity = Nothing
, v1ServiceSpecSessionAffinityConfig = Nothing
, v1ServiceSpecType = Nothing
}
data V1ServiceStatus = V1ServiceStatus
{ v1ServiceStatusLoadBalancer :: !(Maybe V1LoadBalancerStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1ServiceStatus where
parseJSON = A.withObject "V1ServiceStatus" $ \o ->
V1ServiceStatus
<$> (o .:? "loadBalancer")
instance A.ToJSON V1ServiceStatus where
toJSON V1ServiceStatus {..} =
_omitNulls
[ "loadBalancer" .= v1ServiceStatusLoadBalancer
]
mkV1ServiceStatus
:: V1ServiceStatus
mkV1ServiceStatus =
V1ServiceStatus
{ v1ServiceStatusLoadBalancer = Nothing
}
data V1SessionAffinityConfig = V1SessionAffinityConfig
{ v1SessionAffinityConfigClientIp :: !(Maybe V1ClientIPConfig)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SessionAffinityConfig where
parseJSON = A.withObject "V1SessionAffinityConfig" $ \o ->
V1SessionAffinityConfig
<$> (o .:? "clientIP")
instance A.ToJSON V1SessionAffinityConfig where
toJSON V1SessionAffinityConfig {..} =
_omitNulls
[ "clientIP" .= v1SessionAffinityConfigClientIp
]
mkV1SessionAffinityConfig
:: V1SessionAffinityConfig
mkV1SessionAffinityConfig =
V1SessionAffinityConfig
{ v1SessionAffinityConfigClientIp = Nothing
}
data V1StatefulSet = V1StatefulSet
{ v1StatefulSetApiVersion :: !(Maybe Text)
, v1StatefulSetKind :: !(Maybe Text)
, v1StatefulSetMetadata :: !(Maybe V1ObjectMeta)
, v1StatefulSetSpec :: !(Maybe V1StatefulSetSpec)
, v1StatefulSetStatus :: !(Maybe V1StatefulSetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StatefulSet where
parseJSON = A.withObject "V1StatefulSet" $ \o ->
V1StatefulSet
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1StatefulSet where
toJSON V1StatefulSet {..} =
_omitNulls
[ "apiVersion" .= v1StatefulSetApiVersion
, "kind" .= v1StatefulSetKind
, "metadata" .= v1StatefulSetMetadata
, "spec" .= v1StatefulSetSpec
, "status" .= v1StatefulSetStatus
]
mkV1StatefulSet
:: V1StatefulSet
mkV1StatefulSet =
V1StatefulSet
{ v1StatefulSetApiVersion = Nothing
, v1StatefulSetKind = Nothing
, v1StatefulSetMetadata = Nothing
, v1StatefulSetSpec = Nothing
, v1StatefulSetStatus = Nothing
}
data V1StatefulSetCondition = V1StatefulSetCondition
{ v1StatefulSetConditionLastTransitionTime :: !(Maybe DateTime)
, v1StatefulSetConditionMessage :: !(Maybe Text)
, v1StatefulSetConditionReason :: !(Maybe Text)
, v1StatefulSetConditionStatus :: !(Text)
, v1StatefulSetConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StatefulSetCondition where
parseJSON = A.withObject "V1StatefulSetCondition" $ \o ->
V1StatefulSetCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1StatefulSetCondition where
toJSON V1StatefulSetCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1StatefulSetConditionLastTransitionTime
, "message" .= v1StatefulSetConditionMessage
, "reason" .= v1StatefulSetConditionReason
, "status" .= v1StatefulSetConditionStatus
, "type" .= v1StatefulSetConditionType
]
mkV1StatefulSetCondition
:: Text
-> Text
-> V1StatefulSetCondition
mkV1StatefulSetCondition v1StatefulSetConditionStatus v1StatefulSetConditionType =
V1StatefulSetCondition
{ v1StatefulSetConditionLastTransitionTime = Nothing
, v1StatefulSetConditionMessage = Nothing
, v1StatefulSetConditionReason = Nothing
, v1StatefulSetConditionStatus
, v1StatefulSetConditionType
}
data V1StatefulSetList = V1StatefulSetList
{ v1StatefulSetListApiVersion :: !(Maybe Text)
, v1StatefulSetListItems :: !([V1StatefulSet])
, v1StatefulSetListKind :: !(Maybe Text)
, v1StatefulSetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StatefulSetList where
parseJSON = A.withObject "V1StatefulSetList" $ \o ->
V1StatefulSetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1StatefulSetList where
toJSON V1StatefulSetList {..} =
_omitNulls
[ "apiVersion" .= v1StatefulSetListApiVersion
, "items" .= v1StatefulSetListItems
, "kind" .= v1StatefulSetListKind
, "metadata" .= v1StatefulSetListMetadata
]
mkV1StatefulSetList
:: [V1StatefulSet]
-> V1StatefulSetList
mkV1StatefulSetList v1StatefulSetListItems =
V1StatefulSetList
{ v1StatefulSetListApiVersion = Nothing
, v1StatefulSetListItems
, v1StatefulSetListKind = Nothing
, v1StatefulSetListMetadata = Nothing
}
data V1StatefulSetSpec = V1StatefulSetSpec
{ v1StatefulSetSpecPodManagementPolicy :: !(Maybe Text)
, v1StatefulSetSpecReplicas :: !(Maybe Int)
, v1StatefulSetSpecRevisionHistoryLimit :: !(Maybe Int)
, v1StatefulSetSpecSelector :: !(V1LabelSelector)
, v1StatefulSetSpecServiceName :: !(Text)
, v1StatefulSetSpecTemplate :: !(V1PodTemplateSpec)
, v1StatefulSetSpecUpdateStrategy :: !(Maybe V1StatefulSetUpdateStrategy)
, v1StatefulSetSpecVolumeClaimTemplates :: !(Maybe [V1PersistentVolumeClaim])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StatefulSetSpec where
parseJSON = A.withObject "V1StatefulSetSpec" $ \o ->
V1StatefulSetSpec
<$> (o .:? "podManagementPolicy")
<*> (o .:? "replicas")
<*> (o .:? "revisionHistoryLimit")
<*> (o .: "selector")
<*> (o .: "serviceName")
<*> (o .: "template")
<*> (o .:? "updateStrategy")
<*> (o .:? "volumeClaimTemplates")
instance A.ToJSON V1StatefulSetSpec where
toJSON V1StatefulSetSpec {..} =
_omitNulls
[ "podManagementPolicy" .= v1StatefulSetSpecPodManagementPolicy
, "replicas" .= v1StatefulSetSpecReplicas
, "revisionHistoryLimit" .= v1StatefulSetSpecRevisionHistoryLimit
, "selector" .= v1StatefulSetSpecSelector
, "serviceName" .= v1StatefulSetSpecServiceName
, "template" .= v1StatefulSetSpecTemplate
, "updateStrategy" .= v1StatefulSetSpecUpdateStrategy
, "volumeClaimTemplates" .= v1StatefulSetSpecVolumeClaimTemplates
]
mkV1StatefulSetSpec
:: V1LabelSelector
-> Text
-> V1PodTemplateSpec
-> V1StatefulSetSpec
mkV1StatefulSetSpec v1StatefulSetSpecSelector v1StatefulSetSpecServiceName v1StatefulSetSpecTemplate =
V1StatefulSetSpec
{ v1StatefulSetSpecPodManagementPolicy = Nothing
, v1StatefulSetSpecReplicas = Nothing
, v1StatefulSetSpecRevisionHistoryLimit = Nothing
, v1StatefulSetSpecSelector
, v1StatefulSetSpecServiceName
, v1StatefulSetSpecTemplate
, v1StatefulSetSpecUpdateStrategy = Nothing
, v1StatefulSetSpecVolumeClaimTemplates = Nothing
}
data V1StatefulSetStatus = V1StatefulSetStatus
{ v1StatefulSetStatusCollisionCount :: !(Maybe Int)
, v1StatefulSetStatusConditions :: !(Maybe [V1StatefulSetCondition])
, v1StatefulSetStatusCurrentReplicas :: !(Maybe Int)
, v1StatefulSetStatusCurrentRevision :: !(Maybe Text)
, v1StatefulSetStatusObservedGeneration :: !(Maybe Integer)
, v1StatefulSetStatusReadyReplicas :: !(Maybe Int)
, v1StatefulSetStatusReplicas :: !(Int)
, v1StatefulSetStatusUpdateRevision :: !(Maybe Text)
, v1StatefulSetStatusUpdatedReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StatefulSetStatus where
parseJSON = A.withObject "V1StatefulSetStatus" $ \o ->
V1StatefulSetStatus
<$> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .:? "currentReplicas")
<*> (o .:? "currentRevision")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .: "replicas")
<*> (o .:? "updateRevision")
<*> (o .:? "updatedReplicas")
instance A.ToJSON V1StatefulSetStatus where
toJSON V1StatefulSetStatus {..} =
_omitNulls
[ "collisionCount" .= v1StatefulSetStatusCollisionCount
, "conditions" .= v1StatefulSetStatusConditions
, "currentReplicas" .= v1StatefulSetStatusCurrentReplicas
, "currentRevision" .= v1StatefulSetStatusCurrentRevision
, "observedGeneration" .= v1StatefulSetStatusObservedGeneration
, "readyReplicas" .= v1StatefulSetStatusReadyReplicas
, "replicas" .= v1StatefulSetStatusReplicas
, "updateRevision" .= v1StatefulSetStatusUpdateRevision
, "updatedReplicas" .= v1StatefulSetStatusUpdatedReplicas
]
mkV1StatefulSetStatus
:: Int
-> V1StatefulSetStatus
mkV1StatefulSetStatus v1StatefulSetStatusReplicas =
V1StatefulSetStatus
{ v1StatefulSetStatusCollisionCount = Nothing
, v1StatefulSetStatusConditions = Nothing
, v1StatefulSetStatusCurrentReplicas = Nothing
, v1StatefulSetStatusCurrentRevision = Nothing
, v1StatefulSetStatusObservedGeneration = Nothing
, v1StatefulSetStatusReadyReplicas = Nothing
, v1StatefulSetStatusReplicas
, v1StatefulSetStatusUpdateRevision = Nothing
, v1StatefulSetStatusUpdatedReplicas = Nothing
}
data V1StatefulSetUpdateStrategy = V1StatefulSetUpdateStrategy
{ v1StatefulSetUpdateStrategyRollingUpdate :: !(Maybe V1RollingUpdateStatefulSetStrategy)
, v1StatefulSetUpdateStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StatefulSetUpdateStrategy where
parseJSON = A.withObject "V1StatefulSetUpdateStrategy" $ \o ->
V1StatefulSetUpdateStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON V1StatefulSetUpdateStrategy where
toJSON V1StatefulSetUpdateStrategy {..} =
_omitNulls
[ "rollingUpdate" .= v1StatefulSetUpdateStrategyRollingUpdate
, "type" .= v1StatefulSetUpdateStrategyType
]
mkV1StatefulSetUpdateStrategy
:: V1StatefulSetUpdateStrategy
mkV1StatefulSetUpdateStrategy =
V1StatefulSetUpdateStrategy
{ v1StatefulSetUpdateStrategyRollingUpdate = Nothing
, v1StatefulSetUpdateStrategyType = Nothing
}
data V1Status = V1Status
{ v1StatusApiVersion :: !(Maybe Text)
, v1StatusCode :: !(Maybe Int)
, v1StatusDetails :: !(Maybe V1StatusDetails)
, v1StatusKind :: !(Maybe Text)
, v1StatusMessage :: !(Maybe Text)
, v1StatusMetadata :: !(Maybe V1ListMeta)
, v1StatusReason :: !(Maybe Text)
, v1StatusStatus :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Status where
parseJSON = A.withObject "V1Status" $ \o ->
V1Status
<$> (o .:? "apiVersion")
<*> (o .:? "code")
<*> (o .:? "details")
<*> (o .:? "kind")
<*> (o .:? "message")
<*> (o .:? "metadata")
<*> (o .:? "reason")
<*> (o .:? "status")
instance A.ToJSON V1Status where
toJSON V1Status {..} =
_omitNulls
[ "apiVersion" .= v1StatusApiVersion
, "code" .= v1StatusCode
, "details" .= v1StatusDetails
, "kind" .= v1StatusKind
, "message" .= v1StatusMessage
, "metadata" .= v1StatusMetadata
, "reason" .= v1StatusReason
, "status" .= v1StatusStatus
]
mkV1Status
:: V1Status
mkV1Status =
V1Status
{ v1StatusApiVersion = Nothing
, v1StatusCode = Nothing
, v1StatusDetails = Nothing
, v1StatusKind = Nothing
, v1StatusMessage = Nothing
, v1StatusMetadata = Nothing
, v1StatusReason = Nothing
, v1StatusStatus = Nothing
}
data V1StatusCause = V1StatusCause
{ v1StatusCauseField :: !(Maybe Text)
, v1StatusCauseMessage :: !(Maybe Text)
, v1StatusCauseReason :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StatusCause where
parseJSON = A.withObject "V1StatusCause" $ \o ->
V1StatusCause
<$> (o .:? "field")
<*> (o .:? "message")
<*> (o .:? "reason")
instance A.ToJSON V1StatusCause where
toJSON V1StatusCause {..} =
_omitNulls
[ "field" .= v1StatusCauseField
, "message" .= v1StatusCauseMessage
, "reason" .= v1StatusCauseReason
]
mkV1StatusCause
:: V1StatusCause
mkV1StatusCause =
V1StatusCause
{ v1StatusCauseField = Nothing
, v1StatusCauseMessage = Nothing
, v1StatusCauseReason = Nothing
}
data V1StatusDetails = V1StatusDetails
{ v1StatusDetailsCauses :: !(Maybe [V1StatusCause])
, v1StatusDetailsGroup :: !(Maybe Text)
, v1StatusDetailsKind :: !(Maybe Text)
, v1StatusDetailsName :: !(Maybe Text)
, v1StatusDetailsRetryAfterSeconds :: !(Maybe Int)
, v1StatusDetailsUid :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StatusDetails where
parseJSON = A.withObject "V1StatusDetails" $ \o ->
V1StatusDetails
<$> (o .:? "causes")
<*> (o .:? "group")
<*> (o .:? "kind")
<*> (o .:? "name")
<*> (o .:? "retryAfterSeconds")
<*> (o .:? "uid")
instance A.ToJSON V1StatusDetails where
toJSON V1StatusDetails {..} =
_omitNulls
[ "causes" .= v1StatusDetailsCauses
, "group" .= v1StatusDetailsGroup
, "kind" .= v1StatusDetailsKind
, "name" .= v1StatusDetailsName
, "retryAfterSeconds" .= v1StatusDetailsRetryAfterSeconds
, "uid" .= v1StatusDetailsUid
]
mkV1StatusDetails
:: V1StatusDetails
mkV1StatusDetails =
V1StatusDetails
{ v1StatusDetailsCauses = Nothing
, v1StatusDetailsGroup = Nothing
, v1StatusDetailsKind = Nothing
, v1StatusDetailsName = Nothing
, v1StatusDetailsRetryAfterSeconds = Nothing
, v1StatusDetailsUid = Nothing
}
data V1StorageClass = V1StorageClass
{ v1StorageClassAllowVolumeExpansion :: !(Maybe Bool)
, v1StorageClassAllowedTopologies :: !(Maybe [V1TopologySelectorTerm])
, v1StorageClassApiVersion :: !(Maybe Text)
, v1StorageClassKind :: !(Maybe Text)
, v1StorageClassMetadata :: !(Maybe V1ObjectMeta)
, v1StorageClassMountOptions :: !(Maybe [Text])
, v1StorageClassParameters :: !(Maybe (Map.Map String Text))
, v1StorageClassProvisioner :: !(Text)
, v1StorageClassReclaimPolicy :: !(Maybe Text)
, v1StorageClassVolumeBindingMode :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StorageClass where
parseJSON = A.withObject "V1StorageClass" $ \o ->
V1StorageClass
<$> (o .:? "allowVolumeExpansion")
<*> (o .:? "allowedTopologies")
<*> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "mountOptions")
<*> (o .:? "parameters")
<*> (o .: "provisioner")
<*> (o .:? "reclaimPolicy")
<*> (o .:? "volumeBindingMode")
instance A.ToJSON V1StorageClass where
toJSON V1StorageClass {..} =
_omitNulls
[ "allowVolumeExpansion" .= v1StorageClassAllowVolumeExpansion
, "allowedTopologies" .= v1StorageClassAllowedTopologies
, "apiVersion" .= v1StorageClassApiVersion
, "kind" .= v1StorageClassKind
, "metadata" .= v1StorageClassMetadata
, "mountOptions" .= v1StorageClassMountOptions
, "parameters" .= v1StorageClassParameters
, "provisioner" .= v1StorageClassProvisioner
, "reclaimPolicy" .= v1StorageClassReclaimPolicy
, "volumeBindingMode" .= v1StorageClassVolumeBindingMode
]
mkV1StorageClass
:: Text
-> V1StorageClass
mkV1StorageClass v1StorageClassProvisioner =
V1StorageClass
{ v1StorageClassAllowVolumeExpansion = Nothing
, v1StorageClassAllowedTopologies = Nothing
, v1StorageClassApiVersion = Nothing
, v1StorageClassKind = Nothing
, v1StorageClassMetadata = Nothing
, v1StorageClassMountOptions = Nothing
, v1StorageClassParameters = Nothing
, v1StorageClassProvisioner
, v1StorageClassReclaimPolicy = Nothing
, v1StorageClassVolumeBindingMode = Nothing
}
data V1StorageClassList = V1StorageClassList
{ v1StorageClassListApiVersion :: !(Maybe Text)
, v1StorageClassListItems :: !([V1StorageClass])
, v1StorageClassListKind :: !(Maybe Text)
, v1StorageClassListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StorageClassList where
parseJSON = A.withObject "V1StorageClassList" $ \o ->
V1StorageClassList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1StorageClassList where
toJSON V1StorageClassList {..} =
_omitNulls
[ "apiVersion" .= v1StorageClassListApiVersion
, "items" .= v1StorageClassListItems
, "kind" .= v1StorageClassListKind
, "metadata" .= v1StorageClassListMetadata
]
mkV1StorageClassList
:: [V1StorageClass]
-> V1StorageClassList
mkV1StorageClassList v1StorageClassListItems =
V1StorageClassList
{ v1StorageClassListApiVersion = Nothing
, v1StorageClassListItems
, v1StorageClassListKind = Nothing
, v1StorageClassListMetadata = Nothing
}
data V1StorageOSPersistentVolumeSource = V1StorageOSPersistentVolumeSource
{ v1StorageOSPersistentVolumeSourceFsType :: !(Maybe Text)
, v1StorageOSPersistentVolumeSourceReadOnly :: !(Maybe Bool)
, v1StorageOSPersistentVolumeSourceSecretRef :: !(Maybe V1ObjectReference)
, v1StorageOSPersistentVolumeSourceVolumeName :: !(Maybe Text)
, v1StorageOSPersistentVolumeSourceVolumeNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StorageOSPersistentVolumeSource where
parseJSON = A.withObject "V1StorageOSPersistentVolumeSource" $ \o ->
V1StorageOSPersistentVolumeSource
<$> (o .:? "fsType")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
<*> (o .:? "volumeName")
<*> (o .:? "volumeNamespace")
instance A.ToJSON V1StorageOSPersistentVolumeSource where
toJSON V1StorageOSPersistentVolumeSource {..} =
_omitNulls
[ "fsType" .= v1StorageOSPersistentVolumeSourceFsType
, "readOnly" .= v1StorageOSPersistentVolumeSourceReadOnly
, "secretRef" .= v1StorageOSPersistentVolumeSourceSecretRef
, "volumeName" .= v1StorageOSPersistentVolumeSourceVolumeName
, "volumeNamespace" .= v1StorageOSPersistentVolumeSourceVolumeNamespace
]
mkV1StorageOSPersistentVolumeSource
:: V1StorageOSPersistentVolumeSource
mkV1StorageOSPersistentVolumeSource =
V1StorageOSPersistentVolumeSource
{ v1StorageOSPersistentVolumeSourceFsType = Nothing
, v1StorageOSPersistentVolumeSourceReadOnly = Nothing
, v1StorageOSPersistentVolumeSourceSecretRef = Nothing
, v1StorageOSPersistentVolumeSourceVolumeName = Nothing
, v1StorageOSPersistentVolumeSourceVolumeNamespace = Nothing
}
data V1StorageOSVolumeSource = V1StorageOSVolumeSource
{ v1StorageOSVolumeSourceFsType :: !(Maybe Text)
, v1StorageOSVolumeSourceReadOnly :: !(Maybe Bool)
, v1StorageOSVolumeSourceSecretRef :: !(Maybe V1LocalObjectReference)
, v1StorageOSVolumeSourceVolumeName :: !(Maybe Text)
, v1StorageOSVolumeSourceVolumeNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1StorageOSVolumeSource where
parseJSON = A.withObject "V1StorageOSVolumeSource" $ \o ->
V1StorageOSVolumeSource
<$> (o .:? "fsType")
<*> (o .:? "readOnly")
<*> (o .:? "secretRef")
<*> (o .:? "volumeName")
<*> (o .:? "volumeNamespace")
instance A.ToJSON V1StorageOSVolumeSource where
toJSON V1StorageOSVolumeSource {..} =
_omitNulls
[ "fsType" .= v1StorageOSVolumeSourceFsType
, "readOnly" .= v1StorageOSVolumeSourceReadOnly
, "secretRef" .= v1StorageOSVolumeSourceSecretRef
, "volumeName" .= v1StorageOSVolumeSourceVolumeName
, "volumeNamespace" .= v1StorageOSVolumeSourceVolumeNamespace
]
mkV1StorageOSVolumeSource
:: V1StorageOSVolumeSource
mkV1StorageOSVolumeSource =
V1StorageOSVolumeSource
{ v1StorageOSVolumeSourceFsType = Nothing
, v1StorageOSVolumeSourceReadOnly = Nothing
, v1StorageOSVolumeSourceSecretRef = Nothing
, v1StorageOSVolumeSourceVolumeName = Nothing
, v1StorageOSVolumeSourceVolumeNamespace = Nothing
}
data V1Subject = V1Subject
{ v1SubjectApiGroup :: !(Maybe Text)
, v1SubjectKind :: !(Text)
, v1SubjectName :: !(Text)
, v1SubjectNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Subject where
parseJSON = A.withObject "V1Subject" $ \o ->
V1Subject
<$> (o .:? "apiGroup")
<*> (o .: "kind")
<*> (o .: "name")
<*> (o .:? "namespace")
instance A.ToJSON V1Subject where
toJSON V1Subject {..} =
_omitNulls
[ "apiGroup" .= v1SubjectApiGroup
, "kind" .= v1SubjectKind
, "name" .= v1SubjectName
, "namespace" .= v1SubjectNamespace
]
mkV1Subject
:: Text
-> Text
-> V1Subject
mkV1Subject v1SubjectKind v1SubjectName =
V1Subject
{ v1SubjectApiGroup = Nothing
, v1SubjectKind
, v1SubjectName
, v1SubjectNamespace = Nothing
}
data V1SubjectAccessReview = V1SubjectAccessReview
{ v1SubjectAccessReviewApiVersion :: !(Maybe Text)
, v1SubjectAccessReviewKind :: !(Maybe Text)
, v1SubjectAccessReviewMetadata :: !(Maybe V1ObjectMeta)
, v1SubjectAccessReviewSpec :: !(V1SubjectAccessReviewSpec)
, v1SubjectAccessReviewStatus :: !(Maybe V1SubjectAccessReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SubjectAccessReview where
parseJSON = A.withObject "V1SubjectAccessReview" $ \o ->
V1SubjectAccessReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1SubjectAccessReview where
toJSON V1SubjectAccessReview {..} =
_omitNulls
[ "apiVersion" .= v1SubjectAccessReviewApiVersion
, "kind" .= v1SubjectAccessReviewKind
, "metadata" .= v1SubjectAccessReviewMetadata
, "spec" .= v1SubjectAccessReviewSpec
, "status" .= v1SubjectAccessReviewStatus
]
mkV1SubjectAccessReview
:: V1SubjectAccessReviewSpec
-> V1SubjectAccessReview
mkV1SubjectAccessReview v1SubjectAccessReviewSpec =
V1SubjectAccessReview
{ v1SubjectAccessReviewApiVersion = Nothing
, v1SubjectAccessReviewKind = Nothing
, v1SubjectAccessReviewMetadata = Nothing
, v1SubjectAccessReviewSpec
, v1SubjectAccessReviewStatus = Nothing
}
data V1SubjectAccessReviewSpec = V1SubjectAccessReviewSpec
{ v1SubjectAccessReviewSpecExtra :: !(Maybe (Map.Map String [Text]))
, v1SubjectAccessReviewSpecGroups :: !(Maybe [Text])
, v1SubjectAccessReviewSpecNonResourceAttributes :: !(Maybe V1NonResourceAttributes)
, v1SubjectAccessReviewSpecResourceAttributes :: !(Maybe V1ResourceAttributes)
, v1SubjectAccessReviewSpecUid :: !(Maybe Text)
, v1SubjectAccessReviewSpecUser :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SubjectAccessReviewSpec where
parseJSON = A.withObject "V1SubjectAccessReviewSpec" $ \o ->
V1SubjectAccessReviewSpec
<$> (o .:? "extra")
<*> (o .:? "groups")
<*> (o .:? "nonResourceAttributes")
<*> (o .:? "resourceAttributes")
<*> (o .:? "uid")
<*> (o .:? "user")
instance A.ToJSON V1SubjectAccessReviewSpec where
toJSON V1SubjectAccessReviewSpec {..} =
_omitNulls
[ "extra" .= v1SubjectAccessReviewSpecExtra
, "groups" .= v1SubjectAccessReviewSpecGroups
, "nonResourceAttributes" .= v1SubjectAccessReviewSpecNonResourceAttributes
, "resourceAttributes" .= v1SubjectAccessReviewSpecResourceAttributes
, "uid" .= v1SubjectAccessReviewSpecUid
, "user" .= v1SubjectAccessReviewSpecUser
]
mkV1SubjectAccessReviewSpec
:: V1SubjectAccessReviewSpec
mkV1SubjectAccessReviewSpec =
V1SubjectAccessReviewSpec
{ v1SubjectAccessReviewSpecExtra = Nothing
, v1SubjectAccessReviewSpecGroups = Nothing
, v1SubjectAccessReviewSpecNonResourceAttributes = Nothing
, v1SubjectAccessReviewSpecResourceAttributes = Nothing
, v1SubjectAccessReviewSpecUid = Nothing
, v1SubjectAccessReviewSpecUser = Nothing
}
data V1SubjectAccessReviewStatus = V1SubjectAccessReviewStatus
{ v1SubjectAccessReviewStatusAllowed :: !(Bool)
, v1SubjectAccessReviewStatusDenied :: !(Maybe Bool)
, v1SubjectAccessReviewStatusEvaluationError :: !(Maybe Text)
, v1SubjectAccessReviewStatusReason :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SubjectAccessReviewStatus where
parseJSON = A.withObject "V1SubjectAccessReviewStatus" $ \o ->
V1SubjectAccessReviewStatus
<$> (o .: "allowed")
<*> (o .:? "denied")
<*> (o .:? "evaluationError")
<*> (o .:? "reason")
instance A.ToJSON V1SubjectAccessReviewStatus where
toJSON V1SubjectAccessReviewStatus {..} =
_omitNulls
[ "allowed" .= v1SubjectAccessReviewStatusAllowed
, "denied" .= v1SubjectAccessReviewStatusDenied
, "evaluationError" .= v1SubjectAccessReviewStatusEvaluationError
, "reason" .= v1SubjectAccessReviewStatusReason
]
mkV1SubjectAccessReviewStatus
:: Bool
-> V1SubjectAccessReviewStatus
mkV1SubjectAccessReviewStatus v1SubjectAccessReviewStatusAllowed =
V1SubjectAccessReviewStatus
{ v1SubjectAccessReviewStatusAllowed
, v1SubjectAccessReviewStatusDenied = Nothing
, v1SubjectAccessReviewStatusEvaluationError = Nothing
, v1SubjectAccessReviewStatusReason = Nothing
}
data V1SubjectRulesReviewStatus = V1SubjectRulesReviewStatus
{ v1SubjectRulesReviewStatusEvaluationError :: !(Maybe Text)
, v1SubjectRulesReviewStatusIncomplete :: !(Bool)
, v1SubjectRulesReviewStatusNonResourceRules :: !([V1NonResourceRule])
, v1SubjectRulesReviewStatusResourceRules :: !([V1ResourceRule])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1SubjectRulesReviewStatus where
parseJSON = A.withObject "V1SubjectRulesReviewStatus" $ \o ->
V1SubjectRulesReviewStatus
<$> (o .:? "evaluationError")
<*> (o .: "incomplete")
<*> (o .: "nonResourceRules")
<*> (o .: "resourceRules")
instance A.ToJSON V1SubjectRulesReviewStatus where
toJSON V1SubjectRulesReviewStatus {..} =
_omitNulls
[ "evaluationError" .= v1SubjectRulesReviewStatusEvaluationError
, "incomplete" .= v1SubjectRulesReviewStatusIncomplete
, "nonResourceRules" .= v1SubjectRulesReviewStatusNonResourceRules
, "resourceRules" .= v1SubjectRulesReviewStatusResourceRules
]
mkV1SubjectRulesReviewStatus
:: Bool
-> [V1NonResourceRule]
-> [V1ResourceRule]
-> V1SubjectRulesReviewStatus
mkV1SubjectRulesReviewStatus v1SubjectRulesReviewStatusIncomplete v1SubjectRulesReviewStatusNonResourceRules v1SubjectRulesReviewStatusResourceRules =
V1SubjectRulesReviewStatus
{ v1SubjectRulesReviewStatusEvaluationError = Nothing
, v1SubjectRulesReviewStatusIncomplete
, v1SubjectRulesReviewStatusNonResourceRules
, v1SubjectRulesReviewStatusResourceRules
}
data V1Sysctl = V1Sysctl
{ v1SysctlName :: !(Text)
, v1SysctlValue :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Sysctl where
parseJSON = A.withObject "V1Sysctl" $ \o ->
V1Sysctl
<$> (o .: "name")
<*> (o .: "value")
instance A.ToJSON V1Sysctl where
toJSON V1Sysctl {..} =
_omitNulls
[ "name" .= v1SysctlName
, "value" .= v1SysctlValue
]
mkV1Sysctl
:: Text
-> Text
-> V1Sysctl
mkV1Sysctl v1SysctlName v1SysctlValue =
V1Sysctl
{ v1SysctlName
, v1SysctlValue
}
data V1TCPSocketAction = V1TCPSocketAction
{ v1TCPSocketActionHost :: !(Maybe Text)
, v1TCPSocketActionPort :: !(IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1TCPSocketAction where
parseJSON = A.withObject "V1TCPSocketAction" $ \o ->
V1TCPSocketAction
<$> (o .:? "host")
<*> (o .: "port")
instance A.ToJSON V1TCPSocketAction where
toJSON V1TCPSocketAction {..} =
_omitNulls
[ "host" .= v1TCPSocketActionHost
, "port" .= v1TCPSocketActionPort
]
mkV1TCPSocketAction
:: IntOrString
-> V1TCPSocketAction
mkV1TCPSocketAction v1TCPSocketActionPort =
V1TCPSocketAction
{ v1TCPSocketActionHost = Nothing
, v1TCPSocketActionPort
}
data V1Taint = V1Taint
{ v1TaintEffect :: !(Text)
, v1TaintKey :: !(Text)
, v1TaintTimeAdded :: !(Maybe DateTime)
, v1TaintValue :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Taint where
parseJSON = A.withObject "V1Taint" $ \o ->
V1Taint
<$> (o .: "effect")
<*> (o .: "key")
<*> (o .:? "timeAdded")
<*> (o .:? "value")
instance A.ToJSON V1Taint where
toJSON V1Taint {..} =
_omitNulls
[ "effect" .= v1TaintEffect
, "key" .= v1TaintKey
, "timeAdded" .= v1TaintTimeAdded
, "value" .= v1TaintValue
]
mkV1Taint
:: Text
-> Text
-> V1Taint
mkV1Taint v1TaintEffect v1TaintKey =
V1Taint
{ v1TaintEffect
, v1TaintKey
, v1TaintTimeAdded = Nothing
, v1TaintValue = Nothing
}
data V1TokenReview = V1TokenReview
{ v1TokenReviewApiVersion :: !(Maybe Text)
, v1TokenReviewKind :: !(Maybe Text)
, v1TokenReviewMetadata :: !(Maybe V1ObjectMeta)
, v1TokenReviewSpec :: !(V1TokenReviewSpec)
, v1TokenReviewStatus :: !(Maybe V1TokenReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1TokenReview where
parseJSON = A.withObject "V1TokenReview" $ \o ->
V1TokenReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1TokenReview where
toJSON V1TokenReview {..} =
_omitNulls
[ "apiVersion" .= v1TokenReviewApiVersion
, "kind" .= v1TokenReviewKind
, "metadata" .= v1TokenReviewMetadata
, "spec" .= v1TokenReviewSpec
, "status" .= v1TokenReviewStatus
]
mkV1TokenReview
:: V1TokenReviewSpec
-> V1TokenReview
mkV1TokenReview v1TokenReviewSpec =
V1TokenReview
{ v1TokenReviewApiVersion = Nothing
, v1TokenReviewKind = Nothing
, v1TokenReviewMetadata = Nothing
, v1TokenReviewSpec
, v1TokenReviewStatus = Nothing
}
data V1TokenReviewSpec = V1TokenReviewSpec
{ v1TokenReviewSpecAudiences :: !(Maybe [Text])
, v1TokenReviewSpecToken :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1TokenReviewSpec where
parseJSON = A.withObject "V1TokenReviewSpec" $ \o ->
V1TokenReviewSpec
<$> (o .:? "audiences")
<*> (o .:? "token")
instance A.ToJSON V1TokenReviewSpec where
toJSON V1TokenReviewSpec {..} =
_omitNulls
[ "audiences" .= v1TokenReviewSpecAudiences
, "token" .= v1TokenReviewSpecToken
]
mkV1TokenReviewSpec
:: V1TokenReviewSpec
mkV1TokenReviewSpec =
V1TokenReviewSpec
{ v1TokenReviewSpecAudiences = Nothing
, v1TokenReviewSpecToken = Nothing
}
data V1TokenReviewStatus = V1TokenReviewStatus
{ v1TokenReviewStatusAudiences :: !(Maybe [Text])
, v1TokenReviewStatusAuthenticated :: !(Maybe Bool)
, v1TokenReviewStatusError :: !(Maybe Text)
, v1TokenReviewStatusUser :: !(Maybe V1UserInfo)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1TokenReviewStatus where
parseJSON = A.withObject "V1TokenReviewStatus" $ \o ->
V1TokenReviewStatus
<$> (o .:? "audiences")
<*> (o .:? "authenticated")
<*> (o .:? "error")
<*> (o .:? "user")
instance A.ToJSON V1TokenReviewStatus where
toJSON V1TokenReviewStatus {..} =
_omitNulls
[ "audiences" .= v1TokenReviewStatusAudiences
, "authenticated" .= v1TokenReviewStatusAuthenticated
, "error" .= v1TokenReviewStatusError
, "user" .= v1TokenReviewStatusUser
]
mkV1TokenReviewStatus
:: V1TokenReviewStatus
mkV1TokenReviewStatus =
V1TokenReviewStatus
{ v1TokenReviewStatusAudiences = Nothing
, v1TokenReviewStatusAuthenticated = Nothing
, v1TokenReviewStatusError = Nothing
, v1TokenReviewStatusUser = Nothing
}
data V1Toleration = V1Toleration
{ v1TolerationEffect :: !(Maybe Text)
, v1TolerationKey :: !(Maybe Text)
, v1TolerationOperator :: !(Maybe Text)
, v1TolerationTolerationSeconds :: !(Maybe Integer)
, v1TolerationValue :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Toleration where
parseJSON = A.withObject "V1Toleration" $ \o ->
V1Toleration
<$> (o .:? "effect")
<*> (o .:? "key")
<*> (o .:? "operator")
<*> (o .:? "tolerationSeconds")
<*> (o .:? "value")
instance A.ToJSON V1Toleration where
toJSON V1Toleration {..} =
_omitNulls
[ "effect" .= v1TolerationEffect
, "key" .= v1TolerationKey
, "operator" .= v1TolerationOperator
, "tolerationSeconds" .= v1TolerationTolerationSeconds
, "value" .= v1TolerationValue
]
mkV1Toleration
:: V1Toleration
mkV1Toleration =
V1Toleration
{ v1TolerationEffect = Nothing
, v1TolerationKey = Nothing
, v1TolerationOperator = Nothing
, v1TolerationTolerationSeconds = Nothing
, v1TolerationValue = Nothing
}
data V1TopologySelectorLabelRequirement = V1TopologySelectorLabelRequirement
{ v1TopologySelectorLabelRequirementKey :: !(Text)
, v1TopologySelectorLabelRequirementValues :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1TopologySelectorLabelRequirement where
parseJSON = A.withObject "V1TopologySelectorLabelRequirement" $ \o ->
V1TopologySelectorLabelRequirement
<$> (o .: "key")
<*> (o .: "values")
instance A.ToJSON V1TopologySelectorLabelRequirement where
toJSON V1TopologySelectorLabelRequirement {..} =
_omitNulls
[ "key" .= v1TopologySelectorLabelRequirementKey
, "values" .= v1TopologySelectorLabelRequirementValues
]
mkV1TopologySelectorLabelRequirement
:: Text
-> [Text]
-> V1TopologySelectorLabelRequirement
mkV1TopologySelectorLabelRequirement v1TopologySelectorLabelRequirementKey v1TopologySelectorLabelRequirementValues =
V1TopologySelectorLabelRequirement
{ v1TopologySelectorLabelRequirementKey
, v1TopologySelectorLabelRequirementValues
}
data V1TopologySelectorTerm = V1TopologySelectorTerm
{ v1TopologySelectorTermMatchLabelExpressions :: !(Maybe [V1TopologySelectorLabelRequirement])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1TopologySelectorTerm where
parseJSON = A.withObject "V1TopologySelectorTerm" $ \o ->
V1TopologySelectorTerm
<$> (o .:? "matchLabelExpressions")
instance A.ToJSON V1TopologySelectorTerm where
toJSON V1TopologySelectorTerm {..} =
_omitNulls
[ "matchLabelExpressions" .= v1TopologySelectorTermMatchLabelExpressions
]
mkV1TopologySelectorTerm
:: V1TopologySelectorTerm
mkV1TopologySelectorTerm =
V1TopologySelectorTerm
{ v1TopologySelectorTermMatchLabelExpressions = Nothing
}
data V1TypedLocalObjectReference = V1TypedLocalObjectReference
{ v1TypedLocalObjectReferenceApiGroup :: !(Maybe Text)
, v1TypedLocalObjectReferenceKind :: !(Text)
, v1TypedLocalObjectReferenceName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1TypedLocalObjectReference where
parseJSON = A.withObject "V1TypedLocalObjectReference" $ \o ->
V1TypedLocalObjectReference
<$> (o .:? "apiGroup")
<*> (o .: "kind")
<*> (o .: "name")
instance A.ToJSON V1TypedLocalObjectReference where
toJSON V1TypedLocalObjectReference {..} =
_omitNulls
[ "apiGroup" .= v1TypedLocalObjectReferenceApiGroup
, "kind" .= v1TypedLocalObjectReferenceKind
, "name" .= v1TypedLocalObjectReferenceName
]
mkV1TypedLocalObjectReference
:: Text
-> Text
-> V1TypedLocalObjectReference
mkV1TypedLocalObjectReference v1TypedLocalObjectReferenceKind v1TypedLocalObjectReferenceName =
V1TypedLocalObjectReference
{ v1TypedLocalObjectReferenceApiGroup = Nothing
, v1TypedLocalObjectReferenceKind
, v1TypedLocalObjectReferenceName
}
data V1UserInfo = V1UserInfo
{ v1UserInfoExtra :: !(Maybe (Map.Map String [Text]))
, v1UserInfoGroups :: !(Maybe [Text])
, v1UserInfoUid :: !(Maybe Text)
, v1UserInfoUsername :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1UserInfo where
parseJSON = A.withObject "V1UserInfo" $ \o ->
V1UserInfo
<$> (o .:? "extra")
<*> (o .:? "groups")
<*> (o .:? "uid")
<*> (o .:? "username")
instance A.ToJSON V1UserInfo where
toJSON V1UserInfo {..} =
_omitNulls
[ "extra" .= v1UserInfoExtra
, "groups" .= v1UserInfoGroups
, "uid" .= v1UserInfoUid
, "username" .= v1UserInfoUsername
]
mkV1UserInfo
:: V1UserInfo
mkV1UserInfo =
V1UserInfo
{ v1UserInfoExtra = Nothing
, v1UserInfoGroups = Nothing
, v1UserInfoUid = Nothing
, v1UserInfoUsername = Nothing
}
data V1Volume = V1Volume
{ v1VolumeAwsElasticBlockStore :: !(Maybe V1AWSElasticBlockStoreVolumeSource)
, v1VolumeAzureDisk :: !(Maybe V1AzureDiskVolumeSource)
, v1VolumeAzureFile :: !(Maybe V1AzureFileVolumeSource)
, v1VolumeCephfs :: !(Maybe V1CephFSVolumeSource)
, v1VolumeCinder :: !(Maybe V1CinderVolumeSource)
, v1VolumeConfigMap :: !(Maybe V1ConfigMapVolumeSource)
, v1VolumeCsi :: !(Maybe V1CSIVolumeSource)
, v1VolumeDownwardApi :: !(Maybe V1DownwardAPIVolumeSource)
, v1VolumeEmptyDir :: !(Maybe V1EmptyDirVolumeSource)
, v1VolumeFc :: !(Maybe V1FCVolumeSource)
, v1VolumeFlexVolume :: !(Maybe V1FlexVolumeSource)
, v1VolumeFlocker :: !(Maybe V1FlockerVolumeSource)
, v1VolumeGcePersistentDisk :: !(Maybe V1GCEPersistentDiskVolumeSource)
, v1VolumeGitRepo :: !(Maybe V1GitRepoVolumeSource)
, v1VolumeGlusterfs :: !(Maybe V1GlusterfsVolumeSource)
, v1VolumeHostPath :: !(Maybe V1HostPathVolumeSource)
, v1VolumeIscsi :: !(Maybe V1ISCSIVolumeSource)
, v1VolumeName :: !(Text)
, v1VolumeNfs :: !(Maybe V1NFSVolumeSource)
, v1VolumePersistentVolumeClaim :: !(Maybe V1PersistentVolumeClaimVolumeSource)
, v1VolumePhotonPersistentDisk :: !(Maybe V1PhotonPersistentDiskVolumeSource)
, v1VolumePortworxVolume :: !(Maybe V1PortworxVolumeSource)
, v1VolumeProjected :: !(Maybe V1ProjectedVolumeSource)
, v1VolumeQuobyte :: !(Maybe V1QuobyteVolumeSource)
, v1VolumeRbd :: !(Maybe V1RBDVolumeSource)
, v1VolumeScaleIo :: !(Maybe V1ScaleIOVolumeSource)
, v1VolumeSecret :: !(Maybe V1SecretVolumeSource)
, v1VolumeStorageos :: !(Maybe V1StorageOSVolumeSource)
, v1VolumeVsphereVolume :: !(Maybe V1VsphereVirtualDiskVolumeSource)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1Volume where
parseJSON = A.withObject "V1Volume" $ \o ->
V1Volume
<$> (o .:? "awsElasticBlockStore")
<*> (o .:? "azureDisk")
<*> (o .:? "azureFile")
<*> (o .:? "cephfs")
<*> (o .:? "cinder")
<*> (o .:? "configMap")
<*> (o .:? "csi")
<*> (o .:? "downwardAPI")
<*> (o .:? "emptyDir")
<*> (o .:? "fc")
<*> (o .:? "flexVolume")
<*> (o .:? "flocker")
<*> (o .:? "gcePersistentDisk")
<*> (o .:? "gitRepo")
<*> (o .:? "glusterfs")
<*> (o .:? "hostPath")
<*> (o .:? "iscsi")
<*> (o .: "name")
<*> (o .:? "nfs")
<*> (o .:? "persistentVolumeClaim")
<*> (o .:? "photonPersistentDisk")
<*> (o .:? "portworxVolume")
<*> (o .:? "projected")
<*> (o .:? "quobyte")
<*> (o .:? "rbd")
<*> (o .:? "scaleIO")
<*> (o .:? "secret")
<*> (o .:? "storageos")
<*> (o .:? "vsphereVolume")
instance A.ToJSON V1Volume where
toJSON V1Volume {..} =
_omitNulls
[ "awsElasticBlockStore" .= v1VolumeAwsElasticBlockStore
, "azureDisk" .= v1VolumeAzureDisk
, "azureFile" .= v1VolumeAzureFile
, "cephfs" .= v1VolumeCephfs
, "cinder" .= v1VolumeCinder
, "configMap" .= v1VolumeConfigMap
, "csi" .= v1VolumeCsi
, "downwardAPI" .= v1VolumeDownwardApi
, "emptyDir" .= v1VolumeEmptyDir
, "fc" .= v1VolumeFc
, "flexVolume" .= v1VolumeFlexVolume
, "flocker" .= v1VolumeFlocker
, "gcePersistentDisk" .= v1VolumeGcePersistentDisk
, "gitRepo" .= v1VolumeGitRepo
, "glusterfs" .= v1VolumeGlusterfs
, "hostPath" .= v1VolumeHostPath
, "iscsi" .= v1VolumeIscsi
, "name" .= v1VolumeName
, "nfs" .= v1VolumeNfs
, "persistentVolumeClaim" .= v1VolumePersistentVolumeClaim
, "photonPersistentDisk" .= v1VolumePhotonPersistentDisk
, "portworxVolume" .= v1VolumePortworxVolume
, "projected" .= v1VolumeProjected
, "quobyte" .= v1VolumeQuobyte
, "rbd" .= v1VolumeRbd
, "scaleIO" .= v1VolumeScaleIo
, "secret" .= v1VolumeSecret
, "storageos" .= v1VolumeStorageos
, "vsphereVolume" .= v1VolumeVsphereVolume
]
mkV1Volume
:: Text
-> V1Volume
mkV1Volume v1VolumeName =
V1Volume
{ v1VolumeAwsElasticBlockStore = Nothing
, v1VolumeAzureDisk = Nothing
, v1VolumeAzureFile = Nothing
, v1VolumeCephfs = Nothing
, v1VolumeCinder = Nothing
, v1VolumeConfigMap = Nothing
, v1VolumeCsi = Nothing
, v1VolumeDownwardApi = Nothing
, v1VolumeEmptyDir = Nothing
, v1VolumeFc = Nothing
, v1VolumeFlexVolume = Nothing
, v1VolumeFlocker = Nothing
, v1VolumeGcePersistentDisk = Nothing
, v1VolumeGitRepo = Nothing
, v1VolumeGlusterfs = Nothing
, v1VolumeHostPath = Nothing
, v1VolumeIscsi = Nothing
, v1VolumeName
, v1VolumeNfs = Nothing
, v1VolumePersistentVolumeClaim = Nothing
, v1VolumePhotonPersistentDisk = Nothing
, v1VolumePortworxVolume = Nothing
, v1VolumeProjected = Nothing
, v1VolumeQuobyte = Nothing
, v1VolumeRbd = Nothing
, v1VolumeScaleIo = Nothing
, v1VolumeSecret = Nothing
, v1VolumeStorageos = Nothing
, v1VolumeVsphereVolume = Nothing
}
data V1VolumeAttachment = V1VolumeAttachment
{ v1VolumeAttachmentApiVersion :: !(Maybe Text)
, v1VolumeAttachmentKind :: !(Maybe Text)
, v1VolumeAttachmentMetadata :: !(Maybe V1ObjectMeta)
, v1VolumeAttachmentSpec :: !(V1VolumeAttachmentSpec)
, v1VolumeAttachmentStatus :: !(Maybe V1VolumeAttachmentStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeAttachment where
parseJSON = A.withObject "V1VolumeAttachment" $ \o ->
V1VolumeAttachment
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1VolumeAttachment where
toJSON V1VolumeAttachment {..} =
_omitNulls
[ "apiVersion" .= v1VolumeAttachmentApiVersion
, "kind" .= v1VolumeAttachmentKind
, "metadata" .= v1VolumeAttachmentMetadata
, "spec" .= v1VolumeAttachmentSpec
, "status" .= v1VolumeAttachmentStatus
]
mkV1VolumeAttachment
:: V1VolumeAttachmentSpec
-> V1VolumeAttachment
mkV1VolumeAttachment v1VolumeAttachmentSpec =
V1VolumeAttachment
{ v1VolumeAttachmentApiVersion = Nothing
, v1VolumeAttachmentKind = Nothing
, v1VolumeAttachmentMetadata = Nothing
, v1VolumeAttachmentSpec
, v1VolumeAttachmentStatus = Nothing
}
data V1VolumeAttachmentList = V1VolumeAttachmentList
{ v1VolumeAttachmentListApiVersion :: !(Maybe Text)
, v1VolumeAttachmentListItems :: !([V1VolumeAttachment])
, v1VolumeAttachmentListKind :: !(Maybe Text)
, v1VolumeAttachmentListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeAttachmentList where
parseJSON = A.withObject "V1VolumeAttachmentList" $ \o ->
V1VolumeAttachmentList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1VolumeAttachmentList where
toJSON V1VolumeAttachmentList {..} =
_omitNulls
[ "apiVersion" .= v1VolumeAttachmentListApiVersion
, "items" .= v1VolumeAttachmentListItems
, "kind" .= v1VolumeAttachmentListKind
, "metadata" .= v1VolumeAttachmentListMetadata
]
mkV1VolumeAttachmentList
:: [V1VolumeAttachment]
-> V1VolumeAttachmentList
mkV1VolumeAttachmentList v1VolumeAttachmentListItems =
V1VolumeAttachmentList
{ v1VolumeAttachmentListApiVersion = Nothing
, v1VolumeAttachmentListItems
, v1VolumeAttachmentListKind = Nothing
, v1VolumeAttachmentListMetadata = Nothing
}
data V1VolumeAttachmentSource = V1VolumeAttachmentSource
{ v1VolumeAttachmentSourcePersistentVolumeName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeAttachmentSource where
parseJSON = A.withObject "V1VolumeAttachmentSource" $ \o ->
V1VolumeAttachmentSource
<$> (o .:? "persistentVolumeName")
instance A.ToJSON V1VolumeAttachmentSource where
toJSON V1VolumeAttachmentSource {..} =
_omitNulls
[ "persistentVolumeName" .= v1VolumeAttachmentSourcePersistentVolumeName
]
mkV1VolumeAttachmentSource
:: V1VolumeAttachmentSource
mkV1VolumeAttachmentSource =
V1VolumeAttachmentSource
{ v1VolumeAttachmentSourcePersistentVolumeName = Nothing
}
data V1VolumeAttachmentSpec = V1VolumeAttachmentSpec
{ v1VolumeAttachmentSpecAttacher :: !(Text)
, v1VolumeAttachmentSpecNodeName :: !(Text)
, v1VolumeAttachmentSpecSource :: !(V1VolumeAttachmentSource)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeAttachmentSpec where
parseJSON = A.withObject "V1VolumeAttachmentSpec" $ \o ->
V1VolumeAttachmentSpec
<$> (o .: "attacher")
<*> (o .: "nodeName")
<*> (o .: "source")
instance A.ToJSON V1VolumeAttachmentSpec where
toJSON V1VolumeAttachmentSpec {..} =
_omitNulls
[ "attacher" .= v1VolumeAttachmentSpecAttacher
, "nodeName" .= v1VolumeAttachmentSpecNodeName
, "source" .= v1VolumeAttachmentSpecSource
]
mkV1VolumeAttachmentSpec
:: Text
-> Text
-> V1VolumeAttachmentSource
-> V1VolumeAttachmentSpec
mkV1VolumeAttachmentSpec v1VolumeAttachmentSpecAttacher v1VolumeAttachmentSpecNodeName v1VolumeAttachmentSpecSource =
V1VolumeAttachmentSpec
{ v1VolumeAttachmentSpecAttacher
, v1VolumeAttachmentSpecNodeName
, v1VolumeAttachmentSpecSource
}
data V1VolumeAttachmentStatus = V1VolumeAttachmentStatus
{ v1VolumeAttachmentStatusAttachError :: !(Maybe V1VolumeError)
, v1VolumeAttachmentStatusAttached :: !(Bool)
, v1VolumeAttachmentStatusAttachmentMetadata :: !(Maybe (Map.Map String Text))
, v1VolumeAttachmentStatusDetachError :: !(Maybe V1VolumeError)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeAttachmentStatus where
parseJSON = A.withObject "V1VolumeAttachmentStatus" $ \o ->
V1VolumeAttachmentStatus
<$> (o .:? "attachError")
<*> (o .: "attached")
<*> (o .:? "attachmentMetadata")
<*> (o .:? "detachError")
instance A.ToJSON V1VolumeAttachmentStatus where
toJSON V1VolumeAttachmentStatus {..} =
_omitNulls
[ "attachError" .= v1VolumeAttachmentStatusAttachError
, "attached" .= v1VolumeAttachmentStatusAttached
, "attachmentMetadata" .= v1VolumeAttachmentStatusAttachmentMetadata
, "detachError" .= v1VolumeAttachmentStatusDetachError
]
mkV1VolumeAttachmentStatus
:: Bool
-> V1VolumeAttachmentStatus
mkV1VolumeAttachmentStatus v1VolumeAttachmentStatusAttached =
V1VolumeAttachmentStatus
{ v1VolumeAttachmentStatusAttachError = Nothing
, v1VolumeAttachmentStatusAttached
, v1VolumeAttachmentStatusAttachmentMetadata = Nothing
, v1VolumeAttachmentStatusDetachError = Nothing
}
data V1VolumeDevice = V1VolumeDevice
{ v1VolumeDeviceDevicePath :: !(Text)
, v1VolumeDeviceName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeDevice where
parseJSON = A.withObject "V1VolumeDevice" $ \o ->
V1VolumeDevice
<$> (o .: "devicePath")
<*> (o .: "name")
instance A.ToJSON V1VolumeDevice where
toJSON V1VolumeDevice {..} =
_omitNulls
[ "devicePath" .= v1VolumeDeviceDevicePath
, "name" .= v1VolumeDeviceName
]
mkV1VolumeDevice
:: Text
-> Text
-> V1VolumeDevice
mkV1VolumeDevice v1VolumeDeviceDevicePath v1VolumeDeviceName =
V1VolumeDevice
{ v1VolumeDeviceDevicePath
, v1VolumeDeviceName
}
data V1VolumeError = V1VolumeError
{ v1VolumeErrorMessage :: !(Maybe Text)
, v1VolumeErrorTime :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeError where
parseJSON = A.withObject "V1VolumeError" $ \o ->
V1VolumeError
<$> (o .:? "message")
<*> (o .:? "time")
instance A.ToJSON V1VolumeError where
toJSON V1VolumeError {..} =
_omitNulls
[ "message" .= v1VolumeErrorMessage
, "time" .= v1VolumeErrorTime
]
mkV1VolumeError
:: V1VolumeError
mkV1VolumeError =
V1VolumeError
{ v1VolumeErrorMessage = Nothing
, v1VolumeErrorTime = Nothing
}
data V1VolumeMount = V1VolumeMount
{ v1VolumeMountMountPath :: !(Text)
, v1VolumeMountMountPropagation :: !(Maybe Text)
, v1VolumeMountName :: !(Text)
, v1VolumeMountReadOnly :: !(Maybe Bool)
, v1VolumeMountSubPath :: !(Maybe Text)
, v1VolumeMountSubPathExpr :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeMount where
parseJSON = A.withObject "V1VolumeMount" $ \o ->
V1VolumeMount
<$> (o .: "mountPath")
<*> (o .:? "mountPropagation")
<*> (o .: "name")
<*> (o .:? "readOnly")
<*> (o .:? "subPath")
<*> (o .:? "subPathExpr")
instance A.ToJSON V1VolumeMount where
toJSON V1VolumeMount {..} =
_omitNulls
[ "mountPath" .= v1VolumeMountMountPath
, "mountPropagation" .= v1VolumeMountMountPropagation
, "name" .= v1VolumeMountName
, "readOnly" .= v1VolumeMountReadOnly
, "subPath" .= v1VolumeMountSubPath
, "subPathExpr" .= v1VolumeMountSubPathExpr
]
mkV1VolumeMount
:: Text
-> Text
-> V1VolumeMount
mkV1VolumeMount v1VolumeMountMountPath v1VolumeMountName =
V1VolumeMount
{ v1VolumeMountMountPath
, v1VolumeMountMountPropagation = Nothing
, v1VolumeMountName
, v1VolumeMountReadOnly = Nothing
, v1VolumeMountSubPath = Nothing
, v1VolumeMountSubPathExpr = Nothing
}
data V1VolumeNodeAffinity = V1VolumeNodeAffinity
{ v1VolumeNodeAffinityRequired :: !(Maybe V1NodeSelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeNodeAffinity where
parseJSON = A.withObject "V1VolumeNodeAffinity" $ \o ->
V1VolumeNodeAffinity
<$> (o .:? "required")
instance A.ToJSON V1VolumeNodeAffinity where
toJSON V1VolumeNodeAffinity {..} =
_omitNulls
[ "required" .= v1VolumeNodeAffinityRequired
]
mkV1VolumeNodeAffinity
:: V1VolumeNodeAffinity
mkV1VolumeNodeAffinity =
V1VolumeNodeAffinity
{ v1VolumeNodeAffinityRequired = Nothing
}
data V1VolumeProjection = V1VolumeProjection
{ v1VolumeProjectionConfigMap :: !(Maybe V1ConfigMapProjection)
, v1VolumeProjectionDownwardApi :: !(Maybe V1DownwardAPIProjection)
, v1VolumeProjectionSecret :: !(Maybe V1SecretProjection)
, v1VolumeProjectionServiceAccountToken :: !(Maybe V1ServiceAccountTokenProjection)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VolumeProjection where
parseJSON = A.withObject "V1VolumeProjection" $ \o ->
V1VolumeProjection
<$> (o .:? "configMap")
<*> (o .:? "downwardAPI")
<*> (o .:? "secret")
<*> (o .:? "serviceAccountToken")
instance A.ToJSON V1VolumeProjection where
toJSON V1VolumeProjection {..} =
_omitNulls
[ "configMap" .= v1VolumeProjectionConfigMap
, "downwardAPI" .= v1VolumeProjectionDownwardApi
, "secret" .= v1VolumeProjectionSecret
, "serviceAccountToken" .= v1VolumeProjectionServiceAccountToken
]
mkV1VolumeProjection
:: V1VolumeProjection
mkV1VolumeProjection =
V1VolumeProjection
{ v1VolumeProjectionConfigMap = Nothing
, v1VolumeProjectionDownwardApi = Nothing
, v1VolumeProjectionSecret = Nothing
, v1VolumeProjectionServiceAccountToken = Nothing
}
data V1VsphereVirtualDiskVolumeSource = V1VsphereVirtualDiskVolumeSource
{ v1VsphereVirtualDiskVolumeSourceFsType :: !(Maybe Text)
, v1VsphereVirtualDiskVolumeSourceStoragePolicyId :: !(Maybe Text)
, v1VsphereVirtualDiskVolumeSourceStoragePolicyName :: !(Maybe Text)
, v1VsphereVirtualDiskVolumeSourceVolumePath :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1VsphereVirtualDiskVolumeSource where
parseJSON = A.withObject "V1VsphereVirtualDiskVolumeSource" $ \o ->
V1VsphereVirtualDiskVolumeSource
<$> (o .:? "fsType")
<*> (o .:? "storagePolicyID")
<*> (o .:? "storagePolicyName")
<*> (o .: "volumePath")
instance A.ToJSON V1VsphereVirtualDiskVolumeSource where
toJSON V1VsphereVirtualDiskVolumeSource {..} =
_omitNulls
[ "fsType" .= v1VsphereVirtualDiskVolumeSourceFsType
, "storagePolicyID" .= v1VsphereVirtualDiskVolumeSourceStoragePolicyId
, "storagePolicyName" .= v1VsphereVirtualDiskVolumeSourceStoragePolicyName
, "volumePath" .= v1VsphereVirtualDiskVolumeSourceVolumePath
]
mkV1VsphereVirtualDiskVolumeSource
:: Text
-> V1VsphereVirtualDiskVolumeSource
mkV1VsphereVirtualDiskVolumeSource v1VsphereVirtualDiskVolumeSourceVolumePath =
V1VsphereVirtualDiskVolumeSource
{ v1VsphereVirtualDiskVolumeSourceFsType = Nothing
, v1VsphereVirtualDiskVolumeSourceStoragePolicyId = Nothing
, v1VsphereVirtualDiskVolumeSourceStoragePolicyName = Nothing
, v1VsphereVirtualDiskVolumeSourceVolumePath
}
data V1WatchEvent = V1WatchEvent
{ v1WatchEventObject :: !(RuntimeRawExtension)
, v1WatchEventType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1WatchEvent where
parseJSON = A.withObject "V1WatchEvent" $ \o ->
V1WatchEvent
<$> (o .: "object")
<*> (o .: "type")
instance A.ToJSON V1WatchEvent where
toJSON V1WatchEvent {..} =
_omitNulls
[ "object" .= v1WatchEventObject
, "type" .= v1WatchEventType
]
mkV1WatchEvent
:: RuntimeRawExtension
-> Text
-> V1WatchEvent
mkV1WatchEvent v1WatchEventObject v1WatchEventType =
V1WatchEvent
{ v1WatchEventObject
, v1WatchEventType
}
data V1WeightedPodAffinityTerm = V1WeightedPodAffinityTerm
{ v1WeightedPodAffinityTermPodAffinityTerm :: !(V1PodAffinityTerm)
, v1WeightedPodAffinityTermWeight :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1WeightedPodAffinityTerm where
parseJSON = A.withObject "V1WeightedPodAffinityTerm" $ \o ->
V1WeightedPodAffinityTerm
<$> (o .: "podAffinityTerm")
<*> (o .: "weight")
instance A.ToJSON V1WeightedPodAffinityTerm where
toJSON V1WeightedPodAffinityTerm {..} =
_omitNulls
[ "podAffinityTerm" .= v1WeightedPodAffinityTermPodAffinityTerm
, "weight" .= v1WeightedPodAffinityTermWeight
]
mkV1WeightedPodAffinityTerm
:: V1PodAffinityTerm
-> Int
-> V1WeightedPodAffinityTerm
mkV1WeightedPodAffinityTerm v1WeightedPodAffinityTermPodAffinityTerm v1WeightedPodAffinityTermWeight =
V1WeightedPodAffinityTerm
{ v1WeightedPodAffinityTermPodAffinityTerm
, v1WeightedPodAffinityTermWeight
}
data V1alpha1AggregationRule = V1alpha1AggregationRule
{ v1alpha1AggregationRuleClusterRoleSelectors :: !(Maybe [V1LabelSelector])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1AggregationRule where
parseJSON = A.withObject "V1alpha1AggregationRule" $ \o ->
V1alpha1AggregationRule
<$> (o .:? "clusterRoleSelectors")
instance A.ToJSON V1alpha1AggregationRule where
toJSON V1alpha1AggregationRule {..} =
_omitNulls
[ "clusterRoleSelectors" .= v1alpha1AggregationRuleClusterRoleSelectors
]
mkV1alpha1AggregationRule
:: V1alpha1AggregationRule
mkV1alpha1AggregationRule =
V1alpha1AggregationRule
{ v1alpha1AggregationRuleClusterRoleSelectors = Nothing
}
data V1alpha1AuditSink = V1alpha1AuditSink
{ v1alpha1AuditSinkApiVersion :: !(Maybe Text)
, v1alpha1AuditSinkKind :: !(Maybe Text)
, v1alpha1AuditSinkMetadata :: !(Maybe V1ObjectMeta)
, v1alpha1AuditSinkSpec :: !(Maybe V1alpha1AuditSinkSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1AuditSink where
parseJSON = A.withObject "V1alpha1AuditSink" $ \o ->
V1alpha1AuditSink
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V1alpha1AuditSink where
toJSON V1alpha1AuditSink {..} =
_omitNulls
[ "apiVersion" .= v1alpha1AuditSinkApiVersion
, "kind" .= v1alpha1AuditSinkKind
, "metadata" .= v1alpha1AuditSinkMetadata
, "spec" .= v1alpha1AuditSinkSpec
]
mkV1alpha1AuditSink
:: V1alpha1AuditSink
mkV1alpha1AuditSink =
V1alpha1AuditSink
{ v1alpha1AuditSinkApiVersion = Nothing
, v1alpha1AuditSinkKind = Nothing
, v1alpha1AuditSinkMetadata = Nothing
, v1alpha1AuditSinkSpec = Nothing
}
data V1alpha1AuditSinkList = V1alpha1AuditSinkList
{ v1alpha1AuditSinkListApiVersion :: !(Maybe Text)
, v1alpha1AuditSinkListItems :: !([V1alpha1AuditSink])
, v1alpha1AuditSinkListKind :: !(Maybe Text)
, v1alpha1AuditSinkListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1AuditSinkList where
parseJSON = A.withObject "V1alpha1AuditSinkList" $ \o ->
V1alpha1AuditSinkList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1alpha1AuditSinkList where
toJSON V1alpha1AuditSinkList {..} =
_omitNulls
[ "apiVersion" .= v1alpha1AuditSinkListApiVersion
, "items" .= v1alpha1AuditSinkListItems
, "kind" .= v1alpha1AuditSinkListKind
, "metadata" .= v1alpha1AuditSinkListMetadata
]
mkV1alpha1AuditSinkList
:: [V1alpha1AuditSink]
-> V1alpha1AuditSinkList
mkV1alpha1AuditSinkList v1alpha1AuditSinkListItems =
V1alpha1AuditSinkList
{ v1alpha1AuditSinkListApiVersion = Nothing
, v1alpha1AuditSinkListItems
, v1alpha1AuditSinkListKind = Nothing
, v1alpha1AuditSinkListMetadata = Nothing
}
data V1alpha1AuditSinkSpec = V1alpha1AuditSinkSpec
{ v1alpha1AuditSinkSpecPolicy :: !(V1alpha1Policy)
, v1alpha1AuditSinkSpecWebhook :: !(V1alpha1Webhook)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1AuditSinkSpec where
parseJSON = A.withObject "V1alpha1AuditSinkSpec" $ \o ->
V1alpha1AuditSinkSpec
<$> (o .: "policy")
<*> (o .: "webhook")
instance A.ToJSON V1alpha1AuditSinkSpec where
toJSON V1alpha1AuditSinkSpec {..} =
_omitNulls
[ "policy" .= v1alpha1AuditSinkSpecPolicy
, "webhook" .= v1alpha1AuditSinkSpecWebhook
]
mkV1alpha1AuditSinkSpec
:: V1alpha1Policy
-> V1alpha1Webhook
-> V1alpha1AuditSinkSpec
mkV1alpha1AuditSinkSpec v1alpha1AuditSinkSpecPolicy v1alpha1AuditSinkSpecWebhook =
V1alpha1AuditSinkSpec
{ v1alpha1AuditSinkSpecPolicy
, v1alpha1AuditSinkSpecWebhook
}
data V1alpha1ClusterRole = V1alpha1ClusterRole
{ v1alpha1ClusterRoleAggregationRule :: !(Maybe V1alpha1AggregationRule)
, v1alpha1ClusterRoleApiVersion :: !(Maybe Text)
, v1alpha1ClusterRoleKind :: !(Maybe Text)
, v1alpha1ClusterRoleMetadata :: !(Maybe V1ObjectMeta)
, v1alpha1ClusterRoleRules :: !(Maybe [V1alpha1PolicyRule])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1ClusterRole where
parseJSON = A.withObject "V1alpha1ClusterRole" $ \o ->
V1alpha1ClusterRole
<$> (o .:? "aggregationRule")
<*> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "rules")
instance A.ToJSON V1alpha1ClusterRole where
toJSON V1alpha1ClusterRole {..} =
_omitNulls
[ "aggregationRule" .= v1alpha1ClusterRoleAggregationRule
, "apiVersion" .= v1alpha1ClusterRoleApiVersion
, "kind" .= v1alpha1ClusterRoleKind
, "metadata" .= v1alpha1ClusterRoleMetadata
, "rules" .= v1alpha1ClusterRoleRules
]
mkV1alpha1ClusterRole
:: V1alpha1ClusterRole
mkV1alpha1ClusterRole =
V1alpha1ClusterRole
{ v1alpha1ClusterRoleAggregationRule = Nothing
, v1alpha1ClusterRoleApiVersion = Nothing
, v1alpha1ClusterRoleKind = Nothing
, v1alpha1ClusterRoleMetadata = Nothing
, v1alpha1ClusterRoleRules = Nothing
}
data V1alpha1ClusterRoleBinding = V1alpha1ClusterRoleBinding
{ v1alpha1ClusterRoleBindingApiVersion :: !(Maybe Text)
, v1alpha1ClusterRoleBindingKind :: !(Maybe Text)
, v1alpha1ClusterRoleBindingMetadata :: !(Maybe V1ObjectMeta)
, v1alpha1ClusterRoleBindingRoleRef :: !(V1alpha1RoleRef)
, v1alpha1ClusterRoleBindingSubjects :: !(Maybe [V1alpha1Subject])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1ClusterRoleBinding where
parseJSON = A.withObject "V1alpha1ClusterRoleBinding" $ \o ->
V1alpha1ClusterRoleBinding
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "roleRef")
<*> (o .:? "subjects")
instance A.ToJSON V1alpha1ClusterRoleBinding where
toJSON V1alpha1ClusterRoleBinding {..} =
_omitNulls
[ "apiVersion" .= v1alpha1ClusterRoleBindingApiVersion
, "kind" .= v1alpha1ClusterRoleBindingKind
, "metadata" .= v1alpha1ClusterRoleBindingMetadata
, "roleRef" .= v1alpha1ClusterRoleBindingRoleRef
, "subjects" .= v1alpha1ClusterRoleBindingSubjects
]
mkV1alpha1ClusterRoleBinding
:: V1alpha1RoleRef
-> V1alpha1ClusterRoleBinding
mkV1alpha1ClusterRoleBinding v1alpha1ClusterRoleBindingRoleRef =
V1alpha1ClusterRoleBinding
{ v1alpha1ClusterRoleBindingApiVersion = Nothing
, v1alpha1ClusterRoleBindingKind = Nothing
, v1alpha1ClusterRoleBindingMetadata = Nothing
, v1alpha1ClusterRoleBindingRoleRef
, v1alpha1ClusterRoleBindingSubjects = Nothing
}
data V1alpha1ClusterRoleBindingList = V1alpha1ClusterRoleBindingList
{ v1alpha1ClusterRoleBindingListApiVersion :: !(Maybe Text)
, v1alpha1ClusterRoleBindingListItems :: !([V1alpha1ClusterRoleBinding])
, v1alpha1ClusterRoleBindingListKind :: !(Maybe Text)
, v1alpha1ClusterRoleBindingListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1ClusterRoleBindingList where
parseJSON = A.withObject "V1alpha1ClusterRoleBindingList" $ \o ->
V1alpha1ClusterRoleBindingList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1alpha1ClusterRoleBindingList where
toJSON V1alpha1ClusterRoleBindingList {..} =
_omitNulls
[ "apiVersion" .= v1alpha1ClusterRoleBindingListApiVersion
, "items" .= v1alpha1ClusterRoleBindingListItems
, "kind" .= v1alpha1ClusterRoleBindingListKind
, "metadata" .= v1alpha1ClusterRoleBindingListMetadata
]
mkV1alpha1ClusterRoleBindingList
:: [V1alpha1ClusterRoleBinding]
-> V1alpha1ClusterRoleBindingList
mkV1alpha1ClusterRoleBindingList v1alpha1ClusterRoleBindingListItems =
V1alpha1ClusterRoleBindingList
{ v1alpha1ClusterRoleBindingListApiVersion = Nothing
, v1alpha1ClusterRoleBindingListItems
, v1alpha1ClusterRoleBindingListKind = Nothing
, v1alpha1ClusterRoleBindingListMetadata = Nothing
}
data V1alpha1ClusterRoleList = V1alpha1ClusterRoleList
{ v1alpha1ClusterRoleListApiVersion :: !(Maybe Text)
, v1alpha1ClusterRoleListItems :: !([V1alpha1ClusterRole])
, v1alpha1ClusterRoleListKind :: !(Maybe Text)
, v1alpha1ClusterRoleListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1ClusterRoleList where
parseJSON = A.withObject "V1alpha1ClusterRoleList" $ \o ->
V1alpha1ClusterRoleList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1alpha1ClusterRoleList where
toJSON V1alpha1ClusterRoleList {..} =
_omitNulls
[ "apiVersion" .= v1alpha1ClusterRoleListApiVersion
, "items" .= v1alpha1ClusterRoleListItems
, "kind" .= v1alpha1ClusterRoleListKind
, "metadata" .= v1alpha1ClusterRoleListMetadata
]
mkV1alpha1ClusterRoleList
:: [V1alpha1ClusterRole]
-> V1alpha1ClusterRoleList
mkV1alpha1ClusterRoleList v1alpha1ClusterRoleListItems =
V1alpha1ClusterRoleList
{ v1alpha1ClusterRoleListApiVersion = Nothing
, v1alpha1ClusterRoleListItems
, v1alpha1ClusterRoleListKind = Nothing
, v1alpha1ClusterRoleListMetadata = Nothing
}
data V1alpha1PodPreset = V1alpha1PodPreset
{ v1alpha1PodPresetApiVersion :: !(Maybe Text)
, v1alpha1PodPresetKind :: !(Maybe Text)
, v1alpha1PodPresetMetadata :: !(Maybe V1ObjectMeta)
, v1alpha1PodPresetSpec :: !(Maybe V1alpha1PodPresetSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1PodPreset where
parseJSON = A.withObject "V1alpha1PodPreset" $ \o ->
V1alpha1PodPreset
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V1alpha1PodPreset where
toJSON V1alpha1PodPreset {..} =
_omitNulls
[ "apiVersion" .= v1alpha1PodPresetApiVersion
, "kind" .= v1alpha1PodPresetKind
, "metadata" .= v1alpha1PodPresetMetadata
, "spec" .= v1alpha1PodPresetSpec
]
mkV1alpha1PodPreset
:: V1alpha1PodPreset
mkV1alpha1PodPreset =
V1alpha1PodPreset
{ v1alpha1PodPresetApiVersion = Nothing
, v1alpha1PodPresetKind = Nothing
, v1alpha1PodPresetMetadata = Nothing
, v1alpha1PodPresetSpec = Nothing
}
data V1alpha1PodPresetList = V1alpha1PodPresetList
{ v1alpha1PodPresetListApiVersion :: !(Maybe Text)
, v1alpha1PodPresetListItems :: !([V1alpha1PodPreset])
, v1alpha1PodPresetListKind :: !(Maybe Text)
, v1alpha1PodPresetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1PodPresetList where
parseJSON = A.withObject "V1alpha1PodPresetList" $ \o ->
V1alpha1PodPresetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1alpha1PodPresetList where
toJSON V1alpha1PodPresetList {..} =
_omitNulls
[ "apiVersion" .= v1alpha1PodPresetListApiVersion
, "items" .= v1alpha1PodPresetListItems
, "kind" .= v1alpha1PodPresetListKind
, "metadata" .= v1alpha1PodPresetListMetadata
]
mkV1alpha1PodPresetList
:: [V1alpha1PodPreset]
-> V1alpha1PodPresetList
mkV1alpha1PodPresetList v1alpha1PodPresetListItems =
V1alpha1PodPresetList
{ v1alpha1PodPresetListApiVersion = Nothing
, v1alpha1PodPresetListItems
, v1alpha1PodPresetListKind = Nothing
, v1alpha1PodPresetListMetadata = Nothing
}
data V1alpha1PodPresetSpec = V1alpha1PodPresetSpec
{ v1alpha1PodPresetSpecEnv :: !(Maybe [V1EnvVar])
, v1alpha1PodPresetSpecEnvFrom :: !(Maybe [V1EnvFromSource])
, v1alpha1PodPresetSpecSelector :: !(Maybe V1LabelSelector)
, v1alpha1PodPresetSpecVolumeMounts :: !(Maybe [V1VolumeMount])
, v1alpha1PodPresetSpecVolumes :: !(Maybe [V1Volume])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1PodPresetSpec where
parseJSON = A.withObject "V1alpha1PodPresetSpec" $ \o ->
V1alpha1PodPresetSpec
<$> (o .:? "env")
<*> (o .:? "envFrom")
<*> (o .:? "selector")
<*> (o .:? "volumeMounts")
<*> (o .:? "volumes")
instance A.ToJSON V1alpha1PodPresetSpec where
toJSON V1alpha1PodPresetSpec {..} =
_omitNulls
[ "env" .= v1alpha1PodPresetSpecEnv
, "envFrom" .= v1alpha1PodPresetSpecEnvFrom
, "selector" .= v1alpha1PodPresetSpecSelector
, "volumeMounts" .= v1alpha1PodPresetSpecVolumeMounts
, "volumes" .= v1alpha1PodPresetSpecVolumes
]
mkV1alpha1PodPresetSpec
:: V1alpha1PodPresetSpec
mkV1alpha1PodPresetSpec =
V1alpha1PodPresetSpec
{ v1alpha1PodPresetSpecEnv = Nothing
, v1alpha1PodPresetSpecEnvFrom = Nothing
, v1alpha1PodPresetSpecSelector = Nothing
, v1alpha1PodPresetSpecVolumeMounts = Nothing
, v1alpha1PodPresetSpecVolumes = Nothing
}
data V1alpha1Policy = V1alpha1Policy
{ v1alpha1PolicyLevel :: !(Text)
, v1alpha1PolicyStages :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1Policy where
parseJSON = A.withObject "V1alpha1Policy" $ \o ->
V1alpha1Policy
<$> (o .: "level")
<*> (o .:? "stages")
instance A.ToJSON V1alpha1Policy where
toJSON V1alpha1Policy {..} =
_omitNulls
[ "level" .= v1alpha1PolicyLevel
, "stages" .= v1alpha1PolicyStages
]
mkV1alpha1Policy
:: Text
-> V1alpha1Policy
mkV1alpha1Policy v1alpha1PolicyLevel =
V1alpha1Policy
{ v1alpha1PolicyLevel
, v1alpha1PolicyStages = Nothing
}
data V1alpha1PolicyRule = V1alpha1PolicyRule
{ v1alpha1PolicyRuleApiGroups :: !(Maybe [Text])
, v1alpha1PolicyRuleNonResourceUrLs :: !(Maybe [Text])
, v1alpha1PolicyRuleResourceNames :: !(Maybe [Text])
, v1alpha1PolicyRuleResources :: !(Maybe [Text])
, v1alpha1PolicyRuleVerbs :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1PolicyRule where
parseJSON = A.withObject "V1alpha1PolicyRule" $ \o ->
V1alpha1PolicyRule
<$> (o .:? "apiGroups")
<*> (o .:? "nonResourceURLs")
<*> (o .:? "resourceNames")
<*> (o .:? "resources")
<*> (o .: "verbs")
instance A.ToJSON V1alpha1PolicyRule where
toJSON V1alpha1PolicyRule {..} =
_omitNulls
[ "apiGroups" .= v1alpha1PolicyRuleApiGroups
, "nonResourceURLs" .= v1alpha1PolicyRuleNonResourceUrLs
, "resourceNames" .= v1alpha1PolicyRuleResourceNames
, "resources" .= v1alpha1PolicyRuleResources
, "verbs" .= v1alpha1PolicyRuleVerbs
]
mkV1alpha1PolicyRule
:: [Text]
-> V1alpha1PolicyRule
mkV1alpha1PolicyRule v1alpha1PolicyRuleVerbs =
V1alpha1PolicyRule
{ v1alpha1PolicyRuleApiGroups = Nothing
, v1alpha1PolicyRuleNonResourceUrLs = Nothing
, v1alpha1PolicyRuleResourceNames = Nothing
, v1alpha1PolicyRuleResources = Nothing
, v1alpha1PolicyRuleVerbs
}
data V1alpha1PriorityClass = V1alpha1PriorityClass
{ v1alpha1PriorityClassApiVersion :: !(Maybe Text)
, v1alpha1PriorityClassDescription :: !(Maybe Text)
, v1alpha1PriorityClassGlobalDefault :: !(Maybe Bool)
, v1alpha1PriorityClassKind :: !(Maybe Text)
, v1alpha1PriorityClassMetadata :: !(Maybe V1ObjectMeta)
, v1alpha1PriorityClassValue :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1PriorityClass where
parseJSON = A.withObject "V1alpha1PriorityClass" $ \o ->
V1alpha1PriorityClass
<$> (o .:? "apiVersion")
<*> (o .:? "description")
<*> (o .:? "globalDefault")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "value")
instance A.ToJSON V1alpha1PriorityClass where
toJSON V1alpha1PriorityClass {..} =
_omitNulls
[ "apiVersion" .= v1alpha1PriorityClassApiVersion
, "description" .= v1alpha1PriorityClassDescription
, "globalDefault" .= v1alpha1PriorityClassGlobalDefault
, "kind" .= v1alpha1PriorityClassKind
, "metadata" .= v1alpha1PriorityClassMetadata
, "value" .= v1alpha1PriorityClassValue
]
mkV1alpha1PriorityClass
:: Int
-> V1alpha1PriorityClass
mkV1alpha1PriorityClass v1alpha1PriorityClassValue =
V1alpha1PriorityClass
{ v1alpha1PriorityClassApiVersion = Nothing
, v1alpha1PriorityClassDescription = Nothing
, v1alpha1PriorityClassGlobalDefault = Nothing
, v1alpha1PriorityClassKind = Nothing
, v1alpha1PriorityClassMetadata = Nothing
, v1alpha1PriorityClassValue
}
data V1alpha1PriorityClassList = V1alpha1PriorityClassList
{ v1alpha1PriorityClassListApiVersion :: !(Maybe Text)
, v1alpha1PriorityClassListItems :: !([V1alpha1PriorityClass])
, v1alpha1PriorityClassListKind :: !(Maybe Text)
, v1alpha1PriorityClassListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1PriorityClassList where
parseJSON = A.withObject "V1alpha1PriorityClassList" $ \o ->
V1alpha1PriorityClassList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1alpha1PriorityClassList where
toJSON V1alpha1PriorityClassList {..} =
_omitNulls
[ "apiVersion" .= v1alpha1PriorityClassListApiVersion
, "items" .= v1alpha1PriorityClassListItems
, "kind" .= v1alpha1PriorityClassListKind
, "metadata" .= v1alpha1PriorityClassListMetadata
]
mkV1alpha1PriorityClassList
:: [V1alpha1PriorityClass]
-> V1alpha1PriorityClassList
mkV1alpha1PriorityClassList v1alpha1PriorityClassListItems =
V1alpha1PriorityClassList
{ v1alpha1PriorityClassListApiVersion = Nothing
, v1alpha1PriorityClassListItems
, v1alpha1PriorityClassListKind = Nothing
, v1alpha1PriorityClassListMetadata = Nothing
}
data V1alpha1Role = V1alpha1Role
{ v1alpha1RoleApiVersion :: !(Maybe Text)
, v1alpha1RoleKind :: !(Maybe Text)
, v1alpha1RoleMetadata :: !(Maybe V1ObjectMeta)
, v1alpha1RoleRules :: !(Maybe [V1alpha1PolicyRule])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1Role where
parseJSON = A.withObject "V1alpha1Role" $ \o ->
V1alpha1Role
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "rules")
instance A.ToJSON V1alpha1Role where
toJSON V1alpha1Role {..} =
_omitNulls
[ "apiVersion" .= v1alpha1RoleApiVersion
, "kind" .= v1alpha1RoleKind
, "metadata" .= v1alpha1RoleMetadata
, "rules" .= v1alpha1RoleRules
]
mkV1alpha1Role
:: V1alpha1Role
mkV1alpha1Role =
V1alpha1Role
{ v1alpha1RoleApiVersion = Nothing
, v1alpha1RoleKind = Nothing
, v1alpha1RoleMetadata = Nothing
, v1alpha1RoleRules = Nothing
}
data V1alpha1RoleBinding = V1alpha1RoleBinding
{ v1alpha1RoleBindingApiVersion :: !(Maybe Text)
, v1alpha1RoleBindingKind :: !(Maybe Text)
, v1alpha1RoleBindingMetadata :: !(Maybe V1ObjectMeta)
, v1alpha1RoleBindingRoleRef :: !(V1alpha1RoleRef)
, v1alpha1RoleBindingSubjects :: !(Maybe [V1alpha1Subject])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1RoleBinding where
parseJSON = A.withObject "V1alpha1RoleBinding" $ \o ->
V1alpha1RoleBinding
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "roleRef")
<*> (o .:? "subjects")
instance A.ToJSON V1alpha1RoleBinding where
toJSON V1alpha1RoleBinding {..} =
_omitNulls
[ "apiVersion" .= v1alpha1RoleBindingApiVersion
, "kind" .= v1alpha1RoleBindingKind
, "metadata" .= v1alpha1RoleBindingMetadata
, "roleRef" .= v1alpha1RoleBindingRoleRef
, "subjects" .= v1alpha1RoleBindingSubjects
]
mkV1alpha1RoleBinding
:: V1alpha1RoleRef
-> V1alpha1RoleBinding
mkV1alpha1RoleBinding v1alpha1RoleBindingRoleRef =
V1alpha1RoleBinding
{ v1alpha1RoleBindingApiVersion = Nothing
, v1alpha1RoleBindingKind = Nothing
, v1alpha1RoleBindingMetadata = Nothing
, v1alpha1RoleBindingRoleRef
, v1alpha1RoleBindingSubjects = Nothing
}
data V1alpha1RoleBindingList = V1alpha1RoleBindingList
{ v1alpha1RoleBindingListApiVersion :: !(Maybe Text)
, v1alpha1RoleBindingListItems :: !([V1alpha1RoleBinding])
, v1alpha1RoleBindingListKind :: !(Maybe Text)
, v1alpha1RoleBindingListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1RoleBindingList where
parseJSON = A.withObject "V1alpha1RoleBindingList" $ \o ->
V1alpha1RoleBindingList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1alpha1RoleBindingList where
toJSON V1alpha1RoleBindingList {..} =
_omitNulls
[ "apiVersion" .= v1alpha1RoleBindingListApiVersion
, "items" .= v1alpha1RoleBindingListItems
, "kind" .= v1alpha1RoleBindingListKind
, "metadata" .= v1alpha1RoleBindingListMetadata
]
mkV1alpha1RoleBindingList
:: [V1alpha1RoleBinding]
-> V1alpha1RoleBindingList
mkV1alpha1RoleBindingList v1alpha1RoleBindingListItems =
V1alpha1RoleBindingList
{ v1alpha1RoleBindingListApiVersion = Nothing
, v1alpha1RoleBindingListItems
, v1alpha1RoleBindingListKind = Nothing
, v1alpha1RoleBindingListMetadata = Nothing
}
data V1alpha1RoleList = V1alpha1RoleList
{ v1alpha1RoleListApiVersion :: !(Maybe Text)
, v1alpha1RoleListItems :: !([V1alpha1Role])
, v1alpha1RoleListKind :: !(Maybe Text)
, v1alpha1RoleListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1RoleList where
parseJSON = A.withObject "V1alpha1RoleList" $ \o ->
V1alpha1RoleList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1alpha1RoleList where
toJSON V1alpha1RoleList {..} =
_omitNulls
[ "apiVersion" .= v1alpha1RoleListApiVersion
, "items" .= v1alpha1RoleListItems
, "kind" .= v1alpha1RoleListKind
, "metadata" .= v1alpha1RoleListMetadata
]
mkV1alpha1RoleList
:: [V1alpha1Role]
-> V1alpha1RoleList
mkV1alpha1RoleList v1alpha1RoleListItems =
V1alpha1RoleList
{ v1alpha1RoleListApiVersion = Nothing
, v1alpha1RoleListItems
, v1alpha1RoleListKind = Nothing
, v1alpha1RoleListMetadata = Nothing
}
data V1alpha1RoleRef = V1alpha1RoleRef
{ v1alpha1RoleRefApiGroup :: !(Text)
, v1alpha1RoleRefKind :: !(Text)
, v1alpha1RoleRefName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1RoleRef where
parseJSON = A.withObject "V1alpha1RoleRef" $ \o ->
V1alpha1RoleRef
<$> (o .: "apiGroup")
<*> (o .: "kind")
<*> (o .: "name")
instance A.ToJSON V1alpha1RoleRef where
toJSON V1alpha1RoleRef {..} =
_omitNulls
[ "apiGroup" .= v1alpha1RoleRefApiGroup
, "kind" .= v1alpha1RoleRefKind
, "name" .= v1alpha1RoleRefName
]
mkV1alpha1RoleRef
:: Text
-> Text
-> Text
-> V1alpha1RoleRef
mkV1alpha1RoleRef v1alpha1RoleRefApiGroup v1alpha1RoleRefKind v1alpha1RoleRefName =
V1alpha1RoleRef
{ v1alpha1RoleRefApiGroup
, v1alpha1RoleRefKind
, v1alpha1RoleRefName
}
data V1alpha1RuntimeClass = V1alpha1RuntimeClass
{ v1alpha1RuntimeClassApiVersion :: !(Maybe Text)
, v1alpha1RuntimeClassKind :: !(Maybe Text)
, v1alpha1RuntimeClassMetadata :: !(Maybe V1ObjectMeta)
, v1alpha1RuntimeClassSpec :: !(V1alpha1RuntimeClassSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1RuntimeClass where
parseJSON = A.withObject "V1alpha1RuntimeClass" $ \o ->
V1alpha1RuntimeClass
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
instance A.ToJSON V1alpha1RuntimeClass where
toJSON V1alpha1RuntimeClass {..} =
_omitNulls
[ "apiVersion" .= v1alpha1RuntimeClassApiVersion
, "kind" .= v1alpha1RuntimeClassKind
, "metadata" .= v1alpha1RuntimeClassMetadata
, "spec" .= v1alpha1RuntimeClassSpec
]
mkV1alpha1RuntimeClass
:: V1alpha1RuntimeClassSpec
-> V1alpha1RuntimeClass
mkV1alpha1RuntimeClass v1alpha1RuntimeClassSpec =
V1alpha1RuntimeClass
{ v1alpha1RuntimeClassApiVersion = Nothing
, v1alpha1RuntimeClassKind = Nothing
, v1alpha1RuntimeClassMetadata = Nothing
, v1alpha1RuntimeClassSpec
}
data V1alpha1RuntimeClassList = V1alpha1RuntimeClassList
{ v1alpha1RuntimeClassListApiVersion :: !(Maybe Text)
, v1alpha1RuntimeClassListItems :: !([V1alpha1RuntimeClass])
, v1alpha1RuntimeClassListKind :: !(Maybe Text)
, v1alpha1RuntimeClassListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1RuntimeClassList where
parseJSON = A.withObject "V1alpha1RuntimeClassList" $ \o ->
V1alpha1RuntimeClassList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1alpha1RuntimeClassList where
toJSON V1alpha1RuntimeClassList {..} =
_omitNulls
[ "apiVersion" .= v1alpha1RuntimeClassListApiVersion
, "items" .= v1alpha1RuntimeClassListItems
, "kind" .= v1alpha1RuntimeClassListKind
, "metadata" .= v1alpha1RuntimeClassListMetadata
]
mkV1alpha1RuntimeClassList
:: [V1alpha1RuntimeClass]
-> V1alpha1RuntimeClassList
mkV1alpha1RuntimeClassList v1alpha1RuntimeClassListItems =
V1alpha1RuntimeClassList
{ v1alpha1RuntimeClassListApiVersion = Nothing
, v1alpha1RuntimeClassListItems
, v1alpha1RuntimeClassListKind = Nothing
, v1alpha1RuntimeClassListMetadata = Nothing
}
data V1alpha1RuntimeClassSpec = V1alpha1RuntimeClassSpec
{ v1alpha1RuntimeClassSpecRuntimeHandler :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1RuntimeClassSpec where
parseJSON = A.withObject "V1alpha1RuntimeClassSpec" $ \o ->
V1alpha1RuntimeClassSpec
<$> (o .: "runtimeHandler")
instance A.ToJSON V1alpha1RuntimeClassSpec where
toJSON V1alpha1RuntimeClassSpec {..} =
_omitNulls
[ "runtimeHandler" .= v1alpha1RuntimeClassSpecRuntimeHandler
]
mkV1alpha1RuntimeClassSpec
:: Text
-> V1alpha1RuntimeClassSpec
mkV1alpha1RuntimeClassSpec v1alpha1RuntimeClassSpecRuntimeHandler =
V1alpha1RuntimeClassSpec
{ v1alpha1RuntimeClassSpecRuntimeHandler
}
data V1alpha1ServiceReference = V1alpha1ServiceReference
{ v1alpha1ServiceReferenceName :: !(Text)
, v1alpha1ServiceReferenceNamespace :: !(Text)
, v1alpha1ServiceReferencePath :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1ServiceReference where
parseJSON = A.withObject "V1alpha1ServiceReference" $ \o ->
V1alpha1ServiceReference
<$> (o .: "name")
<*> (o .: "namespace")
<*> (o .:? "path")
instance A.ToJSON V1alpha1ServiceReference where
toJSON V1alpha1ServiceReference {..} =
_omitNulls
[ "name" .= v1alpha1ServiceReferenceName
, "namespace" .= v1alpha1ServiceReferenceNamespace
, "path" .= v1alpha1ServiceReferencePath
]
mkV1alpha1ServiceReference
:: Text
-> Text
-> V1alpha1ServiceReference
mkV1alpha1ServiceReference v1alpha1ServiceReferenceName v1alpha1ServiceReferenceNamespace =
V1alpha1ServiceReference
{ v1alpha1ServiceReferenceName
, v1alpha1ServiceReferenceNamespace
, v1alpha1ServiceReferencePath = Nothing
}
data V1alpha1Subject = V1alpha1Subject
{ v1alpha1SubjectApiVersion :: !(Maybe Text)
, v1alpha1SubjectKind :: !(Text)
, v1alpha1SubjectName :: !(Text)
, v1alpha1SubjectNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1Subject where
parseJSON = A.withObject "V1alpha1Subject" $ \o ->
V1alpha1Subject
<$> (o .:? "apiVersion")
<*> (o .: "kind")
<*> (o .: "name")
<*> (o .:? "namespace")
instance A.ToJSON V1alpha1Subject where
toJSON V1alpha1Subject {..} =
_omitNulls
[ "apiVersion" .= v1alpha1SubjectApiVersion
, "kind" .= v1alpha1SubjectKind
, "name" .= v1alpha1SubjectName
, "namespace" .= v1alpha1SubjectNamespace
]
mkV1alpha1Subject
:: Text
-> Text
-> V1alpha1Subject
mkV1alpha1Subject v1alpha1SubjectKind v1alpha1SubjectName =
V1alpha1Subject
{ v1alpha1SubjectApiVersion = Nothing
, v1alpha1SubjectKind
, v1alpha1SubjectName
, v1alpha1SubjectNamespace = Nothing
}
data V1alpha1VolumeAttachment = V1alpha1VolumeAttachment
{ v1alpha1VolumeAttachmentApiVersion :: !(Maybe Text)
, v1alpha1VolumeAttachmentKind :: !(Maybe Text)
, v1alpha1VolumeAttachmentMetadata :: !(Maybe V1ObjectMeta)
, v1alpha1VolumeAttachmentSpec :: !(V1alpha1VolumeAttachmentSpec)
, v1alpha1VolumeAttachmentStatus :: !(Maybe V1alpha1VolumeAttachmentStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1VolumeAttachment where
parseJSON = A.withObject "V1alpha1VolumeAttachment" $ \o ->
V1alpha1VolumeAttachment
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1alpha1VolumeAttachment where
toJSON V1alpha1VolumeAttachment {..} =
_omitNulls
[ "apiVersion" .= v1alpha1VolumeAttachmentApiVersion
, "kind" .= v1alpha1VolumeAttachmentKind
, "metadata" .= v1alpha1VolumeAttachmentMetadata
, "spec" .= v1alpha1VolumeAttachmentSpec
, "status" .= v1alpha1VolumeAttachmentStatus
]
mkV1alpha1VolumeAttachment
:: V1alpha1VolumeAttachmentSpec
-> V1alpha1VolumeAttachment
mkV1alpha1VolumeAttachment v1alpha1VolumeAttachmentSpec =
V1alpha1VolumeAttachment
{ v1alpha1VolumeAttachmentApiVersion = Nothing
, v1alpha1VolumeAttachmentKind = Nothing
, v1alpha1VolumeAttachmentMetadata = Nothing
, v1alpha1VolumeAttachmentSpec
, v1alpha1VolumeAttachmentStatus = Nothing
}
data V1alpha1VolumeAttachmentList = V1alpha1VolumeAttachmentList
{ v1alpha1VolumeAttachmentListApiVersion :: !(Maybe Text)
, v1alpha1VolumeAttachmentListItems :: !([V1alpha1VolumeAttachment])
, v1alpha1VolumeAttachmentListKind :: !(Maybe Text)
, v1alpha1VolumeAttachmentListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1VolumeAttachmentList where
parseJSON = A.withObject "V1alpha1VolumeAttachmentList" $ \o ->
V1alpha1VolumeAttachmentList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1alpha1VolumeAttachmentList where
toJSON V1alpha1VolumeAttachmentList {..} =
_omitNulls
[ "apiVersion" .= v1alpha1VolumeAttachmentListApiVersion
, "items" .= v1alpha1VolumeAttachmentListItems
, "kind" .= v1alpha1VolumeAttachmentListKind
, "metadata" .= v1alpha1VolumeAttachmentListMetadata
]
mkV1alpha1VolumeAttachmentList
:: [V1alpha1VolumeAttachment]
-> V1alpha1VolumeAttachmentList
mkV1alpha1VolumeAttachmentList v1alpha1VolumeAttachmentListItems =
V1alpha1VolumeAttachmentList
{ v1alpha1VolumeAttachmentListApiVersion = Nothing
, v1alpha1VolumeAttachmentListItems
, v1alpha1VolumeAttachmentListKind = Nothing
, v1alpha1VolumeAttachmentListMetadata = Nothing
}
data V1alpha1VolumeAttachmentSource = V1alpha1VolumeAttachmentSource
{ v1alpha1VolumeAttachmentSourcePersistentVolumeName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1VolumeAttachmentSource where
parseJSON = A.withObject "V1alpha1VolumeAttachmentSource" $ \o ->
V1alpha1VolumeAttachmentSource
<$> (o .:? "persistentVolumeName")
instance A.ToJSON V1alpha1VolumeAttachmentSource where
toJSON V1alpha1VolumeAttachmentSource {..} =
_omitNulls
[ "persistentVolumeName" .= v1alpha1VolumeAttachmentSourcePersistentVolumeName
]
mkV1alpha1VolumeAttachmentSource
:: V1alpha1VolumeAttachmentSource
mkV1alpha1VolumeAttachmentSource =
V1alpha1VolumeAttachmentSource
{ v1alpha1VolumeAttachmentSourcePersistentVolumeName = Nothing
}
data V1alpha1VolumeAttachmentSpec = V1alpha1VolumeAttachmentSpec
{ v1alpha1VolumeAttachmentSpecAttacher :: !(Text)
, v1alpha1VolumeAttachmentSpecNodeName :: !(Text)
, v1alpha1VolumeAttachmentSpecSource :: !(V1alpha1VolumeAttachmentSource)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1VolumeAttachmentSpec where
parseJSON = A.withObject "V1alpha1VolumeAttachmentSpec" $ \o ->
V1alpha1VolumeAttachmentSpec
<$> (o .: "attacher")
<*> (o .: "nodeName")
<*> (o .: "source")
instance A.ToJSON V1alpha1VolumeAttachmentSpec where
toJSON V1alpha1VolumeAttachmentSpec {..} =
_omitNulls
[ "attacher" .= v1alpha1VolumeAttachmentSpecAttacher
, "nodeName" .= v1alpha1VolumeAttachmentSpecNodeName
, "source" .= v1alpha1VolumeAttachmentSpecSource
]
mkV1alpha1VolumeAttachmentSpec
:: Text
-> Text
-> V1alpha1VolumeAttachmentSource
-> V1alpha1VolumeAttachmentSpec
mkV1alpha1VolumeAttachmentSpec v1alpha1VolumeAttachmentSpecAttacher v1alpha1VolumeAttachmentSpecNodeName v1alpha1VolumeAttachmentSpecSource =
V1alpha1VolumeAttachmentSpec
{ v1alpha1VolumeAttachmentSpecAttacher
, v1alpha1VolumeAttachmentSpecNodeName
, v1alpha1VolumeAttachmentSpecSource
}
data V1alpha1VolumeAttachmentStatus = V1alpha1VolumeAttachmentStatus
{ v1alpha1VolumeAttachmentStatusAttachError :: !(Maybe V1alpha1VolumeError)
, v1alpha1VolumeAttachmentStatusAttached :: !(Bool)
, v1alpha1VolumeAttachmentStatusAttachmentMetadata :: !(Maybe (Map.Map String Text))
, v1alpha1VolumeAttachmentStatusDetachError :: !(Maybe V1alpha1VolumeError)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1VolumeAttachmentStatus where
parseJSON = A.withObject "V1alpha1VolumeAttachmentStatus" $ \o ->
V1alpha1VolumeAttachmentStatus
<$> (o .:? "attachError")
<*> (o .: "attached")
<*> (o .:? "attachmentMetadata")
<*> (o .:? "detachError")
instance A.ToJSON V1alpha1VolumeAttachmentStatus where
toJSON V1alpha1VolumeAttachmentStatus {..} =
_omitNulls
[ "attachError" .= v1alpha1VolumeAttachmentStatusAttachError
, "attached" .= v1alpha1VolumeAttachmentStatusAttached
, "attachmentMetadata" .= v1alpha1VolumeAttachmentStatusAttachmentMetadata
, "detachError" .= v1alpha1VolumeAttachmentStatusDetachError
]
mkV1alpha1VolumeAttachmentStatus
:: Bool
-> V1alpha1VolumeAttachmentStatus
mkV1alpha1VolumeAttachmentStatus v1alpha1VolumeAttachmentStatusAttached =
V1alpha1VolumeAttachmentStatus
{ v1alpha1VolumeAttachmentStatusAttachError = Nothing
, v1alpha1VolumeAttachmentStatusAttached
, v1alpha1VolumeAttachmentStatusAttachmentMetadata = Nothing
, v1alpha1VolumeAttachmentStatusDetachError = Nothing
}
data V1alpha1VolumeError = V1alpha1VolumeError
{ v1alpha1VolumeErrorMessage :: !(Maybe Text)
, v1alpha1VolumeErrorTime :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1VolumeError where
parseJSON = A.withObject "V1alpha1VolumeError" $ \o ->
V1alpha1VolumeError
<$> (o .:? "message")
<*> (o .:? "time")
instance A.ToJSON V1alpha1VolumeError where
toJSON V1alpha1VolumeError {..} =
_omitNulls
[ "message" .= v1alpha1VolumeErrorMessage
, "time" .= v1alpha1VolumeErrorTime
]
mkV1alpha1VolumeError
:: V1alpha1VolumeError
mkV1alpha1VolumeError =
V1alpha1VolumeError
{ v1alpha1VolumeErrorMessage = Nothing
, v1alpha1VolumeErrorTime = Nothing
}
data V1alpha1Webhook = V1alpha1Webhook
{ v1alpha1WebhookClientConfig :: !(V1alpha1WebhookClientConfig)
, v1alpha1WebhookThrottle :: !(Maybe V1alpha1WebhookThrottleConfig)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1Webhook where
parseJSON = A.withObject "V1alpha1Webhook" $ \o ->
V1alpha1Webhook
<$> (o .: "clientConfig")
<*> (o .:? "throttle")
instance A.ToJSON V1alpha1Webhook where
toJSON V1alpha1Webhook {..} =
_omitNulls
[ "clientConfig" .= v1alpha1WebhookClientConfig
, "throttle" .= v1alpha1WebhookThrottle
]
mkV1alpha1Webhook
:: V1alpha1WebhookClientConfig
-> V1alpha1Webhook
mkV1alpha1Webhook v1alpha1WebhookClientConfig =
V1alpha1Webhook
{ v1alpha1WebhookClientConfig
, v1alpha1WebhookThrottle = Nothing
}
data V1alpha1WebhookClientConfig = V1alpha1WebhookClientConfig
{ v1alpha1WebhookClientConfigCaBundle :: !(Maybe ByteArray)
, v1alpha1WebhookClientConfigService :: !(Maybe V1alpha1ServiceReference)
, v1alpha1WebhookClientConfigUrl :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1WebhookClientConfig where
parseJSON = A.withObject "V1alpha1WebhookClientConfig" $ \o ->
V1alpha1WebhookClientConfig
<$> (o .:? "caBundle")
<*> (o .:? "service")
<*> (o .:? "url")
instance A.ToJSON V1alpha1WebhookClientConfig where
toJSON V1alpha1WebhookClientConfig {..} =
_omitNulls
[ "caBundle" .= v1alpha1WebhookClientConfigCaBundle
, "service" .= v1alpha1WebhookClientConfigService
, "url" .= v1alpha1WebhookClientConfigUrl
]
mkV1alpha1WebhookClientConfig
:: V1alpha1WebhookClientConfig
mkV1alpha1WebhookClientConfig =
V1alpha1WebhookClientConfig
{ v1alpha1WebhookClientConfigCaBundle = Nothing
, v1alpha1WebhookClientConfigService = Nothing
, v1alpha1WebhookClientConfigUrl = Nothing
}
data V1alpha1WebhookThrottleConfig = V1alpha1WebhookThrottleConfig
{ v1alpha1WebhookThrottleConfigBurst :: !(Maybe Integer)
, v1alpha1WebhookThrottleConfigQps :: !(Maybe Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1alpha1WebhookThrottleConfig where
parseJSON = A.withObject "V1alpha1WebhookThrottleConfig" $ \o ->
V1alpha1WebhookThrottleConfig
<$> (o .:? "burst")
<*> (o .:? "qps")
instance A.ToJSON V1alpha1WebhookThrottleConfig where
toJSON V1alpha1WebhookThrottleConfig {..} =
_omitNulls
[ "burst" .= v1alpha1WebhookThrottleConfigBurst
, "qps" .= v1alpha1WebhookThrottleConfigQps
]
mkV1alpha1WebhookThrottleConfig
:: V1alpha1WebhookThrottleConfig
mkV1alpha1WebhookThrottleConfig =
V1alpha1WebhookThrottleConfig
{ v1alpha1WebhookThrottleConfigBurst = Nothing
, v1alpha1WebhookThrottleConfigQps = Nothing
}
data V1beta1APIService = V1beta1APIService
{ v1beta1APIServiceApiVersion :: !(Maybe Text)
, v1beta1APIServiceKind :: !(Maybe Text)
, v1beta1APIServiceMetadata :: !(Maybe V1ObjectMeta)
, v1beta1APIServiceSpec :: !(Maybe V1beta1APIServiceSpec)
, v1beta1APIServiceStatus :: !(Maybe V1beta1APIServiceStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1APIService where
parseJSON = A.withObject "V1beta1APIService" $ \o ->
V1beta1APIService
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1APIService where
toJSON V1beta1APIService {..} =
_omitNulls
[ "apiVersion" .= v1beta1APIServiceApiVersion
, "kind" .= v1beta1APIServiceKind
, "metadata" .= v1beta1APIServiceMetadata
, "spec" .= v1beta1APIServiceSpec
, "status" .= v1beta1APIServiceStatus
]
mkV1beta1APIService
:: V1beta1APIService
mkV1beta1APIService =
V1beta1APIService
{ v1beta1APIServiceApiVersion = Nothing
, v1beta1APIServiceKind = Nothing
, v1beta1APIServiceMetadata = Nothing
, v1beta1APIServiceSpec = Nothing
, v1beta1APIServiceStatus = Nothing
}
data V1beta1APIServiceCondition = V1beta1APIServiceCondition
{ v1beta1APIServiceConditionLastTransitionTime :: !(Maybe DateTime)
, v1beta1APIServiceConditionMessage :: !(Maybe Text)
, v1beta1APIServiceConditionReason :: !(Maybe Text)
, v1beta1APIServiceConditionStatus :: !(Text)
, v1beta1APIServiceConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1APIServiceCondition where
parseJSON = A.withObject "V1beta1APIServiceCondition" $ \o ->
V1beta1APIServiceCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1beta1APIServiceCondition where
toJSON V1beta1APIServiceCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1beta1APIServiceConditionLastTransitionTime
, "message" .= v1beta1APIServiceConditionMessage
, "reason" .= v1beta1APIServiceConditionReason
, "status" .= v1beta1APIServiceConditionStatus
, "type" .= v1beta1APIServiceConditionType
]
mkV1beta1APIServiceCondition
:: Text
-> Text
-> V1beta1APIServiceCondition
mkV1beta1APIServiceCondition v1beta1APIServiceConditionStatus v1beta1APIServiceConditionType =
V1beta1APIServiceCondition
{ v1beta1APIServiceConditionLastTransitionTime = Nothing
, v1beta1APIServiceConditionMessage = Nothing
, v1beta1APIServiceConditionReason = Nothing
, v1beta1APIServiceConditionStatus
, v1beta1APIServiceConditionType
}
data V1beta1APIServiceList = V1beta1APIServiceList
{ v1beta1APIServiceListApiVersion :: !(Maybe Text)
, v1beta1APIServiceListItems :: !([V1beta1APIService])
, v1beta1APIServiceListKind :: !(Maybe Text)
, v1beta1APIServiceListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1APIServiceList where
parseJSON = A.withObject "V1beta1APIServiceList" $ \o ->
V1beta1APIServiceList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1APIServiceList where
toJSON V1beta1APIServiceList {..} =
_omitNulls
[ "apiVersion" .= v1beta1APIServiceListApiVersion
, "items" .= v1beta1APIServiceListItems
, "kind" .= v1beta1APIServiceListKind
, "metadata" .= v1beta1APIServiceListMetadata
]
mkV1beta1APIServiceList
:: [V1beta1APIService]
-> V1beta1APIServiceList
mkV1beta1APIServiceList v1beta1APIServiceListItems =
V1beta1APIServiceList
{ v1beta1APIServiceListApiVersion = Nothing
, v1beta1APIServiceListItems
, v1beta1APIServiceListKind = Nothing
, v1beta1APIServiceListMetadata = Nothing
}
data V1beta1APIServiceSpec = V1beta1APIServiceSpec
{ v1beta1APIServiceSpecCaBundle :: !(Maybe ByteArray)
, v1beta1APIServiceSpecGroup :: !(Maybe Text)
, v1beta1APIServiceSpecGroupPriorityMinimum :: !(Int)
, v1beta1APIServiceSpecInsecureSkipTlsVerify :: !(Maybe Bool)
, v1beta1APIServiceSpecService :: !(ApiregistrationV1beta1ServiceReference)
, v1beta1APIServiceSpecVersion :: !(Maybe Text)
, v1beta1APIServiceSpecVersionPriority :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1APIServiceSpec where
parseJSON = A.withObject "V1beta1APIServiceSpec" $ \o ->
V1beta1APIServiceSpec
<$> (o .:? "caBundle")
<*> (o .:? "group")
<*> (o .: "groupPriorityMinimum")
<*> (o .:? "insecureSkipTLSVerify")
<*> (o .: "service")
<*> (o .:? "version")
<*> (o .: "versionPriority")
instance A.ToJSON V1beta1APIServiceSpec where
toJSON V1beta1APIServiceSpec {..} =
_omitNulls
[ "caBundle" .= v1beta1APIServiceSpecCaBundle
, "group" .= v1beta1APIServiceSpecGroup
, "groupPriorityMinimum" .= v1beta1APIServiceSpecGroupPriorityMinimum
, "insecureSkipTLSVerify" .= v1beta1APIServiceSpecInsecureSkipTlsVerify
, "service" .= v1beta1APIServiceSpecService
, "version" .= v1beta1APIServiceSpecVersion
, "versionPriority" .= v1beta1APIServiceSpecVersionPriority
]
mkV1beta1APIServiceSpec
:: Int
-> ApiregistrationV1beta1ServiceReference
-> Int
-> V1beta1APIServiceSpec
mkV1beta1APIServiceSpec v1beta1APIServiceSpecGroupPriorityMinimum v1beta1APIServiceSpecService v1beta1APIServiceSpecVersionPriority =
V1beta1APIServiceSpec
{ v1beta1APIServiceSpecCaBundle = Nothing
, v1beta1APIServiceSpecGroup = Nothing
, v1beta1APIServiceSpecGroupPriorityMinimum
, v1beta1APIServiceSpecInsecureSkipTlsVerify = Nothing
, v1beta1APIServiceSpecService
, v1beta1APIServiceSpecVersion = Nothing
, v1beta1APIServiceSpecVersionPriority
}
data V1beta1APIServiceStatus = V1beta1APIServiceStatus
{ v1beta1APIServiceStatusConditions :: !(Maybe [V1beta1APIServiceCondition])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1APIServiceStatus where
parseJSON = A.withObject "V1beta1APIServiceStatus" $ \o ->
V1beta1APIServiceStatus
<$> (o .:? "conditions")
instance A.ToJSON V1beta1APIServiceStatus where
toJSON V1beta1APIServiceStatus {..} =
_omitNulls
[ "conditions" .= v1beta1APIServiceStatusConditions
]
mkV1beta1APIServiceStatus
:: V1beta1APIServiceStatus
mkV1beta1APIServiceStatus =
V1beta1APIServiceStatus
{ v1beta1APIServiceStatusConditions = Nothing
}
data V1beta1AggregationRule = V1beta1AggregationRule
{ v1beta1AggregationRuleClusterRoleSelectors :: !(Maybe [V1LabelSelector])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1AggregationRule where
parseJSON = A.withObject "V1beta1AggregationRule" $ \o ->
V1beta1AggregationRule
<$> (o .:? "clusterRoleSelectors")
instance A.ToJSON V1beta1AggregationRule where
toJSON V1beta1AggregationRule {..} =
_omitNulls
[ "clusterRoleSelectors" .= v1beta1AggregationRuleClusterRoleSelectors
]
mkV1beta1AggregationRule
:: V1beta1AggregationRule
mkV1beta1AggregationRule =
V1beta1AggregationRule
{ v1beta1AggregationRuleClusterRoleSelectors = Nothing
}
data V1beta1CSIDriver = V1beta1CSIDriver
{ v1beta1CSIDriverApiVersion :: !(Maybe Text)
, v1beta1CSIDriverKind :: !(Maybe Text)
, v1beta1CSIDriverMetadata :: !(Maybe V1ObjectMeta)
, v1beta1CSIDriverSpec :: !(V1beta1CSIDriverSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CSIDriver where
parseJSON = A.withObject "V1beta1CSIDriver" $ \o ->
V1beta1CSIDriver
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
instance A.ToJSON V1beta1CSIDriver where
toJSON V1beta1CSIDriver {..} =
_omitNulls
[ "apiVersion" .= v1beta1CSIDriverApiVersion
, "kind" .= v1beta1CSIDriverKind
, "metadata" .= v1beta1CSIDriverMetadata
, "spec" .= v1beta1CSIDriverSpec
]
mkV1beta1CSIDriver
:: V1beta1CSIDriverSpec
-> V1beta1CSIDriver
mkV1beta1CSIDriver v1beta1CSIDriverSpec =
V1beta1CSIDriver
{ v1beta1CSIDriverApiVersion = Nothing
, v1beta1CSIDriverKind = Nothing
, v1beta1CSIDriverMetadata = Nothing
, v1beta1CSIDriverSpec
}
data V1beta1CSIDriverList = V1beta1CSIDriverList
{ v1beta1CSIDriverListApiVersion :: !(Maybe Text)
, v1beta1CSIDriverListItems :: !([V1beta1CSIDriver])
, v1beta1CSIDriverListKind :: !(Maybe Text)
, v1beta1CSIDriverListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CSIDriverList where
parseJSON = A.withObject "V1beta1CSIDriverList" $ \o ->
V1beta1CSIDriverList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1CSIDriverList where
toJSON V1beta1CSIDriverList {..} =
_omitNulls
[ "apiVersion" .= v1beta1CSIDriverListApiVersion
, "items" .= v1beta1CSIDriverListItems
, "kind" .= v1beta1CSIDriverListKind
, "metadata" .= v1beta1CSIDriverListMetadata
]
mkV1beta1CSIDriverList
:: [V1beta1CSIDriver]
-> V1beta1CSIDriverList
mkV1beta1CSIDriverList v1beta1CSIDriverListItems =
V1beta1CSIDriverList
{ v1beta1CSIDriverListApiVersion = Nothing
, v1beta1CSIDriverListItems
, v1beta1CSIDriverListKind = Nothing
, v1beta1CSIDriverListMetadata = Nothing
}
data V1beta1CSIDriverSpec = V1beta1CSIDriverSpec
{ v1beta1CSIDriverSpecAttachRequired :: !(Maybe Bool)
, v1beta1CSIDriverSpecPodInfoOnMount :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CSIDriverSpec where
parseJSON = A.withObject "V1beta1CSIDriverSpec" $ \o ->
V1beta1CSIDriverSpec
<$> (o .:? "attachRequired")
<*> (o .:? "podInfoOnMount")
instance A.ToJSON V1beta1CSIDriverSpec where
toJSON V1beta1CSIDriverSpec {..} =
_omitNulls
[ "attachRequired" .= v1beta1CSIDriverSpecAttachRequired
, "podInfoOnMount" .= v1beta1CSIDriverSpecPodInfoOnMount
]
mkV1beta1CSIDriverSpec
:: V1beta1CSIDriverSpec
mkV1beta1CSIDriverSpec =
V1beta1CSIDriverSpec
{ v1beta1CSIDriverSpecAttachRequired = Nothing
, v1beta1CSIDriverSpecPodInfoOnMount = Nothing
}
data V1beta1CSINode = V1beta1CSINode
{ v1beta1CSINodeApiVersion :: !(Maybe Text)
, v1beta1CSINodeKind :: !(Maybe Text)
, v1beta1CSINodeMetadata :: !(Maybe V1ObjectMeta)
, v1beta1CSINodeSpec :: !(V1beta1CSINodeSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CSINode where
parseJSON = A.withObject "V1beta1CSINode" $ \o ->
V1beta1CSINode
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
instance A.ToJSON V1beta1CSINode where
toJSON V1beta1CSINode {..} =
_omitNulls
[ "apiVersion" .= v1beta1CSINodeApiVersion
, "kind" .= v1beta1CSINodeKind
, "metadata" .= v1beta1CSINodeMetadata
, "spec" .= v1beta1CSINodeSpec
]
mkV1beta1CSINode
:: V1beta1CSINodeSpec
-> V1beta1CSINode
mkV1beta1CSINode v1beta1CSINodeSpec =
V1beta1CSINode
{ v1beta1CSINodeApiVersion = Nothing
, v1beta1CSINodeKind = Nothing
, v1beta1CSINodeMetadata = Nothing
, v1beta1CSINodeSpec
}
data V1beta1CSINodeDriver = V1beta1CSINodeDriver
{ v1beta1CSINodeDriverName :: !(Text)
, v1beta1CSINodeDriverNodeId :: !(Text)
, v1beta1CSINodeDriverTopologyKeys :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CSINodeDriver where
parseJSON = A.withObject "V1beta1CSINodeDriver" $ \o ->
V1beta1CSINodeDriver
<$> (o .: "name")
<*> (o .: "nodeID")
<*> (o .:? "topologyKeys")
instance A.ToJSON V1beta1CSINodeDriver where
toJSON V1beta1CSINodeDriver {..} =
_omitNulls
[ "name" .= v1beta1CSINodeDriverName
, "nodeID" .= v1beta1CSINodeDriverNodeId
, "topologyKeys" .= v1beta1CSINodeDriverTopologyKeys
]
mkV1beta1CSINodeDriver
:: Text
-> Text
-> V1beta1CSINodeDriver
mkV1beta1CSINodeDriver v1beta1CSINodeDriverName v1beta1CSINodeDriverNodeId =
V1beta1CSINodeDriver
{ v1beta1CSINodeDriverName
, v1beta1CSINodeDriverNodeId
, v1beta1CSINodeDriverTopologyKeys = Nothing
}
data V1beta1CSINodeList = V1beta1CSINodeList
{ v1beta1CSINodeListApiVersion :: !(Maybe Text)
, v1beta1CSINodeListItems :: !([V1beta1CSINode])
, v1beta1CSINodeListKind :: !(Maybe Text)
, v1beta1CSINodeListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CSINodeList where
parseJSON = A.withObject "V1beta1CSINodeList" $ \o ->
V1beta1CSINodeList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1CSINodeList where
toJSON V1beta1CSINodeList {..} =
_omitNulls
[ "apiVersion" .= v1beta1CSINodeListApiVersion
, "items" .= v1beta1CSINodeListItems
, "kind" .= v1beta1CSINodeListKind
, "metadata" .= v1beta1CSINodeListMetadata
]
mkV1beta1CSINodeList
:: [V1beta1CSINode]
-> V1beta1CSINodeList
mkV1beta1CSINodeList v1beta1CSINodeListItems =
V1beta1CSINodeList
{ v1beta1CSINodeListApiVersion = Nothing
, v1beta1CSINodeListItems
, v1beta1CSINodeListKind = Nothing
, v1beta1CSINodeListMetadata = Nothing
}
data V1beta1CSINodeSpec = V1beta1CSINodeSpec
{ v1beta1CSINodeSpecDrivers :: !([V1beta1CSINodeDriver])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CSINodeSpec where
parseJSON = A.withObject "V1beta1CSINodeSpec" $ \o ->
V1beta1CSINodeSpec
<$> (o .: "drivers")
instance A.ToJSON V1beta1CSINodeSpec where
toJSON V1beta1CSINodeSpec {..} =
_omitNulls
[ "drivers" .= v1beta1CSINodeSpecDrivers
]
mkV1beta1CSINodeSpec
:: [V1beta1CSINodeDriver]
-> V1beta1CSINodeSpec
mkV1beta1CSINodeSpec v1beta1CSINodeSpecDrivers =
V1beta1CSINodeSpec
{ v1beta1CSINodeSpecDrivers
}
data V1beta1CertificateSigningRequest = V1beta1CertificateSigningRequest
{ v1beta1CertificateSigningRequestApiVersion :: !(Maybe Text)
, v1beta1CertificateSigningRequestKind :: !(Maybe Text)
, v1beta1CertificateSigningRequestMetadata :: !(Maybe V1ObjectMeta)
, v1beta1CertificateSigningRequestSpec :: !(Maybe V1beta1CertificateSigningRequestSpec)
, v1beta1CertificateSigningRequestStatus :: !(Maybe V1beta1CertificateSigningRequestStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CertificateSigningRequest where
parseJSON = A.withObject "V1beta1CertificateSigningRequest" $ \o ->
V1beta1CertificateSigningRequest
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1CertificateSigningRequest where
toJSON V1beta1CertificateSigningRequest {..} =
_omitNulls
[ "apiVersion" .= v1beta1CertificateSigningRequestApiVersion
, "kind" .= v1beta1CertificateSigningRequestKind
, "metadata" .= v1beta1CertificateSigningRequestMetadata
, "spec" .= v1beta1CertificateSigningRequestSpec
, "status" .= v1beta1CertificateSigningRequestStatus
]
mkV1beta1CertificateSigningRequest
:: V1beta1CertificateSigningRequest
mkV1beta1CertificateSigningRequest =
V1beta1CertificateSigningRequest
{ v1beta1CertificateSigningRequestApiVersion = Nothing
, v1beta1CertificateSigningRequestKind = Nothing
, v1beta1CertificateSigningRequestMetadata = Nothing
, v1beta1CertificateSigningRequestSpec = Nothing
, v1beta1CertificateSigningRequestStatus = Nothing
}
data V1beta1CertificateSigningRequestCondition = V1beta1CertificateSigningRequestCondition
{ v1beta1CertificateSigningRequestConditionLastUpdateTime :: !(Maybe DateTime)
, v1beta1CertificateSigningRequestConditionMessage :: !(Maybe Text)
, v1beta1CertificateSigningRequestConditionReason :: !(Maybe Text)
, v1beta1CertificateSigningRequestConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CertificateSigningRequestCondition where
parseJSON = A.withObject "V1beta1CertificateSigningRequestCondition" $ \o ->
V1beta1CertificateSigningRequestCondition
<$> (o .:? "lastUpdateTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "type")
instance A.ToJSON V1beta1CertificateSigningRequestCondition where
toJSON V1beta1CertificateSigningRequestCondition {..} =
_omitNulls
[ "lastUpdateTime" .= v1beta1CertificateSigningRequestConditionLastUpdateTime
, "message" .= v1beta1CertificateSigningRequestConditionMessage
, "reason" .= v1beta1CertificateSigningRequestConditionReason
, "type" .= v1beta1CertificateSigningRequestConditionType
]
mkV1beta1CertificateSigningRequestCondition
:: Text
-> V1beta1CertificateSigningRequestCondition
mkV1beta1CertificateSigningRequestCondition v1beta1CertificateSigningRequestConditionType =
V1beta1CertificateSigningRequestCondition
{ v1beta1CertificateSigningRequestConditionLastUpdateTime = Nothing
, v1beta1CertificateSigningRequestConditionMessage = Nothing
, v1beta1CertificateSigningRequestConditionReason = Nothing
, v1beta1CertificateSigningRequestConditionType
}
data V1beta1CertificateSigningRequestList = V1beta1CertificateSigningRequestList
{ v1beta1CertificateSigningRequestListApiVersion :: !(Maybe Text)
, v1beta1CertificateSigningRequestListItems :: !([V1beta1CertificateSigningRequest])
, v1beta1CertificateSigningRequestListKind :: !(Maybe Text)
, v1beta1CertificateSigningRequestListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CertificateSigningRequestList where
parseJSON = A.withObject "V1beta1CertificateSigningRequestList" $ \o ->
V1beta1CertificateSigningRequestList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1CertificateSigningRequestList where
toJSON V1beta1CertificateSigningRequestList {..} =
_omitNulls
[ "apiVersion" .= v1beta1CertificateSigningRequestListApiVersion
, "items" .= v1beta1CertificateSigningRequestListItems
, "kind" .= v1beta1CertificateSigningRequestListKind
, "metadata" .= v1beta1CertificateSigningRequestListMetadata
]
mkV1beta1CertificateSigningRequestList
:: [V1beta1CertificateSigningRequest]
-> V1beta1CertificateSigningRequestList
mkV1beta1CertificateSigningRequestList v1beta1CertificateSigningRequestListItems =
V1beta1CertificateSigningRequestList
{ v1beta1CertificateSigningRequestListApiVersion = Nothing
, v1beta1CertificateSigningRequestListItems
, v1beta1CertificateSigningRequestListKind = Nothing
, v1beta1CertificateSigningRequestListMetadata = Nothing
}
data V1beta1CertificateSigningRequestSpec = V1beta1CertificateSigningRequestSpec
{ v1beta1CertificateSigningRequestSpecExtra :: !(Maybe (Map.Map String [Text]))
, v1beta1CertificateSigningRequestSpecGroups :: !(Maybe [Text])
, v1beta1CertificateSigningRequestSpecRequest :: !(ByteArray)
, v1beta1CertificateSigningRequestSpecUid :: !(Maybe Text)
, v1beta1CertificateSigningRequestSpecUsages :: !(Maybe [Text])
, v1beta1CertificateSigningRequestSpecUsername :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CertificateSigningRequestSpec where
parseJSON = A.withObject "V1beta1CertificateSigningRequestSpec" $ \o ->
V1beta1CertificateSigningRequestSpec
<$> (o .:? "extra")
<*> (o .:? "groups")
<*> (o .: "request")
<*> (o .:? "uid")
<*> (o .:? "usages")
<*> (o .:? "username")
instance A.ToJSON V1beta1CertificateSigningRequestSpec where
toJSON V1beta1CertificateSigningRequestSpec {..} =
_omitNulls
[ "extra" .= v1beta1CertificateSigningRequestSpecExtra
, "groups" .= v1beta1CertificateSigningRequestSpecGroups
, "request" .= v1beta1CertificateSigningRequestSpecRequest
, "uid" .= v1beta1CertificateSigningRequestSpecUid
, "usages" .= v1beta1CertificateSigningRequestSpecUsages
, "username" .= v1beta1CertificateSigningRequestSpecUsername
]
mkV1beta1CertificateSigningRequestSpec
:: ByteArray
-> V1beta1CertificateSigningRequestSpec
mkV1beta1CertificateSigningRequestSpec v1beta1CertificateSigningRequestSpecRequest =
V1beta1CertificateSigningRequestSpec
{ v1beta1CertificateSigningRequestSpecExtra = Nothing
, v1beta1CertificateSigningRequestSpecGroups = Nothing
, v1beta1CertificateSigningRequestSpecRequest
, v1beta1CertificateSigningRequestSpecUid = Nothing
, v1beta1CertificateSigningRequestSpecUsages = Nothing
, v1beta1CertificateSigningRequestSpecUsername = Nothing
}
data V1beta1CertificateSigningRequestStatus = V1beta1CertificateSigningRequestStatus
{ v1beta1CertificateSigningRequestStatusCertificate :: !(Maybe ByteArray)
, v1beta1CertificateSigningRequestStatusConditions :: !(Maybe [V1beta1CertificateSigningRequestCondition])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CertificateSigningRequestStatus where
parseJSON = A.withObject "V1beta1CertificateSigningRequestStatus" $ \o ->
V1beta1CertificateSigningRequestStatus
<$> (o .:? "certificate")
<*> (o .:? "conditions")
instance A.ToJSON V1beta1CertificateSigningRequestStatus where
toJSON V1beta1CertificateSigningRequestStatus {..} =
_omitNulls
[ "certificate" .= v1beta1CertificateSigningRequestStatusCertificate
, "conditions" .= v1beta1CertificateSigningRequestStatusConditions
]
mkV1beta1CertificateSigningRequestStatus
:: V1beta1CertificateSigningRequestStatus
mkV1beta1CertificateSigningRequestStatus =
V1beta1CertificateSigningRequestStatus
{ v1beta1CertificateSigningRequestStatusCertificate = Nothing
, v1beta1CertificateSigningRequestStatusConditions = Nothing
}
data V1beta1ClusterRole = V1beta1ClusterRole
{ v1beta1ClusterRoleAggregationRule :: !(Maybe V1beta1AggregationRule)
, v1beta1ClusterRoleApiVersion :: !(Maybe Text)
, v1beta1ClusterRoleKind :: !(Maybe Text)
, v1beta1ClusterRoleMetadata :: !(Maybe V1ObjectMeta)
, v1beta1ClusterRoleRules :: !(Maybe [V1beta1PolicyRule])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ClusterRole where
parseJSON = A.withObject "V1beta1ClusterRole" $ \o ->
V1beta1ClusterRole
<$> (o .:? "aggregationRule")
<*> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "rules")
instance A.ToJSON V1beta1ClusterRole where
toJSON V1beta1ClusterRole {..} =
_omitNulls
[ "aggregationRule" .= v1beta1ClusterRoleAggregationRule
, "apiVersion" .= v1beta1ClusterRoleApiVersion
, "kind" .= v1beta1ClusterRoleKind
, "metadata" .= v1beta1ClusterRoleMetadata
, "rules" .= v1beta1ClusterRoleRules
]
mkV1beta1ClusterRole
:: V1beta1ClusterRole
mkV1beta1ClusterRole =
V1beta1ClusterRole
{ v1beta1ClusterRoleAggregationRule = Nothing
, v1beta1ClusterRoleApiVersion = Nothing
, v1beta1ClusterRoleKind = Nothing
, v1beta1ClusterRoleMetadata = Nothing
, v1beta1ClusterRoleRules = Nothing
}
data V1beta1ClusterRoleBinding = V1beta1ClusterRoleBinding
{ v1beta1ClusterRoleBindingApiVersion :: !(Maybe Text)
, v1beta1ClusterRoleBindingKind :: !(Maybe Text)
, v1beta1ClusterRoleBindingMetadata :: !(Maybe V1ObjectMeta)
, v1beta1ClusterRoleBindingRoleRef :: !(V1beta1RoleRef)
, v1beta1ClusterRoleBindingSubjects :: !(Maybe [V1beta1Subject])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ClusterRoleBinding where
parseJSON = A.withObject "V1beta1ClusterRoleBinding" $ \o ->
V1beta1ClusterRoleBinding
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "roleRef")
<*> (o .:? "subjects")
instance A.ToJSON V1beta1ClusterRoleBinding where
toJSON V1beta1ClusterRoleBinding {..} =
_omitNulls
[ "apiVersion" .= v1beta1ClusterRoleBindingApiVersion
, "kind" .= v1beta1ClusterRoleBindingKind
, "metadata" .= v1beta1ClusterRoleBindingMetadata
, "roleRef" .= v1beta1ClusterRoleBindingRoleRef
, "subjects" .= v1beta1ClusterRoleBindingSubjects
]
mkV1beta1ClusterRoleBinding
:: V1beta1RoleRef
-> V1beta1ClusterRoleBinding
mkV1beta1ClusterRoleBinding v1beta1ClusterRoleBindingRoleRef =
V1beta1ClusterRoleBinding
{ v1beta1ClusterRoleBindingApiVersion = Nothing
, v1beta1ClusterRoleBindingKind = Nothing
, v1beta1ClusterRoleBindingMetadata = Nothing
, v1beta1ClusterRoleBindingRoleRef
, v1beta1ClusterRoleBindingSubjects = Nothing
}
data V1beta1ClusterRoleBindingList = V1beta1ClusterRoleBindingList
{ v1beta1ClusterRoleBindingListApiVersion :: !(Maybe Text)
, v1beta1ClusterRoleBindingListItems :: !([V1beta1ClusterRoleBinding])
, v1beta1ClusterRoleBindingListKind :: !(Maybe Text)
, v1beta1ClusterRoleBindingListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ClusterRoleBindingList where
parseJSON = A.withObject "V1beta1ClusterRoleBindingList" $ \o ->
V1beta1ClusterRoleBindingList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1ClusterRoleBindingList where
toJSON V1beta1ClusterRoleBindingList {..} =
_omitNulls
[ "apiVersion" .= v1beta1ClusterRoleBindingListApiVersion
, "items" .= v1beta1ClusterRoleBindingListItems
, "kind" .= v1beta1ClusterRoleBindingListKind
, "metadata" .= v1beta1ClusterRoleBindingListMetadata
]
mkV1beta1ClusterRoleBindingList
:: [V1beta1ClusterRoleBinding]
-> V1beta1ClusterRoleBindingList
mkV1beta1ClusterRoleBindingList v1beta1ClusterRoleBindingListItems =
V1beta1ClusterRoleBindingList
{ v1beta1ClusterRoleBindingListApiVersion = Nothing
, v1beta1ClusterRoleBindingListItems
, v1beta1ClusterRoleBindingListKind = Nothing
, v1beta1ClusterRoleBindingListMetadata = Nothing
}
data V1beta1ClusterRoleList = V1beta1ClusterRoleList
{ v1beta1ClusterRoleListApiVersion :: !(Maybe Text)
, v1beta1ClusterRoleListItems :: !([V1beta1ClusterRole])
, v1beta1ClusterRoleListKind :: !(Maybe Text)
, v1beta1ClusterRoleListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ClusterRoleList where
parseJSON = A.withObject "V1beta1ClusterRoleList" $ \o ->
V1beta1ClusterRoleList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1ClusterRoleList where
toJSON V1beta1ClusterRoleList {..} =
_omitNulls
[ "apiVersion" .= v1beta1ClusterRoleListApiVersion
, "items" .= v1beta1ClusterRoleListItems
, "kind" .= v1beta1ClusterRoleListKind
, "metadata" .= v1beta1ClusterRoleListMetadata
]
mkV1beta1ClusterRoleList
:: [V1beta1ClusterRole]
-> V1beta1ClusterRoleList
mkV1beta1ClusterRoleList v1beta1ClusterRoleListItems =
V1beta1ClusterRoleList
{ v1beta1ClusterRoleListApiVersion = Nothing
, v1beta1ClusterRoleListItems
, v1beta1ClusterRoleListKind = Nothing
, v1beta1ClusterRoleListMetadata = Nothing
}
data V1beta1ControllerRevision = V1beta1ControllerRevision
{ v1beta1ControllerRevisionApiVersion :: !(Maybe Text)
, v1beta1ControllerRevisionData :: !(Maybe RuntimeRawExtension)
, v1beta1ControllerRevisionKind :: !(Maybe Text)
, v1beta1ControllerRevisionMetadata :: !(Maybe V1ObjectMeta)
, v1beta1ControllerRevisionRevision :: !(Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ControllerRevision where
parseJSON = A.withObject "V1beta1ControllerRevision" $ \o ->
V1beta1ControllerRevision
<$> (o .:? "apiVersion")
<*> (o .:? "data")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "revision")
instance A.ToJSON V1beta1ControllerRevision where
toJSON V1beta1ControllerRevision {..} =
_omitNulls
[ "apiVersion" .= v1beta1ControllerRevisionApiVersion
, "data" .= v1beta1ControllerRevisionData
, "kind" .= v1beta1ControllerRevisionKind
, "metadata" .= v1beta1ControllerRevisionMetadata
, "revision" .= v1beta1ControllerRevisionRevision
]
mkV1beta1ControllerRevision
:: Integer
-> V1beta1ControllerRevision
mkV1beta1ControllerRevision v1beta1ControllerRevisionRevision =
V1beta1ControllerRevision
{ v1beta1ControllerRevisionApiVersion = Nothing
, v1beta1ControllerRevisionData = Nothing
, v1beta1ControllerRevisionKind = Nothing
, v1beta1ControllerRevisionMetadata = Nothing
, v1beta1ControllerRevisionRevision
}
data V1beta1ControllerRevisionList = V1beta1ControllerRevisionList
{ v1beta1ControllerRevisionListApiVersion :: !(Maybe Text)
, v1beta1ControllerRevisionListItems :: !([V1beta1ControllerRevision])
, v1beta1ControllerRevisionListKind :: !(Maybe Text)
, v1beta1ControllerRevisionListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ControllerRevisionList where
parseJSON = A.withObject "V1beta1ControllerRevisionList" $ \o ->
V1beta1ControllerRevisionList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1ControllerRevisionList where
toJSON V1beta1ControllerRevisionList {..} =
_omitNulls
[ "apiVersion" .= v1beta1ControllerRevisionListApiVersion
, "items" .= v1beta1ControllerRevisionListItems
, "kind" .= v1beta1ControllerRevisionListKind
, "metadata" .= v1beta1ControllerRevisionListMetadata
]
mkV1beta1ControllerRevisionList
:: [V1beta1ControllerRevision]
-> V1beta1ControllerRevisionList
mkV1beta1ControllerRevisionList v1beta1ControllerRevisionListItems =
V1beta1ControllerRevisionList
{ v1beta1ControllerRevisionListApiVersion = Nothing
, v1beta1ControllerRevisionListItems
, v1beta1ControllerRevisionListKind = Nothing
, v1beta1ControllerRevisionListMetadata = Nothing
}
data V1beta1CronJob = V1beta1CronJob
{ v1beta1CronJobApiVersion :: !(Maybe Text)
, v1beta1CronJobKind :: !(Maybe Text)
, v1beta1CronJobMetadata :: !(Maybe V1ObjectMeta)
, v1beta1CronJobSpec :: !(Maybe V1beta1CronJobSpec)
, v1beta1CronJobStatus :: !(Maybe V1beta1CronJobStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CronJob where
parseJSON = A.withObject "V1beta1CronJob" $ \o ->
V1beta1CronJob
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1CronJob where
toJSON V1beta1CronJob {..} =
_omitNulls
[ "apiVersion" .= v1beta1CronJobApiVersion
, "kind" .= v1beta1CronJobKind
, "metadata" .= v1beta1CronJobMetadata
, "spec" .= v1beta1CronJobSpec
, "status" .= v1beta1CronJobStatus
]
mkV1beta1CronJob
:: V1beta1CronJob
mkV1beta1CronJob =
V1beta1CronJob
{ v1beta1CronJobApiVersion = Nothing
, v1beta1CronJobKind = Nothing
, v1beta1CronJobMetadata = Nothing
, v1beta1CronJobSpec = Nothing
, v1beta1CronJobStatus = Nothing
}
data V1beta1CronJobList = V1beta1CronJobList
{ v1beta1CronJobListApiVersion :: !(Maybe Text)
, v1beta1CronJobListItems :: !([V1beta1CronJob])
, v1beta1CronJobListKind :: !(Maybe Text)
, v1beta1CronJobListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CronJobList where
parseJSON = A.withObject "V1beta1CronJobList" $ \o ->
V1beta1CronJobList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1CronJobList where
toJSON V1beta1CronJobList {..} =
_omitNulls
[ "apiVersion" .= v1beta1CronJobListApiVersion
, "items" .= v1beta1CronJobListItems
, "kind" .= v1beta1CronJobListKind
, "metadata" .= v1beta1CronJobListMetadata
]
mkV1beta1CronJobList
:: [V1beta1CronJob]
-> V1beta1CronJobList
mkV1beta1CronJobList v1beta1CronJobListItems =
V1beta1CronJobList
{ v1beta1CronJobListApiVersion = Nothing
, v1beta1CronJobListItems
, v1beta1CronJobListKind = Nothing
, v1beta1CronJobListMetadata = Nothing
}
data V1beta1CronJobSpec = V1beta1CronJobSpec
{ v1beta1CronJobSpecConcurrencyPolicy :: !(Maybe Text)
, v1beta1CronJobSpecFailedJobsHistoryLimit :: !(Maybe Int)
, v1beta1CronJobSpecJobTemplate :: !(V1beta1JobTemplateSpec)
, v1beta1CronJobSpecSchedule :: !(Text)
, v1beta1CronJobSpecStartingDeadlineSeconds :: !(Maybe Integer)
, v1beta1CronJobSpecSuccessfulJobsHistoryLimit :: !(Maybe Int)
, v1beta1CronJobSpecSuspend :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CronJobSpec where
parseJSON = A.withObject "V1beta1CronJobSpec" $ \o ->
V1beta1CronJobSpec
<$> (o .:? "concurrencyPolicy")
<*> (o .:? "failedJobsHistoryLimit")
<*> (o .: "jobTemplate")
<*> (o .: "schedule")
<*> (o .:? "startingDeadlineSeconds")
<*> (o .:? "successfulJobsHistoryLimit")
<*> (o .:? "suspend")
instance A.ToJSON V1beta1CronJobSpec where
toJSON V1beta1CronJobSpec {..} =
_omitNulls
[ "concurrencyPolicy" .= v1beta1CronJobSpecConcurrencyPolicy
, "failedJobsHistoryLimit" .= v1beta1CronJobSpecFailedJobsHistoryLimit
, "jobTemplate" .= v1beta1CronJobSpecJobTemplate
, "schedule" .= v1beta1CronJobSpecSchedule
, "startingDeadlineSeconds" .= v1beta1CronJobSpecStartingDeadlineSeconds
, "successfulJobsHistoryLimit" .= v1beta1CronJobSpecSuccessfulJobsHistoryLimit
, "suspend" .= v1beta1CronJobSpecSuspend
]
mkV1beta1CronJobSpec
:: V1beta1JobTemplateSpec
-> Text
-> V1beta1CronJobSpec
mkV1beta1CronJobSpec v1beta1CronJobSpecJobTemplate v1beta1CronJobSpecSchedule =
V1beta1CronJobSpec
{ v1beta1CronJobSpecConcurrencyPolicy = Nothing
, v1beta1CronJobSpecFailedJobsHistoryLimit = Nothing
, v1beta1CronJobSpecJobTemplate
, v1beta1CronJobSpecSchedule
, v1beta1CronJobSpecStartingDeadlineSeconds = Nothing
, v1beta1CronJobSpecSuccessfulJobsHistoryLimit = Nothing
, v1beta1CronJobSpecSuspend = Nothing
}
data V1beta1CronJobStatus = V1beta1CronJobStatus
{ v1beta1CronJobStatusActive :: !(Maybe [V1ObjectReference])
, v1beta1CronJobStatusLastScheduleTime :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CronJobStatus where
parseJSON = A.withObject "V1beta1CronJobStatus" $ \o ->
V1beta1CronJobStatus
<$> (o .:? "active")
<*> (o .:? "lastScheduleTime")
instance A.ToJSON V1beta1CronJobStatus where
toJSON V1beta1CronJobStatus {..} =
_omitNulls
[ "active" .= v1beta1CronJobStatusActive
, "lastScheduleTime" .= v1beta1CronJobStatusLastScheduleTime
]
mkV1beta1CronJobStatus
:: V1beta1CronJobStatus
mkV1beta1CronJobStatus =
V1beta1CronJobStatus
{ v1beta1CronJobStatusActive = Nothing
, v1beta1CronJobStatusLastScheduleTime = Nothing
}
data V1beta1CustomResourceColumnDefinition = V1beta1CustomResourceColumnDefinition
{ v1beta1CustomResourceColumnDefinitionJsonPath :: !(Text)
, v1beta1CustomResourceColumnDefinitionDescription :: !(Maybe Text)
, v1beta1CustomResourceColumnDefinitionFormat :: !(Maybe Text)
, v1beta1CustomResourceColumnDefinitionName :: !(Text)
, v1beta1CustomResourceColumnDefinitionPriority :: !(Maybe Int)
, v1beta1CustomResourceColumnDefinitionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceColumnDefinition where
parseJSON = A.withObject "V1beta1CustomResourceColumnDefinition" $ \o ->
V1beta1CustomResourceColumnDefinition
<$> (o .: "JSONPath")
<*> (o .:? "description")
<*> (o .:? "format")
<*> (o .: "name")
<*> (o .:? "priority")
<*> (o .: "type")
instance A.ToJSON V1beta1CustomResourceColumnDefinition where
toJSON V1beta1CustomResourceColumnDefinition {..} =
_omitNulls
[ "JSONPath" .= v1beta1CustomResourceColumnDefinitionJsonPath
, "description" .= v1beta1CustomResourceColumnDefinitionDescription
, "format" .= v1beta1CustomResourceColumnDefinitionFormat
, "name" .= v1beta1CustomResourceColumnDefinitionName
, "priority" .= v1beta1CustomResourceColumnDefinitionPriority
, "type" .= v1beta1CustomResourceColumnDefinitionType
]
mkV1beta1CustomResourceColumnDefinition
:: Text
-> Text
-> Text
-> V1beta1CustomResourceColumnDefinition
mkV1beta1CustomResourceColumnDefinition v1beta1CustomResourceColumnDefinitionJsonPath v1beta1CustomResourceColumnDefinitionName v1beta1CustomResourceColumnDefinitionType =
V1beta1CustomResourceColumnDefinition
{ v1beta1CustomResourceColumnDefinitionJsonPath
, v1beta1CustomResourceColumnDefinitionDescription = Nothing
, v1beta1CustomResourceColumnDefinitionFormat = Nothing
, v1beta1CustomResourceColumnDefinitionName
, v1beta1CustomResourceColumnDefinitionPriority = Nothing
, v1beta1CustomResourceColumnDefinitionType
}
data V1beta1CustomResourceConversion = V1beta1CustomResourceConversion
{ v1beta1CustomResourceConversionConversionReviewVersions :: !(Maybe [Text])
, v1beta1CustomResourceConversionStrategy :: !(Text)
, v1beta1CustomResourceConversionWebhookClientConfig :: !(Maybe ApiextensionsV1beta1WebhookClientConfig)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceConversion where
parseJSON = A.withObject "V1beta1CustomResourceConversion" $ \o ->
V1beta1CustomResourceConversion
<$> (o .:? "conversionReviewVersions")
<*> (o .: "strategy")
<*> (o .:? "webhookClientConfig")
instance A.ToJSON V1beta1CustomResourceConversion where
toJSON V1beta1CustomResourceConversion {..} =
_omitNulls
[ "conversionReviewVersions" .= v1beta1CustomResourceConversionConversionReviewVersions
, "strategy" .= v1beta1CustomResourceConversionStrategy
, "webhookClientConfig" .= v1beta1CustomResourceConversionWebhookClientConfig
]
mkV1beta1CustomResourceConversion
:: Text
-> V1beta1CustomResourceConversion
mkV1beta1CustomResourceConversion v1beta1CustomResourceConversionStrategy =
V1beta1CustomResourceConversion
{ v1beta1CustomResourceConversionConversionReviewVersions = Nothing
, v1beta1CustomResourceConversionStrategy
, v1beta1CustomResourceConversionWebhookClientConfig = Nothing
}
data V1beta1CustomResourceDefinition = V1beta1CustomResourceDefinition
{ v1beta1CustomResourceDefinitionApiVersion :: !(Maybe Text)
, v1beta1CustomResourceDefinitionKind :: !(Maybe Text)
, v1beta1CustomResourceDefinitionMetadata :: !(Maybe V1ObjectMeta)
, v1beta1CustomResourceDefinitionSpec :: !(V1beta1CustomResourceDefinitionSpec)
, v1beta1CustomResourceDefinitionStatus :: !(Maybe V1beta1CustomResourceDefinitionStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceDefinition where
parseJSON = A.withObject "V1beta1CustomResourceDefinition" $ \o ->
V1beta1CustomResourceDefinition
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1CustomResourceDefinition where
toJSON V1beta1CustomResourceDefinition {..} =
_omitNulls
[ "apiVersion" .= v1beta1CustomResourceDefinitionApiVersion
, "kind" .= v1beta1CustomResourceDefinitionKind
, "metadata" .= v1beta1CustomResourceDefinitionMetadata
, "spec" .= v1beta1CustomResourceDefinitionSpec
, "status" .= v1beta1CustomResourceDefinitionStatus
]
mkV1beta1CustomResourceDefinition
:: V1beta1CustomResourceDefinitionSpec
-> V1beta1CustomResourceDefinition
mkV1beta1CustomResourceDefinition v1beta1CustomResourceDefinitionSpec =
V1beta1CustomResourceDefinition
{ v1beta1CustomResourceDefinitionApiVersion = Nothing
, v1beta1CustomResourceDefinitionKind = Nothing
, v1beta1CustomResourceDefinitionMetadata = Nothing
, v1beta1CustomResourceDefinitionSpec
, v1beta1CustomResourceDefinitionStatus = Nothing
}
data V1beta1CustomResourceDefinitionCondition = V1beta1CustomResourceDefinitionCondition
{ v1beta1CustomResourceDefinitionConditionLastTransitionTime :: !(Maybe DateTime)
, v1beta1CustomResourceDefinitionConditionMessage :: !(Maybe Text)
, v1beta1CustomResourceDefinitionConditionReason :: !(Maybe Text)
, v1beta1CustomResourceDefinitionConditionStatus :: !(Text)
, v1beta1CustomResourceDefinitionConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceDefinitionCondition where
parseJSON = A.withObject "V1beta1CustomResourceDefinitionCondition" $ \o ->
V1beta1CustomResourceDefinitionCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1beta1CustomResourceDefinitionCondition where
toJSON V1beta1CustomResourceDefinitionCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1beta1CustomResourceDefinitionConditionLastTransitionTime
, "message" .= v1beta1CustomResourceDefinitionConditionMessage
, "reason" .= v1beta1CustomResourceDefinitionConditionReason
, "status" .= v1beta1CustomResourceDefinitionConditionStatus
, "type" .= v1beta1CustomResourceDefinitionConditionType
]
mkV1beta1CustomResourceDefinitionCondition
:: Text
-> Text
-> V1beta1CustomResourceDefinitionCondition
mkV1beta1CustomResourceDefinitionCondition v1beta1CustomResourceDefinitionConditionStatus v1beta1CustomResourceDefinitionConditionType =
V1beta1CustomResourceDefinitionCondition
{ v1beta1CustomResourceDefinitionConditionLastTransitionTime = Nothing
, v1beta1CustomResourceDefinitionConditionMessage = Nothing
, v1beta1CustomResourceDefinitionConditionReason = Nothing
, v1beta1CustomResourceDefinitionConditionStatus
, v1beta1CustomResourceDefinitionConditionType
}
data V1beta1CustomResourceDefinitionList = V1beta1CustomResourceDefinitionList
{ v1beta1CustomResourceDefinitionListApiVersion :: !(Maybe Text)
, v1beta1CustomResourceDefinitionListItems :: !([V1beta1CustomResourceDefinition])
, v1beta1CustomResourceDefinitionListKind :: !(Maybe Text)
, v1beta1CustomResourceDefinitionListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceDefinitionList where
parseJSON = A.withObject "V1beta1CustomResourceDefinitionList" $ \o ->
V1beta1CustomResourceDefinitionList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1CustomResourceDefinitionList where
toJSON V1beta1CustomResourceDefinitionList {..} =
_omitNulls
[ "apiVersion" .= v1beta1CustomResourceDefinitionListApiVersion
, "items" .= v1beta1CustomResourceDefinitionListItems
, "kind" .= v1beta1CustomResourceDefinitionListKind
, "metadata" .= v1beta1CustomResourceDefinitionListMetadata
]
mkV1beta1CustomResourceDefinitionList
:: [V1beta1CustomResourceDefinition]
-> V1beta1CustomResourceDefinitionList
mkV1beta1CustomResourceDefinitionList v1beta1CustomResourceDefinitionListItems =
V1beta1CustomResourceDefinitionList
{ v1beta1CustomResourceDefinitionListApiVersion = Nothing
, v1beta1CustomResourceDefinitionListItems
, v1beta1CustomResourceDefinitionListKind = Nothing
, v1beta1CustomResourceDefinitionListMetadata = Nothing
}
data V1beta1CustomResourceDefinitionNames = V1beta1CustomResourceDefinitionNames
{ v1beta1CustomResourceDefinitionNamesCategories :: !(Maybe [Text])
, v1beta1CustomResourceDefinitionNamesKind :: !(Text)
, v1beta1CustomResourceDefinitionNamesListKind :: !(Maybe Text)
, v1beta1CustomResourceDefinitionNamesPlural :: !(Text)
, v1beta1CustomResourceDefinitionNamesShortNames :: !(Maybe [Text])
, v1beta1CustomResourceDefinitionNamesSingular :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceDefinitionNames where
parseJSON = A.withObject "V1beta1CustomResourceDefinitionNames" $ \o ->
V1beta1CustomResourceDefinitionNames
<$> (o .:? "categories")
<*> (o .: "kind")
<*> (o .:? "listKind")
<*> (o .: "plural")
<*> (o .:? "shortNames")
<*> (o .:? "singular")
instance A.ToJSON V1beta1CustomResourceDefinitionNames where
toJSON V1beta1CustomResourceDefinitionNames {..} =
_omitNulls
[ "categories" .= v1beta1CustomResourceDefinitionNamesCategories
, "kind" .= v1beta1CustomResourceDefinitionNamesKind
, "listKind" .= v1beta1CustomResourceDefinitionNamesListKind
, "plural" .= v1beta1CustomResourceDefinitionNamesPlural
, "shortNames" .= v1beta1CustomResourceDefinitionNamesShortNames
, "singular" .= v1beta1CustomResourceDefinitionNamesSingular
]
mkV1beta1CustomResourceDefinitionNames
:: Text
-> Text
-> V1beta1CustomResourceDefinitionNames
mkV1beta1CustomResourceDefinitionNames v1beta1CustomResourceDefinitionNamesKind v1beta1CustomResourceDefinitionNamesPlural =
V1beta1CustomResourceDefinitionNames
{ v1beta1CustomResourceDefinitionNamesCategories = Nothing
, v1beta1CustomResourceDefinitionNamesKind
, v1beta1CustomResourceDefinitionNamesListKind = Nothing
, v1beta1CustomResourceDefinitionNamesPlural
, v1beta1CustomResourceDefinitionNamesShortNames = Nothing
, v1beta1CustomResourceDefinitionNamesSingular = Nothing
}
data V1beta1CustomResourceDefinitionSpec = V1beta1CustomResourceDefinitionSpec
{ v1beta1CustomResourceDefinitionSpecAdditionalPrinterColumns :: !(Maybe [V1beta1CustomResourceColumnDefinition])
, v1beta1CustomResourceDefinitionSpecConversion :: !(Maybe V1beta1CustomResourceConversion)
, v1beta1CustomResourceDefinitionSpecGroup :: !(Text)
, v1beta1CustomResourceDefinitionSpecNames :: !(V1beta1CustomResourceDefinitionNames)
, v1beta1CustomResourceDefinitionSpecScope :: !(Text)
, v1beta1CustomResourceDefinitionSpecSubresources :: !(Maybe V1beta1CustomResourceSubresources)
, v1beta1CustomResourceDefinitionSpecValidation :: !(Maybe V1beta1CustomResourceValidation)
, v1beta1CustomResourceDefinitionSpecVersion :: !(Maybe Text)
, v1beta1CustomResourceDefinitionSpecVersions :: !(Maybe [V1beta1CustomResourceDefinitionVersion])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceDefinitionSpec where
parseJSON = A.withObject "V1beta1CustomResourceDefinitionSpec" $ \o ->
V1beta1CustomResourceDefinitionSpec
<$> (o .:? "additionalPrinterColumns")
<*> (o .:? "conversion")
<*> (o .: "group")
<*> (o .: "names")
<*> (o .: "scope")
<*> (o .:? "subresources")
<*> (o .:? "validation")
<*> (o .:? "version")
<*> (o .:? "versions")
instance A.ToJSON V1beta1CustomResourceDefinitionSpec where
toJSON V1beta1CustomResourceDefinitionSpec {..} =
_omitNulls
[ "additionalPrinterColumns" .= v1beta1CustomResourceDefinitionSpecAdditionalPrinterColumns
, "conversion" .= v1beta1CustomResourceDefinitionSpecConversion
, "group" .= v1beta1CustomResourceDefinitionSpecGroup
, "names" .= v1beta1CustomResourceDefinitionSpecNames
, "scope" .= v1beta1CustomResourceDefinitionSpecScope
, "subresources" .= v1beta1CustomResourceDefinitionSpecSubresources
, "validation" .= v1beta1CustomResourceDefinitionSpecValidation
, "version" .= v1beta1CustomResourceDefinitionSpecVersion
, "versions" .= v1beta1CustomResourceDefinitionSpecVersions
]
mkV1beta1CustomResourceDefinitionSpec
:: Text
-> V1beta1CustomResourceDefinitionNames
-> Text
-> V1beta1CustomResourceDefinitionSpec
mkV1beta1CustomResourceDefinitionSpec v1beta1CustomResourceDefinitionSpecGroup v1beta1CustomResourceDefinitionSpecNames v1beta1CustomResourceDefinitionSpecScope =
V1beta1CustomResourceDefinitionSpec
{ v1beta1CustomResourceDefinitionSpecAdditionalPrinterColumns = Nothing
, v1beta1CustomResourceDefinitionSpecConversion = Nothing
, v1beta1CustomResourceDefinitionSpecGroup
, v1beta1CustomResourceDefinitionSpecNames
, v1beta1CustomResourceDefinitionSpecScope
, v1beta1CustomResourceDefinitionSpecSubresources = Nothing
, v1beta1CustomResourceDefinitionSpecValidation = Nothing
, v1beta1CustomResourceDefinitionSpecVersion = Nothing
, v1beta1CustomResourceDefinitionSpecVersions = Nothing
}
data V1beta1CustomResourceDefinitionStatus = V1beta1CustomResourceDefinitionStatus
{ v1beta1CustomResourceDefinitionStatusAcceptedNames :: !(V1beta1CustomResourceDefinitionNames)
, v1beta1CustomResourceDefinitionStatusConditions :: !([V1beta1CustomResourceDefinitionCondition])
, v1beta1CustomResourceDefinitionStatusStoredVersions :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceDefinitionStatus where
parseJSON = A.withObject "V1beta1CustomResourceDefinitionStatus" $ \o ->
V1beta1CustomResourceDefinitionStatus
<$> (o .: "acceptedNames")
<*> (o .: "conditions")
<*> (o .: "storedVersions")
instance A.ToJSON V1beta1CustomResourceDefinitionStatus where
toJSON V1beta1CustomResourceDefinitionStatus {..} =
_omitNulls
[ "acceptedNames" .= v1beta1CustomResourceDefinitionStatusAcceptedNames
, "conditions" .= v1beta1CustomResourceDefinitionStatusConditions
, "storedVersions" .= v1beta1CustomResourceDefinitionStatusStoredVersions
]
mkV1beta1CustomResourceDefinitionStatus
:: V1beta1CustomResourceDefinitionNames
-> [V1beta1CustomResourceDefinitionCondition]
-> [Text]
-> V1beta1CustomResourceDefinitionStatus
mkV1beta1CustomResourceDefinitionStatus v1beta1CustomResourceDefinitionStatusAcceptedNames v1beta1CustomResourceDefinitionStatusConditions v1beta1CustomResourceDefinitionStatusStoredVersions =
V1beta1CustomResourceDefinitionStatus
{ v1beta1CustomResourceDefinitionStatusAcceptedNames
, v1beta1CustomResourceDefinitionStatusConditions
, v1beta1CustomResourceDefinitionStatusStoredVersions
}
data V1beta1CustomResourceDefinitionVersion = V1beta1CustomResourceDefinitionVersion
{ v1beta1CustomResourceDefinitionVersionAdditionalPrinterColumns :: !(Maybe [V1beta1CustomResourceColumnDefinition])
, v1beta1CustomResourceDefinitionVersionName :: !(Text)
, v1beta1CustomResourceDefinitionVersionSchema :: !(Maybe V1beta1CustomResourceValidation)
, v1beta1CustomResourceDefinitionVersionServed :: !(Bool)
, v1beta1CustomResourceDefinitionVersionStorage :: !(Bool)
, v1beta1CustomResourceDefinitionVersionSubresources :: !(Maybe V1beta1CustomResourceSubresources)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceDefinitionVersion where
parseJSON = A.withObject "V1beta1CustomResourceDefinitionVersion" $ \o ->
V1beta1CustomResourceDefinitionVersion
<$> (o .:? "additionalPrinterColumns")
<*> (o .: "name")
<*> (o .:? "schema")
<*> (o .: "served")
<*> (o .: "storage")
<*> (o .:? "subresources")
instance A.ToJSON V1beta1CustomResourceDefinitionVersion where
toJSON V1beta1CustomResourceDefinitionVersion {..} =
_omitNulls
[ "additionalPrinterColumns" .= v1beta1CustomResourceDefinitionVersionAdditionalPrinterColumns
, "name" .= v1beta1CustomResourceDefinitionVersionName
, "schema" .= v1beta1CustomResourceDefinitionVersionSchema
, "served" .= v1beta1CustomResourceDefinitionVersionServed
, "storage" .= v1beta1CustomResourceDefinitionVersionStorage
, "subresources" .= v1beta1CustomResourceDefinitionVersionSubresources
]
mkV1beta1CustomResourceDefinitionVersion
:: Text
-> Bool
-> Bool
-> V1beta1CustomResourceDefinitionVersion
mkV1beta1CustomResourceDefinitionVersion v1beta1CustomResourceDefinitionVersionName v1beta1CustomResourceDefinitionVersionServed v1beta1CustomResourceDefinitionVersionStorage =
V1beta1CustomResourceDefinitionVersion
{ v1beta1CustomResourceDefinitionVersionAdditionalPrinterColumns = Nothing
, v1beta1CustomResourceDefinitionVersionName
, v1beta1CustomResourceDefinitionVersionSchema = Nothing
, v1beta1CustomResourceDefinitionVersionServed
, v1beta1CustomResourceDefinitionVersionStorage
, v1beta1CustomResourceDefinitionVersionSubresources = Nothing
}
data V1beta1CustomResourceSubresourceScale = V1beta1CustomResourceSubresourceScale
{ v1beta1CustomResourceSubresourceScaleLabelSelectorPath :: !(Maybe Text)
, v1beta1CustomResourceSubresourceScaleSpecReplicasPath :: !(Text)
, v1beta1CustomResourceSubresourceScaleStatusReplicasPath :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceSubresourceScale where
parseJSON = A.withObject "V1beta1CustomResourceSubresourceScale" $ \o ->
V1beta1CustomResourceSubresourceScale
<$> (o .:? "labelSelectorPath")
<*> (o .: "specReplicasPath")
<*> (o .: "statusReplicasPath")
instance A.ToJSON V1beta1CustomResourceSubresourceScale where
toJSON V1beta1CustomResourceSubresourceScale {..} =
_omitNulls
[ "labelSelectorPath" .= v1beta1CustomResourceSubresourceScaleLabelSelectorPath
, "specReplicasPath" .= v1beta1CustomResourceSubresourceScaleSpecReplicasPath
, "statusReplicasPath" .= v1beta1CustomResourceSubresourceScaleStatusReplicasPath
]
mkV1beta1CustomResourceSubresourceScale
:: Text
-> Text
-> V1beta1CustomResourceSubresourceScale
mkV1beta1CustomResourceSubresourceScale v1beta1CustomResourceSubresourceScaleSpecReplicasPath v1beta1CustomResourceSubresourceScaleStatusReplicasPath =
V1beta1CustomResourceSubresourceScale
{ v1beta1CustomResourceSubresourceScaleLabelSelectorPath = Nothing
, v1beta1CustomResourceSubresourceScaleSpecReplicasPath
, v1beta1CustomResourceSubresourceScaleStatusReplicasPath
}
data V1beta1CustomResourceSubresources = V1beta1CustomResourceSubresources
{ v1beta1CustomResourceSubresourcesScale :: !(Maybe V1beta1CustomResourceSubresourceScale)
, v1beta1CustomResourceSubresourcesStatus :: !(Maybe A.Value)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceSubresources where
parseJSON = A.withObject "V1beta1CustomResourceSubresources" $ \o ->
V1beta1CustomResourceSubresources
<$> (o .:? "scale")
<*> (o .:? "status")
instance A.ToJSON V1beta1CustomResourceSubresources where
toJSON V1beta1CustomResourceSubresources {..} =
_omitNulls
[ "scale" .= v1beta1CustomResourceSubresourcesScale
, "status" .= v1beta1CustomResourceSubresourcesStatus
]
mkV1beta1CustomResourceSubresources
:: V1beta1CustomResourceSubresources
mkV1beta1CustomResourceSubresources =
V1beta1CustomResourceSubresources
{ v1beta1CustomResourceSubresourcesScale = Nothing
, v1beta1CustomResourceSubresourcesStatus = Nothing
}
data V1beta1CustomResourceValidation = V1beta1CustomResourceValidation
{ v1beta1CustomResourceValidationOpenApiv3Schema :: !(Maybe V1beta1JSONSchemaProps)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1CustomResourceValidation where
parseJSON = A.withObject "V1beta1CustomResourceValidation" $ \o ->
V1beta1CustomResourceValidation
<$> (o .:? "openAPIV3Schema")
instance A.ToJSON V1beta1CustomResourceValidation where
toJSON V1beta1CustomResourceValidation {..} =
_omitNulls
[ "openAPIV3Schema" .= v1beta1CustomResourceValidationOpenApiv3Schema
]
mkV1beta1CustomResourceValidation
:: V1beta1CustomResourceValidation
mkV1beta1CustomResourceValidation =
V1beta1CustomResourceValidation
{ v1beta1CustomResourceValidationOpenApiv3Schema = Nothing
}
data V1beta1DaemonSet = V1beta1DaemonSet
{ v1beta1DaemonSetApiVersion :: !(Maybe Text)
, v1beta1DaemonSetKind :: !(Maybe Text)
, v1beta1DaemonSetMetadata :: !(Maybe V1ObjectMeta)
, v1beta1DaemonSetSpec :: !(Maybe V1beta1DaemonSetSpec)
, v1beta1DaemonSetStatus :: !(Maybe V1beta1DaemonSetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1DaemonSet where
parseJSON = A.withObject "V1beta1DaemonSet" $ \o ->
V1beta1DaemonSet
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1DaemonSet where
toJSON V1beta1DaemonSet {..} =
_omitNulls
[ "apiVersion" .= v1beta1DaemonSetApiVersion
, "kind" .= v1beta1DaemonSetKind
, "metadata" .= v1beta1DaemonSetMetadata
, "spec" .= v1beta1DaemonSetSpec
, "status" .= v1beta1DaemonSetStatus
]
mkV1beta1DaemonSet
:: V1beta1DaemonSet
mkV1beta1DaemonSet =
V1beta1DaemonSet
{ v1beta1DaemonSetApiVersion = Nothing
, v1beta1DaemonSetKind = Nothing
, v1beta1DaemonSetMetadata = Nothing
, v1beta1DaemonSetSpec = Nothing
, v1beta1DaemonSetStatus = Nothing
}
data V1beta1DaemonSetCondition = V1beta1DaemonSetCondition
{ v1beta1DaemonSetConditionLastTransitionTime :: !(Maybe DateTime)
, v1beta1DaemonSetConditionMessage :: !(Maybe Text)
, v1beta1DaemonSetConditionReason :: !(Maybe Text)
, v1beta1DaemonSetConditionStatus :: !(Text)
, v1beta1DaemonSetConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1DaemonSetCondition where
parseJSON = A.withObject "V1beta1DaemonSetCondition" $ \o ->
V1beta1DaemonSetCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1beta1DaemonSetCondition where
toJSON V1beta1DaemonSetCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1beta1DaemonSetConditionLastTransitionTime
, "message" .= v1beta1DaemonSetConditionMessage
, "reason" .= v1beta1DaemonSetConditionReason
, "status" .= v1beta1DaemonSetConditionStatus
, "type" .= v1beta1DaemonSetConditionType
]
mkV1beta1DaemonSetCondition
:: Text
-> Text
-> V1beta1DaemonSetCondition
mkV1beta1DaemonSetCondition v1beta1DaemonSetConditionStatus v1beta1DaemonSetConditionType =
V1beta1DaemonSetCondition
{ v1beta1DaemonSetConditionLastTransitionTime = Nothing
, v1beta1DaemonSetConditionMessage = Nothing
, v1beta1DaemonSetConditionReason = Nothing
, v1beta1DaemonSetConditionStatus
, v1beta1DaemonSetConditionType
}
data V1beta1DaemonSetList = V1beta1DaemonSetList
{ v1beta1DaemonSetListApiVersion :: !(Maybe Text)
, v1beta1DaemonSetListItems :: !([V1beta1DaemonSet])
, v1beta1DaemonSetListKind :: !(Maybe Text)
, v1beta1DaemonSetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1DaemonSetList where
parseJSON = A.withObject "V1beta1DaemonSetList" $ \o ->
V1beta1DaemonSetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1DaemonSetList where
toJSON V1beta1DaemonSetList {..} =
_omitNulls
[ "apiVersion" .= v1beta1DaemonSetListApiVersion
, "items" .= v1beta1DaemonSetListItems
, "kind" .= v1beta1DaemonSetListKind
, "metadata" .= v1beta1DaemonSetListMetadata
]
mkV1beta1DaemonSetList
:: [V1beta1DaemonSet]
-> V1beta1DaemonSetList
mkV1beta1DaemonSetList v1beta1DaemonSetListItems =
V1beta1DaemonSetList
{ v1beta1DaemonSetListApiVersion = Nothing
, v1beta1DaemonSetListItems
, v1beta1DaemonSetListKind = Nothing
, v1beta1DaemonSetListMetadata = Nothing
}
data V1beta1DaemonSetSpec = V1beta1DaemonSetSpec
{ v1beta1DaemonSetSpecMinReadySeconds :: !(Maybe Int)
, v1beta1DaemonSetSpecRevisionHistoryLimit :: !(Maybe Int)
, v1beta1DaemonSetSpecSelector :: !(Maybe V1LabelSelector)
, v1beta1DaemonSetSpecTemplate :: !(V1PodTemplateSpec)
, v1beta1DaemonSetSpecTemplateGeneration :: !(Maybe Integer)
, v1beta1DaemonSetSpecUpdateStrategy :: !(Maybe V1beta1DaemonSetUpdateStrategy)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1DaemonSetSpec where
parseJSON = A.withObject "V1beta1DaemonSetSpec" $ \o ->
V1beta1DaemonSetSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "revisionHistoryLimit")
<*> (o .:? "selector")
<*> (o .: "template")
<*> (o .:? "templateGeneration")
<*> (o .:? "updateStrategy")
instance A.ToJSON V1beta1DaemonSetSpec where
toJSON V1beta1DaemonSetSpec {..} =
_omitNulls
[ "minReadySeconds" .= v1beta1DaemonSetSpecMinReadySeconds
, "revisionHistoryLimit" .= v1beta1DaemonSetSpecRevisionHistoryLimit
, "selector" .= v1beta1DaemonSetSpecSelector
, "template" .= v1beta1DaemonSetSpecTemplate
, "templateGeneration" .= v1beta1DaemonSetSpecTemplateGeneration
, "updateStrategy" .= v1beta1DaemonSetSpecUpdateStrategy
]
mkV1beta1DaemonSetSpec
:: V1PodTemplateSpec
-> V1beta1DaemonSetSpec
mkV1beta1DaemonSetSpec v1beta1DaemonSetSpecTemplate =
V1beta1DaemonSetSpec
{ v1beta1DaemonSetSpecMinReadySeconds = Nothing
, v1beta1DaemonSetSpecRevisionHistoryLimit = Nothing
, v1beta1DaemonSetSpecSelector = Nothing
, v1beta1DaemonSetSpecTemplate
, v1beta1DaemonSetSpecTemplateGeneration = Nothing
, v1beta1DaemonSetSpecUpdateStrategy = Nothing
}
data V1beta1DaemonSetStatus = V1beta1DaemonSetStatus
{ v1beta1DaemonSetStatusCollisionCount :: !(Maybe Int)
, v1beta1DaemonSetStatusConditions :: !(Maybe [V1beta1DaemonSetCondition])
, v1beta1DaemonSetStatusCurrentNumberScheduled :: !(Int)
, v1beta1DaemonSetStatusDesiredNumberScheduled :: !(Int)
, v1beta1DaemonSetStatusNumberAvailable :: !(Maybe Int)
, v1beta1DaemonSetStatusNumberMisscheduled :: !(Int)
, v1beta1DaemonSetStatusNumberReady :: !(Int)
, v1beta1DaemonSetStatusNumberUnavailable :: !(Maybe Int)
, v1beta1DaemonSetStatusObservedGeneration :: !(Maybe Integer)
, v1beta1DaemonSetStatusUpdatedNumberScheduled :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1DaemonSetStatus where
parseJSON = A.withObject "V1beta1DaemonSetStatus" $ \o ->
V1beta1DaemonSetStatus
<$> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .: "currentNumberScheduled")
<*> (o .: "desiredNumberScheduled")
<*> (o .:? "numberAvailable")
<*> (o .: "numberMisscheduled")
<*> (o .: "numberReady")
<*> (o .:? "numberUnavailable")
<*> (o .:? "observedGeneration")
<*> (o .:? "updatedNumberScheduled")
instance A.ToJSON V1beta1DaemonSetStatus where
toJSON V1beta1DaemonSetStatus {..} =
_omitNulls
[ "collisionCount" .= v1beta1DaemonSetStatusCollisionCount
, "conditions" .= v1beta1DaemonSetStatusConditions
, "currentNumberScheduled" .= v1beta1DaemonSetStatusCurrentNumberScheduled
, "desiredNumberScheduled" .= v1beta1DaemonSetStatusDesiredNumberScheduled
, "numberAvailable" .= v1beta1DaemonSetStatusNumberAvailable
, "numberMisscheduled" .= v1beta1DaemonSetStatusNumberMisscheduled
, "numberReady" .= v1beta1DaemonSetStatusNumberReady
, "numberUnavailable" .= v1beta1DaemonSetStatusNumberUnavailable
, "observedGeneration" .= v1beta1DaemonSetStatusObservedGeneration
, "updatedNumberScheduled" .= v1beta1DaemonSetStatusUpdatedNumberScheduled
]
mkV1beta1DaemonSetStatus
:: Int
-> Int
-> Int
-> Int
-> V1beta1DaemonSetStatus
mkV1beta1DaemonSetStatus v1beta1DaemonSetStatusCurrentNumberScheduled v1beta1DaemonSetStatusDesiredNumberScheduled v1beta1DaemonSetStatusNumberMisscheduled v1beta1DaemonSetStatusNumberReady =
V1beta1DaemonSetStatus
{ v1beta1DaemonSetStatusCollisionCount = Nothing
, v1beta1DaemonSetStatusConditions = Nothing
, v1beta1DaemonSetStatusCurrentNumberScheduled
, v1beta1DaemonSetStatusDesiredNumberScheduled
, v1beta1DaemonSetStatusNumberAvailable = Nothing
, v1beta1DaemonSetStatusNumberMisscheduled
, v1beta1DaemonSetStatusNumberReady
, v1beta1DaemonSetStatusNumberUnavailable = Nothing
, v1beta1DaemonSetStatusObservedGeneration = Nothing
, v1beta1DaemonSetStatusUpdatedNumberScheduled = Nothing
}
data V1beta1DaemonSetUpdateStrategy = V1beta1DaemonSetUpdateStrategy
{ v1beta1DaemonSetUpdateStrategyRollingUpdate :: !(Maybe V1beta1RollingUpdateDaemonSet)
, v1beta1DaemonSetUpdateStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1DaemonSetUpdateStrategy where
parseJSON = A.withObject "V1beta1DaemonSetUpdateStrategy" $ \o ->
V1beta1DaemonSetUpdateStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON V1beta1DaemonSetUpdateStrategy where
toJSON V1beta1DaemonSetUpdateStrategy {..} =
_omitNulls
[ "rollingUpdate" .= v1beta1DaemonSetUpdateStrategyRollingUpdate
, "type" .= v1beta1DaemonSetUpdateStrategyType
]
mkV1beta1DaemonSetUpdateStrategy
:: V1beta1DaemonSetUpdateStrategy
mkV1beta1DaemonSetUpdateStrategy =
V1beta1DaemonSetUpdateStrategy
{ v1beta1DaemonSetUpdateStrategyRollingUpdate = Nothing
, v1beta1DaemonSetUpdateStrategyType = Nothing
}
data V1beta1Event = V1beta1Event
{ v1beta1EventAction :: !(Maybe Text)
, v1beta1EventApiVersion :: !(Maybe Text)
, v1beta1EventDeprecatedCount :: !(Maybe Int)
, v1beta1EventDeprecatedFirstTimestamp :: !(Maybe DateTime)
, v1beta1EventDeprecatedLastTimestamp :: !(Maybe DateTime)
, v1beta1EventDeprecatedSource :: !(Maybe V1EventSource)
, v1beta1EventEventTime :: !(DateTime)
, v1beta1EventKind :: !(Maybe Text)
, v1beta1EventMetadata :: !(Maybe V1ObjectMeta)
, v1beta1EventNote :: !(Maybe Text)
, v1beta1EventReason :: !(Maybe Text)
, v1beta1EventRegarding :: !(Maybe V1ObjectReference)
, v1beta1EventRelated :: !(Maybe V1ObjectReference)
, v1beta1EventReportingController :: !(Maybe Text)
, v1beta1EventReportingInstance :: !(Maybe Text)
, v1beta1EventSeries :: !(Maybe V1beta1EventSeries)
, v1beta1EventType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1Event where
parseJSON = A.withObject "V1beta1Event" $ \o ->
V1beta1Event
<$> (o .:? "action")
<*> (o .:? "apiVersion")
<*> (o .:? "deprecatedCount")
<*> (o .:? "deprecatedFirstTimestamp")
<*> (o .:? "deprecatedLastTimestamp")
<*> (o .:? "deprecatedSource")
<*> (o .: "eventTime")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "note")
<*> (o .:? "reason")
<*> (o .:? "regarding")
<*> (o .:? "related")
<*> (o .:? "reportingController")
<*> (o .:? "reportingInstance")
<*> (o .:? "series")
<*> (o .:? "type")
instance A.ToJSON V1beta1Event where
toJSON V1beta1Event {..} =
_omitNulls
[ "action" .= v1beta1EventAction
, "apiVersion" .= v1beta1EventApiVersion
, "deprecatedCount" .= v1beta1EventDeprecatedCount
, "deprecatedFirstTimestamp" .= v1beta1EventDeprecatedFirstTimestamp
, "deprecatedLastTimestamp" .= v1beta1EventDeprecatedLastTimestamp
, "deprecatedSource" .= v1beta1EventDeprecatedSource
, "eventTime" .= v1beta1EventEventTime
, "kind" .= v1beta1EventKind
, "metadata" .= v1beta1EventMetadata
, "note" .= v1beta1EventNote
, "reason" .= v1beta1EventReason
, "regarding" .= v1beta1EventRegarding
, "related" .= v1beta1EventRelated
, "reportingController" .= v1beta1EventReportingController
, "reportingInstance" .= v1beta1EventReportingInstance
, "series" .= v1beta1EventSeries
, "type" .= v1beta1EventType
]
mkV1beta1Event
:: DateTime
-> V1beta1Event
mkV1beta1Event v1beta1EventEventTime =
V1beta1Event
{ v1beta1EventAction = Nothing
, v1beta1EventApiVersion = Nothing
, v1beta1EventDeprecatedCount = Nothing
, v1beta1EventDeprecatedFirstTimestamp = Nothing
, v1beta1EventDeprecatedLastTimestamp = Nothing
, v1beta1EventDeprecatedSource = Nothing
, v1beta1EventEventTime
, v1beta1EventKind = Nothing
, v1beta1EventMetadata = Nothing
, v1beta1EventNote = Nothing
, v1beta1EventReason = Nothing
, v1beta1EventRegarding = Nothing
, v1beta1EventRelated = Nothing
, v1beta1EventReportingController = Nothing
, v1beta1EventReportingInstance = Nothing
, v1beta1EventSeries = Nothing
, v1beta1EventType = Nothing
}
data V1beta1EventList = V1beta1EventList
{ v1beta1EventListApiVersion :: !(Maybe Text)
, v1beta1EventListItems :: !([V1beta1Event])
, v1beta1EventListKind :: !(Maybe Text)
, v1beta1EventListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1EventList where
parseJSON = A.withObject "V1beta1EventList" $ \o ->
V1beta1EventList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1EventList where
toJSON V1beta1EventList {..} =
_omitNulls
[ "apiVersion" .= v1beta1EventListApiVersion
, "items" .= v1beta1EventListItems
, "kind" .= v1beta1EventListKind
, "metadata" .= v1beta1EventListMetadata
]
mkV1beta1EventList
:: [V1beta1Event]
-> V1beta1EventList
mkV1beta1EventList v1beta1EventListItems =
V1beta1EventList
{ v1beta1EventListApiVersion = Nothing
, v1beta1EventListItems
, v1beta1EventListKind = Nothing
, v1beta1EventListMetadata = Nothing
}
data V1beta1EventSeries = V1beta1EventSeries
{ v1beta1EventSeriesCount :: !(Int)
, v1beta1EventSeriesLastObservedTime :: !(DateTime)
, v1beta1EventSeriesState :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1EventSeries where
parseJSON = A.withObject "V1beta1EventSeries" $ \o ->
V1beta1EventSeries
<$> (o .: "count")
<*> (o .: "lastObservedTime")
<*> (o .: "state")
instance A.ToJSON V1beta1EventSeries where
toJSON V1beta1EventSeries {..} =
_omitNulls
[ "count" .= v1beta1EventSeriesCount
, "lastObservedTime" .= v1beta1EventSeriesLastObservedTime
, "state" .= v1beta1EventSeriesState
]
mkV1beta1EventSeries
:: Int
-> DateTime
-> Text
-> V1beta1EventSeries
mkV1beta1EventSeries v1beta1EventSeriesCount v1beta1EventSeriesLastObservedTime v1beta1EventSeriesState =
V1beta1EventSeries
{ v1beta1EventSeriesCount
, v1beta1EventSeriesLastObservedTime
, v1beta1EventSeriesState
}
data V1beta1Eviction = V1beta1Eviction
{ v1beta1EvictionApiVersion :: !(Maybe Text)
, v1beta1EvictionDeleteOptions :: !(Maybe V1DeleteOptions)
, v1beta1EvictionKind :: !(Maybe Text)
, v1beta1EvictionMetadata :: !(Maybe V1ObjectMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1Eviction where
parseJSON = A.withObject "V1beta1Eviction" $ \o ->
V1beta1Eviction
<$> (o .:? "apiVersion")
<*> (o .:? "deleteOptions")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1Eviction where
toJSON V1beta1Eviction {..} =
_omitNulls
[ "apiVersion" .= v1beta1EvictionApiVersion
, "deleteOptions" .= v1beta1EvictionDeleteOptions
, "kind" .= v1beta1EvictionKind
, "metadata" .= v1beta1EvictionMetadata
]
mkV1beta1Eviction
:: V1beta1Eviction
mkV1beta1Eviction =
V1beta1Eviction
{ v1beta1EvictionApiVersion = Nothing
, v1beta1EvictionDeleteOptions = Nothing
, v1beta1EvictionKind = Nothing
, v1beta1EvictionMetadata = Nothing
}
data V1beta1ExternalDocumentation = V1beta1ExternalDocumentation
{ v1beta1ExternalDocumentationDescription :: !(Maybe Text)
, v1beta1ExternalDocumentationUrl :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ExternalDocumentation where
parseJSON = A.withObject "V1beta1ExternalDocumentation" $ \o ->
V1beta1ExternalDocumentation
<$> (o .:? "description")
<*> (o .:? "url")
instance A.ToJSON V1beta1ExternalDocumentation where
toJSON V1beta1ExternalDocumentation {..} =
_omitNulls
[ "description" .= v1beta1ExternalDocumentationDescription
, "url" .= v1beta1ExternalDocumentationUrl
]
mkV1beta1ExternalDocumentation
:: V1beta1ExternalDocumentation
mkV1beta1ExternalDocumentation =
V1beta1ExternalDocumentation
{ v1beta1ExternalDocumentationDescription = Nothing
, v1beta1ExternalDocumentationUrl = Nothing
}
data V1beta1IPBlock = V1beta1IPBlock
{ v1beta1IPBlockCidr :: !(Text)
, v1beta1IPBlockExcept :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1IPBlock where
parseJSON = A.withObject "V1beta1IPBlock" $ \o ->
V1beta1IPBlock
<$> (o .: "cidr")
<*> (o .:? "except")
instance A.ToJSON V1beta1IPBlock where
toJSON V1beta1IPBlock {..} =
_omitNulls
[ "cidr" .= v1beta1IPBlockCidr
, "except" .= v1beta1IPBlockExcept
]
mkV1beta1IPBlock
:: Text
-> V1beta1IPBlock
mkV1beta1IPBlock v1beta1IPBlockCidr =
V1beta1IPBlock
{ v1beta1IPBlockCidr
, v1beta1IPBlockExcept = Nothing
}
data V1beta1JSONSchemaProps = V1beta1JSONSchemaProps
{ v1beta1JSONSchemaPropsRef :: !(Maybe Text)
, v1beta1JSONSchemaPropsSchema :: !(Maybe Text)
, v1beta1JSONSchemaPropsAdditionalItems :: !(Maybe A.Value)
, v1beta1JSONSchemaPropsAdditionalProperties :: !(Maybe A.Value)
, v1beta1JSONSchemaPropsAllOf :: !(Maybe [V1beta1JSONSchemaProps])
, v1beta1JSONSchemaPropsAnyOf :: !(Maybe [V1beta1JSONSchemaProps])
, v1beta1JSONSchemaPropsDefault :: !(Maybe A.Value)
, v1beta1JSONSchemaPropsDefinitions :: !(Maybe (Map.Map String V1beta1JSONSchemaProps))
, v1beta1JSONSchemaPropsDependencies :: !(Maybe (Map.Map String A.Value))
, v1beta1JSONSchemaPropsDescription :: !(Maybe Text)
, v1beta1JSONSchemaPropsEnum :: !(Maybe [A.Value])
, v1beta1JSONSchemaPropsExample :: !(Maybe A.Value)
, v1beta1JSONSchemaPropsExclusiveMaximum :: !(Maybe Bool)
, v1beta1JSONSchemaPropsExclusiveMinimum :: !(Maybe Bool)
, v1beta1JSONSchemaPropsExternalDocs :: !(Maybe V1beta1ExternalDocumentation)
, v1beta1JSONSchemaPropsFormat :: !(Maybe Text)
, v1beta1JSONSchemaPropsId :: !(Maybe Text)
, v1beta1JSONSchemaPropsItems :: !(Maybe A.Value)
, v1beta1JSONSchemaPropsMaxItems :: !(Maybe Integer)
, v1beta1JSONSchemaPropsMaxLength :: !(Maybe Integer)
, v1beta1JSONSchemaPropsMaxProperties :: !(Maybe Integer)
, v1beta1JSONSchemaPropsMaximum :: !(Maybe Double)
, v1beta1JSONSchemaPropsMinItems :: !(Maybe Integer)
, v1beta1JSONSchemaPropsMinLength :: !(Maybe Integer)
, v1beta1JSONSchemaPropsMinProperties :: !(Maybe Integer)
, v1beta1JSONSchemaPropsMinimum :: !(Maybe Double)
, v1beta1JSONSchemaPropsMultipleOf :: !(Maybe Double)
, v1beta1JSONSchemaPropsNot :: !(Maybe V1beta1JSONSchemaProps)
, v1beta1JSONSchemaPropsNullable :: !(Maybe Bool)
, v1beta1JSONSchemaPropsOneOf :: !(Maybe [V1beta1JSONSchemaProps])
, v1beta1JSONSchemaPropsPattern :: !(Maybe Text)
, v1beta1JSONSchemaPropsPatternProperties :: !(Maybe (Map.Map String V1beta1JSONSchemaProps))
, v1beta1JSONSchemaPropsProperties :: !(Maybe (Map.Map String V1beta1JSONSchemaProps))
, v1beta1JSONSchemaPropsRequired :: !(Maybe [Text])
, v1beta1JSONSchemaPropsTitle :: !(Maybe Text)
, v1beta1JSONSchemaPropsType :: !(Maybe Text)
, v1beta1JSONSchemaPropsUniqueItems :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1JSONSchemaProps where
parseJSON = A.withObject "V1beta1JSONSchemaProps" $ \o ->
V1beta1JSONSchemaProps
<$> (o .:? "$ref")
<*> (o .:? "$schema")
<*> (o .:? "additionalItems")
<*> (o .:? "additionalProperties")
<*> (o .:? "allOf")
<*> (o .:? "anyOf")
<*> (o .:? "default")
<*> (o .:? "definitions")
<*> (o .:? "dependencies")
<*> (o .:? "description")
<*> (o .:? "enum")
<*> (o .:? "example")
<*> (o .:? "exclusiveMaximum")
<*> (o .:? "exclusiveMinimum")
<*> (o .:? "externalDocs")
<*> (o .:? "format")
<*> (o .:? "id")
<*> (o .:? "items")
<*> (o .:? "maxItems")
<*> (o .:? "maxLength")
<*> (o .:? "maxProperties")
<*> (o .:? "maximum")
<*> (o .:? "minItems")
<*> (o .:? "minLength")
<*> (o .:? "minProperties")
<*> (o .:? "minimum")
<*> (o .:? "multipleOf")
<*> (o .:? "not")
<*> (o .:? "nullable")
<*> (o .:? "oneOf")
<*> (o .:? "pattern")
<*> (o .:? "patternProperties")
<*> (o .:? "properties")
<*> (o .:? "required")
<*> (o .:? "title")
<*> (o .:? "type")
<*> (o .:? "uniqueItems")
instance A.ToJSON V1beta1JSONSchemaProps where
toJSON V1beta1JSONSchemaProps {..} =
_omitNulls
[ "$ref" .= v1beta1JSONSchemaPropsRef
, "$schema" .= v1beta1JSONSchemaPropsSchema
, "additionalItems" .= v1beta1JSONSchemaPropsAdditionalItems
, "additionalProperties" .= v1beta1JSONSchemaPropsAdditionalProperties
, "allOf" .= v1beta1JSONSchemaPropsAllOf
, "anyOf" .= v1beta1JSONSchemaPropsAnyOf
, "default" .= v1beta1JSONSchemaPropsDefault
, "definitions" .= v1beta1JSONSchemaPropsDefinitions
, "dependencies" .= v1beta1JSONSchemaPropsDependencies
, "description" .= v1beta1JSONSchemaPropsDescription
, "enum" .= v1beta1JSONSchemaPropsEnum
, "example" .= v1beta1JSONSchemaPropsExample
, "exclusiveMaximum" .= v1beta1JSONSchemaPropsExclusiveMaximum
, "exclusiveMinimum" .= v1beta1JSONSchemaPropsExclusiveMinimum
, "externalDocs" .= v1beta1JSONSchemaPropsExternalDocs
, "format" .= v1beta1JSONSchemaPropsFormat
, "id" .= v1beta1JSONSchemaPropsId
, "items" .= v1beta1JSONSchemaPropsItems
, "maxItems" .= v1beta1JSONSchemaPropsMaxItems
, "maxLength" .= v1beta1JSONSchemaPropsMaxLength
, "maxProperties" .= v1beta1JSONSchemaPropsMaxProperties
, "maximum" .= v1beta1JSONSchemaPropsMaximum
, "minItems" .= v1beta1JSONSchemaPropsMinItems
, "minLength" .= v1beta1JSONSchemaPropsMinLength
, "minProperties" .= v1beta1JSONSchemaPropsMinProperties
, "minimum" .= v1beta1JSONSchemaPropsMinimum
, "multipleOf" .= v1beta1JSONSchemaPropsMultipleOf
, "not" .= v1beta1JSONSchemaPropsNot
, "nullable" .= v1beta1JSONSchemaPropsNullable
, "oneOf" .= v1beta1JSONSchemaPropsOneOf
, "pattern" .= v1beta1JSONSchemaPropsPattern
, "patternProperties" .= v1beta1JSONSchemaPropsPatternProperties
, "properties" .= v1beta1JSONSchemaPropsProperties
, "required" .= v1beta1JSONSchemaPropsRequired
, "title" .= v1beta1JSONSchemaPropsTitle
, "type" .= v1beta1JSONSchemaPropsType
, "uniqueItems" .= v1beta1JSONSchemaPropsUniqueItems
]
mkV1beta1JSONSchemaProps
:: V1beta1JSONSchemaProps
mkV1beta1JSONSchemaProps =
V1beta1JSONSchemaProps
{ v1beta1JSONSchemaPropsRef = Nothing
, v1beta1JSONSchemaPropsSchema = Nothing
, v1beta1JSONSchemaPropsAdditionalItems = Nothing
, v1beta1JSONSchemaPropsAdditionalProperties = Nothing
, v1beta1JSONSchemaPropsAllOf = Nothing
, v1beta1JSONSchemaPropsAnyOf = Nothing
, v1beta1JSONSchemaPropsDefault = Nothing
, v1beta1JSONSchemaPropsDefinitions = Nothing
, v1beta1JSONSchemaPropsDependencies = Nothing
, v1beta1JSONSchemaPropsDescription = Nothing
, v1beta1JSONSchemaPropsEnum = Nothing
, v1beta1JSONSchemaPropsExample = Nothing
, v1beta1JSONSchemaPropsExclusiveMaximum = Nothing
, v1beta1JSONSchemaPropsExclusiveMinimum = Nothing
, v1beta1JSONSchemaPropsExternalDocs = Nothing
, v1beta1JSONSchemaPropsFormat = Nothing
, v1beta1JSONSchemaPropsId = Nothing
, v1beta1JSONSchemaPropsItems = Nothing
, v1beta1JSONSchemaPropsMaxItems = Nothing
, v1beta1JSONSchemaPropsMaxLength = Nothing
, v1beta1JSONSchemaPropsMaxProperties = Nothing
, v1beta1JSONSchemaPropsMaximum = Nothing
, v1beta1JSONSchemaPropsMinItems = Nothing
, v1beta1JSONSchemaPropsMinLength = Nothing
, v1beta1JSONSchemaPropsMinProperties = Nothing
, v1beta1JSONSchemaPropsMinimum = Nothing
, v1beta1JSONSchemaPropsMultipleOf = Nothing
, v1beta1JSONSchemaPropsNot = Nothing
, v1beta1JSONSchemaPropsNullable = Nothing
, v1beta1JSONSchemaPropsOneOf = Nothing
, v1beta1JSONSchemaPropsPattern = Nothing
, v1beta1JSONSchemaPropsPatternProperties = Nothing
, v1beta1JSONSchemaPropsProperties = Nothing
, v1beta1JSONSchemaPropsRequired = Nothing
, v1beta1JSONSchemaPropsTitle = Nothing
, v1beta1JSONSchemaPropsType = Nothing
, v1beta1JSONSchemaPropsUniqueItems = Nothing
}
data V1beta1JobTemplateSpec = V1beta1JobTemplateSpec
{ v1beta1JobTemplateSpecMetadata :: !(Maybe V1ObjectMeta)
, v1beta1JobTemplateSpecSpec :: !(Maybe V1JobSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1JobTemplateSpec where
parseJSON = A.withObject "V1beta1JobTemplateSpec" $ \o ->
V1beta1JobTemplateSpec
<$> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V1beta1JobTemplateSpec where
toJSON V1beta1JobTemplateSpec {..} =
_omitNulls
[ "metadata" .= v1beta1JobTemplateSpecMetadata
, "spec" .= v1beta1JobTemplateSpecSpec
]
mkV1beta1JobTemplateSpec
:: V1beta1JobTemplateSpec
mkV1beta1JobTemplateSpec =
V1beta1JobTemplateSpec
{ v1beta1JobTemplateSpecMetadata = Nothing
, v1beta1JobTemplateSpecSpec = Nothing
}
data V1beta1Lease = V1beta1Lease
{ v1beta1LeaseApiVersion :: !(Maybe Text)
, v1beta1LeaseKind :: !(Maybe Text)
, v1beta1LeaseMetadata :: !(Maybe V1ObjectMeta)
, v1beta1LeaseSpec :: !(Maybe V1beta1LeaseSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1Lease where
parseJSON = A.withObject "V1beta1Lease" $ \o ->
V1beta1Lease
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V1beta1Lease where
toJSON V1beta1Lease {..} =
_omitNulls
[ "apiVersion" .= v1beta1LeaseApiVersion
, "kind" .= v1beta1LeaseKind
, "metadata" .= v1beta1LeaseMetadata
, "spec" .= v1beta1LeaseSpec
]
mkV1beta1Lease
:: V1beta1Lease
mkV1beta1Lease =
V1beta1Lease
{ v1beta1LeaseApiVersion = Nothing
, v1beta1LeaseKind = Nothing
, v1beta1LeaseMetadata = Nothing
, v1beta1LeaseSpec = Nothing
}
data V1beta1LeaseList = V1beta1LeaseList
{ v1beta1LeaseListApiVersion :: !(Maybe Text)
, v1beta1LeaseListItems :: !([V1beta1Lease])
, v1beta1LeaseListKind :: !(Maybe Text)
, v1beta1LeaseListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1LeaseList where
parseJSON = A.withObject "V1beta1LeaseList" $ \o ->
V1beta1LeaseList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1LeaseList where
toJSON V1beta1LeaseList {..} =
_omitNulls
[ "apiVersion" .= v1beta1LeaseListApiVersion
, "items" .= v1beta1LeaseListItems
, "kind" .= v1beta1LeaseListKind
, "metadata" .= v1beta1LeaseListMetadata
]
mkV1beta1LeaseList
:: [V1beta1Lease]
-> V1beta1LeaseList
mkV1beta1LeaseList v1beta1LeaseListItems =
V1beta1LeaseList
{ v1beta1LeaseListApiVersion = Nothing
, v1beta1LeaseListItems
, v1beta1LeaseListKind = Nothing
, v1beta1LeaseListMetadata = Nothing
}
data V1beta1LeaseSpec = V1beta1LeaseSpec
{ v1beta1LeaseSpecAcquireTime :: !(Maybe DateTime)
, v1beta1LeaseSpecHolderIdentity :: !(Maybe Text)
, v1beta1LeaseSpecLeaseDurationSeconds :: !(Maybe Int)
, v1beta1LeaseSpecLeaseTransitions :: !(Maybe Int)
, v1beta1LeaseSpecRenewTime :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1LeaseSpec where
parseJSON = A.withObject "V1beta1LeaseSpec" $ \o ->
V1beta1LeaseSpec
<$> (o .:? "acquireTime")
<*> (o .:? "holderIdentity")
<*> (o .:? "leaseDurationSeconds")
<*> (o .:? "leaseTransitions")
<*> (o .:? "renewTime")
instance A.ToJSON V1beta1LeaseSpec where
toJSON V1beta1LeaseSpec {..} =
_omitNulls
[ "acquireTime" .= v1beta1LeaseSpecAcquireTime
, "holderIdentity" .= v1beta1LeaseSpecHolderIdentity
, "leaseDurationSeconds" .= v1beta1LeaseSpecLeaseDurationSeconds
, "leaseTransitions" .= v1beta1LeaseSpecLeaseTransitions
, "renewTime" .= v1beta1LeaseSpecRenewTime
]
mkV1beta1LeaseSpec
:: V1beta1LeaseSpec
mkV1beta1LeaseSpec =
V1beta1LeaseSpec
{ v1beta1LeaseSpecAcquireTime = Nothing
, v1beta1LeaseSpecHolderIdentity = Nothing
, v1beta1LeaseSpecLeaseDurationSeconds = Nothing
, v1beta1LeaseSpecLeaseTransitions = Nothing
, v1beta1LeaseSpecRenewTime = Nothing
}
data V1beta1LocalSubjectAccessReview = V1beta1LocalSubjectAccessReview
{ v1beta1LocalSubjectAccessReviewApiVersion :: !(Maybe Text)
, v1beta1LocalSubjectAccessReviewKind :: !(Maybe Text)
, v1beta1LocalSubjectAccessReviewMetadata :: !(Maybe V1ObjectMeta)
, v1beta1LocalSubjectAccessReviewSpec :: !(V1beta1SubjectAccessReviewSpec)
, v1beta1LocalSubjectAccessReviewStatus :: !(Maybe V1beta1SubjectAccessReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1LocalSubjectAccessReview where
parseJSON = A.withObject "V1beta1LocalSubjectAccessReview" $ \o ->
V1beta1LocalSubjectAccessReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1LocalSubjectAccessReview where
toJSON V1beta1LocalSubjectAccessReview {..} =
_omitNulls
[ "apiVersion" .= v1beta1LocalSubjectAccessReviewApiVersion
, "kind" .= v1beta1LocalSubjectAccessReviewKind
, "metadata" .= v1beta1LocalSubjectAccessReviewMetadata
, "spec" .= v1beta1LocalSubjectAccessReviewSpec
, "status" .= v1beta1LocalSubjectAccessReviewStatus
]
mkV1beta1LocalSubjectAccessReview
:: V1beta1SubjectAccessReviewSpec
-> V1beta1LocalSubjectAccessReview
mkV1beta1LocalSubjectAccessReview v1beta1LocalSubjectAccessReviewSpec =
V1beta1LocalSubjectAccessReview
{ v1beta1LocalSubjectAccessReviewApiVersion = Nothing
, v1beta1LocalSubjectAccessReviewKind = Nothing
, v1beta1LocalSubjectAccessReviewMetadata = Nothing
, v1beta1LocalSubjectAccessReviewSpec
, v1beta1LocalSubjectAccessReviewStatus = Nothing
}
data V1beta1MutatingWebhookConfiguration = V1beta1MutatingWebhookConfiguration
{ v1beta1MutatingWebhookConfigurationApiVersion :: !(Maybe Text)
, v1beta1MutatingWebhookConfigurationKind :: !(Maybe Text)
, v1beta1MutatingWebhookConfigurationMetadata :: !(Maybe V1ObjectMeta)
, v1beta1MutatingWebhookConfigurationWebhooks :: !(Maybe [V1beta1Webhook])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1MutatingWebhookConfiguration where
parseJSON = A.withObject "V1beta1MutatingWebhookConfiguration" $ \o ->
V1beta1MutatingWebhookConfiguration
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "webhooks")
instance A.ToJSON V1beta1MutatingWebhookConfiguration where
toJSON V1beta1MutatingWebhookConfiguration {..} =
_omitNulls
[ "apiVersion" .= v1beta1MutatingWebhookConfigurationApiVersion
, "kind" .= v1beta1MutatingWebhookConfigurationKind
, "metadata" .= v1beta1MutatingWebhookConfigurationMetadata
, "webhooks" .= v1beta1MutatingWebhookConfigurationWebhooks
]
mkV1beta1MutatingWebhookConfiguration
:: V1beta1MutatingWebhookConfiguration
mkV1beta1MutatingWebhookConfiguration =
V1beta1MutatingWebhookConfiguration
{ v1beta1MutatingWebhookConfigurationApiVersion = Nothing
, v1beta1MutatingWebhookConfigurationKind = Nothing
, v1beta1MutatingWebhookConfigurationMetadata = Nothing
, v1beta1MutatingWebhookConfigurationWebhooks = Nothing
}
data V1beta1MutatingWebhookConfigurationList = V1beta1MutatingWebhookConfigurationList
{ v1beta1MutatingWebhookConfigurationListApiVersion :: !(Maybe Text)
, v1beta1MutatingWebhookConfigurationListItems :: !([V1beta1MutatingWebhookConfiguration])
, v1beta1MutatingWebhookConfigurationListKind :: !(Maybe Text)
, v1beta1MutatingWebhookConfigurationListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1MutatingWebhookConfigurationList where
parseJSON = A.withObject "V1beta1MutatingWebhookConfigurationList" $ \o ->
V1beta1MutatingWebhookConfigurationList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1MutatingWebhookConfigurationList where
toJSON V1beta1MutatingWebhookConfigurationList {..} =
_omitNulls
[ "apiVersion" .= v1beta1MutatingWebhookConfigurationListApiVersion
, "items" .= v1beta1MutatingWebhookConfigurationListItems
, "kind" .= v1beta1MutatingWebhookConfigurationListKind
, "metadata" .= v1beta1MutatingWebhookConfigurationListMetadata
]
mkV1beta1MutatingWebhookConfigurationList
:: [V1beta1MutatingWebhookConfiguration]
-> V1beta1MutatingWebhookConfigurationList
mkV1beta1MutatingWebhookConfigurationList v1beta1MutatingWebhookConfigurationListItems =
V1beta1MutatingWebhookConfigurationList
{ v1beta1MutatingWebhookConfigurationListApiVersion = Nothing
, v1beta1MutatingWebhookConfigurationListItems
, v1beta1MutatingWebhookConfigurationListKind = Nothing
, v1beta1MutatingWebhookConfigurationListMetadata = Nothing
}
data V1beta1NetworkPolicy = V1beta1NetworkPolicy
{ v1beta1NetworkPolicyApiVersion :: !(Maybe Text)
, v1beta1NetworkPolicyKind :: !(Maybe Text)
, v1beta1NetworkPolicyMetadata :: !(Maybe V1ObjectMeta)
, v1beta1NetworkPolicySpec :: !(Maybe V1beta1NetworkPolicySpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1NetworkPolicy where
parseJSON = A.withObject "V1beta1NetworkPolicy" $ \o ->
V1beta1NetworkPolicy
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V1beta1NetworkPolicy where
toJSON V1beta1NetworkPolicy {..} =
_omitNulls
[ "apiVersion" .= v1beta1NetworkPolicyApiVersion
, "kind" .= v1beta1NetworkPolicyKind
, "metadata" .= v1beta1NetworkPolicyMetadata
, "spec" .= v1beta1NetworkPolicySpec
]
mkV1beta1NetworkPolicy
:: V1beta1NetworkPolicy
mkV1beta1NetworkPolicy =
V1beta1NetworkPolicy
{ v1beta1NetworkPolicyApiVersion = Nothing
, v1beta1NetworkPolicyKind = Nothing
, v1beta1NetworkPolicyMetadata = Nothing
, v1beta1NetworkPolicySpec = Nothing
}
data V1beta1NetworkPolicyEgressRule = V1beta1NetworkPolicyEgressRule
{ v1beta1NetworkPolicyEgressRulePorts :: !(Maybe [V1beta1NetworkPolicyPort])
, v1beta1NetworkPolicyEgressRuleTo :: !(Maybe [V1beta1NetworkPolicyPeer])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1NetworkPolicyEgressRule where
parseJSON = A.withObject "V1beta1NetworkPolicyEgressRule" $ \o ->
V1beta1NetworkPolicyEgressRule
<$> (o .:? "ports")
<*> (o .:? "to")
instance A.ToJSON V1beta1NetworkPolicyEgressRule where
toJSON V1beta1NetworkPolicyEgressRule {..} =
_omitNulls
[ "ports" .= v1beta1NetworkPolicyEgressRulePorts
, "to" .= v1beta1NetworkPolicyEgressRuleTo
]
mkV1beta1NetworkPolicyEgressRule
:: V1beta1NetworkPolicyEgressRule
mkV1beta1NetworkPolicyEgressRule =
V1beta1NetworkPolicyEgressRule
{ v1beta1NetworkPolicyEgressRulePorts = Nothing
, v1beta1NetworkPolicyEgressRuleTo = Nothing
}
data V1beta1NetworkPolicyIngressRule = V1beta1NetworkPolicyIngressRule
{ v1beta1NetworkPolicyIngressRuleFrom :: !(Maybe [V1beta1NetworkPolicyPeer])
, v1beta1NetworkPolicyIngressRulePorts :: !(Maybe [V1beta1NetworkPolicyPort])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1NetworkPolicyIngressRule where
parseJSON = A.withObject "V1beta1NetworkPolicyIngressRule" $ \o ->
V1beta1NetworkPolicyIngressRule
<$> (o .:? "from")
<*> (o .:? "ports")
instance A.ToJSON V1beta1NetworkPolicyIngressRule where
toJSON V1beta1NetworkPolicyIngressRule {..} =
_omitNulls
[ "from" .= v1beta1NetworkPolicyIngressRuleFrom
, "ports" .= v1beta1NetworkPolicyIngressRulePorts
]
mkV1beta1NetworkPolicyIngressRule
:: V1beta1NetworkPolicyIngressRule
mkV1beta1NetworkPolicyIngressRule =
V1beta1NetworkPolicyIngressRule
{ v1beta1NetworkPolicyIngressRuleFrom = Nothing
, v1beta1NetworkPolicyIngressRulePorts = Nothing
}
data V1beta1NetworkPolicyList = V1beta1NetworkPolicyList
{ v1beta1NetworkPolicyListApiVersion :: !(Maybe Text)
, v1beta1NetworkPolicyListItems :: !([V1beta1NetworkPolicy])
, v1beta1NetworkPolicyListKind :: !(Maybe Text)
, v1beta1NetworkPolicyListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1NetworkPolicyList where
parseJSON = A.withObject "V1beta1NetworkPolicyList" $ \o ->
V1beta1NetworkPolicyList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1NetworkPolicyList where
toJSON V1beta1NetworkPolicyList {..} =
_omitNulls
[ "apiVersion" .= v1beta1NetworkPolicyListApiVersion
, "items" .= v1beta1NetworkPolicyListItems
, "kind" .= v1beta1NetworkPolicyListKind
, "metadata" .= v1beta1NetworkPolicyListMetadata
]
mkV1beta1NetworkPolicyList
:: [V1beta1NetworkPolicy]
-> V1beta1NetworkPolicyList
mkV1beta1NetworkPolicyList v1beta1NetworkPolicyListItems =
V1beta1NetworkPolicyList
{ v1beta1NetworkPolicyListApiVersion = Nothing
, v1beta1NetworkPolicyListItems
, v1beta1NetworkPolicyListKind = Nothing
, v1beta1NetworkPolicyListMetadata = Nothing
}
data V1beta1NetworkPolicyPeer = V1beta1NetworkPolicyPeer
{ v1beta1NetworkPolicyPeerIpBlock :: !(Maybe V1beta1IPBlock)
, v1beta1NetworkPolicyPeerNamespaceSelector :: !(Maybe V1LabelSelector)
, v1beta1NetworkPolicyPeerPodSelector :: !(Maybe V1LabelSelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1NetworkPolicyPeer where
parseJSON = A.withObject "V1beta1NetworkPolicyPeer" $ \o ->
V1beta1NetworkPolicyPeer
<$> (o .:? "ipBlock")
<*> (o .:? "namespaceSelector")
<*> (o .:? "podSelector")
instance A.ToJSON V1beta1NetworkPolicyPeer where
toJSON V1beta1NetworkPolicyPeer {..} =
_omitNulls
[ "ipBlock" .= v1beta1NetworkPolicyPeerIpBlock
, "namespaceSelector" .= v1beta1NetworkPolicyPeerNamespaceSelector
, "podSelector" .= v1beta1NetworkPolicyPeerPodSelector
]
mkV1beta1NetworkPolicyPeer
:: V1beta1NetworkPolicyPeer
mkV1beta1NetworkPolicyPeer =
V1beta1NetworkPolicyPeer
{ v1beta1NetworkPolicyPeerIpBlock = Nothing
, v1beta1NetworkPolicyPeerNamespaceSelector = Nothing
, v1beta1NetworkPolicyPeerPodSelector = Nothing
}
data V1beta1NetworkPolicyPort = V1beta1NetworkPolicyPort
{ v1beta1NetworkPolicyPortPort :: !(Maybe IntOrString)
, v1beta1NetworkPolicyPortProtocol :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1NetworkPolicyPort where
parseJSON = A.withObject "V1beta1NetworkPolicyPort" $ \o ->
V1beta1NetworkPolicyPort
<$> (o .:? "port")
<*> (o .:? "protocol")
instance A.ToJSON V1beta1NetworkPolicyPort where
toJSON V1beta1NetworkPolicyPort {..} =
_omitNulls
[ "port" .= v1beta1NetworkPolicyPortPort
, "protocol" .= v1beta1NetworkPolicyPortProtocol
]
mkV1beta1NetworkPolicyPort
:: V1beta1NetworkPolicyPort
mkV1beta1NetworkPolicyPort =
V1beta1NetworkPolicyPort
{ v1beta1NetworkPolicyPortPort = Nothing
, v1beta1NetworkPolicyPortProtocol = Nothing
}
data V1beta1NetworkPolicySpec = V1beta1NetworkPolicySpec
{ v1beta1NetworkPolicySpecEgress :: !(Maybe [V1beta1NetworkPolicyEgressRule])
, v1beta1NetworkPolicySpecIngress :: !(Maybe [V1beta1NetworkPolicyIngressRule])
, v1beta1NetworkPolicySpecPodSelector :: !(V1LabelSelector)
, v1beta1NetworkPolicySpecPolicyTypes :: !(Maybe [Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1NetworkPolicySpec where
parseJSON = A.withObject "V1beta1NetworkPolicySpec" $ \o ->
V1beta1NetworkPolicySpec
<$> (o .:? "egress")
<*> (o .:? "ingress")
<*> (o .: "podSelector")
<*> (o .:? "policyTypes")
instance A.ToJSON V1beta1NetworkPolicySpec where
toJSON V1beta1NetworkPolicySpec {..} =
_omitNulls
[ "egress" .= v1beta1NetworkPolicySpecEgress
, "ingress" .= v1beta1NetworkPolicySpecIngress
, "podSelector" .= v1beta1NetworkPolicySpecPodSelector
, "policyTypes" .= v1beta1NetworkPolicySpecPolicyTypes
]
mkV1beta1NetworkPolicySpec
:: V1LabelSelector
-> V1beta1NetworkPolicySpec
mkV1beta1NetworkPolicySpec v1beta1NetworkPolicySpecPodSelector =
V1beta1NetworkPolicySpec
{ v1beta1NetworkPolicySpecEgress = Nothing
, v1beta1NetworkPolicySpecIngress = Nothing
, v1beta1NetworkPolicySpecPodSelector
, v1beta1NetworkPolicySpecPolicyTypes = Nothing
}
data V1beta1NonResourceAttributes = V1beta1NonResourceAttributes
{ v1beta1NonResourceAttributesPath :: !(Maybe Text)
, v1beta1NonResourceAttributesVerb :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1NonResourceAttributes where
parseJSON = A.withObject "V1beta1NonResourceAttributes" $ \o ->
V1beta1NonResourceAttributes
<$> (o .:? "path")
<*> (o .:? "verb")
instance A.ToJSON V1beta1NonResourceAttributes where
toJSON V1beta1NonResourceAttributes {..} =
_omitNulls
[ "path" .= v1beta1NonResourceAttributesPath
, "verb" .= v1beta1NonResourceAttributesVerb
]
mkV1beta1NonResourceAttributes
:: V1beta1NonResourceAttributes
mkV1beta1NonResourceAttributes =
V1beta1NonResourceAttributes
{ v1beta1NonResourceAttributesPath = Nothing
, v1beta1NonResourceAttributesVerb = Nothing
}
data V1beta1NonResourceRule = V1beta1NonResourceRule
{ v1beta1NonResourceRuleNonResourceUrLs :: !(Maybe [Text])
, v1beta1NonResourceRuleVerbs :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1NonResourceRule where
parseJSON = A.withObject "V1beta1NonResourceRule" $ \o ->
V1beta1NonResourceRule
<$> (o .:? "nonResourceURLs")
<*> (o .: "verbs")
instance A.ToJSON V1beta1NonResourceRule where
toJSON V1beta1NonResourceRule {..} =
_omitNulls
[ "nonResourceURLs" .= v1beta1NonResourceRuleNonResourceUrLs
, "verbs" .= v1beta1NonResourceRuleVerbs
]
mkV1beta1NonResourceRule
:: [Text]
-> V1beta1NonResourceRule
mkV1beta1NonResourceRule v1beta1NonResourceRuleVerbs =
V1beta1NonResourceRule
{ v1beta1NonResourceRuleNonResourceUrLs = Nothing
, v1beta1NonResourceRuleVerbs
}
data V1beta1PodDisruptionBudget = V1beta1PodDisruptionBudget
{ v1beta1PodDisruptionBudgetApiVersion :: !(Maybe Text)
, v1beta1PodDisruptionBudgetKind :: !(Maybe Text)
, v1beta1PodDisruptionBudgetMetadata :: !(Maybe V1ObjectMeta)
, v1beta1PodDisruptionBudgetSpec :: !(Maybe V1beta1PodDisruptionBudgetSpec)
, v1beta1PodDisruptionBudgetStatus :: !(Maybe V1beta1PodDisruptionBudgetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1PodDisruptionBudget where
parseJSON = A.withObject "V1beta1PodDisruptionBudget" $ \o ->
V1beta1PodDisruptionBudget
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1PodDisruptionBudget where
toJSON V1beta1PodDisruptionBudget {..} =
_omitNulls
[ "apiVersion" .= v1beta1PodDisruptionBudgetApiVersion
, "kind" .= v1beta1PodDisruptionBudgetKind
, "metadata" .= v1beta1PodDisruptionBudgetMetadata
, "spec" .= v1beta1PodDisruptionBudgetSpec
, "status" .= v1beta1PodDisruptionBudgetStatus
]
mkV1beta1PodDisruptionBudget
:: V1beta1PodDisruptionBudget
mkV1beta1PodDisruptionBudget =
V1beta1PodDisruptionBudget
{ v1beta1PodDisruptionBudgetApiVersion = Nothing
, v1beta1PodDisruptionBudgetKind = Nothing
, v1beta1PodDisruptionBudgetMetadata = Nothing
, v1beta1PodDisruptionBudgetSpec = Nothing
, v1beta1PodDisruptionBudgetStatus = Nothing
}
data V1beta1PodDisruptionBudgetList = V1beta1PodDisruptionBudgetList
{ v1beta1PodDisruptionBudgetListApiVersion :: !(Maybe Text)
, v1beta1PodDisruptionBudgetListItems :: !([V1beta1PodDisruptionBudget])
, v1beta1PodDisruptionBudgetListKind :: !(Maybe Text)
, v1beta1PodDisruptionBudgetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1PodDisruptionBudgetList where
parseJSON = A.withObject "V1beta1PodDisruptionBudgetList" $ \o ->
V1beta1PodDisruptionBudgetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1PodDisruptionBudgetList where
toJSON V1beta1PodDisruptionBudgetList {..} =
_omitNulls
[ "apiVersion" .= v1beta1PodDisruptionBudgetListApiVersion
, "items" .= v1beta1PodDisruptionBudgetListItems
, "kind" .= v1beta1PodDisruptionBudgetListKind
, "metadata" .= v1beta1PodDisruptionBudgetListMetadata
]
mkV1beta1PodDisruptionBudgetList
:: [V1beta1PodDisruptionBudget]
-> V1beta1PodDisruptionBudgetList
mkV1beta1PodDisruptionBudgetList v1beta1PodDisruptionBudgetListItems =
V1beta1PodDisruptionBudgetList
{ v1beta1PodDisruptionBudgetListApiVersion = Nothing
, v1beta1PodDisruptionBudgetListItems
, v1beta1PodDisruptionBudgetListKind = Nothing
, v1beta1PodDisruptionBudgetListMetadata = Nothing
}
data V1beta1PodDisruptionBudgetSpec = V1beta1PodDisruptionBudgetSpec
{ v1beta1PodDisruptionBudgetSpecMaxUnavailable :: !(Maybe IntOrString)
, v1beta1PodDisruptionBudgetSpecMinAvailable :: !(Maybe IntOrString)
, v1beta1PodDisruptionBudgetSpecSelector :: !(Maybe V1LabelSelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1PodDisruptionBudgetSpec where
parseJSON = A.withObject "V1beta1PodDisruptionBudgetSpec" $ \o ->
V1beta1PodDisruptionBudgetSpec
<$> (o .:? "maxUnavailable")
<*> (o .:? "minAvailable")
<*> (o .:? "selector")
instance A.ToJSON V1beta1PodDisruptionBudgetSpec where
toJSON V1beta1PodDisruptionBudgetSpec {..} =
_omitNulls
[ "maxUnavailable" .= v1beta1PodDisruptionBudgetSpecMaxUnavailable
, "minAvailable" .= v1beta1PodDisruptionBudgetSpecMinAvailable
, "selector" .= v1beta1PodDisruptionBudgetSpecSelector
]
mkV1beta1PodDisruptionBudgetSpec
:: V1beta1PodDisruptionBudgetSpec
mkV1beta1PodDisruptionBudgetSpec =
V1beta1PodDisruptionBudgetSpec
{ v1beta1PodDisruptionBudgetSpecMaxUnavailable = Nothing
, v1beta1PodDisruptionBudgetSpecMinAvailable = Nothing
, v1beta1PodDisruptionBudgetSpecSelector = Nothing
}
data V1beta1PodDisruptionBudgetStatus = V1beta1PodDisruptionBudgetStatus
{ v1beta1PodDisruptionBudgetStatusCurrentHealthy :: !(Int)
, v1beta1PodDisruptionBudgetStatusDesiredHealthy :: !(Int)
, v1beta1PodDisruptionBudgetStatusDisruptedPods :: !(Maybe (Map.Map String DateTime))
, v1beta1PodDisruptionBudgetStatusDisruptionsAllowed :: !(Int)
, v1beta1PodDisruptionBudgetStatusExpectedPods :: !(Int)
, v1beta1PodDisruptionBudgetStatusObservedGeneration :: !(Maybe Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1PodDisruptionBudgetStatus where
parseJSON = A.withObject "V1beta1PodDisruptionBudgetStatus" $ \o ->
V1beta1PodDisruptionBudgetStatus
<$> (o .: "currentHealthy")
<*> (o .: "desiredHealthy")
<*> (o .:? "disruptedPods")
<*> (o .: "disruptionsAllowed")
<*> (o .: "expectedPods")
<*> (o .:? "observedGeneration")
instance A.ToJSON V1beta1PodDisruptionBudgetStatus where
toJSON V1beta1PodDisruptionBudgetStatus {..} =
_omitNulls
[ "currentHealthy" .= v1beta1PodDisruptionBudgetStatusCurrentHealthy
, "desiredHealthy" .= v1beta1PodDisruptionBudgetStatusDesiredHealthy
, "disruptedPods" .= v1beta1PodDisruptionBudgetStatusDisruptedPods
, "disruptionsAllowed" .= v1beta1PodDisruptionBudgetStatusDisruptionsAllowed
, "expectedPods" .= v1beta1PodDisruptionBudgetStatusExpectedPods
, "observedGeneration" .= v1beta1PodDisruptionBudgetStatusObservedGeneration
]
mkV1beta1PodDisruptionBudgetStatus
:: Int
-> Int
-> Int
-> Int
-> V1beta1PodDisruptionBudgetStatus
mkV1beta1PodDisruptionBudgetStatus v1beta1PodDisruptionBudgetStatusCurrentHealthy v1beta1PodDisruptionBudgetStatusDesiredHealthy v1beta1PodDisruptionBudgetStatusDisruptionsAllowed v1beta1PodDisruptionBudgetStatusExpectedPods =
V1beta1PodDisruptionBudgetStatus
{ v1beta1PodDisruptionBudgetStatusCurrentHealthy
, v1beta1PodDisruptionBudgetStatusDesiredHealthy
, v1beta1PodDisruptionBudgetStatusDisruptedPods = Nothing
, v1beta1PodDisruptionBudgetStatusDisruptionsAllowed
, v1beta1PodDisruptionBudgetStatusExpectedPods
, v1beta1PodDisruptionBudgetStatusObservedGeneration = Nothing
}
data V1beta1PolicyRule = V1beta1PolicyRule
{ v1beta1PolicyRuleApiGroups :: !(Maybe [Text])
, v1beta1PolicyRuleNonResourceUrLs :: !(Maybe [Text])
, v1beta1PolicyRuleResourceNames :: !(Maybe [Text])
, v1beta1PolicyRuleResources :: !(Maybe [Text])
, v1beta1PolicyRuleVerbs :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1PolicyRule where
parseJSON = A.withObject "V1beta1PolicyRule" $ \o ->
V1beta1PolicyRule
<$> (o .:? "apiGroups")
<*> (o .:? "nonResourceURLs")
<*> (o .:? "resourceNames")
<*> (o .:? "resources")
<*> (o .: "verbs")
instance A.ToJSON V1beta1PolicyRule where
toJSON V1beta1PolicyRule {..} =
_omitNulls
[ "apiGroups" .= v1beta1PolicyRuleApiGroups
, "nonResourceURLs" .= v1beta1PolicyRuleNonResourceUrLs
, "resourceNames" .= v1beta1PolicyRuleResourceNames
, "resources" .= v1beta1PolicyRuleResources
, "verbs" .= v1beta1PolicyRuleVerbs
]
mkV1beta1PolicyRule
:: [Text]
-> V1beta1PolicyRule
mkV1beta1PolicyRule v1beta1PolicyRuleVerbs =
V1beta1PolicyRule
{ v1beta1PolicyRuleApiGroups = Nothing
, v1beta1PolicyRuleNonResourceUrLs = Nothing
, v1beta1PolicyRuleResourceNames = Nothing
, v1beta1PolicyRuleResources = Nothing
, v1beta1PolicyRuleVerbs
}
data V1beta1PriorityClass = V1beta1PriorityClass
{ v1beta1PriorityClassApiVersion :: !(Maybe Text)
, v1beta1PriorityClassDescription :: !(Maybe Text)
, v1beta1PriorityClassGlobalDefault :: !(Maybe Bool)
, v1beta1PriorityClassKind :: !(Maybe Text)
, v1beta1PriorityClassMetadata :: !(Maybe V1ObjectMeta)
, v1beta1PriorityClassValue :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1PriorityClass where
parseJSON = A.withObject "V1beta1PriorityClass" $ \o ->
V1beta1PriorityClass
<$> (o .:? "apiVersion")
<*> (o .:? "description")
<*> (o .:? "globalDefault")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "value")
instance A.ToJSON V1beta1PriorityClass where
toJSON V1beta1PriorityClass {..} =
_omitNulls
[ "apiVersion" .= v1beta1PriorityClassApiVersion
, "description" .= v1beta1PriorityClassDescription
, "globalDefault" .= v1beta1PriorityClassGlobalDefault
, "kind" .= v1beta1PriorityClassKind
, "metadata" .= v1beta1PriorityClassMetadata
, "value" .= v1beta1PriorityClassValue
]
mkV1beta1PriorityClass
:: Int
-> V1beta1PriorityClass
mkV1beta1PriorityClass v1beta1PriorityClassValue =
V1beta1PriorityClass
{ v1beta1PriorityClassApiVersion = Nothing
, v1beta1PriorityClassDescription = Nothing
, v1beta1PriorityClassGlobalDefault = Nothing
, v1beta1PriorityClassKind = Nothing
, v1beta1PriorityClassMetadata = Nothing
, v1beta1PriorityClassValue
}
data V1beta1PriorityClassList = V1beta1PriorityClassList
{ v1beta1PriorityClassListApiVersion :: !(Maybe Text)
, v1beta1PriorityClassListItems :: !([V1beta1PriorityClass])
, v1beta1PriorityClassListKind :: !(Maybe Text)
, v1beta1PriorityClassListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1PriorityClassList where
parseJSON = A.withObject "V1beta1PriorityClassList" $ \o ->
V1beta1PriorityClassList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1PriorityClassList where
toJSON V1beta1PriorityClassList {..} =
_omitNulls
[ "apiVersion" .= v1beta1PriorityClassListApiVersion
, "items" .= v1beta1PriorityClassListItems
, "kind" .= v1beta1PriorityClassListKind
, "metadata" .= v1beta1PriorityClassListMetadata
]
mkV1beta1PriorityClassList
:: [V1beta1PriorityClass]
-> V1beta1PriorityClassList
mkV1beta1PriorityClassList v1beta1PriorityClassListItems =
V1beta1PriorityClassList
{ v1beta1PriorityClassListApiVersion = Nothing
, v1beta1PriorityClassListItems
, v1beta1PriorityClassListKind = Nothing
, v1beta1PriorityClassListMetadata = Nothing
}
data V1beta1ReplicaSet = V1beta1ReplicaSet
{ v1beta1ReplicaSetApiVersion :: !(Maybe Text)
, v1beta1ReplicaSetKind :: !(Maybe Text)
, v1beta1ReplicaSetMetadata :: !(Maybe V1ObjectMeta)
, v1beta1ReplicaSetSpec :: !(Maybe V1beta1ReplicaSetSpec)
, v1beta1ReplicaSetStatus :: !(Maybe V1beta1ReplicaSetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ReplicaSet where
parseJSON = A.withObject "V1beta1ReplicaSet" $ \o ->
V1beta1ReplicaSet
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1ReplicaSet where
toJSON V1beta1ReplicaSet {..} =
_omitNulls
[ "apiVersion" .= v1beta1ReplicaSetApiVersion
, "kind" .= v1beta1ReplicaSetKind
, "metadata" .= v1beta1ReplicaSetMetadata
, "spec" .= v1beta1ReplicaSetSpec
, "status" .= v1beta1ReplicaSetStatus
]
mkV1beta1ReplicaSet
:: V1beta1ReplicaSet
mkV1beta1ReplicaSet =
V1beta1ReplicaSet
{ v1beta1ReplicaSetApiVersion = Nothing
, v1beta1ReplicaSetKind = Nothing
, v1beta1ReplicaSetMetadata = Nothing
, v1beta1ReplicaSetSpec = Nothing
, v1beta1ReplicaSetStatus = Nothing
}
data V1beta1ReplicaSetCondition = V1beta1ReplicaSetCondition
{ v1beta1ReplicaSetConditionLastTransitionTime :: !(Maybe DateTime)
, v1beta1ReplicaSetConditionMessage :: !(Maybe Text)
, v1beta1ReplicaSetConditionReason :: !(Maybe Text)
, v1beta1ReplicaSetConditionStatus :: !(Text)
, v1beta1ReplicaSetConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ReplicaSetCondition where
parseJSON = A.withObject "V1beta1ReplicaSetCondition" $ \o ->
V1beta1ReplicaSetCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1beta1ReplicaSetCondition where
toJSON V1beta1ReplicaSetCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1beta1ReplicaSetConditionLastTransitionTime
, "message" .= v1beta1ReplicaSetConditionMessage
, "reason" .= v1beta1ReplicaSetConditionReason
, "status" .= v1beta1ReplicaSetConditionStatus
, "type" .= v1beta1ReplicaSetConditionType
]
mkV1beta1ReplicaSetCondition
:: Text
-> Text
-> V1beta1ReplicaSetCondition
mkV1beta1ReplicaSetCondition v1beta1ReplicaSetConditionStatus v1beta1ReplicaSetConditionType =
V1beta1ReplicaSetCondition
{ v1beta1ReplicaSetConditionLastTransitionTime = Nothing
, v1beta1ReplicaSetConditionMessage = Nothing
, v1beta1ReplicaSetConditionReason = Nothing
, v1beta1ReplicaSetConditionStatus
, v1beta1ReplicaSetConditionType
}
data V1beta1ReplicaSetList = V1beta1ReplicaSetList
{ v1beta1ReplicaSetListApiVersion :: !(Maybe Text)
, v1beta1ReplicaSetListItems :: !([V1beta1ReplicaSet])
, v1beta1ReplicaSetListKind :: !(Maybe Text)
, v1beta1ReplicaSetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ReplicaSetList where
parseJSON = A.withObject "V1beta1ReplicaSetList" $ \o ->
V1beta1ReplicaSetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1ReplicaSetList where
toJSON V1beta1ReplicaSetList {..} =
_omitNulls
[ "apiVersion" .= v1beta1ReplicaSetListApiVersion
, "items" .= v1beta1ReplicaSetListItems
, "kind" .= v1beta1ReplicaSetListKind
, "metadata" .= v1beta1ReplicaSetListMetadata
]
mkV1beta1ReplicaSetList
:: [V1beta1ReplicaSet]
-> V1beta1ReplicaSetList
mkV1beta1ReplicaSetList v1beta1ReplicaSetListItems =
V1beta1ReplicaSetList
{ v1beta1ReplicaSetListApiVersion = Nothing
, v1beta1ReplicaSetListItems
, v1beta1ReplicaSetListKind = Nothing
, v1beta1ReplicaSetListMetadata = Nothing
}
data V1beta1ReplicaSetSpec = V1beta1ReplicaSetSpec
{ v1beta1ReplicaSetSpecMinReadySeconds :: !(Maybe Int)
, v1beta1ReplicaSetSpecReplicas :: !(Maybe Int)
, v1beta1ReplicaSetSpecSelector :: !(Maybe V1LabelSelector)
, v1beta1ReplicaSetSpecTemplate :: !(Maybe V1PodTemplateSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ReplicaSetSpec where
parseJSON = A.withObject "V1beta1ReplicaSetSpec" $ \o ->
V1beta1ReplicaSetSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "replicas")
<*> (o .:? "selector")
<*> (o .:? "template")
instance A.ToJSON V1beta1ReplicaSetSpec where
toJSON V1beta1ReplicaSetSpec {..} =
_omitNulls
[ "minReadySeconds" .= v1beta1ReplicaSetSpecMinReadySeconds
, "replicas" .= v1beta1ReplicaSetSpecReplicas
, "selector" .= v1beta1ReplicaSetSpecSelector
, "template" .= v1beta1ReplicaSetSpecTemplate
]
mkV1beta1ReplicaSetSpec
:: V1beta1ReplicaSetSpec
mkV1beta1ReplicaSetSpec =
V1beta1ReplicaSetSpec
{ v1beta1ReplicaSetSpecMinReadySeconds = Nothing
, v1beta1ReplicaSetSpecReplicas = Nothing
, v1beta1ReplicaSetSpecSelector = Nothing
, v1beta1ReplicaSetSpecTemplate = Nothing
}
data V1beta1ReplicaSetStatus = V1beta1ReplicaSetStatus
{ v1beta1ReplicaSetStatusAvailableReplicas :: !(Maybe Int)
, v1beta1ReplicaSetStatusConditions :: !(Maybe [V1beta1ReplicaSetCondition])
, v1beta1ReplicaSetStatusFullyLabeledReplicas :: !(Maybe Int)
, v1beta1ReplicaSetStatusObservedGeneration :: !(Maybe Integer)
, v1beta1ReplicaSetStatusReadyReplicas :: !(Maybe Int)
, v1beta1ReplicaSetStatusReplicas :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ReplicaSetStatus where
parseJSON = A.withObject "V1beta1ReplicaSetStatus" $ \o ->
V1beta1ReplicaSetStatus
<$> (o .:? "availableReplicas")
<*> (o .:? "conditions")
<*> (o .:? "fullyLabeledReplicas")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .: "replicas")
instance A.ToJSON V1beta1ReplicaSetStatus where
toJSON V1beta1ReplicaSetStatus {..} =
_omitNulls
[ "availableReplicas" .= v1beta1ReplicaSetStatusAvailableReplicas
, "conditions" .= v1beta1ReplicaSetStatusConditions
, "fullyLabeledReplicas" .= v1beta1ReplicaSetStatusFullyLabeledReplicas
, "observedGeneration" .= v1beta1ReplicaSetStatusObservedGeneration
, "readyReplicas" .= v1beta1ReplicaSetStatusReadyReplicas
, "replicas" .= v1beta1ReplicaSetStatusReplicas
]
mkV1beta1ReplicaSetStatus
:: Int
-> V1beta1ReplicaSetStatus
mkV1beta1ReplicaSetStatus v1beta1ReplicaSetStatusReplicas =
V1beta1ReplicaSetStatus
{ v1beta1ReplicaSetStatusAvailableReplicas = Nothing
, v1beta1ReplicaSetStatusConditions = Nothing
, v1beta1ReplicaSetStatusFullyLabeledReplicas = Nothing
, v1beta1ReplicaSetStatusObservedGeneration = Nothing
, v1beta1ReplicaSetStatusReadyReplicas = Nothing
, v1beta1ReplicaSetStatusReplicas
}
data V1beta1ResourceAttributes = V1beta1ResourceAttributes
{ v1beta1ResourceAttributesGroup :: !(Maybe Text)
, v1beta1ResourceAttributesName :: !(Maybe Text)
, v1beta1ResourceAttributesNamespace :: !(Maybe Text)
, v1beta1ResourceAttributesResource :: !(Maybe Text)
, v1beta1ResourceAttributesSubresource :: !(Maybe Text)
, v1beta1ResourceAttributesVerb :: !(Maybe Text)
, v1beta1ResourceAttributesVersion :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ResourceAttributes where
parseJSON = A.withObject "V1beta1ResourceAttributes" $ \o ->
V1beta1ResourceAttributes
<$> (o .:? "group")
<*> (o .:? "name")
<*> (o .:? "namespace")
<*> (o .:? "resource")
<*> (o .:? "subresource")
<*> (o .:? "verb")
<*> (o .:? "version")
instance A.ToJSON V1beta1ResourceAttributes where
toJSON V1beta1ResourceAttributes {..} =
_omitNulls
[ "group" .= v1beta1ResourceAttributesGroup
, "name" .= v1beta1ResourceAttributesName
, "namespace" .= v1beta1ResourceAttributesNamespace
, "resource" .= v1beta1ResourceAttributesResource
, "subresource" .= v1beta1ResourceAttributesSubresource
, "verb" .= v1beta1ResourceAttributesVerb
, "version" .= v1beta1ResourceAttributesVersion
]
mkV1beta1ResourceAttributes
:: V1beta1ResourceAttributes
mkV1beta1ResourceAttributes =
V1beta1ResourceAttributes
{ v1beta1ResourceAttributesGroup = Nothing
, v1beta1ResourceAttributesName = Nothing
, v1beta1ResourceAttributesNamespace = Nothing
, v1beta1ResourceAttributesResource = Nothing
, v1beta1ResourceAttributesSubresource = Nothing
, v1beta1ResourceAttributesVerb = Nothing
, v1beta1ResourceAttributesVersion = Nothing
}
data V1beta1ResourceRule = V1beta1ResourceRule
{ v1beta1ResourceRuleApiGroups :: !(Maybe [Text])
, v1beta1ResourceRuleResourceNames :: !(Maybe [Text])
, v1beta1ResourceRuleResources :: !(Maybe [Text])
, v1beta1ResourceRuleVerbs :: !([Text])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ResourceRule where
parseJSON = A.withObject "V1beta1ResourceRule" $ \o ->
V1beta1ResourceRule
<$> (o .:? "apiGroups")
<*> (o .:? "resourceNames")
<*> (o .:? "resources")
<*> (o .: "verbs")
instance A.ToJSON V1beta1ResourceRule where
toJSON V1beta1ResourceRule {..} =
_omitNulls
[ "apiGroups" .= v1beta1ResourceRuleApiGroups
, "resourceNames" .= v1beta1ResourceRuleResourceNames
, "resources" .= v1beta1ResourceRuleResources
, "verbs" .= v1beta1ResourceRuleVerbs
]
mkV1beta1ResourceRule
:: [Text]
-> V1beta1ResourceRule
mkV1beta1ResourceRule v1beta1ResourceRuleVerbs =
V1beta1ResourceRule
{ v1beta1ResourceRuleApiGroups = Nothing
, v1beta1ResourceRuleResourceNames = Nothing
, v1beta1ResourceRuleResources = Nothing
, v1beta1ResourceRuleVerbs
}
data V1beta1Role = V1beta1Role
{ v1beta1RoleApiVersion :: !(Maybe Text)
, v1beta1RoleKind :: !(Maybe Text)
, v1beta1RoleMetadata :: !(Maybe V1ObjectMeta)
, v1beta1RoleRules :: !(Maybe [V1beta1PolicyRule])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1Role where
parseJSON = A.withObject "V1beta1Role" $ \o ->
V1beta1Role
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "rules")
instance A.ToJSON V1beta1Role where
toJSON V1beta1Role {..} =
_omitNulls
[ "apiVersion" .= v1beta1RoleApiVersion
, "kind" .= v1beta1RoleKind
, "metadata" .= v1beta1RoleMetadata
, "rules" .= v1beta1RoleRules
]
mkV1beta1Role
:: V1beta1Role
mkV1beta1Role =
V1beta1Role
{ v1beta1RoleApiVersion = Nothing
, v1beta1RoleKind = Nothing
, v1beta1RoleMetadata = Nothing
, v1beta1RoleRules = Nothing
}
data V1beta1RoleBinding = V1beta1RoleBinding
{ v1beta1RoleBindingApiVersion :: !(Maybe Text)
, v1beta1RoleBindingKind :: !(Maybe Text)
, v1beta1RoleBindingMetadata :: !(Maybe V1ObjectMeta)
, v1beta1RoleBindingRoleRef :: !(V1beta1RoleRef)
, v1beta1RoleBindingSubjects :: !(Maybe [V1beta1Subject])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1RoleBinding where
parseJSON = A.withObject "V1beta1RoleBinding" $ \o ->
V1beta1RoleBinding
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "roleRef")
<*> (o .:? "subjects")
instance A.ToJSON V1beta1RoleBinding where
toJSON V1beta1RoleBinding {..} =
_omitNulls
[ "apiVersion" .= v1beta1RoleBindingApiVersion
, "kind" .= v1beta1RoleBindingKind
, "metadata" .= v1beta1RoleBindingMetadata
, "roleRef" .= v1beta1RoleBindingRoleRef
, "subjects" .= v1beta1RoleBindingSubjects
]
mkV1beta1RoleBinding
:: V1beta1RoleRef
-> V1beta1RoleBinding
mkV1beta1RoleBinding v1beta1RoleBindingRoleRef =
V1beta1RoleBinding
{ v1beta1RoleBindingApiVersion = Nothing
, v1beta1RoleBindingKind = Nothing
, v1beta1RoleBindingMetadata = Nothing
, v1beta1RoleBindingRoleRef
, v1beta1RoleBindingSubjects = Nothing
}
data V1beta1RoleBindingList = V1beta1RoleBindingList
{ v1beta1RoleBindingListApiVersion :: !(Maybe Text)
, v1beta1RoleBindingListItems :: !([V1beta1RoleBinding])
, v1beta1RoleBindingListKind :: !(Maybe Text)
, v1beta1RoleBindingListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1RoleBindingList where
parseJSON = A.withObject "V1beta1RoleBindingList" $ \o ->
V1beta1RoleBindingList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1RoleBindingList where
toJSON V1beta1RoleBindingList {..} =
_omitNulls
[ "apiVersion" .= v1beta1RoleBindingListApiVersion
, "items" .= v1beta1RoleBindingListItems
, "kind" .= v1beta1RoleBindingListKind
, "metadata" .= v1beta1RoleBindingListMetadata
]
mkV1beta1RoleBindingList
:: [V1beta1RoleBinding]
-> V1beta1RoleBindingList
mkV1beta1RoleBindingList v1beta1RoleBindingListItems =
V1beta1RoleBindingList
{ v1beta1RoleBindingListApiVersion = Nothing
, v1beta1RoleBindingListItems
, v1beta1RoleBindingListKind = Nothing
, v1beta1RoleBindingListMetadata = Nothing
}
data V1beta1RoleList = V1beta1RoleList
{ v1beta1RoleListApiVersion :: !(Maybe Text)
, v1beta1RoleListItems :: !([V1beta1Role])
, v1beta1RoleListKind :: !(Maybe Text)
, v1beta1RoleListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1RoleList where
parseJSON = A.withObject "V1beta1RoleList" $ \o ->
V1beta1RoleList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1RoleList where
toJSON V1beta1RoleList {..} =
_omitNulls
[ "apiVersion" .= v1beta1RoleListApiVersion
, "items" .= v1beta1RoleListItems
, "kind" .= v1beta1RoleListKind
, "metadata" .= v1beta1RoleListMetadata
]
mkV1beta1RoleList
:: [V1beta1Role]
-> V1beta1RoleList
mkV1beta1RoleList v1beta1RoleListItems =
V1beta1RoleList
{ v1beta1RoleListApiVersion = Nothing
, v1beta1RoleListItems
, v1beta1RoleListKind = Nothing
, v1beta1RoleListMetadata = Nothing
}
data V1beta1RoleRef = V1beta1RoleRef
{ v1beta1RoleRefApiGroup :: !(Text)
, v1beta1RoleRefKind :: !(Text)
, v1beta1RoleRefName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1RoleRef where
parseJSON = A.withObject "V1beta1RoleRef" $ \o ->
V1beta1RoleRef
<$> (o .: "apiGroup")
<*> (o .: "kind")
<*> (o .: "name")
instance A.ToJSON V1beta1RoleRef where
toJSON V1beta1RoleRef {..} =
_omitNulls
[ "apiGroup" .= v1beta1RoleRefApiGroup
, "kind" .= v1beta1RoleRefKind
, "name" .= v1beta1RoleRefName
]
mkV1beta1RoleRef
:: Text
-> Text
-> Text
-> V1beta1RoleRef
mkV1beta1RoleRef v1beta1RoleRefApiGroup v1beta1RoleRefKind v1beta1RoleRefName =
V1beta1RoleRef
{ v1beta1RoleRefApiGroup
, v1beta1RoleRefKind
, v1beta1RoleRefName
}
data V1beta1RollingUpdateDaemonSet = V1beta1RollingUpdateDaemonSet
{ v1beta1RollingUpdateDaemonSetMaxUnavailable :: !(Maybe IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1RollingUpdateDaemonSet where
parseJSON = A.withObject "V1beta1RollingUpdateDaemonSet" $ \o ->
V1beta1RollingUpdateDaemonSet
<$> (o .:? "maxUnavailable")
instance A.ToJSON V1beta1RollingUpdateDaemonSet where
toJSON V1beta1RollingUpdateDaemonSet {..} =
_omitNulls
[ "maxUnavailable" .= v1beta1RollingUpdateDaemonSetMaxUnavailable
]
mkV1beta1RollingUpdateDaemonSet
:: V1beta1RollingUpdateDaemonSet
mkV1beta1RollingUpdateDaemonSet =
V1beta1RollingUpdateDaemonSet
{ v1beta1RollingUpdateDaemonSetMaxUnavailable = Nothing
}
data V1beta1RollingUpdateStatefulSetStrategy = V1beta1RollingUpdateStatefulSetStrategy
{ v1beta1RollingUpdateStatefulSetStrategyPartition :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1RollingUpdateStatefulSetStrategy where
parseJSON = A.withObject "V1beta1RollingUpdateStatefulSetStrategy" $ \o ->
V1beta1RollingUpdateStatefulSetStrategy
<$> (o .:? "partition")
instance A.ToJSON V1beta1RollingUpdateStatefulSetStrategy where
toJSON V1beta1RollingUpdateStatefulSetStrategy {..} =
_omitNulls
[ "partition" .= v1beta1RollingUpdateStatefulSetStrategyPartition
]
mkV1beta1RollingUpdateStatefulSetStrategy
:: V1beta1RollingUpdateStatefulSetStrategy
mkV1beta1RollingUpdateStatefulSetStrategy =
V1beta1RollingUpdateStatefulSetStrategy
{ v1beta1RollingUpdateStatefulSetStrategyPartition = Nothing
}
data V1beta1RuleWithOperations = V1beta1RuleWithOperations
{ v1beta1RuleWithOperationsApiGroups :: !(Maybe [Text])
, v1beta1RuleWithOperationsApiVersions :: !(Maybe [Text])
, v1beta1RuleWithOperationsOperations :: !(Maybe [Text])
, v1beta1RuleWithOperationsResources :: !(Maybe [Text])
, v1beta1RuleWithOperationsScope :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1RuleWithOperations where
parseJSON = A.withObject "V1beta1RuleWithOperations" $ \o ->
V1beta1RuleWithOperations
<$> (o .:? "apiGroups")
<*> (o .:? "apiVersions")
<*> (o .:? "operations")
<*> (o .:? "resources")
<*> (o .:? "scope")
instance A.ToJSON V1beta1RuleWithOperations where
toJSON V1beta1RuleWithOperations {..} =
_omitNulls
[ "apiGroups" .= v1beta1RuleWithOperationsApiGroups
, "apiVersions" .= v1beta1RuleWithOperationsApiVersions
, "operations" .= v1beta1RuleWithOperationsOperations
, "resources" .= v1beta1RuleWithOperationsResources
, "scope" .= v1beta1RuleWithOperationsScope
]
mkV1beta1RuleWithOperations
:: V1beta1RuleWithOperations
mkV1beta1RuleWithOperations =
V1beta1RuleWithOperations
{ v1beta1RuleWithOperationsApiGroups = Nothing
, v1beta1RuleWithOperationsApiVersions = Nothing
, v1beta1RuleWithOperationsOperations = Nothing
, v1beta1RuleWithOperationsResources = Nothing
, v1beta1RuleWithOperationsScope = Nothing
}
data V1beta1RuntimeClass = V1beta1RuntimeClass
{ v1beta1RuntimeClassApiVersion :: !(Maybe Text)
, v1beta1RuntimeClassHandler :: !(Text)
, v1beta1RuntimeClassKind :: !(Maybe Text)
, v1beta1RuntimeClassMetadata :: !(Maybe V1ObjectMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1RuntimeClass where
parseJSON = A.withObject "V1beta1RuntimeClass" $ \o ->
V1beta1RuntimeClass
<$> (o .:? "apiVersion")
<*> (o .: "handler")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1RuntimeClass where
toJSON V1beta1RuntimeClass {..} =
_omitNulls
[ "apiVersion" .= v1beta1RuntimeClassApiVersion
, "handler" .= v1beta1RuntimeClassHandler
, "kind" .= v1beta1RuntimeClassKind
, "metadata" .= v1beta1RuntimeClassMetadata
]
mkV1beta1RuntimeClass
:: Text
-> V1beta1RuntimeClass
mkV1beta1RuntimeClass v1beta1RuntimeClassHandler =
V1beta1RuntimeClass
{ v1beta1RuntimeClassApiVersion = Nothing
, v1beta1RuntimeClassHandler
, v1beta1RuntimeClassKind = Nothing
, v1beta1RuntimeClassMetadata = Nothing
}
data V1beta1RuntimeClassList = V1beta1RuntimeClassList
{ v1beta1RuntimeClassListApiVersion :: !(Maybe Text)
, v1beta1RuntimeClassListItems :: !([V1beta1RuntimeClass])
, v1beta1RuntimeClassListKind :: !(Maybe Text)
, v1beta1RuntimeClassListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1RuntimeClassList where
parseJSON = A.withObject "V1beta1RuntimeClassList" $ \o ->
V1beta1RuntimeClassList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1RuntimeClassList where
toJSON V1beta1RuntimeClassList {..} =
_omitNulls
[ "apiVersion" .= v1beta1RuntimeClassListApiVersion
, "items" .= v1beta1RuntimeClassListItems
, "kind" .= v1beta1RuntimeClassListKind
, "metadata" .= v1beta1RuntimeClassListMetadata
]
mkV1beta1RuntimeClassList
:: [V1beta1RuntimeClass]
-> V1beta1RuntimeClassList
mkV1beta1RuntimeClassList v1beta1RuntimeClassListItems =
V1beta1RuntimeClassList
{ v1beta1RuntimeClassListApiVersion = Nothing
, v1beta1RuntimeClassListItems
, v1beta1RuntimeClassListKind = Nothing
, v1beta1RuntimeClassListMetadata = Nothing
}
data V1beta1SelfSubjectAccessReview = V1beta1SelfSubjectAccessReview
{ v1beta1SelfSubjectAccessReviewApiVersion :: !(Maybe Text)
, v1beta1SelfSubjectAccessReviewKind :: !(Maybe Text)
, v1beta1SelfSubjectAccessReviewMetadata :: !(Maybe V1ObjectMeta)
, v1beta1SelfSubjectAccessReviewSpec :: !(V1beta1SelfSubjectAccessReviewSpec)
, v1beta1SelfSubjectAccessReviewStatus :: !(Maybe V1beta1SubjectAccessReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1SelfSubjectAccessReview where
parseJSON = A.withObject "V1beta1SelfSubjectAccessReview" $ \o ->
V1beta1SelfSubjectAccessReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1SelfSubjectAccessReview where
toJSON V1beta1SelfSubjectAccessReview {..} =
_omitNulls
[ "apiVersion" .= v1beta1SelfSubjectAccessReviewApiVersion
, "kind" .= v1beta1SelfSubjectAccessReviewKind
, "metadata" .= v1beta1SelfSubjectAccessReviewMetadata
, "spec" .= v1beta1SelfSubjectAccessReviewSpec
, "status" .= v1beta1SelfSubjectAccessReviewStatus
]
mkV1beta1SelfSubjectAccessReview
:: V1beta1SelfSubjectAccessReviewSpec
-> V1beta1SelfSubjectAccessReview
mkV1beta1SelfSubjectAccessReview v1beta1SelfSubjectAccessReviewSpec =
V1beta1SelfSubjectAccessReview
{ v1beta1SelfSubjectAccessReviewApiVersion = Nothing
, v1beta1SelfSubjectAccessReviewKind = Nothing
, v1beta1SelfSubjectAccessReviewMetadata = Nothing
, v1beta1SelfSubjectAccessReviewSpec
, v1beta1SelfSubjectAccessReviewStatus = Nothing
}
data V1beta1SelfSubjectAccessReviewSpec = V1beta1SelfSubjectAccessReviewSpec
{ v1beta1SelfSubjectAccessReviewSpecNonResourceAttributes :: !(Maybe V1beta1NonResourceAttributes)
, v1beta1SelfSubjectAccessReviewSpecResourceAttributes :: !(Maybe V1beta1ResourceAttributes)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1SelfSubjectAccessReviewSpec where
parseJSON = A.withObject "V1beta1SelfSubjectAccessReviewSpec" $ \o ->
V1beta1SelfSubjectAccessReviewSpec
<$> (o .:? "nonResourceAttributes")
<*> (o .:? "resourceAttributes")
instance A.ToJSON V1beta1SelfSubjectAccessReviewSpec where
toJSON V1beta1SelfSubjectAccessReviewSpec {..} =
_omitNulls
[ "nonResourceAttributes" .= v1beta1SelfSubjectAccessReviewSpecNonResourceAttributes
, "resourceAttributes" .= v1beta1SelfSubjectAccessReviewSpecResourceAttributes
]
mkV1beta1SelfSubjectAccessReviewSpec
:: V1beta1SelfSubjectAccessReviewSpec
mkV1beta1SelfSubjectAccessReviewSpec =
V1beta1SelfSubjectAccessReviewSpec
{ v1beta1SelfSubjectAccessReviewSpecNonResourceAttributes = Nothing
, v1beta1SelfSubjectAccessReviewSpecResourceAttributes = Nothing
}
data V1beta1SelfSubjectRulesReview = V1beta1SelfSubjectRulesReview
{ v1beta1SelfSubjectRulesReviewApiVersion :: !(Maybe Text)
, v1beta1SelfSubjectRulesReviewKind :: !(Maybe Text)
, v1beta1SelfSubjectRulesReviewMetadata :: !(Maybe V1ObjectMeta)
, v1beta1SelfSubjectRulesReviewSpec :: !(V1beta1SelfSubjectRulesReviewSpec)
, v1beta1SelfSubjectRulesReviewStatus :: !(Maybe V1beta1SubjectRulesReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1SelfSubjectRulesReview where
parseJSON = A.withObject "V1beta1SelfSubjectRulesReview" $ \o ->
V1beta1SelfSubjectRulesReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1SelfSubjectRulesReview where
toJSON V1beta1SelfSubjectRulesReview {..} =
_omitNulls
[ "apiVersion" .= v1beta1SelfSubjectRulesReviewApiVersion
, "kind" .= v1beta1SelfSubjectRulesReviewKind
, "metadata" .= v1beta1SelfSubjectRulesReviewMetadata
, "spec" .= v1beta1SelfSubjectRulesReviewSpec
, "status" .= v1beta1SelfSubjectRulesReviewStatus
]
mkV1beta1SelfSubjectRulesReview
:: V1beta1SelfSubjectRulesReviewSpec
-> V1beta1SelfSubjectRulesReview
mkV1beta1SelfSubjectRulesReview v1beta1SelfSubjectRulesReviewSpec =
V1beta1SelfSubjectRulesReview
{ v1beta1SelfSubjectRulesReviewApiVersion = Nothing
, v1beta1SelfSubjectRulesReviewKind = Nothing
, v1beta1SelfSubjectRulesReviewMetadata = Nothing
, v1beta1SelfSubjectRulesReviewSpec
, v1beta1SelfSubjectRulesReviewStatus = Nothing
}
data V1beta1SelfSubjectRulesReviewSpec = V1beta1SelfSubjectRulesReviewSpec
{ v1beta1SelfSubjectRulesReviewSpecNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1SelfSubjectRulesReviewSpec where
parseJSON = A.withObject "V1beta1SelfSubjectRulesReviewSpec" $ \o ->
V1beta1SelfSubjectRulesReviewSpec
<$> (o .:? "namespace")
instance A.ToJSON V1beta1SelfSubjectRulesReviewSpec where
toJSON V1beta1SelfSubjectRulesReviewSpec {..} =
_omitNulls
[ "namespace" .= v1beta1SelfSubjectRulesReviewSpecNamespace
]
mkV1beta1SelfSubjectRulesReviewSpec
:: V1beta1SelfSubjectRulesReviewSpec
mkV1beta1SelfSubjectRulesReviewSpec =
V1beta1SelfSubjectRulesReviewSpec
{ v1beta1SelfSubjectRulesReviewSpecNamespace = Nothing
}
data V1beta1StatefulSet = V1beta1StatefulSet
{ v1beta1StatefulSetApiVersion :: !(Maybe Text)
, v1beta1StatefulSetKind :: !(Maybe Text)
, v1beta1StatefulSetMetadata :: !(Maybe V1ObjectMeta)
, v1beta1StatefulSetSpec :: !(Maybe V1beta1StatefulSetSpec)
, v1beta1StatefulSetStatus :: !(Maybe V1beta1StatefulSetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1StatefulSet where
parseJSON = A.withObject "V1beta1StatefulSet" $ \o ->
V1beta1StatefulSet
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1StatefulSet where
toJSON V1beta1StatefulSet {..} =
_omitNulls
[ "apiVersion" .= v1beta1StatefulSetApiVersion
, "kind" .= v1beta1StatefulSetKind
, "metadata" .= v1beta1StatefulSetMetadata
, "spec" .= v1beta1StatefulSetSpec
, "status" .= v1beta1StatefulSetStatus
]
mkV1beta1StatefulSet
:: V1beta1StatefulSet
mkV1beta1StatefulSet =
V1beta1StatefulSet
{ v1beta1StatefulSetApiVersion = Nothing
, v1beta1StatefulSetKind = Nothing
, v1beta1StatefulSetMetadata = Nothing
, v1beta1StatefulSetSpec = Nothing
, v1beta1StatefulSetStatus = Nothing
}
data V1beta1StatefulSetCondition = V1beta1StatefulSetCondition
{ v1beta1StatefulSetConditionLastTransitionTime :: !(Maybe DateTime)
, v1beta1StatefulSetConditionMessage :: !(Maybe Text)
, v1beta1StatefulSetConditionReason :: !(Maybe Text)
, v1beta1StatefulSetConditionStatus :: !(Text)
, v1beta1StatefulSetConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1StatefulSetCondition where
parseJSON = A.withObject "V1beta1StatefulSetCondition" $ \o ->
V1beta1StatefulSetCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1beta1StatefulSetCondition where
toJSON V1beta1StatefulSetCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1beta1StatefulSetConditionLastTransitionTime
, "message" .= v1beta1StatefulSetConditionMessage
, "reason" .= v1beta1StatefulSetConditionReason
, "status" .= v1beta1StatefulSetConditionStatus
, "type" .= v1beta1StatefulSetConditionType
]
mkV1beta1StatefulSetCondition
:: Text
-> Text
-> V1beta1StatefulSetCondition
mkV1beta1StatefulSetCondition v1beta1StatefulSetConditionStatus v1beta1StatefulSetConditionType =
V1beta1StatefulSetCondition
{ v1beta1StatefulSetConditionLastTransitionTime = Nothing
, v1beta1StatefulSetConditionMessage = Nothing
, v1beta1StatefulSetConditionReason = Nothing
, v1beta1StatefulSetConditionStatus
, v1beta1StatefulSetConditionType
}
data V1beta1StatefulSetList = V1beta1StatefulSetList
{ v1beta1StatefulSetListApiVersion :: !(Maybe Text)
, v1beta1StatefulSetListItems :: !([V1beta1StatefulSet])
, v1beta1StatefulSetListKind :: !(Maybe Text)
, v1beta1StatefulSetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1StatefulSetList where
parseJSON = A.withObject "V1beta1StatefulSetList" $ \o ->
V1beta1StatefulSetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1StatefulSetList where
toJSON V1beta1StatefulSetList {..} =
_omitNulls
[ "apiVersion" .= v1beta1StatefulSetListApiVersion
, "items" .= v1beta1StatefulSetListItems
, "kind" .= v1beta1StatefulSetListKind
, "metadata" .= v1beta1StatefulSetListMetadata
]
mkV1beta1StatefulSetList
:: [V1beta1StatefulSet]
-> V1beta1StatefulSetList
mkV1beta1StatefulSetList v1beta1StatefulSetListItems =
V1beta1StatefulSetList
{ v1beta1StatefulSetListApiVersion = Nothing
, v1beta1StatefulSetListItems
, v1beta1StatefulSetListKind = Nothing
, v1beta1StatefulSetListMetadata = Nothing
}
data V1beta1StatefulSetSpec = V1beta1StatefulSetSpec
{ v1beta1StatefulSetSpecPodManagementPolicy :: !(Maybe Text)
, v1beta1StatefulSetSpecReplicas :: !(Maybe Int)
, v1beta1StatefulSetSpecRevisionHistoryLimit :: !(Maybe Int)
, v1beta1StatefulSetSpecSelector :: !(Maybe V1LabelSelector)
, v1beta1StatefulSetSpecServiceName :: !(Text)
, v1beta1StatefulSetSpecTemplate :: !(V1PodTemplateSpec)
, v1beta1StatefulSetSpecUpdateStrategy :: !(Maybe V1beta1StatefulSetUpdateStrategy)
, v1beta1StatefulSetSpecVolumeClaimTemplates :: !(Maybe [V1PersistentVolumeClaim])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1StatefulSetSpec where
parseJSON = A.withObject "V1beta1StatefulSetSpec" $ \o ->
V1beta1StatefulSetSpec
<$> (o .:? "podManagementPolicy")
<*> (o .:? "replicas")
<*> (o .:? "revisionHistoryLimit")
<*> (o .:? "selector")
<*> (o .: "serviceName")
<*> (o .: "template")
<*> (o .:? "updateStrategy")
<*> (o .:? "volumeClaimTemplates")
instance A.ToJSON V1beta1StatefulSetSpec where
toJSON V1beta1StatefulSetSpec {..} =
_omitNulls
[ "podManagementPolicy" .= v1beta1StatefulSetSpecPodManagementPolicy
, "replicas" .= v1beta1StatefulSetSpecReplicas
, "revisionHistoryLimit" .= v1beta1StatefulSetSpecRevisionHistoryLimit
, "selector" .= v1beta1StatefulSetSpecSelector
, "serviceName" .= v1beta1StatefulSetSpecServiceName
, "template" .= v1beta1StatefulSetSpecTemplate
, "updateStrategy" .= v1beta1StatefulSetSpecUpdateStrategy
, "volumeClaimTemplates" .= v1beta1StatefulSetSpecVolumeClaimTemplates
]
mkV1beta1StatefulSetSpec
:: Text
-> V1PodTemplateSpec
-> V1beta1StatefulSetSpec
mkV1beta1StatefulSetSpec v1beta1StatefulSetSpecServiceName v1beta1StatefulSetSpecTemplate =
V1beta1StatefulSetSpec
{ v1beta1StatefulSetSpecPodManagementPolicy = Nothing
, v1beta1StatefulSetSpecReplicas = Nothing
, v1beta1StatefulSetSpecRevisionHistoryLimit = Nothing
, v1beta1StatefulSetSpecSelector = Nothing
, v1beta1StatefulSetSpecServiceName
, v1beta1StatefulSetSpecTemplate
, v1beta1StatefulSetSpecUpdateStrategy = Nothing
, v1beta1StatefulSetSpecVolumeClaimTemplates = Nothing
}
data V1beta1StatefulSetStatus = V1beta1StatefulSetStatus
{ v1beta1StatefulSetStatusCollisionCount :: !(Maybe Int)
, v1beta1StatefulSetStatusConditions :: !(Maybe [V1beta1StatefulSetCondition])
, v1beta1StatefulSetStatusCurrentReplicas :: !(Maybe Int)
, v1beta1StatefulSetStatusCurrentRevision :: !(Maybe Text)
, v1beta1StatefulSetStatusObservedGeneration :: !(Maybe Integer)
, v1beta1StatefulSetStatusReadyReplicas :: !(Maybe Int)
, v1beta1StatefulSetStatusReplicas :: !(Int)
, v1beta1StatefulSetStatusUpdateRevision :: !(Maybe Text)
, v1beta1StatefulSetStatusUpdatedReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1StatefulSetStatus where
parseJSON = A.withObject "V1beta1StatefulSetStatus" $ \o ->
V1beta1StatefulSetStatus
<$> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .:? "currentReplicas")
<*> (o .:? "currentRevision")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .: "replicas")
<*> (o .:? "updateRevision")
<*> (o .:? "updatedReplicas")
instance A.ToJSON V1beta1StatefulSetStatus where
toJSON V1beta1StatefulSetStatus {..} =
_omitNulls
[ "collisionCount" .= v1beta1StatefulSetStatusCollisionCount
, "conditions" .= v1beta1StatefulSetStatusConditions
, "currentReplicas" .= v1beta1StatefulSetStatusCurrentReplicas
, "currentRevision" .= v1beta1StatefulSetStatusCurrentRevision
, "observedGeneration" .= v1beta1StatefulSetStatusObservedGeneration
, "readyReplicas" .= v1beta1StatefulSetStatusReadyReplicas
, "replicas" .= v1beta1StatefulSetStatusReplicas
, "updateRevision" .= v1beta1StatefulSetStatusUpdateRevision
, "updatedReplicas" .= v1beta1StatefulSetStatusUpdatedReplicas
]
mkV1beta1StatefulSetStatus
:: Int
-> V1beta1StatefulSetStatus
mkV1beta1StatefulSetStatus v1beta1StatefulSetStatusReplicas =
V1beta1StatefulSetStatus
{ v1beta1StatefulSetStatusCollisionCount = Nothing
, v1beta1StatefulSetStatusConditions = Nothing
, v1beta1StatefulSetStatusCurrentReplicas = Nothing
, v1beta1StatefulSetStatusCurrentRevision = Nothing
, v1beta1StatefulSetStatusObservedGeneration = Nothing
, v1beta1StatefulSetStatusReadyReplicas = Nothing
, v1beta1StatefulSetStatusReplicas
, v1beta1StatefulSetStatusUpdateRevision = Nothing
, v1beta1StatefulSetStatusUpdatedReplicas = Nothing
}
data V1beta1StatefulSetUpdateStrategy = V1beta1StatefulSetUpdateStrategy
{ v1beta1StatefulSetUpdateStrategyRollingUpdate :: !(Maybe V1beta1RollingUpdateStatefulSetStrategy)
, v1beta1StatefulSetUpdateStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1StatefulSetUpdateStrategy where
parseJSON = A.withObject "V1beta1StatefulSetUpdateStrategy" $ \o ->
V1beta1StatefulSetUpdateStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON V1beta1StatefulSetUpdateStrategy where
toJSON V1beta1StatefulSetUpdateStrategy {..} =
_omitNulls
[ "rollingUpdate" .= v1beta1StatefulSetUpdateStrategyRollingUpdate
, "type" .= v1beta1StatefulSetUpdateStrategyType
]
mkV1beta1StatefulSetUpdateStrategy
:: V1beta1StatefulSetUpdateStrategy
mkV1beta1StatefulSetUpdateStrategy =
V1beta1StatefulSetUpdateStrategy
{ v1beta1StatefulSetUpdateStrategyRollingUpdate = Nothing
, v1beta1StatefulSetUpdateStrategyType = Nothing
}
data V1beta1StorageClass = V1beta1StorageClass
{ v1beta1StorageClassAllowVolumeExpansion :: !(Maybe Bool)
, v1beta1StorageClassAllowedTopologies :: !(Maybe [V1TopologySelectorTerm])
, v1beta1StorageClassApiVersion :: !(Maybe Text)
, v1beta1StorageClassKind :: !(Maybe Text)
, v1beta1StorageClassMetadata :: !(Maybe V1ObjectMeta)
, v1beta1StorageClassMountOptions :: !(Maybe [Text])
, v1beta1StorageClassParameters :: !(Maybe (Map.Map String Text))
, v1beta1StorageClassProvisioner :: !(Text)
, v1beta1StorageClassReclaimPolicy :: !(Maybe Text)
, v1beta1StorageClassVolumeBindingMode :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1StorageClass where
parseJSON = A.withObject "V1beta1StorageClass" $ \o ->
V1beta1StorageClass
<$> (o .:? "allowVolumeExpansion")
<*> (o .:? "allowedTopologies")
<*> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "mountOptions")
<*> (o .:? "parameters")
<*> (o .: "provisioner")
<*> (o .:? "reclaimPolicy")
<*> (o .:? "volumeBindingMode")
instance A.ToJSON V1beta1StorageClass where
toJSON V1beta1StorageClass {..} =
_omitNulls
[ "allowVolumeExpansion" .= v1beta1StorageClassAllowVolumeExpansion
, "allowedTopologies" .= v1beta1StorageClassAllowedTopologies
, "apiVersion" .= v1beta1StorageClassApiVersion
, "kind" .= v1beta1StorageClassKind
, "metadata" .= v1beta1StorageClassMetadata
, "mountOptions" .= v1beta1StorageClassMountOptions
, "parameters" .= v1beta1StorageClassParameters
, "provisioner" .= v1beta1StorageClassProvisioner
, "reclaimPolicy" .= v1beta1StorageClassReclaimPolicy
, "volumeBindingMode" .= v1beta1StorageClassVolumeBindingMode
]
mkV1beta1StorageClass
:: Text
-> V1beta1StorageClass
mkV1beta1StorageClass v1beta1StorageClassProvisioner =
V1beta1StorageClass
{ v1beta1StorageClassAllowVolumeExpansion = Nothing
, v1beta1StorageClassAllowedTopologies = Nothing
, v1beta1StorageClassApiVersion = Nothing
, v1beta1StorageClassKind = Nothing
, v1beta1StorageClassMetadata = Nothing
, v1beta1StorageClassMountOptions = Nothing
, v1beta1StorageClassParameters = Nothing
, v1beta1StorageClassProvisioner
, v1beta1StorageClassReclaimPolicy = Nothing
, v1beta1StorageClassVolumeBindingMode = Nothing
}
data V1beta1StorageClassList = V1beta1StorageClassList
{ v1beta1StorageClassListApiVersion :: !(Maybe Text)
, v1beta1StorageClassListItems :: !([V1beta1StorageClass])
, v1beta1StorageClassListKind :: !(Maybe Text)
, v1beta1StorageClassListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1StorageClassList where
parseJSON = A.withObject "V1beta1StorageClassList" $ \o ->
V1beta1StorageClassList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1StorageClassList where
toJSON V1beta1StorageClassList {..} =
_omitNulls
[ "apiVersion" .= v1beta1StorageClassListApiVersion
, "items" .= v1beta1StorageClassListItems
, "kind" .= v1beta1StorageClassListKind
, "metadata" .= v1beta1StorageClassListMetadata
]
mkV1beta1StorageClassList
:: [V1beta1StorageClass]
-> V1beta1StorageClassList
mkV1beta1StorageClassList v1beta1StorageClassListItems =
V1beta1StorageClassList
{ v1beta1StorageClassListApiVersion = Nothing
, v1beta1StorageClassListItems
, v1beta1StorageClassListKind = Nothing
, v1beta1StorageClassListMetadata = Nothing
}
data V1beta1Subject = V1beta1Subject
{ v1beta1SubjectApiGroup :: !(Maybe Text)
, v1beta1SubjectKind :: !(Text)
, v1beta1SubjectName :: !(Text)
, v1beta1SubjectNamespace :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1Subject where
parseJSON = A.withObject "V1beta1Subject" $ \o ->
V1beta1Subject
<$> (o .:? "apiGroup")
<*> (o .: "kind")
<*> (o .: "name")
<*> (o .:? "namespace")
instance A.ToJSON V1beta1Subject where
toJSON V1beta1Subject {..} =
_omitNulls
[ "apiGroup" .= v1beta1SubjectApiGroup
, "kind" .= v1beta1SubjectKind
, "name" .= v1beta1SubjectName
, "namespace" .= v1beta1SubjectNamespace
]
mkV1beta1Subject
:: Text
-> Text
-> V1beta1Subject
mkV1beta1Subject v1beta1SubjectKind v1beta1SubjectName =
V1beta1Subject
{ v1beta1SubjectApiGroup = Nothing
, v1beta1SubjectKind
, v1beta1SubjectName
, v1beta1SubjectNamespace = Nothing
}
data V1beta1SubjectAccessReview = V1beta1SubjectAccessReview
{ v1beta1SubjectAccessReviewApiVersion :: !(Maybe Text)
, v1beta1SubjectAccessReviewKind :: !(Maybe Text)
, v1beta1SubjectAccessReviewMetadata :: !(Maybe V1ObjectMeta)
, v1beta1SubjectAccessReviewSpec :: !(V1beta1SubjectAccessReviewSpec)
, v1beta1SubjectAccessReviewStatus :: !(Maybe V1beta1SubjectAccessReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1SubjectAccessReview where
parseJSON = A.withObject "V1beta1SubjectAccessReview" $ \o ->
V1beta1SubjectAccessReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1SubjectAccessReview where
toJSON V1beta1SubjectAccessReview {..} =
_omitNulls
[ "apiVersion" .= v1beta1SubjectAccessReviewApiVersion
, "kind" .= v1beta1SubjectAccessReviewKind
, "metadata" .= v1beta1SubjectAccessReviewMetadata
, "spec" .= v1beta1SubjectAccessReviewSpec
, "status" .= v1beta1SubjectAccessReviewStatus
]
mkV1beta1SubjectAccessReview
:: V1beta1SubjectAccessReviewSpec
-> V1beta1SubjectAccessReview
mkV1beta1SubjectAccessReview v1beta1SubjectAccessReviewSpec =
V1beta1SubjectAccessReview
{ v1beta1SubjectAccessReviewApiVersion = Nothing
, v1beta1SubjectAccessReviewKind = Nothing
, v1beta1SubjectAccessReviewMetadata = Nothing
, v1beta1SubjectAccessReviewSpec
, v1beta1SubjectAccessReviewStatus = Nothing
}
data V1beta1SubjectAccessReviewSpec = V1beta1SubjectAccessReviewSpec
{ v1beta1SubjectAccessReviewSpecExtra :: !(Maybe (Map.Map String [Text]))
, v1beta1SubjectAccessReviewSpecGroup :: !(Maybe [Text])
, v1beta1SubjectAccessReviewSpecNonResourceAttributes :: !(Maybe V1beta1NonResourceAttributes)
, v1beta1SubjectAccessReviewSpecResourceAttributes :: !(Maybe V1beta1ResourceAttributes)
, v1beta1SubjectAccessReviewSpecUid :: !(Maybe Text)
, v1beta1SubjectAccessReviewSpecUser :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1SubjectAccessReviewSpec where
parseJSON = A.withObject "V1beta1SubjectAccessReviewSpec" $ \o ->
V1beta1SubjectAccessReviewSpec
<$> (o .:? "extra")
<*> (o .:? "group")
<*> (o .:? "nonResourceAttributes")
<*> (o .:? "resourceAttributes")
<*> (o .:? "uid")
<*> (o .:? "user")
instance A.ToJSON V1beta1SubjectAccessReviewSpec where
toJSON V1beta1SubjectAccessReviewSpec {..} =
_omitNulls
[ "extra" .= v1beta1SubjectAccessReviewSpecExtra
, "group" .= v1beta1SubjectAccessReviewSpecGroup
, "nonResourceAttributes" .= v1beta1SubjectAccessReviewSpecNonResourceAttributes
, "resourceAttributes" .= v1beta1SubjectAccessReviewSpecResourceAttributes
, "uid" .= v1beta1SubjectAccessReviewSpecUid
, "user" .= v1beta1SubjectAccessReviewSpecUser
]
mkV1beta1SubjectAccessReviewSpec
:: V1beta1SubjectAccessReviewSpec
mkV1beta1SubjectAccessReviewSpec =
V1beta1SubjectAccessReviewSpec
{ v1beta1SubjectAccessReviewSpecExtra = Nothing
, v1beta1SubjectAccessReviewSpecGroup = Nothing
, v1beta1SubjectAccessReviewSpecNonResourceAttributes = Nothing
, v1beta1SubjectAccessReviewSpecResourceAttributes = Nothing
, v1beta1SubjectAccessReviewSpecUid = Nothing
, v1beta1SubjectAccessReviewSpecUser = Nothing
}
data V1beta1SubjectAccessReviewStatus = V1beta1SubjectAccessReviewStatus
{ v1beta1SubjectAccessReviewStatusAllowed :: !(Bool)
, v1beta1SubjectAccessReviewStatusDenied :: !(Maybe Bool)
, v1beta1SubjectAccessReviewStatusEvaluationError :: !(Maybe Text)
, v1beta1SubjectAccessReviewStatusReason :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1SubjectAccessReviewStatus where
parseJSON = A.withObject "V1beta1SubjectAccessReviewStatus" $ \o ->
V1beta1SubjectAccessReviewStatus
<$> (o .: "allowed")
<*> (o .:? "denied")
<*> (o .:? "evaluationError")
<*> (o .:? "reason")
instance A.ToJSON V1beta1SubjectAccessReviewStatus where
toJSON V1beta1SubjectAccessReviewStatus {..} =
_omitNulls
[ "allowed" .= v1beta1SubjectAccessReviewStatusAllowed
, "denied" .= v1beta1SubjectAccessReviewStatusDenied
, "evaluationError" .= v1beta1SubjectAccessReviewStatusEvaluationError
, "reason" .= v1beta1SubjectAccessReviewStatusReason
]
mkV1beta1SubjectAccessReviewStatus
:: Bool
-> V1beta1SubjectAccessReviewStatus
mkV1beta1SubjectAccessReviewStatus v1beta1SubjectAccessReviewStatusAllowed =
V1beta1SubjectAccessReviewStatus
{ v1beta1SubjectAccessReviewStatusAllowed
, v1beta1SubjectAccessReviewStatusDenied = Nothing
, v1beta1SubjectAccessReviewStatusEvaluationError = Nothing
, v1beta1SubjectAccessReviewStatusReason = Nothing
}
data V1beta1SubjectRulesReviewStatus = V1beta1SubjectRulesReviewStatus
{ v1beta1SubjectRulesReviewStatusEvaluationError :: !(Maybe Text)
, v1beta1SubjectRulesReviewStatusIncomplete :: !(Bool)
, v1beta1SubjectRulesReviewStatusNonResourceRules :: !([V1beta1NonResourceRule])
, v1beta1SubjectRulesReviewStatusResourceRules :: !([V1beta1ResourceRule])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1SubjectRulesReviewStatus where
parseJSON = A.withObject "V1beta1SubjectRulesReviewStatus" $ \o ->
V1beta1SubjectRulesReviewStatus
<$> (o .:? "evaluationError")
<*> (o .: "incomplete")
<*> (o .: "nonResourceRules")
<*> (o .: "resourceRules")
instance A.ToJSON V1beta1SubjectRulesReviewStatus where
toJSON V1beta1SubjectRulesReviewStatus {..} =
_omitNulls
[ "evaluationError" .= v1beta1SubjectRulesReviewStatusEvaluationError
, "incomplete" .= v1beta1SubjectRulesReviewStatusIncomplete
, "nonResourceRules" .= v1beta1SubjectRulesReviewStatusNonResourceRules
, "resourceRules" .= v1beta1SubjectRulesReviewStatusResourceRules
]
mkV1beta1SubjectRulesReviewStatus
:: Bool
-> [V1beta1NonResourceRule]
-> [V1beta1ResourceRule]
-> V1beta1SubjectRulesReviewStatus
mkV1beta1SubjectRulesReviewStatus v1beta1SubjectRulesReviewStatusIncomplete v1beta1SubjectRulesReviewStatusNonResourceRules v1beta1SubjectRulesReviewStatusResourceRules =
V1beta1SubjectRulesReviewStatus
{ v1beta1SubjectRulesReviewStatusEvaluationError = Nothing
, v1beta1SubjectRulesReviewStatusIncomplete
, v1beta1SubjectRulesReviewStatusNonResourceRules
, v1beta1SubjectRulesReviewStatusResourceRules
}
data V1beta1TokenReview = V1beta1TokenReview
{ v1beta1TokenReviewApiVersion :: !(Maybe Text)
, v1beta1TokenReviewKind :: !(Maybe Text)
, v1beta1TokenReviewMetadata :: !(Maybe V1ObjectMeta)
, v1beta1TokenReviewSpec :: !(V1beta1TokenReviewSpec)
, v1beta1TokenReviewStatus :: !(Maybe V1beta1TokenReviewStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1TokenReview where
parseJSON = A.withObject "V1beta1TokenReview" $ \o ->
V1beta1TokenReview
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1TokenReview where
toJSON V1beta1TokenReview {..} =
_omitNulls
[ "apiVersion" .= v1beta1TokenReviewApiVersion
, "kind" .= v1beta1TokenReviewKind
, "metadata" .= v1beta1TokenReviewMetadata
, "spec" .= v1beta1TokenReviewSpec
, "status" .= v1beta1TokenReviewStatus
]
mkV1beta1TokenReview
:: V1beta1TokenReviewSpec
-> V1beta1TokenReview
mkV1beta1TokenReview v1beta1TokenReviewSpec =
V1beta1TokenReview
{ v1beta1TokenReviewApiVersion = Nothing
, v1beta1TokenReviewKind = Nothing
, v1beta1TokenReviewMetadata = Nothing
, v1beta1TokenReviewSpec
, v1beta1TokenReviewStatus = Nothing
}
data V1beta1TokenReviewSpec = V1beta1TokenReviewSpec
{ v1beta1TokenReviewSpecAudiences :: !(Maybe [Text])
, v1beta1TokenReviewSpecToken :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1TokenReviewSpec where
parseJSON = A.withObject "V1beta1TokenReviewSpec" $ \o ->
V1beta1TokenReviewSpec
<$> (o .:? "audiences")
<*> (o .:? "token")
instance A.ToJSON V1beta1TokenReviewSpec where
toJSON V1beta1TokenReviewSpec {..} =
_omitNulls
[ "audiences" .= v1beta1TokenReviewSpecAudiences
, "token" .= v1beta1TokenReviewSpecToken
]
mkV1beta1TokenReviewSpec
:: V1beta1TokenReviewSpec
mkV1beta1TokenReviewSpec =
V1beta1TokenReviewSpec
{ v1beta1TokenReviewSpecAudiences = Nothing
, v1beta1TokenReviewSpecToken = Nothing
}
data V1beta1TokenReviewStatus = V1beta1TokenReviewStatus
{ v1beta1TokenReviewStatusAudiences :: !(Maybe [Text])
, v1beta1TokenReviewStatusAuthenticated :: !(Maybe Bool)
, v1beta1TokenReviewStatusError :: !(Maybe Text)
, v1beta1TokenReviewStatusUser :: !(Maybe V1beta1UserInfo)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1TokenReviewStatus where
parseJSON = A.withObject "V1beta1TokenReviewStatus" $ \o ->
V1beta1TokenReviewStatus
<$> (o .:? "audiences")
<*> (o .:? "authenticated")
<*> (o .:? "error")
<*> (o .:? "user")
instance A.ToJSON V1beta1TokenReviewStatus where
toJSON V1beta1TokenReviewStatus {..} =
_omitNulls
[ "audiences" .= v1beta1TokenReviewStatusAudiences
, "authenticated" .= v1beta1TokenReviewStatusAuthenticated
, "error" .= v1beta1TokenReviewStatusError
, "user" .= v1beta1TokenReviewStatusUser
]
mkV1beta1TokenReviewStatus
:: V1beta1TokenReviewStatus
mkV1beta1TokenReviewStatus =
V1beta1TokenReviewStatus
{ v1beta1TokenReviewStatusAudiences = Nothing
, v1beta1TokenReviewStatusAuthenticated = Nothing
, v1beta1TokenReviewStatusError = Nothing
, v1beta1TokenReviewStatusUser = Nothing
}
data V1beta1UserInfo = V1beta1UserInfo
{ v1beta1UserInfoExtra :: !(Maybe (Map.Map String [Text]))
, v1beta1UserInfoGroups :: !(Maybe [Text])
, v1beta1UserInfoUid :: !(Maybe Text)
, v1beta1UserInfoUsername :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1UserInfo where
parseJSON = A.withObject "V1beta1UserInfo" $ \o ->
V1beta1UserInfo
<$> (o .:? "extra")
<*> (o .:? "groups")
<*> (o .:? "uid")
<*> (o .:? "username")
instance A.ToJSON V1beta1UserInfo where
toJSON V1beta1UserInfo {..} =
_omitNulls
[ "extra" .= v1beta1UserInfoExtra
, "groups" .= v1beta1UserInfoGroups
, "uid" .= v1beta1UserInfoUid
, "username" .= v1beta1UserInfoUsername
]
mkV1beta1UserInfo
:: V1beta1UserInfo
mkV1beta1UserInfo =
V1beta1UserInfo
{ v1beta1UserInfoExtra = Nothing
, v1beta1UserInfoGroups = Nothing
, v1beta1UserInfoUid = Nothing
, v1beta1UserInfoUsername = Nothing
}
data V1beta1ValidatingWebhookConfiguration = V1beta1ValidatingWebhookConfiguration
{ v1beta1ValidatingWebhookConfigurationApiVersion :: !(Maybe Text)
, v1beta1ValidatingWebhookConfigurationKind :: !(Maybe Text)
, v1beta1ValidatingWebhookConfigurationMetadata :: !(Maybe V1ObjectMeta)
, v1beta1ValidatingWebhookConfigurationWebhooks :: !(Maybe [V1beta1Webhook])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ValidatingWebhookConfiguration where
parseJSON = A.withObject "V1beta1ValidatingWebhookConfiguration" $ \o ->
V1beta1ValidatingWebhookConfiguration
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "webhooks")
instance A.ToJSON V1beta1ValidatingWebhookConfiguration where
toJSON V1beta1ValidatingWebhookConfiguration {..} =
_omitNulls
[ "apiVersion" .= v1beta1ValidatingWebhookConfigurationApiVersion
, "kind" .= v1beta1ValidatingWebhookConfigurationKind
, "metadata" .= v1beta1ValidatingWebhookConfigurationMetadata
, "webhooks" .= v1beta1ValidatingWebhookConfigurationWebhooks
]
mkV1beta1ValidatingWebhookConfiguration
:: V1beta1ValidatingWebhookConfiguration
mkV1beta1ValidatingWebhookConfiguration =
V1beta1ValidatingWebhookConfiguration
{ v1beta1ValidatingWebhookConfigurationApiVersion = Nothing
, v1beta1ValidatingWebhookConfigurationKind = Nothing
, v1beta1ValidatingWebhookConfigurationMetadata = Nothing
, v1beta1ValidatingWebhookConfigurationWebhooks = Nothing
}
data V1beta1ValidatingWebhookConfigurationList = V1beta1ValidatingWebhookConfigurationList
{ v1beta1ValidatingWebhookConfigurationListApiVersion :: !(Maybe Text)
, v1beta1ValidatingWebhookConfigurationListItems :: !([V1beta1ValidatingWebhookConfiguration])
, v1beta1ValidatingWebhookConfigurationListKind :: !(Maybe Text)
, v1beta1ValidatingWebhookConfigurationListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1ValidatingWebhookConfigurationList where
parseJSON = A.withObject "V1beta1ValidatingWebhookConfigurationList" $ \o ->
V1beta1ValidatingWebhookConfigurationList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1ValidatingWebhookConfigurationList where
toJSON V1beta1ValidatingWebhookConfigurationList {..} =
_omitNulls
[ "apiVersion" .= v1beta1ValidatingWebhookConfigurationListApiVersion
, "items" .= v1beta1ValidatingWebhookConfigurationListItems
, "kind" .= v1beta1ValidatingWebhookConfigurationListKind
, "metadata" .= v1beta1ValidatingWebhookConfigurationListMetadata
]
mkV1beta1ValidatingWebhookConfigurationList
:: [V1beta1ValidatingWebhookConfiguration]
-> V1beta1ValidatingWebhookConfigurationList
mkV1beta1ValidatingWebhookConfigurationList v1beta1ValidatingWebhookConfigurationListItems =
V1beta1ValidatingWebhookConfigurationList
{ v1beta1ValidatingWebhookConfigurationListApiVersion = Nothing
, v1beta1ValidatingWebhookConfigurationListItems
, v1beta1ValidatingWebhookConfigurationListKind = Nothing
, v1beta1ValidatingWebhookConfigurationListMetadata = Nothing
}
data V1beta1VolumeAttachment = V1beta1VolumeAttachment
{ v1beta1VolumeAttachmentApiVersion :: !(Maybe Text)
, v1beta1VolumeAttachmentKind :: !(Maybe Text)
, v1beta1VolumeAttachmentMetadata :: !(Maybe V1ObjectMeta)
, v1beta1VolumeAttachmentSpec :: !(V1beta1VolumeAttachmentSpec)
, v1beta1VolumeAttachmentStatus :: !(Maybe V1beta1VolumeAttachmentStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1VolumeAttachment where
parseJSON = A.withObject "V1beta1VolumeAttachment" $ \o ->
V1beta1VolumeAttachment
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta1VolumeAttachment where
toJSON V1beta1VolumeAttachment {..} =
_omitNulls
[ "apiVersion" .= v1beta1VolumeAttachmentApiVersion
, "kind" .= v1beta1VolumeAttachmentKind
, "metadata" .= v1beta1VolumeAttachmentMetadata
, "spec" .= v1beta1VolumeAttachmentSpec
, "status" .= v1beta1VolumeAttachmentStatus
]
mkV1beta1VolumeAttachment
:: V1beta1VolumeAttachmentSpec
-> V1beta1VolumeAttachment
mkV1beta1VolumeAttachment v1beta1VolumeAttachmentSpec =
V1beta1VolumeAttachment
{ v1beta1VolumeAttachmentApiVersion = Nothing
, v1beta1VolumeAttachmentKind = Nothing
, v1beta1VolumeAttachmentMetadata = Nothing
, v1beta1VolumeAttachmentSpec
, v1beta1VolumeAttachmentStatus = Nothing
}
data V1beta1VolumeAttachmentList = V1beta1VolumeAttachmentList
{ v1beta1VolumeAttachmentListApiVersion :: !(Maybe Text)
, v1beta1VolumeAttachmentListItems :: !([V1beta1VolumeAttachment])
, v1beta1VolumeAttachmentListKind :: !(Maybe Text)
, v1beta1VolumeAttachmentListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1VolumeAttachmentList where
parseJSON = A.withObject "V1beta1VolumeAttachmentList" $ \o ->
V1beta1VolumeAttachmentList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta1VolumeAttachmentList where
toJSON V1beta1VolumeAttachmentList {..} =
_omitNulls
[ "apiVersion" .= v1beta1VolumeAttachmentListApiVersion
, "items" .= v1beta1VolumeAttachmentListItems
, "kind" .= v1beta1VolumeAttachmentListKind
, "metadata" .= v1beta1VolumeAttachmentListMetadata
]
mkV1beta1VolumeAttachmentList
:: [V1beta1VolumeAttachment]
-> V1beta1VolumeAttachmentList
mkV1beta1VolumeAttachmentList v1beta1VolumeAttachmentListItems =
V1beta1VolumeAttachmentList
{ v1beta1VolumeAttachmentListApiVersion = Nothing
, v1beta1VolumeAttachmentListItems
, v1beta1VolumeAttachmentListKind = Nothing
, v1beta1VolumeAttachmentListMetadata = Nothing
}
data V1beta1VolumeAttachmentSource = V1beta1VolumeAttachmentSource
{ v1beta1VolumeAttachmentSourcePersistentVolumeName :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1VolumeAttachmentSource where
parseJSON = A.withObject "V1beta1VolumeAttachmentSource" $ \o ->
V1beta1VolumeAttachmentSource
<$> (o .:? "persistentVolumeName")
instance A.ToJSON V1beta1VolumeAttachmentSource where
toJSON V1beta1VolumeAttachmentSource {..} =
_omitNulls
[ "persistentVolumeName" .= v1beta1VolumeAttachmentSourcePersistentVolumeName
]
mkV1beta1VolumeAttachmentSource
:: V1beta1VolumeAttachmentSource
mkV1beta1VolumeAttachmentSource =
V1beta1VolumeAttachmentSource
{ v1beta1VolumeAttachmentSourcePersistentVolumeName = Nothing
}
data V1beta1VolumeAttachmentSpec = V1beta1VolumeAttachmentSpec
{ v1beta1VolumeAttachmentSpecAttacher :: !(Text)
, v1beta1VolumeAttachmentSpecNodeName :: !(Text)
, v1beta1VolumeAttachmentSpecSource :: !(V1beta1VolumeAttachmentSource)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1VolumeAttachmentSpec where
parseJSON = A.withObject "V1beta1VolumeAttachmentSpec" $ \o ->
V1beta1VolumeAttachmentSpec
<$> (o .: "attacher")
<*> (o .: "nodeName")
<*> (o .: "source")
instance A.ToJSON V1beta1VolumeAttachmentSpec where
toJSON V1beta1VolumeAttachmentSpec {..} =
_omitNulls
[ "attacher" .= v1beta1VolumeAttachmentSpecAttacher
, "nodeName" .= v1beta1VolumeAttachmentSpecNodeName
, "source" .= v1beta1VolumeAttachmentSpecSource
]
mkV1beta1VolumeAttachmentSpec
:: Text
-> Text
-> V1beta1VolumeAttachmentSource
-> V1beta1VolumeAttachmentSpec
mkV1beta1VolumeAttachmentSpec v1beta1VolumeAttachmentSpecAttacher v1beta1VolumeAttachmentSpecNodeName v1beta1VolumeAttachmentSpecSource =
V1beta1VolumeAttachmentSpec
{ v1beta1VolumeAttachmentSpecAttacher
, v1beta1VolumeAttachmentSpecNodeName
, v1beta1VolumeAttachmentSpecSource
}
data V1beta1VolumeAttachmentStatus = V1beta1VolumeAttachmentStatus
{ v1beta1VolumeAttachmentStatusAttachError :: !(Maybe V1beta1VolumeError)
, v1beta1VolumeAttachmentStatusAttached :: !(Bool)
, v1beta1VolumeAttachmentStatusAttachmentMetadata :: !(Maybe (Map.Map String Text))
, v1beta1VolumeAttachmentStatusDetachError :: !(Maybe V1beta1VolumeError)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1VolumeAttachmentStatus where
parseJSON = A.withObject "V1beta1VolumeAttachmentStatus" $ \o ->
V1beta1VolumeAttachmentStatus
<$> (o .:? "attachError")
<*> (o .: "attached")
<*> (o .:? "attachmentMetadata")
<*> (o .:? "detachError")
instance A.ToJSON V1beta1VolumeAttachmentStatus where
toJSON V1beta1VolumeAttachmentStatus {..} =
_omitNulls
[ "attachError" .= v1beta1VolumeAttachmentStatusAttachError
, "attached" .= v1beta1VolumeAttachmentStatusAttached
, "attachmentMetadata" .= v1beta1VolumeAttachmentStatusAttachmentMetadata
, "detachError" .= v1beta1VolumeAttachmentStatusDetachError
]
mkV1beta1VolumeAttachmentStatus
:: Bool
-> V1beta1VolumeAttachmentStatus
mkV1beta1VolumeAttachmentStatus v1beta1VolumeAttachmentStatusAttached =
V1beta1VolumeAttachmentStatus
{ v1beta1VolumeAttachmentStatusAttachError = Nothing
, v1beta1VolumeAttachmentStatusAttached
, v1beta1VolumeAttachmentStatusAttachmentMetadata = Nothing
, v1beta1VolumeAttachmentStatusDetachError = Nothing
}
data V1beta1VolumeError = V1beta1VolumeError
{ v1beta1VolumeErrorMessage :: !(Maybe Text)
, v1beta1VolumeErrorTime :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1VolumeError where
parseJSON = A.withObject "V1beta1VolumeError" $ \o ->
V1beta1VolumeError
<$> (o .:? "message")
<*> (o .:? "time")
instance A.ToJSON V1beta1VolumeError where
toJSON V1beta1VolumeError {..} =
_omitNulls
[ "message" .= v1beta1VolumeErrorMessage
, "time" .= v1beta1VolumeErrorTime
]
mkV1beta1VolumeError
:: V1beta1VolumeError
mkV1beta1VolumeError =
V1beta1VolumeError
{ v1beta1VolumeErrorMessage = Nothing
, v1beta1VolumeErrorTime = Nothing
}
data V1beta1Webhook = V1beta1Webhook
{ v1beta1WebhookAdmissionReviewVersions :: !(Maybe [Text])
, v1beta1WebhookClientConfig :: !(AdmissionregistrationV1beta1WebhookClientConfig)
, v1beta1WebhookFailurePolicy :: !(Maybe Text)
, v1beta1WebhookName :: !(Text)
, v1beta1WebhookNamespaceSelector :: !(Maybe V1LabelSelector)
, v1beta1WebhookRules :: !(Maybe [V1beta1RuleWithOperations])
, v1beta1WebhookSideEffects :: !(Maybe Text)
, v1beta1WebhookTimeoutSeconds :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta1Webhook where
parseJSON = A.withObject "V1beta1Webhook" $ \o ->
V1beta1Webhook
<$> (o .:? "admissionReviewVersions")
<*> (o .: "clientConfig")
<*> (o .:? "failurePolicy")
<*> (o .: "name")
<*> (o .:? "namespaceSelector")
<*> (o .:? "rules")
<*> (o .:? "sideEffects")
<*> (o .:? "timeoutSeconds")
instance A.ToJSON V1beta1Webhook where
toJSON V1beta1Webhook {..} =
_omitNulls
[ "admissionReviewVersions" .= v1beta1WebhookAdmissionReviewVersions
, "clientConfig" .= v1beta1WebhookClientConfig
, "failurePolicy" .= v1beta1WebhookFailurePolicy
, "name" .= v1beta1WebhookName
, "namespaceSelector" .= v1beta1WebhookNamespaceSelector
, "rules" .= v1beta1WebhookRules
, "sideEffects" .= v1beta1WebhookSideEffects
, "timeoutSeconds" .= v1beta1WebhookTimeoutSeconds
]
mkV1beta1Webhook
:: AdmissionregistrationV1beta1WebhookClientConfig
-> Text
-> V1beta1Webhook
mkV1beta1Webhook v1beta1WebhookClientConfig v1beta1WebhookName =
V1beta1Webhook
{ v1beta1WebhookAdmissionReviewVersions = Nothing
, v1beta1WebhookClientConfig
, v1beta1WebhookFailurePolicy = Nothing
, v1beta1WebhookName
, v1beta1WebhookNamespaceSelector = Nothing
, v1beta1WebhookRules = Nothing
, v1beta1WebhookSideEffects = Nothing
, v1beta1WebhookTimeoutSeconds = Nothing
}
data V1beta2ControllerRevision = V1beta2ControllerRevision
{ v1beta2ControllerRevisionApiVersion :: !(Maybe Text)
, v1beta2ControllerRevisionData :: !(Maybe RuntimeRawExtension)
, v1beta2ControllerRevisionKind :: !(Maybe Text)
, v1beta2ControllerRevisionMetadata :: !(Maybe V1ObjectMeta)
, v1beta2ControllerRevisionRevision :: !(Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2ControllerRevision where
parseJSON = A.withObject "V1beta2ControllerRevision" $ \o ->
V1beta2ControllerRevision
<$> (o .:? "apiVersion")
<*> (o .:? "data")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .: "revision")
instance A.ToJSON V1beta2ControllerRevision where
toJSON V1beta2ControllerRevision {..} =
_omitNulls
[ "apiVersion" .= v1beta2ControllerRevisionApiVersion
, "data" .= v1beta2ControllerRevisionData
, "kind" .= v1beta2ControllerRevisionKind
, "metadata" .= v1beta2ControllerRevisionMetadata
, "revision" .= v1beta2ControllerRevisionRevision
]
mkV1beta2ControllerRevision
:: Integer
-> V1beta2ControllerRevision
mkV1beta2ControllerRevision v1beta2ControllerRevisionRevision =
V1beta2ControllerRevision
{ v1beta2ControllerRevisionApiVersion = Nothing
, v1beta2ControllerRevisionData = Nothing
, v1beta2ControllerRevisionKind = Nothing
, v1beta2ControllerRevisionMetadata = Nothing
, v1beta2ControllerRevisionRevision
}
data V1beta2ControllerRevisionList = V1beta2ControllerRevisionList
{ v1beta2ControllerRevisionListApiVersion :: !(Maybe Text)
, v1beta2ControllerRevisionListItems :: !([V1beta2ControllerRevision])
, v1beta2ControllerRevisionListKind :: !(Maybe Text)
, v1beta2ControllerRevisionListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2ControllerRevisionList where
parseJSON = A.withObject "V1beta2ControllerRevisionList" $ \o ->
V1beta2ControllerRevisionList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta2ControllerRevisionList where
toJSON V1beta2ControllerRevisionList {..} =
_omitNulls
[ "apiVersion" .= v1beta2ControllerRevisionListApiVersion
, "items" .= v1beta2ControllerRevisionListItems
, "kind" .= v1beta2ControllerRevisionListKind
, "metadata" .= v1beta2ControllerRevisionListMetadata
]
mkV1beta2ControllerRevisionList
:: [V1beta2ControllerRevision]
-> V1beta2ControllerRevisionList
mkV1beta2ControllerRevisionList v1beta2ControllerRevisionListItems =
V1beta2ControllerRevisionList
{ v1beta2ControllerRevisionListApiVersion = Nothing
, v1beta2ControllerRevisionListItems
, v1beta2ControllerRevisionListKind = Nothing
, v1beta2ControllerRevisionListMetadata = Nothing
}
data V1beta2DaemonSet = V1beta2DaemonSet
{ v1beta2DaemonSetApiVersion :: !(Maybe Text)
, v1beta2DaemonSetKind :: !(Maybe Text)
, v1beta2DaemonSetMetadata :: !(Maybe V1ObjectMeta)
, v1beta2DaemonSetSpec :: !(Maybe V1beta2DaemonSetSpec)
, v1beta2DaemonSetStatus :: !(Maybe V1beta2DaemonSetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DaemonSet where
parseJSON = A.withObject "V1beta2DaemonSet" $ \o ->
V1beta2DaemonSet
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta2DaemonSet where
toJSON V1beta2DaemonSet {..} =
_omitNulls
[ "apiVersion" .= v1beta2DaemonSetApiVersion
, "kind" .= v1beta2DaemonSetKind
, "metadata" .= v1beta2DaemonSetMetadata
, "spec" .= v1beta2DaemonSetSpec
, "status" .= v1beta2DaemonSetStatus
]
mkV1beta2DaemonSet
:: V1beta2DaemonSet
mkV1beta2DaemonSet =
V1beta2DaemonSet
{ v1beta2DaemonSetApiVersion = Nothing
, v1beta2DaemonSetKind = Nothing
, v1beta2DaemonSetMetadata = Nothing
, v1beta2DaemonSetSpec = Nothing
, v1beta2DaemonSetStatus = Nothing
}
data V1beta2DaemonSetCondition = V1beta2DaemonSetCondition
{ v1beta2DaemonSetConditionLastTransitionTime :: !(Maybe DateTime)
, v1beta2DaemonSetConditionMessage :: !(Maybe Text)
, v1beta2DaemonSetConditionReason :: !(Maybe Text)
, v1beta2DaemonSetConditionStatus :: !(Text)
, v1beta2DaemonSetConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DaemonSetCondition where
parseJSON = A.withObject "V1beta2DaemonSetCondition" $ \o ->
V1beta2DaemonSetCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1beta2DaemonSetCondition where
toJSON V1beta2DaemonSetCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1beta2DaemonSetConditionLastTransitionTime
, "message" .= v1beta2DaemonSetConditionMessage
, "reason" .= v1beta2DaemonSetConditionReason
, "status" .= v1beta2DaemonSetConditionStatus
, "type" .= v1beta2DaemonSetConditionType
]
mkV1beta2DaemonSetCondition
:: Text
-> Text
-> V1beta2DaemonSetCondition
mkV1beta2DaemonSetCondition v1beta2DaemonSetConditionStatus v1beta2DaemonSetConditionType =
V1beta2DaemonSetCondition
{ v1beta2DaemonSetConditionLastTransitionTime = Nothing
, v1beta2DaemonSetConditionMessage = Nothing
, v1beta2DaemonSetConditionReason = Nothing
, v1beta2DaemonSetConditionStatus
, v1beta2DaemonSetConditionType
}
data V1beta2DaemonSetList = V1beta2DaemonSetList
{ v1beta2DaemonSetListApiVersion :: !(Maybe Text)
, v1beta2DaemonSetListItems :: !([V1beta2DaemonSet])
, v1beta2DaemonSetListKind :: !(Maybe Text)
, v1beta2DaemonSetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DaemonSetList where
parseJSON = A.withObject "V1beta2DaemonSetList" $ \o ->
V1beta2DaemonSetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta2DaemonSetList where
toJSON V1beta2DaemonSetList {..} =
_omitNulls
[ "apiVersion" .= v1beta2DaemonSetListApiVersion
, "items" .= v1beta2DaemonSetListItems
, "kind" .= v1beta2DaemonSetListKind
, "metadata" .= v1beta2DaemonSetListMetadata
]
mkV1beta2DaemonSetList
:: [V1beta2DaemonSet]
-> V1beta2DaemonSetList
mkV1beta2DaemonSetList v1beta2DaemonSetListItems =
V1beta2DaemonSetList
{ v1beta2DaemonSetListApiVersion = Nothing
, v1beta2DaemonSetListItems
, v1beta2DaemonSetListKind = Nothing
, v1beta2DaemonSetListMetadata = Nothing
}
data V1beta2DaemonSetSpec = V1beta2DaemonSetSpec
{ v1beta2DaemonSetSpecMinReadySeconds :: !(Maybe Int)
, v1beta2DaemonSetSpecRevisionHistoryLimit :: !(Maybe Int)
, v1beta2DaemonSetSpecSelector :: !(V1LabelSelector)
, v1beta2DaemonSetSpecTemplate :: !(V1PodTemplateSpec)
, v1beta2DaemonSetSpecUpdateStrategy :: !(Maybe V1beta2DaemonSetUpdateStrategy)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DaemonSetSpec where
parseJSON = A.withObject "V1beta2DaemonSetSpec" $ \o ->
V1beta2DaemonSetSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "revisionHistoryLimit")
<*> (o .: "selector")
<*> (o .: "template")
<*> (o .:? "updateStrategy")
instance A.ToJSON V1beta2DaemonSetSpec where
toJSON V1beta2DaemonSetSpec {..} =
_omitNulls
[ "minReadySeconds" .= v1beta2DaemonSetSpecMinReadySeconds
, "revisionHistoryLimit" .= v1beta2DaemonSetSpecRevisionHistoryLimit
, "selector" .= v1beta2DaemonSetSpecSelector
, "template" .= v1beta2DaemonSetSpecTemplate
, "updateStrategy" .= v1beta2DaemonSetSpecUpdateStrategy
]
mkV1beta2DaemonSetSpec
:: V1LabelSelector
-> V1PodTemplateSpec
-> V1beta2DaemonSetSpec
mkV1beta2DaemonSetSpec v1beta2DaemonSetSpecSelector v1beta2DaemonSetSpecTemplate =
V1beta2DaemonSetSpec
{ v1beta2DaemonSetSpecMinReadySeconds = Nothing
, v1beta2DaemonSetSpecRevisionHistoryLimit = Nothing
, v1beta2DaemonSetSpecSelector
, v1beta2DaemonSetSpecTemplate
, v1beta2DaemonSetSpecUpdateStrategy = Nothing
}
data V1beta2DaemonSetStatus = V1beta2DaemonSetStatus
{ v1beta2DaemonSetStatusCollisionCount :: !(Maybe Int)
, v1beta2DaemonSetStatusConditions :: !(Maybe [V1beta2DaemonSetCondition])
, v1beta2DaemonSetStatusCurrentNumberScheduled :: !(Int)
, v1beta2DaemonSetStatusDesiredNumberScheduled :: !(Int)
, v1beta2DaemonSetStatusNumberAvailable :: !(Maybe Int)
, v1beta2DaemonSetStatusNumberMisscheduled :: !(Int)
, v1beta2DaemonSetStatusNumberReady :: !(Int)
, v1beta2DaemonSetStatusNumberUnavailable :: !(Maybe Int)
, v1beta2DaemonSetStatusObservedGeneration :: !(Maybe Integer)
, v1beta2DaemonSetStatusUpdatedNumberScheduled :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DaemonSetStatus where
parseJSON = A.withObject "V1beta2DaemonSetStatus" $ \o ->
V1beta2DaemonSetStatus
<$> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .: "currentNumberScheduled")
<*> (o .: "desiredNumberScheduled")
<*> (o .:? "numberAvailable")
<*> (o .: "numberMisscheduled")
<*> (o .: "numberReady")
<*> (o .:? "numberUnavailable")
<*> (o .:? "observedGeneration")
<*> (o .:? "updatedNumberScheduled")
instance A.ToJSON V1beta2DaemonSetStatus where
toJSON V1beta2DaemonSetStatus {..} =
_omitNulls
[ "collisionCount" .= v1beta2DaemonSetStatusCollisionCount
, "conditions" .= v1beta2DaemonSetStatusConditions
, "currentNumberScheduled" .= v1beta2DaemonSetStatusCurrentNumberScheduled
, "desiredNumberScheduled" .= v1beta2DaemonSetStatusDesiredNumberScheduled
, "numberAvailable" .= v1beta2DaemonSetStatusNumberAvailable
, "numberMisscheduled" .= v1beta2DaemonSetStatusNumberMisscheduled
, "numberReady" .= v1beta2DaemonSetStatusNumberReady
, "numberUnavailable" .= v1beta2DaemonSetStatusNumberUnavailable
, "observedGeneration" .= v1beta2DaemonSetStatusObservedGeneration
, "updatedNumberScheduled" .= v1beta2DaemonSetStatusUpdatedNumberScheduled
]
mkV1beta2DaemonSetStatus
:: Int
-> Int
-> Int
-> Int
-> V1beta2DaemonSetStatus
mkV1beta2DaemonSetStatus v1beta2DaemonSetStatusCurrentNumberScheduled v1beta2DaemonSetStatusDesiredNumberScheduled v1beta2DaemonSetStatusNumberMisscheduled v1beta2DaemonSetStatusNumberReady =
V1beta2DaemonSetStatus
{ v1beta2DaemonSetStatusCollisionCount = Nothing
, v1beta2DaemonSetStatusConditions = Nothing
, v1beta2DaemonSetStatusCurrentNumberScheduled
, v1beta2DaemonSetStatusDesiredNumberScheduled
, v1beta2DaemonSetStatusNumberAvailable = Nothing
, v1beta2DaemonSetStatusNumberMisscheduled
, v1beta2DaemonSetStatusNumberReady
, v1beta2DaemonSetStatusNumberUnavailable = Nothing
, v1beta2DaemonSetStatusObservedGeneration = Nothing
, v1beta2DaemonSetStatusUpdatedNumberScheduled = Nothing
}
data V1beta2DaemonSetUpdateStrategy = V1beta2DaemonSetUpdateStrategy
{ v1beta2DaemonSetUpdateStrategyRollingUpdate :: !(Maybe V1beta2RollingUpdateDaemonSet)
, v1beta2DaemonSetUpdateStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DaemonSetUpdateStrategy where
parseJSON = A.withObject "V1beta2DaemonSetUpdateStrategy" $ \o ->
V1beta2DaemonSetUpdateStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON V1beta2DaemonSetUpdateStrategy where
toJSON V1beta2DaemonSetUpdateStrategy {..} =
_omitNulls
[ "rollingUpdate" .= v1beta2DaemonSetUpdateStrategyRollingUpdate
, "type" .= v1beta2DaemonSetUpdateStrategyType
]
mkV1beta2DaemonSetUpdateStrategy
:: V1beta2DaemonSetUpdateStrategy
mkV1beta2DaemonSetUpdateStrategy =
V1beta2DaemonSetUpdateStrategy
{ v1beta2DaemonSetUpdateStrategyRollingUpdate = Nothing
, v1beta2DaemonSetUpdateStrategyType = Nothing
}
data V1beta2Deployment = V1beta2Deployment
{ v1beta2DeploymentApiVersion :: !(Maybe Text)
, v1beta2DeploymentKind :: !(Maybe Text)
, v1beta2DeploymentMetadata :: !(Maybe V1ObjectMeta)
, v1beta2DeploymentSpec :: !(Maybe V1beta2DeploymentSpec)
, v1beta2DeploymentStatus :: !(Maybe V1beta2DeploymentStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2Deployment where
parseJSON = A.withObject "V1beta2Deployment" $ \o ->
V1beta2Deployment
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta2Deployment where
toJSON V1beta2Deployment {..} =
_omitNulls
[ "apiVersion" .= v1beta2DeploymentApiVersion
, "kind" .= v1beta2DeploymentKind
, "metadata" .= v1beta2DeploymentMetadata
, "spec" .= v1beta2DeploymentSpec
, "status" .= v1beta2DeploymentStatus
]
mkV1beta2Deployment
:: V1beta2Deployment
mkV1beta2Deployment =
V1beta2Deployment
{ v1beta2DeploymentApiVersion = Nothing
, v1beta2DeploymentKind = Nothing
, v1beta2DeploymentMetadata = Nothing
, v1beta2DeploymentSpec = Nothing
, v1beta2DeploymentStatus = Nothing
}
data V1beta2DeploymentCondition = V1beta2DeploymentCondition
{ v1beta2DeploymentConditionLastTransitionTime :: !(Maybe DateTime)
, v1beta2DeploymentConditionLastUpdateTime :: !(Maybe DateTime)
, v1beta2DeploymentConditionMessage :: !(Maybe Text)
, v1beta2DeploymentConditionReason :: !(Maybe Text)
, v1beta2DeploymentConditionStatus :: !(Text)
, v1beta2DeploymentConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DeploymentCondition where
parseJSON = A.withObject "V1beta2DeploymentCondition" $ \o ->
V1beta2DeploymentCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "lastUpdateTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1beta2DeploymentCondition where
toJSON V1beta2DeploymentCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1beta2DeploymentConditionLastTransitionTime
, "lastUpdateTime" .= v1beta2DeploymentConditionLastUpdateTime
, "message" .= v1beta2DeploymentConditionMessage
, "reason" .= v1beta2DeploymentConditionReason
, "status" .= v1beta2DeploymentConditionStatus
, "type" .= v1beta2DeploymentConditionType
]
mkV1beta2DeploymentCondition
:: Text
-> Text
-> V1beta2DeploymentCondition
mkV1beta2DeploymentCondition v1beta2DeploymentConditionStatus v1beta2DeploymentConditionType =
V1beta2DeploymentCondition
{ v1beta2DeploymentConditionLastTransitionTime = Nothing
, v1beta2DeploymentConditionLastUpdateTime = Nothing
, v1beta2DeploymentConditionMessage = Nothing
, v1beta2DeploymentConditionReason = Nothing
, v1beta2DeploymentConditionStatus
, v1beta2DeploymentConditionType
}
data V1beta2DeploymentList = V1beta2DeploymentList
{ v1beta2DeploymentListApiVersion :: !(Maybe Text)
, v1beta2DeploymentListItems :: !([V1beta2Deployment])
, v1beta2DeploymentListKind :: !(Maybe Text)
, v1beta2DeploymentListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DeploymentList where
parseJSON = A.withObject "V1beta2DeploymentList" $ \o ->
V1beta2DeploymentList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta2DeploymentList where
toJSON V1beta2DeploymentList {..} =
_omitNulls
[ "apiVersion" .= v1beta2DeploymentListApiVersion
, "items" .= v1beta2DeploymentListItems
, "kind" .= v1beta2DeploymentListKind
, "metadata" .= v1beta2DeploymentListMetadata
]
mkV1beta2DeploymentList
:: [V1beta2Deployment]
-> V1beta2DeploymentList
mkV1beta2DeploymentList v1beta2DeploymentListItems =
V1beta2DeploymentList
{ v1beta2DeploymentListApiVersion = Nothing
, v1beta2DeploymentListItems
, v1beta2DeploymentListKind = Nothing
, v1beta2DeploymentListMetadata = Nothing
}
data V1beta2DeploymentSpec = V1beta2DeploymentSpec
{ v1beta2DeploymentSpecMinReadySeconds :: !(Maybe Int)
, v1beta2DeploymentSpecPaused :: !(Maybe Bool)
, v1beta2DeploymentSpecProgressDeadlineSeconds :: !(Maybe Int)
, v1beta2DeploymentSpecReplicas :: !(Maybe Int)
, v1beta2DeploymentSpecRevisionHistoryLimit :: !(Maybe Int)
, v1beta2DeploymentSpecSelector :: !(V1LabelSelector)
, v1beta2DeploymentSpecStrategy :: !(Maybe V1beta2DeploymentStrategy)
, v1beta2DeploymentSpecTemplate :: !(V1PodTemplateSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DeploymentSpec where
parseJSON = A.withObject "V1beta2DeploymentSpec" $ \o ->
V1beta2DeploymentSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "paused")
<*> (o .:? "progressDeadlineSeconds")
<*> (o .:? "replicas")
<*> (o .:? "revisionHistoryLimit")
<*> (o .: "selector")
<*> (o .:? "strategy")
<*> (o .: "template")
instance A.ToJSON V1beta2DeploymentSpec where
toJSON V1beta2DeploymentSpec {..} =
_omitNulls
[ "minReadySeconds" .= v1beta2DeploymentSpecMinReadySeconds
, "paused" .= v1beta2DeploymentSpecPaused
, "progressDeadlineSeconds" .= v1beta2DeploymentSpecProgressDeadlineSeconds
, "replicas" .= v1beta2DeploymentSpecReplicas
, "revisionHistoryLimit" .= v1beta2DeploymentSpecRevisionHistoryLimit
, "selector" .= v1beta2DeploymentSpecSelector
, "strategy" .= v1beta2DeploymentSpecStrategy
, "template" .= v1beta2DeploymentSpecTemplate
]
mkV1beta2DeploymentSpec
:: V1LabelSelector
-> V1PodTemplateSpec
-> V1beta2DeploymentSpec
mkV1beta2DeploymentSpec v1beta2DeploymentSpecSelector v1beta2DeploymentSpecTemplate =
V1beta2DeploymentSpec
{ v1beta2DeploymentSpecMinReadySeconds = Nothing
, v1beta2DeploymentSpecPaused = Nothing
, v1beta2DeploymentSpecProgressDeadlineSeconds = Nothing
, v1beta2DeploymentSpecReplicas = Nothing
, v1beta2DeploymentSpecRevisionHistoryLimit = Nothing
, v1beta2DeploymentSpecSelector
, v1beta2DeploymentSpecStrategy = Nothing
, v1beta2DeploymentSpecTemplate
}
data V1beta2DeploymentStatus = V1beta2DeploymentStatus
{ v1beta2DeploymentStatusAvailableReplicas :: !(Maybe Int)
, v1beta2DeploymentStatusCollisionCount :: !(Maybe Int)
, v1beta2DeploymentStatusConditions :: !(Maybe [V1beta2DeploymentCondition])
, v1beta2DeploymentStatusObservedGeneration :: !(Maybe Integer)
, v1beta2DeploymentStatusReadyReplicas :: !(Maybe Int)
, v1beta2DeploymentStatusReplicas :: !(Maybe Int)
, v1beta2DeploymentStatusUnavailableReplicas :: !(Maybe Int)
, v1beta2DeploymentStatusUpdatedReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DeploymentStatus where
parseJSON = A.withObject "V1beta2DeploymentStatus" $ \o ->
V1beta2DeploymentStatus
<$> (o .:? "availableReplicas")
<*> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .:? "replicas")
<*> (o .:? "unavailableReplicas")
<*> (o .:? "updatedReplicas")
instance A.ToJSON V1beta2DeploymentStatus where
toJSON V1beta2DeploymentStatus {..} =
_omitNulls
[ "availableReplicas" .= v1beta2DeploymentStatusAvailableReplicas
, "collisionCount" .= v1beta2DeploymentStatusCollisionCount
, "conditions" .= v1beta2DeploymentStatusConditions
, "observedGeneration" .= v1beta2DeploymentStatusObservedGeneration
, "readyReplicas" .= v1beta2DeploymentStatusReadyReplicas
, "replicas" .= v1beta2DeploymentStatusReplicas
, "unavailableReplicas" .= v1beta2DeploymentStatusUnavailableReplicas
, "updatedReplicas" .= v1beta2DeploymentStatusUpdatedReplicas
]
mkV1beta2DeploymentStatus
:: V1beta2DeploymentStatus
mkV1beta2DeploymentStatus =
V1beta2DeploymentStatus
{ v1beta2DeploymentStatusAvailableReplicas = Nothing
, v1beta2DeploymentStatusCollisionCount = Nothing
, v1beta2DeploymentStatusConditions = Nothing
, v1beta2DeploymentStatusObservedGeneration = Nothing
, v1beta2DeploymentStatusReadyReplicas = Nothing
, v1beta2DeploymentStatusReplicas = Nothing
, v1beta2DeploymentStatusUnavailableReplicas = Nothing
, v1beta2DeploymentStatusUpdatedReplicas = Nothing
}
data V1beta2DeploymentStrategy = V1beta2DeploymentStrategy
{ v1beta2DeploymentStrategyRollingUpdate :: !(Maybe V1beta2RollingUpdateDeployment)
, v1beta2DeploymentStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2DeploymentStrategy where
parseJSON = A.withObject "V1beta2DeploymentStrategy" $ \o ->
V1beta2DeploymentStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON V1beta2DeploymentStrategy where
toJSON V1beta2DeploymentStrategy {..} =
_omitNulls
[ "rollingUpdate" .= v1beta2DeploymentStrategyRollingUpdate
, "type" .= v1beta2DeploymentStrategyType
]
mkV1beta2DeploymentStrategy
:: V1beta2DeploymentStrategy
mkV1beta2DeploymentStrategy =
V1beta2DeploymentStrategy
{ v1beta2DeploymentStrategyRollingUpdate = Nothing
, v1beta2DeploymentStrategyType = Nothing
}
data V1beta2ReplicaSet = V1beta2ReplicaSet
{ v1beta2ReplicaSetApiVersion :: !(Maybe Text)
, v1beta2ReplicaSetKind :: !(Maybe Text)
, v1beta2ReplicaSetMetadata :: !(Maybe V1ObjectMeta)
, v1beta2ReplicaSetSpec :: !(Maybe V1beta2ReplicaSetSpec)
, v1beta2ReplicaSetStatus :: !(Maybe V1beta2ReplicaSetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2ReplicaSet where
parseJSON = A.withObject "V1beta2ReplicaSet" $ \o ->
V1beta2ReplicaSet
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta2ReplicaSet where
toJSON V1beta2ReplicaSet {..} =
_omitNulls
[ "apiVersion" .= v1beta2ReplicaSetApiVersion
, "kind" .= v1beta2ReplicaSetKind
, "metadata" .= v1beta2ReplicaSetMetadata
, "spec" .= v1beta2ReplicaSetSpec
, "status" .= v1beta2ReplicaSetStatus
]
mkV1beta2ReplicaSet
:: V1beta2ReplicaSet
mkV1beta2ReplicaSet =
V1beta2ReplicaSet
{ v1beta2ReplicaSetApiVersion = Nothing
, v1beta2ReplicaSetKind = Nothing
, v1beta2ReplicaSetMetadata = Nothing
, v1beta2ReplicaSetSpec = Nothing
, v1beta2ReplicaSetStatus = Nothing
}
data V1beta2ReplicaSetCondition = V1beta2ReplicaSetCondition
{ v1beta2ReplicaSetConditionLastTransitionTime :: !(Maybe DateTime)
, v1beta2ReplicaSetConditionMessage :: !(Maybe Text)
, v1beta2ReplicaSetConditionReason :: !(Maybe Text)
, v1beta2ReplicaSetConditionStatus :: !(Text)
, v1beta2ReplicaSetConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2ReplicaSetCondition where
parseJSON = A.withObject "V1beta2ReplicaSetCondition" $ \o ->
V1beta2ReplicaSetCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1beta2ReplicaSetCondition where
toJSON V1beta2ReplicaSetCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1beta2ReplicaSetConditionLastTransitionTime
, "message" .= v1beta2ReplicaSetConditionMessage
, "reason" .= v1beta2ReplicaSetConditionReason
, "status" .= v1beta2ReplicaSetConditionStatus
, "type" .= v1beta2ReplicaSetConditionType
]
mkV1beta2ReplicaSetCondition
:: Text
-> Text
-> V1beta2ReplicaSetCondition
mkV1beta2ReplicaSetCondition v1beta2ReplicaSetConditionStatus v1beta2ReplicaSetConditionType =
V1beta2ReplicaSetCondition
{ v1beta2ReplicaSetConditionLastTransitionTime = Nothing
, v1beta2ReplicaSetConditionMessage = Nothing
, v1beta2ReplicaSetConditionReason = Nothing
, v1beta2ReplicaSetConditionStatus
, v1beta2ReplicaSetConditionType
}
data V1beta2ReplicaSetList = V1beta2ReplicaSetList
{ v1beta2ReplicaSetListApiVersion :: !(Maybe Text)
, v1beta2ReplicaSetListItems :: !([V1beta2ReplicaSet])
, v1beta2ReplicaSetListKind :: !(Maybe Text)
, v1beta2ReplicaSetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2ReplicaSetList where
parseJSON = A.withObject "V1beta2ReplicaSetList" $ \o ->
V1beta2ReplicaSetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta2ReplicaSetList where
toJSON V1beta2ReplicaSetList {..} =
_omitNulls
[ "apiVersion" .= v1beta2ReplicaSetListApiVersion
, "items" .= v1beta2ReplicaSetListItems
, "kind" .= v1beta2ReplicaSetListKind
, "metadata" .= v1beta2ReplicaSetListMetadata
]
mkV1beta2ReplicaSetList
:: [V1beta2ReplicaSet]
-> V1beta2ReplicaSetList
mkV1beta2ReplicaSetList v1beta2ReplicaSetListItems =
V1beta2ReplicaSetList
{ v1beta2ReplicaSetListApiVersion = Nothing
, v1beta2ReplicaSetListItems
, v1beta2ReplicaSetListKind = Nothing
, v1beta2ReplicaSetListMetadata = Nothing
}
data V1beta2ReplicaSetSpec = V1beta2ReplicaSetSpec
{ v1beta2ReplicaSetSpecMinReadySeconds :: !(Maybe Int)
, v1beta2ReplicaSetSpecReplicas :: !(Maybe Int)
, v1beta2ReplicaSetSpecSelector :: !(V1LabelSelector)
, v1beta2ReplicaSetSpecTemplate :: !(Maybe V1PodTemplateSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2ReplicaSetSpec where
parseJSON = A.withObject "V1beta2ReplicaSetSpec" $ \o ->
V1beta2ReplicaSetSpec
<$> (o .:? "minReadySeconds")
<*> (o .:? "replicas")
<*> (o .: "selector")
<*> (o .:? "template")
instance A.ToJSON V1beta2ReplicaSetSpec where
toJSON V1beta2ReplicaSetSpec {..} =
_omitNulls
[ "minReadySeconds" .= v1beta2ReplicaSetSpecMinReadySeconds
, "replicas" .= v1beta2ReplicaSetSpecReplicas
, "selector" .= v1beta2ReplicaSetSpecSelector
, "template" .= v1beta2ReplicaSetSpecTemplate
]
mkV1beta2ReplicaSetSpec
:: V1LabelSelector
-> V1beta2ReplicaSetSpec
mkV1beta2ReplicaSetSpec v1beta2ReplicaSetSpecSelector =
V1beta2ReplicaSetSpec
{ v1beta2ReplicaSetSpecMinReadySeconds = Nothing
, v1beta2ReplicaSetSpecReplicas = Nothing
, v1beta2ReplicaSetSpecSelector
, v1beta2ReplicaSetSpecTemplate = Nothing
}
data V1beta2ReplicaSetStatus = V1beta2ReplicaSetStatus
{ v1beta2ReplicaSetStatusAvailableReplicas :: !(Maybe Int)
, v1beta2ReplicaSetStatusConditions :: !(Maybe [V1beta2ReplicaSetCondition])
, v1beta2ReplicaSetStatusFullyLabeledReplicas :: !(Maybe Int)
, v1beta2ReplicaSetStatusObservedGeneration :: !(Maybe Integer)
, v1beta2ReplicaSetStatusReadyReplicas :: !(Maybe Int)
, v1beta2ReplicaSetStatusReplicas :: !(Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2ReplicaSetStatus where
parseJSON = A.withObject "V1beta2ReplicaSetStatus" $ \o ->
V1beta2ReplicaSetStatus
<$> (o .:? "availableReplicas")
<*> (o .:? "conditions")
<*> (o .:? "fullyLabeledReplicas")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .: "replicas")
instance A.ToJSON V1beta2ReplicaSetStatus where
toJSON V1beta2ReplicaSetStatus {..} =
_omitNulls
[ "availableReplicas" .= v1beta2ReplicaSetStatusAvailableReplicas
, "conditions" .= v1beta2ReplicaSetStatusConditions
, "fullyLabeledReplicas" .= v1beta2ReplicaSetStatusFullyLabeledReplicas
, "observedGeneration" .= v1beta2ReplicaSetStatusObservedGeneration
, "readyReplicas" .= v1beta2ReplicaSetStatusReadyReplicas
, "replicas" .= v1beta2ReplicaSetStatusReplicas
]
mkV1beta2ReplicaSetStatus
:: Int
-> V1beta2ReplicaSetStatus
mkV1beta2ReplicaSetStatus v1beta2ReplicaSetStatusReplicas =
V1beta2ReplicaSetStatus
{ v1beta2ReplicaSetStatusAvailableReplicas = Nothing
, v1beta2ReplicaSetStatusConditions = Nothing
, v1beta2ReplicaSetStatusFullyLabeledReplicas = Nothing
, v1beta2ReplicaSetStatusObservedGeneration = Nothing
, v1beta2ReplicaSetStatusReadyReplicas = Nothing
, v1beta2ReplicaSetStatusReplicas
}
data V1beta2RollingUpdateDaemonSet = V1beta2RollingUpdateDaemonSet
{ v1beta2RollingUpdateDaemonSetMaxUnavailable :: !(Maybe IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2RollingUpdateDaemonSet where
parseJSON = A.withObject "V1beta2RollingUpdateDaemonSet" $ \o ->
V1beta2RollingUpdateDaemonSet
<$> (o .:? "maxUnavailable")
instance A.ToJSON V1beta2RollingUpdateDaemonSet where
toJSON V1beta2RollingUpdateDaemonSet {..} =
_omitNulls
[ "maxUnavailable" .= v1beta2RollingUpdateDaemonSetMaxUnavailable
]
mkV1beta2RollingUpdateDaemonSet
:: V1beta2RollingUpdateDaemonSet
mkV1beta2RollingUpdateDaemonSet =
V1beta2RollingUpdateDaemonSet
{ v1beta2RollingUpdateDaemonSetMaxUnavailable = Nothing
}
data V1beta2RollingUpdateDeployment = V1beta2RollingUpdateDeployment
{ v1beta2RollingUpdateDeploymentMaxSurge :: !(Maybe IntOrString)
, v1beta2RollingUpdateDeploymentMaxUnavailable :: !(Maybe IntOrString)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2RollingUpdateDeployment where
parseJSON = A.withObject "V1beta2RollingUpdateDeployment" $ \o ->
V1beta2RollingUpdateDeployment
<$> (o .:? "maxSurge")
<*> (o .:? "maxUnavailable")
instance A.ToJSON V1beta2RollingUpdateDeployment where
toJSON V1beta2RollingUpdateDeployment {..} =
_omitNulls
[ "maxSurge" .= v1beta2RollingUpdateDeploymentMaxSurge
, "maxUnavailable" .= v1beta2RollingUpdateDeploymentMaxUnavailable
]
mkV1beta2RollingUpdateDeployment
:: V1beta2RollingUpdateDeployment
mkV1beta2RollingUpdateDeployment =
V1beta2RollingUpdateDeployment
{ v1beta2RollingUpdateDeploymentMaxSurge = Nothing
, v1beta2RollingUpdateDeploymentMaxUnavailable = Nothing
}
data V1beta2RollingUpdateStatefulSetStrategy = V1beta2RollingUpdateStatefulSetStrategy
{ v1beta2RollingUpdateStatefulSetStrategyPartition :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2RollingUpdateStatefulSetStrategy where
parseJSON = A.withObject "V1beta2RollingUpdateStatefulSetStrategy" $ \o ->
V1beta2RollingUpdateStatefulSetStrategy
<$> (o .:? "partition")
instance A.ToJSON V1beta2RollingUpdateStatefulSetStrategy where
toJSON V1beta2RollingUpdateStatefulSetStrategy {..} =
_omitNulls
[ "partition" .= v1beta2RollingUpdateStatefulSetStrategyPartition
]
mkV1beta2RollingUpdateStatefulSetStrategy
:: V1beta2RollingUpdateStatefulSetStrategy
mkV1beta2RollingUpdateStatefulSetStrategy =
V1beta2RollingUpdateStatefulSetStrategy
{ v1beta2RollingUpdateStatefulSetStrategyPartition = Nothing
}
data V1beta2Scale = V1beta2Scale
{ v1beta2ScaleApiVersion :: !(Maybe Text)
, v1beta2ScaleKind :: !(Maybe Text)
, v1beta2ScaleMetadata :: !(Maybe V1ObjectMeta)
, v1beta2ScaleSpec :: !(Maybe V1beta2ScaleSpec)
, v1beta2ScaleStatus :: !(Maybe V1beta2ScaleStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2Scale where
parseJSON = A.withObject "V1beta2Scale" $ \o ->
V1beta2Scale
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta2Scale where
toJSON V1beta2Scale {..} =
_omitNulls
[ "apiVersion" .= v1beta2ScaleApiVersion
, "kind" .= v1beta2ScaleKind
, "metadata" .= v1beta2ScaleMetadata
, "spec" .= v1beta2ScaleSpec
, "status" .= v1beta2ScaleStatus
]
mkV1beta2Scale
:: V1beta2Scale
mkV1beta2Scale =
V1beta2Scale
{ v1beta2ScaleApiVersion = Nothing
, v1beta2ScaleKind = Nothing
, v1beta2ScaleMetadata = Nothing
, v1beta2ScaleSpec = Nothing
, v1beta2ScaleStatus = Nothing
}
data V1beta2ScaleSpec = V1beta2ScaleSpec
{ v1beta2ScaleSpecReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2ScaleSpec where
parseJSON = A.withObject "V1beta2ScaleSpec" $ \o ->
V1beta2ScaleSpec
<$> (o .:? "replicas")
instance A.ToJSON V1beta2ScaleSpec where
toJSON V1beta2ScaleSpec {..} =
_omitNulls
[ "replicas" .= v1beta2ScaleSpecReplicas
]
mkV1beta2ScaleSpec
:: V1beta2ScaleSpec
mkV1beta2ScaleSpec =
V1beta2ScaleSpec
{ v1beta2ScaleSpecReplicas = Nothing
}
data V1beta2ScaleStatus = V1beta2ScaleStatus
{ v1beta2ScaleStatusReplicas :: !(Int)
, v1beta2ScaleStatusSelector :: !(Maybe (Map.Map String Text))
, v1beta2ScaleStatusTargetSelector :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2ScaleStatus where
parseJSON = A.withObject "V1beta2ScaleStatus" $ \o ->
V1beta2ScaleStatus
<$> (o .: "replicas")
<*> (o .:? "selector")
<*> (o .:? "targetSelector")
instance A.ToJSON V1beta2ScaleStatus where
toJSON V1beta2ScaleStatus {..} =
_omitNulls
[ "replicas" .= v1beta2ScaleStatusReplicas
, "selector" .= v1beta2ScaleStatusSelector
, "targetSelector" .= v1beta2ScaleStatusTargetSelector
]
mkV1beta2ScaleStatus
:: Int
-> V1beta2ScaleStatus
mkV1beta2ScaleStatus v1beta2ScaleStatusReplicas =
V1beta2ScaleStatus
{ v1beta2ScaleStatusReplicas
, v1beta2ScaleStatusSelector = Nothing
, v1beta2ScaleStatusTargetSelector = Nothing
}
data V1beta2StatefulSet = V1beta2StatefulSet
{ v1beta2StatefulSetApiVersion :: !(Maybe Text)
, v1beta2StatefulSetKind :: !(Maybe Text)
, v1beta2StatefulSetMetadata :: !(Maybe V1ObjectMeta)
, v1beta2StatefulSetSpec :: !(Maybe V1beta2StatefulSetSpec)
, v1beta2StatefulSetStatus :: !(Maybe V1beta2StatefulSetStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2StatefulSet where
parseJSON = A.withObject "V1beta2StatefulSet" $ \o ->
V1beta2StatefulSet
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V1beta2StatefulSet where
toJSON V1beta2StatefulSet {..} =
_omitNulls
[ "apiVersion" .= v1beta2StatefulSetApiVersion
, "kind" .= v1beta2StatefulSetKind
, "metadata" .= v1beta2StatefulSetMetadata
, "spec" .= v1beta2StatefulSetSpec
, "status" .= v1beta2StatefulSetStatus
]
mkV1beta2StatefulSet
:: V1beta2StatefulSet
mkV1beta2StatefulSet =
V1beta2StatefulSet
{ v1beta2StatefulSetApiVersion = Nothing
, v1beta2StatefulSetKind = Nothing
, v1beta2StatefulSetMetadata = Nothing
, v1beta2StatefulSetSpec = Nothing
, v1beta2StatefulSetStatus = Nothing
}
data V1beta2StatefulSetCondition = V1beta2StatefulSetCondition
{ v1beta2StatefulSetConditionLastTransitionTime :: !(Maybe DateTime)
, v1beta2StatefulSetConditionMessage :: !(Maybe Text)
, v1beta2StatefulSetConditionReason :: !(Maybe Text)
, v1beta2StatefulSetConditionStatus :: !(Text)
, v1beta2StatefulSetConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2StatefulSetCondition where
parseJSON = A.withObject "V1beta2StatefulSetCondition" $ \o ->
V1beta2StatefulSetCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V1beta2StatefulSetCondition where
toJSON V1beta2StatefulSetCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v1beta2StatefulSetConditionLastTransitionTime
, "message" .= v1beta2StatefulSetConditionMessage
, "reason" .= v1beta2StatefulSetConditionReason
, "status" .= v1beta2StatefulSetConditionStatus
, "type" .= v1beta2StatefulSetConditionType
]
mkV1beta2StatefulSetCondition
:: Text
-> Text
-> V1beta2StatefulSetCondition
mkV1beta2StatefulSetCondition v1beta2StatefulSetConditionStatus v1beta2StatefulSetConditionType =
V1beta2StatefulSetCondition
{ v1beta2StatefulSetConditionLastTransitionTime = Nothing
, v1beta2StatefulSetConditionMessage = Nothing
, v1beta2StatefulSetConditionReason = Nothing
, v1beta2StatefulSetConditionStatus
, v1beta2StatefulSetConditionType
}
data V1beta2StatefulSetList = V1beta2StatefulSetList
{ v1beta2StatefulSetListApiVersion :: !(Maybe Text)
, v1beta2StatefulSetListItems :: !([V1beta2StatefulSet])
, v1beta2StatefulSetListKind :: !(Maybe Text)
, v1beta2StatefulSetListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2StatefulSetList where
parseJSON = A.withObject "V1beta2StatefulSetList" $ \o ->
V1beta2StatefulSetList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V1beta2StatefulSetList where
toJSON V1beta2StatefulSetList {..} =
_omitNulls
[ "apiVersion" .= v1beta2StatefulSetListApiVersion
, "items" .= v1beta2StatefulSetListItems
, "kind" .= v1beta2StatefulSetListKind
, "metadata" .= v1beta2StatefulSetListMetadata
]
mkV1beta2StatefulSetList
:: [V1beta2StatefulSet]
-> V1beta2StatefulSetList
mkV1beta2StatefulSetList v1beta2StatefulSetListItems =
V1beta2StatefulSetList
{ v1beta2StatefulSetListApiVersion = Nothing
, v1beta2StatefulSetListItems
, v1beta2StatefulSetListKind = Nothing
, v1beta2StatefulSetListMetadata = Nothing
}
data V1beta2StatefulSetSpec = V1beta2StatefulSetSpec
{ v1beta2StatefulSetSpecPodManagementPolicy :: !(Maybe Text)
, v1beta2StatefulSetSpecReplicas :: !(Maybe Int)
, v1beta2StatefulSetSpecRevisionHistoryLimit :: !(Maybe Int)
, v1beta2StatefulSetSpecSelector :: !(V1LabelSelector)
, v1beta2StatefulSetSpecServiceName :: !(Text)
, v1beta2StatefulSetSpecTemplate :: !(V1PodTemplateSpec)
, v1beta2StatefulSetSpecUpdateStrategy :: !(Maybe V1beta2StatefulSetUpdateStrategy)
, v1beta2StatefulSetSpecVolumeClaimTemplates :: !(Maybe [V1PersistentVolumeClaim])
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2StatefulSetSpec where
parseJSON = A.withObject "V1beta2StatefulSetSpec" $ \o ->
V1beta2StatefulSetSpec
<$> (o .:? "podManagementPolicy")
<*> (o .:? "replicas")
<*> (o .:? "revisionHistoryLimit")
<*> (o .: "selector")
<*> (o .: "serviceName")
<*> (o .: "template")
<*> (o .:? "updateStrategy")
<*> (o .:? "volumeClaimTemplates")
instance A.ToJSON V1beta2StatefulSetSpec where
toJSON V1beta2StatefulSetSpec {..} =
_omitNulls
[ "podManagementPolicy" .= v1beta2StatefulSetSpecPodManagementPolicy
, "replicas" .= v1beta2StatefulSetSpecReplicas
, "revisionHistoryLimit" .= v1beta2StatefulSetSpecRevisionHistoryLimit
, "selector" .= v1beta2StatefulSetSpecSelector
, "serviceName" .= v1beta2StatefulSetSpecServiceName
, "template" .= v1beta2StatefulSetSpecTemplate
, "updateStrategy" .= v1beta2StatefulSetSpecUpdateStrategy
, "volumeClaimTemplates" .= v1beta2StatefulSetSpecVolumeClaimTemplates
]
mkV1beta2StatefulSetSpec
:: V1LabelSelector
-> Text
-> V1PodTemplateSpec
-> V1beta2StatefulSetSpec
mkV1beta2StatefulSetSpec v1beta2StatefulSetSpecSelector v1beta2StatefulSetSpecServiceName v1beta2StatefulSetSpecTemplate =
V1beta2StatefulSetSpec
{ v1beta2StatefulSetSpecPodManagementPolicy = Nothing
, v1beta2StatefulSetSpecReplicas = Nothing
, v1beta2StatefulSetSpecRevisionHistoryLimit = Nothing
, v1beta2StatefulSetSpecSelector
, v1beta2StatefulSetSpecServiceName
, v1beta2StatefulSetSpecTemplate
, v1beta2StatefulSetSpecUpdateStrategy = Nothing
, v1beta2StatefulSetSpecVolumeClaimTemplates = Nothing
}
data V1beta2StatefulSetStatus = V1beta2StatefulSetStatus
{ v1beta2StatefulSetStatusCollisionCount :: !(Maybe Int)
, v1beta2StatefulSetStatusConditions :: !(Maybe [V1beta2StatefulSetCondition])
, v1beta2StatefulSetStatusCurrentReplicas :: !(Maybe Int)
, v1beta2StatefulSetStatusCurrentRevision :: !(Maybe Text)
, v1beta2StatefulSetStatusObservedGeneration :: !(Maybe Integer)
, v1beta2StatefulSetStatusReadyReplicas :: !(Maybe Int)
, v1beta2StatefulSetStatusReplicas :: !(Int)
, v1beta2StatefulSetStatusUpdateRevision :: !(Maybe Text)
, v1beta2StatefulSetStatusUpdatedReplicas :: !(Maybe Int)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2StatefulSetStatus where
parseJSON = A.withObject "V1beta2StatefulSetStatus" $ \o ->
V1beta2StatefulSetStatus
<$> (o .:? "collisionCount")
<*> (o .:? "conditions")
<*> (o .:? "currentReplicas")
<*> (o .:? "currentRevision")
<*> (o .:? "observedGeneration")
<*> (o .:? "readyReplicas")
<*> (o .: "replicas")
<*> (o .:? "updateRevision")
<*> (o .:? "updatedReplicas")
instance A.ToJSON V1beta2StatefulSetStatus where
toJSON V1beta2StatefulSetStatus {..} =
_omitNulls
[ "collisionCount" .= v1beta2StatefulSetStatusCollisionCount
, "conditions" .= v1beta2StatefulSetStatusConditions
, "currentReplicas" .= v1beta2StatefulSetStatusCurrentReplicas
, "currentRevision" .= v1beta2StatefulSetStatusCurrentRevision
, "observedGeneration" .= v1beta2StatefulSetStatusObservedGeneration
, "readyReplicas" .= v1beta2StatefulSetStatusReadyReplicas
, "replicas" .= v1beta2StatefulSetStatusReplicas
, "updateRevision" .= v1beta2StatefulSetStatusUpdateRevision
, "updatedReplicas" .= v1beta2StatefulSetStatusUpdatedReplicas
]
mkV1beta2StatefulSetStatus
:: Int
-> V1beta2StatefulSetStatus
mkV1beta2StatefulSetStatus v1beta2StatefulSetStatusReplicas =
V1beta2StatefulSetStatus
{ v1beta2StatefulSetStatusCollisionCount = Nothing
, v1beta2StatefulSetStatusConditions = Nothing
, v1beta2StatefulSetStatusCurrentReplicas = Nothing
, v1beta2StatefulSetStatusCurrentRevision = Nothing
, v1beta2StatefulSetStatusObservedGeneration = Nothing
, v1beta2StatefulSetStatusReadyReplicas = Nothing
, v1beta2StatefulSetStatusReplicas
, v1beta2StatefulSetStatusUpdateRevision = Nothing
, v1beta2StatefulSetStatusUpdatedReplicas = Nothing
}
data V1beta2StatefulSetUpdateStrategy = V1beta2StatefulSetUpdateStrategy
{ v1beta2StatefulSetUpdateStrategyRollingUpdate :: !(Maybe V1beta2RollingUpdateStatefulSetStrategy)
, v1beta2StatefulSetUpdateStrategyType :: !(Maybe Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V1beta2StatefulSetUpdateStrategy where
parseJSON = A.withObject "V1beta2StatefulSetUpdateStrategy" $ \o ->
V1beta2StatefulSetUpdateStrategy
<$> (o .:? "rollingUpdate")
<*> (o .:? "type")
instance A.ToJSON V1beta2StatefulSetUpdateStrategy where
toJSON V1beta2StatefulSetUpdateStrategy {..} =
_omitNulls
[ "rollingUpdate" .= v1beta2StatefulSetUpdateStrategyRollingUpdate
, "type" .= v1beta2StatefulSetUpdateStrategyType
]
mkV1beta2StatefulSetUpdateStrategy
:: V1beta2StatefulSetUpdateStrategy
mkV1beta2StatefulSetUpdateStrategy =
V1beta2StatefulSetUpdateStrategy
{ v1beta2StatefulSetUpdateStrategyRollingUpdate = Nothing
, v1beta2StatefulSetUpdateStrategyType = Nothing
}
data V2alpha1CronJob = V2alpha1CronJob
{ v2alpha1CronJobApiVersion :: !(Maybe Text)
, v2alpha1CronJobKind :: !(Maybe Text)
, v2alpha1CronJobMetadata :: !(Maybe V1ObjectMeta)
, v2alpha1CronJobSpec :: !(Maybe V2alpha1CronJobSpec)
, v2alpha1CronJobStatus :: !(Maybe V2alpha1CronJobStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2alpha1CronJob where
parseJSON = A.withObject "V2alpha1CronJob" $ \o ->
V2alpha1CronJob
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V2alpha1CronJob where
toJSON V2alpha1CronJob {..} =
_omitNulls
[ "apiVersion" .= v2alpha1CronJobApiVersion
, "kind" .= v2alpha1CronJobKind
, "metadata" .= v2alpha1CronJobMetadata
, "spec" .= v2alpha1CronJobSpec
, "status" .= v2alpha1CronJobStatus
]
mkV2alpha1CronJob
:: V2alpha1CronJob
mkV2alpha1CronJob =
V2alpha1CronJob
{ v2alpha1CronJobApiVersion = Nothing
, v2alpha1CronJobKind = Nothing
, v2alpha1CronJobMetadata = Nothing
, v2alpha1CronJobSpec = Nothing
, v2alpha1CronJobStatus = Nothing
}
data V2alpha1CronJobList = V2alpha1CronJobList
{ v2alpha1CronJobListApiVersion :: !(Maybe Text)
, v2alpha1CronJobListItems :: !([V2alpha1CronJob])
, v2alpha1CronJobListKind :: !(Maybe Text)
, v2alpha1CronJobListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2alpha1CronJobList where
parseJSON = A.withObject "V2alpha1CronJobList" $ \o ->
V2alpha1CronJobList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V2alpha1CronJobList where
toJSON V2alpha1CronJobList {..} =
_omitNulls
[ "apiVersion" .= v2alpha1CronJobListApiVersion
, "items" .= v2alpha1CronJobListItems
, "kind" .= v2alpha1CronJobListKind
, "metadata" .= v2alpha1CronJobListMetadata
]
mkV2alpha1CronJobList
:: [V2alpha1CronJob]
-> V2alpha1CronJobList
mkV2alpha1CronJobList v2alpha1CronJobListItems =
V2alpha1CronJobList
{ v2alpha1CronJobListApiVersion = Nothing
, v2alpha1CronJobListItems
, v2alpha1CronJobListKind = Nothing
, v2alpha1CronJobListMetadata = Nothing
}
data V2alpha1CronJobSpec = V2alpha1CronJobSpec
{ v2alpha1CronJobSpecConcurrencyPolicy :: !(Maybe Text)
, v2alpha1CronJobSpecFailedJobsHistoryLimit :: !(Maybe Int)
, v2alpha1CronJobSpecJobTemplate :: !(V2alpha1JobTemplateSpec)
, v2alpha1CronJobSpecSchedule :: !(Text)
, v2alpha1CronJobSpecStartingDeadlineSeconds :: !(Maybe Integer)
, v2alpha1CronJobSpecSuccessfulJobsHistoryLimit :: !(Maybe Int)
, v2alpha1CronJobSpecSuspend :: !(Maybe Bool)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2alpha1CronJobSpec where
parseJSON = A.withObject "V2alpha1CronJobSpec" $ \o ->
V2alpha1CronJobSpec
<$> (o .:? "concurrencyPolicy")
<*> (o .:? "failedJobsHistoryLimit")
<*> (o .: "jobTemplate")
<*> (o .: "schedule")
<*> (o .:? "startingDeadlineSeconds")
<*> (o .:? "successfulJobsHistoryLimit")
<*> (o .:? "suspend")
instance A.ToJSON V2alpha1CronJobSpec where
toJSON V2alpha1CronJobSpec {..} =
_omitNulls
[ "concurrencyPolicy" .= v2alpha1CronJobSpecConcurrencyPolicy
, "failedJobsHistoryLimit" .= v2alpha1CronJobSpecFailedJobsHistoryLimit
, "jobTemplate" .= v2alpha1CronJobSpecJobTemplate
, "schedule" .= v2alpha1CronJobSpecSchedule
, "startingDeadlineSeconds" .= v2alpha1CronJobSpecStartingDeadlineSeconds
, "successfulJobsHistoryLimit" .= v2alpha1CronJobSpecSuccessfulJobsHistoryLimit
, "suspend" .= v2alpha1CronJobSpecSuspend
]
mkV2alpha1CronJobSpec
:: V2alpha1JobTemplateSpec
-> Text
-> V2alpha1CronJobSpec
mkV2alpha1CronJobSpec v2alpha1CronJobSpecJobTemplate v2alpha1CronJobSpecSchedule =
V2alpha1CronJobSpec
{ v2alpha1CronJobSpecConcurrencyPolicy = Nothing
, v2alpha1CronJobSpecFailedJobsHistoryLimit = Nothing
, v2alpha1CronJobSpecJobTemplate
, v2alpha1CronJobSpecSchedule
, v2alpha1CronJobSpecStartingDeadlineSeconds = Nothing
, v2alpha1CronJobSpecSuccessfulJobsHistoryLimit = Nothing
, v2alpha1CronJobSpecSuspend = Nothing
}
data V2alpha1CronJobStatus = V2alpha1CronJobStatus
{ v2alpha1CronJobStatusActive :: !(Maybe [V1ObjectReference])
, v2alpha1CronJobStatusLastScheduleTime :: !(Maybe DateTime)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2alpha1CronJobStatus where
parseJSON = A.withObject "V2alpha1CronJobStatus" $ \o ->
V2alpha1CronJobStatus
<$> (o .:? "active")
<*> (o .:? "lastScheduleTime")
instance A.ToJSON V2alpha1CronJobStatus where
toJSON V2alpha1CronJobStatus {..} =
_omitNulls
[ "active" .= v2alpha1CronJobStatusActive
, "lastScheduleTime" .= v2alpha1CronJobStatusLastScheduleTime
]
mkV2alpha1CronJobStatus
:: V2alpha1CronJobStatus
mkV2alpha1CronJobStatus =
V2alpha1CronJobStatus
{ v2alpha1CronJobStatusActive = Nothing
, v2alpha1CronJobStatusLastScheduleTime = Nothing
}
data V2alpha1JobTemplateSpec = V2alpha1JobTemplateSpec
{ v2alpha1JobTemplateSpecMetadata :: !(Maybe V1ObjectMeta)
, v2alpha1JobTemplateSpecSpec :: !(Maybe V1JobSpec)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2alpha1JobTemplateSpec where
parseJSON = A.withObject "V2alpha1JobTemplateSpec" $ \o ->
V2alpha1JobTemplateSpec
<$> (o .:? "metadata")
<*> (o .:? "spec")
instance A.ToJSON V2alpha1JobTemplateSpec where
toJSON V2alpha1JobTemplateSpec {..} =
_omitNulls
[ "metadata" .= v2alpha1JobTemplateSpecMetadata
, "spec" .= v2alpha1JobTemplateSpecSpec
]
mkV2alpha1JobTemplateSpec
:: V2alpha1JobTemplateSpec
mkV2alpha1JobTemplateSpec =
V2alpha1JobTemplateSpec
{ v2alpha1JobTemplateSpecMetadata = Nothing
, v2alpha1JobTemplateSpecSpec = Nothing
}
data V2beta1CrossVersionObjectReference = V2beta1CrossVersionObjectReference
{ v2beta1CrossVersionObjectReferenceApiVersion :: !(Maybe Text)
, v2beta1CrossVersionObjectReferenceKind :: !(Text)
, v2beta1CrossVersionObjectReferenceName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1CrossVersionObjectReference where
parseJSON = A.withObject "V2beta1CrossVersionObjectReference" $ \o ->
V2beta1CrossVersionObjectReference
<$> (o .:? "apiVersion")
<*> (o .: "kind")
<*> (o .: "name")
instance A.ToJSON V2beta1CrossVersionObjectReference where
toJSON V2beta1CrossVersionObjectReference {..} =
_omitNulls
[ "apiVersion" .= v2beta1CrossVersionObjectReferenceApiVersion
, "kind" .= v2beta1CrossVersionObjectReferenceKind
, "name" .= v2beta1CrossVersionObjectReferenceName
]
mkV2beta1CrossVersionObjectReference
:: Text
-> Text
-> V2beta1CrossVersionObjectReference
mkV2beta1CrossVersionObjectReference v2beta1CrossVersionObjectReferenceKind v2beta1CrossVersionObjectReferenceName =
V2beta1CrossVersionObjectReference
{ v2beta1CrossVersionObjectReferenceApiVersion = Nothing
, v2beta1CrossVersionObjectReferenceKind
, v2beta1CrossVersionObjectReferenceName
}
data V2beta1ExternalMetricSource = V2beta1ExternalMetricSource
{ v2beta1ExternalMetricSourceMetricName :: !(Text)
, v2beta1ExternalMetricSourceMetricSelector :: !(Maybe V1LabelSelector)
, v2beta1ExternalMetricSourceTargetAverageValue :: !(Maybe Quantity)
, v2beta1ExternalMetricSourceTargetValue :: !(Maybe Quantity)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1ExternalMetricSource where
parseJSON = A.withObject "V2beta1ExternalMetricSource" $ \o ->
V2beta1ExternalMetricSource
<$> (o .: "metricName")
<*> (o .:? "metricSelector")
<*> (o .:? "targetAverageValue")
<*> (o .:? "targetValue")
instance A.ToJSON V2beta1ExternalMetricSource where
toJSON V2beta1ExternalMetricSource {..} =
_omitNulls
[ "metricName" .= v2beta1ExternalMetricSourceMetricName
, "metricSelector" .= v2beta1ExternalMetricSourceMetricSelector
, "targetAverageValue" .= v2beta1ExternalMetricSourceTargetAverageValue
, "targetValue" .= v2beta1ExternalMetricSourceTargetValue
]
mkV2beta1ExternalMetricSource
:: Text
-> V2beta1ExternalMetricSource
mkV2beta1ExternalMetricSource v2beta1ExternalMetricSourceMetricName =
V2beta1ExternalMetricSource
{ v2beta1ExternalMetricSourceMetricName
, v2beta1ExternalMetricSourceMetricSelector = Nothing
, v2beta1ExternalMetricSourceTargetAverageValue = Nothing
, v2beta1ExternalMetricSourceTargetValue = Nothing
}
data V2beta1ExternalMetricStatus = V2beta1ExternalMetricStatus
{ v2beta1ExternalMetricStatusCurrentAverageValue :: !(Maybe Quantity)
, v2beta1ExternalMetricStatusCurrentValue :: !(Quantity)
, v2beta1ExternalMetricStatusMetricName :: !(Text)
, v2beta1ExternalMetricStatusMetricSelector :: !(Maybe V1LabelSelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1ExternalMetricStatus where
parseJSON = A.withObject "V2beta1ExternalMetricStatus" $ \o ->
V2beta1ExternalMetricStatus
<$> (o .:? "currentAverageValue")
<*> (o .: "currentValue")
<*> (o .: "metricName")
<*> (o .:? "metricSelector")
instance A.ToJSON V2beta1ExternalMetricStatus where
toJSON V2beta1ExternalMetricStatus {..} =
_omitNulls
[ "currentAverageValue" .= v2beta1ExternalMetricStatusCurrentAverageValue
, "currentValue" .= v2beta1ExternalMetricStatusCurrentValue
, "metricName" .= v2beta1ExternalMetricStatusMetricName
, "metricSelector" .= v2beta1ExternalMetricStatusMetricSelector
]
mkV2beta1ExternalMetricStatus
:: Quantity
-> Text
-> V2beta1ExternalMetricStatus
mkV2beta1ExternalMetricStatus v2beta1ExternalMetricStatusCurrentValue v2beta1ExternalMetricStatusMetricName =
V2beta1ExternalMetricStatus
{ v2beta1ExternalMetricStatusCurrentAverageValue = Nothing
, v2beta1ExternalMetricStatusCurrentValue
, v2beta1ExternalMetricStatusMetricName
, v2beta1ExternalMetricStatusMetricSelector = Nothing
}
data V2beta1HorizontalPodAutoscaler = V2beta1HorizontalPodAutoscaler
{ v2beta1HorizontalPodAutoscalerApiVersion :: !(Maybe Text)
, v2beta1HorizontalPodAutoscalerKind :: !(Maybe Text)
, v2beta1HorizontalPodAutoscalerMetadata :: !(Maybe V1ObjectMeta)
, v2beta1HorizontalPodAutoscalerSpec :: !(Maybe V2beta1HorizontalPodAutoscalerSpec)
, v2beta1HorizontalPodAutoscalerStatus :: !(Maybe V2beta1HorizontalPodAutoscalerStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1HorizontalPodAutoscaler where
parseJSON = A.withObject "V2beta1HorizontalPodAutoscaler" $ \o ->
V2beta1HorizontalPodAutoscaler
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V2beta1HorizontalPodAutoscaler where
toJSON V2beta1HorizontalPodAutoscaler {..} =
_omitNulls
[ "apiVersion" .= v2beta1HorizontalPodAutoscalerApiVersion
, "kind" .= v2beta1HorizontalPodAutoscalerKind
, "metadata" .= v2beta1HorizontalPodAutoscalerMetadata
, "spec" .= v2beta1HorizontalPodAutoscalerSpec
, "status" .= v2beta1HorizontalPodAutoscalerStatus
]
mkV2beta1HorizontalPodAutoscaler
:: V2beta1HorizontalPodAutoscaler
mkV2beta1HorizontalPodAutoscaler =
V2beta1HorizontalPodAutoscaler
{ v2beta1HorizontalPodAutoscalerApiVersion = Nothing
, v2beta1HorizontalPodAutoscalerKind = Nothing
, v2beta1HorizontalPodAutoscalerMetadata = Nothing
, v2beta1HorizontalPodAutoscalerSpec = Nothing
, v2beta1HorizontalPodAutoscalerStatus = Nothing
}
data V2beta1HorizontalPodAutoscalerCondition = V2beta1HorizontalPodAutoscalerCondition
{ v2beta1HorizontalPodAutoscalerConditionLastTransitionTime :: !(Maybe DateTime)
, v2beta1HorizontalPodAutoscalerConditionMessage :: !(Maybe Text)
, v2beta1HorizontalPodAutoscalerConditionReason :: !(Maybe Text)
, v2beta1HorizontalPodAutoscalerConditionStatus :: !(Text)
, v2beta1HorizontalPodAutoscalerConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1HorizontalPodAutoscalerCondition where
parseJSON = A.withObject "V2beta1HorizontalPodAutoscalerCondition" $ \o ->
V2beta1HorizontalPodAutoscalerCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V2beta1HorizontalPodAutoscalerCondition where
toJSON V2beta1HorizontalPodAutoscalerCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v2beta1HorizontalPodAutoscalerConditionLastTransitionTime
, "message" .= v2beta1HorizontalPodAutoscalerConditionMessage
, "reason" .= v2beta1HorizontalPodAutoscalerConditionReason
, "status" .= v2beta1HorizontalPodAutoscalerConditionStatus
, "type" .= v2beta1HorizontalPodAutoscalerConditionType
]
mkV2beta1HorizontalPodAutoscalerCondition
:: Text
-> Text
-> V2beta1HorizontalPodAutoscalerCondition
mkV2beta1HorizontalPodAutoscalerCondition v2beta1HorizontalPodAutoscalerConditionStatus v2beta1HorizontalPodAutoscalerConditionType =
V2beta1HorizontalPodAutoscalerCondition
{ v2beta1HorizontalPodAutoscalerConditionLastTransitionTime = Nothing
, v2beta1HorizontalPodAutoscalerConditionMessage = Nothing
, v2beta1HorizontalPodAutoscalerConditionReason = Nothing
, v2beta1HorizontalPodAutoscalerConditionStatus
, v2beta1HorizontalPodAutoscalerConditionType
}
data V2beta1HorizontalPodAutoscalerList = V2beta1HorizontalPodAutoscalerList
{ v2beta1HorizontalPodAutoscalerListApiVersion :: !(Maybe Text)
, v2beta1HorizontalPodAutoscalerListItems :: !([V2beta1HorizontalPodAutoscaler])
, v2beta1HorizontalPodAutoscalerListKind :: !(Maybe Text)
, v2beta1HorizontalPodAutoscalerListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1HorizontalPodAutoscalerList where
parseJSON = A.withObject "V2beta1HorizontalPodAutoscalerList" $ \o ->
V2beta1HorizontalPodAutoscalerList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V2beta1HorizontalPodAutoscalerList where
toJSON V2beta1HorizontalPodAutoscalerList {..} =
_omitNulls
[ "apiVersion" .= v2beta1HorizontalPodAutoscalerListApiVersion
, "items" .= v2beta1HorizontalPodAutoscalerListItems
, "kind" .= v2beta1HorizontalPodAutoscalerListKind
, "metadata" .= v2beta1HorizontalPodAutoscalerListMetadata
]
mkV2beta1HorizontalPodAutoscalerList
:: [V2beta1HorizontalPodAutoscaler]
-> V2beta1HorizontalPodAutoscalerList
mkV2beta1HorizontalPodAutoscalerList v2beta1HorizontalPodAutoscalerListItems =
V2beta1HorizontalPodAutoscalerList
{ v2beta1HorizontalPodAutoscalerListApiVersion = Nothing
, v2beta1HorizontalPodAutoscalerListItems
, v2beta1HorizontalPodAutoscalerListKind = Nothing
, v2beta1HorizontalPodAutoscalerListMetadata = Nothing
}
data V2beta1HorizontalPodAutoscalerSpec = V2beta1HorizontalPodAutoscalerSpec
{ v2beta1HorizontalPodAutoscalerSpecMaxReplicas :: !(Int)
, v2beta1HorizontalPodAutoscalerSpecMetrics :: !(Maybe [V2beta1MetricSpec])
, v2beta1HorizontalPodAutoscalerSpecMinReplicas :: !(Maybe Int)
, v2beta1HorizontalPodAutoscalerSpecScaleTargetRef :: !(V2beta1CrossVersionObjectReference)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1HorizontalPodAutoscalerSpec where
parseJSON = A.withObject "V2beta1HorizontalPodAutoscalerSpec" $ \o ->
V2beta1HorizontalPodAutoscalerSpec
<$> (o .: "maxReplicas")
<*> (o .:? "metrics")
<*> (o .:? "minReplicas")
<*> (o .: "scaleTargetRef")
instance A.ToJSON V2beta1HorizontalPodAutoscalerSpec where
toJSON V2beta1HorizontalPodAutoscalerSpec {..} =
_omitNulls
[ "maxReplicas" .= v2beta1HorizontalPodAutoscalerSpecMaxReplicas
, "metrics" .= v2beta1HorizontalPodAutoscalerSpecMetrics
, "minReplicas" .= v2beta1HorizontalPodAutoscalerSpecMinReplicas
, "scaleTargetRef" .= v2beta1HorizontalPodAutoscalerSpecScaleTargetRef
]
mkV2beta1HorizontalPodAutoscalerSpec
:: Int
-> V2beta1CrossVersionObjectReference
-> V2beta1HorizontalPodAutoscalerSpec
mkV2beta1HorizontalPodAutoscalerSpec v2beta1HorizontalPodAutoscalerSpecMaxReplicas v2beta1HorizontalPodAutoscalerSpecScaleTargetRef =
V2beta1HorizontalPodAutoscalerSpec
{ v2beta1HorizontalPodAutoscalerSpecMaxReplicas
, v2beta1HorizontalPodAutoscalerSpecMetrics = Nothing
, v2beta1HorizontalPodAutoscalerSpecMinReplicas = Nothing
, v2beta1HorizontalPodAutoscalerSpecScaleTargetRef
}
data V2beta1HorizontalPodAutoscalerStatus = V2beta1HorizontalPodAutoscalerStatus
{ v2beta1HorizontalPodAutoscalerStatusConditions :: !([V2beta1HorizontalPodAutoscalerCondition])
, v2beta1HorizontalPodAutoscalerStatusCurrentMetrics :: !(Maybe [V2beta1MetricStatus])
, v2beta1HorizontalPodAutoscalerStatusCurrentReplicas :: !(Int)
, v2beta1HorizontalPodAutoscalerStatusDesiredReplicas :: !(Int)
, v2beta1HorizontalPodAutoscalerStatusLastScaleTime :: !(Maybe DateTime)
, v2beta1HorizontalPodAutoscalerStatusObservedGeneration :: !(Maybe Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1HorizontalPodAutoscalerStatus where
parseJSON = A.withObject "V2beta1HorizontalPodAutoscalerStatus" $ \o ->
V2beta1HorizontalPodAutoscalerStatus
<$> (o .: "conditions")
<*> (o .:? "currentMetrics")
<*> (o .: "currentReplicas")
<*> (o .: "desiredReplicas")
<*> (o .:? "lastScaleTime")
<*> (o .:? "observedGeneration")
instance A.ToJSON V2beta1HorizontalPodAutoscalerStatus where
toJSON V2beta1HorizontalPodAutoscalerStatus {..} =
_omitNulls
[ "conditions" .= v2beta1HorizontalPodAutoscalerStatusConditions
, "currentMetrics" .= v2beta1HorizontalPodAutoscalerStatusCurrentMetrics
, "currentReplicas" .= v2beta1HorizontalPodAutoscalerStatusCurrentReplicas
, "desiredReplicas" .= v2beta1HorizontalPodAutoscalerStatusDesiredReplicas
, "lastScaleTime" .= v2beta1HorizontalPodAutoscalerStatusLastScaleTime
, "observedGeneration" .= v2beta1HorizontalPodAutoscalerStatusObservedGeneration
]
mkV2beta1HorizontalPodAutoscalerStatus
:: [V2beta1HorizontalPodAutoscalerCondition]
-> Int
-> Int
-> V2beta1HorizontalPodAutoscalerStatus
mkV2beta1HorizontalPodAutoscalerStatus v2beta1HorizontalPodAutoscalerStatusConditions v2beta1HorizontalPodAutoscalerStatusCurrentReplicas v2beta1HorizontalPodAutoscalerStatusDesiredReplicas =
V2beta1HorizontalPodAutoscalerStatus
{ v2beta1HorizontalPodAutoscalerStatusConditions
, v2beta1HorizontalPodAutoscalerStatusCurrentMetrics = Nothing
, v2beta1HorizontalPodAutoscalerStatusCurrentReplicas
, v2beta1HorizontalPodAutoscalerStatusDesiredReplicas
, v2beta1HorizontalPodAutoscalerStatusLastScaleTime = Nothing
, v2beta1HorizontalPodAutoscalerStatusObservedGeneration = Nothing
}
data V2beta1MetricSpec = V2beta1MetricSpec
{ v2beta1MetricSpecExternal :: !(Maybe V2beta1ExternalMetricSource)
, v2beta1MetricSpecObject :: !(Maybe V2beta1ObjectMetricSource)
, v2beta1MetricSpecPods :: !(Maybe V2beta1PodsMetricSource)
, v2beta1MetricSpecResource :: !(Maybe V2beta1ResourceMetricSource)
, v2beta1MetricSpecType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1MetricSpec where
parseJSON = A.withObject "V2beta1MetricSpec" $ \o ->
V2beta1MetricSpec
<$> (o .:? "external")
<*> (o .:? "object")
<*> (o .:? "pods")
<*> (o .:? "resource")
<*> (o .: "type")
instance A.ToJSON V2beta1MetricSpec where
toJSON V2beta1MetricSpec {..} =
_omitNulls
[ "external" .= v2beta1MetricSpecExternal
, "object" .= v2beta1MetricSpecObject
, "pods" .= v2beta1MetricSpecPods
, "resource" .= v2beta1MetricSpecResource
, "type" .= v2beta1MetricSpecType
]
mkV2beta1MetricSpec
:: Text
-> V2beta1MetricSpec
mkV2beta1MetricSpec v2beta1MetricSpecType =
V2beta1MetricSpec
{ v2beta1MetricSpecExternal = Nothing
, v2beta1MetricSpecObject = Nothing
, v2beta1MetricSpecPods = Nothing
, v2beta1MetricSpecResource = Nothing
, v2beta1MetricSpecType
}
data V2beta1MetricStatus = V2beta1MetricStatus
{ v2beta1MetricStatusExternal :: !(Maybe V2beta1ExternalMetricStatus)
, v2beta1MetricStatusObject :: !(Maybe V2beta1ObjectMetricStatus)
, v2beta1MetricStatusPods :: !(Maybe V2beta1PodsMetricStatus)
, v2beta1MetricStatusResource :: !(Maybe V2beta1ResourceMetricStatus)
, v2beta1MetricStatusType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1MetricStatus where
parseJSON = A.withObject "V2beta1MetricStatus" $ \o ->
V2beta1MetricStatus
<$> (o .:? "external")
<*> (o .:? "object")
<*> (o .:? "pods")
<*> (o .:? "resource")
<*> (o .: "type")
instance A.ToJSON V2beta1MetricStatus where
toJSON V2beta1MetricStatus {..} =
_omitNulls
[ "external" .= v2beta1MetricStatusExternal
, "object" .= v2beta1MetricStatusObject
, "pods" .= v2beta1MetricStatusPods
, "resource" .= v2beta1MetricStatusResource
, "type" .= v2beta1MetricStatusType
]
mkV2beta1MetricStatus
:: Text
-> V2beta1MetricStatus
mkV2beta1MetricStatus v2beta1MetricStatusType =
V2beta1MetricStatus
{ v2beta1MetricStatusExternal = Nothing
, v2beta1MetricStatusObject = Nothing
, v2beta1MetricStatusPods = Nothing
, v2beta1MetricStatusResource = Nothing
, v2beta1MetricStatusType
}
data V2beta1ObjectMetricSource = V2beta1ObjectMetricSource
{ v2beta1ObjectMetricSourceAverageValue :: !(Maybe Quantity)
, v2beta1ObjectMetricSourceMetricName :: !(Text)
, v2beta1ObjectMetricSourceSelector :: !(Maybe V1LabelSelector)
, v2beta1ObjectMetricSourceTarget :: !(V2beta1CrossVersionObjectReference)
, v2beta1ObjectMetricSourceTargetValue :: !(Quantity)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1ObjectMetricSource where
parseJSON = A.withObject "V2beta1ObjectMetricSource" $ \o ->
V2beta1ObjectMetricSource
<$> (o .:? "averageValue")
<*> (o .: "metricName")
<*> (o .:? "selector")
<*> (o .: "target")
<*> (o .: "targetValue")
instance A.ToJSON V2beta1ObjectMetricSource where
toJSON V2beta1ObjectMetricSource {..} =
_omitNulls
[ "averageValue" .= v2beta1ObjectMetricSourceAverageValue
, "metricName" .= v2beta1ObjectMetricSourceMetricName
, "selector" .= v2beta1ObjectMetricSourceSelector
, "target" .= v2beta1ObjectMetricSourceTarget
, "targetValue" .= v2beta1ObjectMetricSourceTargetValue
]
mkV2beta1ObjectMetricSource
:: Text
-> V2beta1CrossVersionObjectReference
-> Quantity
-> V2beta1ObjectMetricSource
mkV2beta1ObjectMetricSource v2beta1ObjectMetricSourceMetricName v2beta1ObjectMetricSourceTarget v2beta1ObjectMetricSourceTargetValue =
V2beta1ObjectMetricSource
{ v2beta1ObjectMetricSourceAverageValue = Nothing
, v2beta1ObjectMetricSourceMetricName
, v2beta1ObjectMetricSourceSelector = Nothing
, v2beta1ObjectMetricSourceTarget
, v2beta1ObjectMetricSourceTargetValue
}
data V2beta1ObjectMetricStatus = V2beta1ObjectMetricStatus
{ v2beta1ObjectMetricStatusAverageValue :: !(Maybe Quantity)
, v2beta1ObjectMetricStatusCurrentValue :: !(Quantity)
, v2beta1ObjectMetricStatusMetricName :: !(Text)
, v2beta1ObjectMetricStatusSelector :: !(Maybe V1LabelSelector)
, v2beta1ObjectMetricStatusTarget :: !(V2beta1CrossVersionObjectReference)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1ObjectMetricStatus where
parseJSON = A.withObject "V2beta1ObjectMetricStatus" $ \o ->
V2beta1ObjectMetricStatus
<$> (o .:? "averageValue")
<*> (o .: "currentValue")
<*> (o .: "metricName")
<*> (o .:? "selector")
<*> (o .: "target")
instance A.ToJSON V2beta1ObjectMetricStatus where
toJSON V2beta1ObjectMetricStatus {..} =
_omitNulls
[ "averageValue" .= v2beta1ObjectMetricStatusAverageValue
, "currentValue" .= v2beta1ObjectMetricStatusCurrentValue
, "metricName" .= v2beta1ObjectMetricStatusMetricName
, "selector" .= v2beta1ObjectMetricStatusSelector
, "target" .= v2beta1ObjectMetricStatusTarget
]
mkV2beta1ObjectMetricStatus
:: Quantity
-> Text
-> V2beta1CrossVersionObjectReference
-> V2beta1ObjectMetricStatus
mkV2beta1ObjectMetricStatus v2beta1ObjectMetricStatusCurrentValue v2beta1ObjectMetricStatusMetricName v2beta1ObjectMetricStatusTarget =
V2beta1ObjectMetricStatus
{ v2beta1ObjectMetricStatusAverageValue = Nothing
, v2beta1ObjectMetricStatusCurrentValue
, v2beta1ObjectMetricStatusMetricName
, v2beta1ObjectMetricStatusSelector = Nothing
, v2beta1ObjectMetricStatusTarget
}
data V2beta1PodsMetricSource = V2beta1PodsMetricSource
{ v2beta1PodsMetricSourceMetricName :: !(Text)
, v2beta1PodsMetricSourceSelector :: !(Maybe V1LabelSelector)
, v2beta1PodsMetricSourceTargetAverageValue :: !(Quantity)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1PodsMetricSource where
parseJSON = A.withObject "V2beta1PodsMetricSource" $ \o ->
V2beta1PodsMetricSource
<$> (o .: "metricName")
<*> (o .:? "selector")
<*> (o .: "targetAverageValue")
instance A.ToJSON V2beta1PodsMetricSource where
toJSON V2beta1PodsMetricSource {..} =
_omitNulls
[ "metricName" .= v2beta1PodsMetricSourceMetricName
, "selector" .= v2beta1PodsMetricSourceSelector
, "targetAverageValue" .= v2beta1PodsMetricSourceTargetAverageValue
]
mkV2beta1PodsMetricSource
:: Text
-> Quantity
-> V2beta1PodsMetricSource
mkV2beta1PodsMetricSource v2beta1PodsMetricSourceMetricName v2beta1PodsMetricSourceTargetAverageValue =
V2beta1PodsMetricSource
{ v2beta1PodsMetricSourceMetricName
, v2beta1PodsMetricSourceSelector = Nothing
, v2beta1PodsMetricSourceTargetAverageValue
}
data V2beta1PodsMetricStatus = V2beta1PodsMetricStatus
{ v2beta1PodsMetricStatusCurrentAverageValue :: !(Quantity)
, v2beta1PodsMetricStatusMetricName :: !(Text)
, v2beta1PodsMetricStatusSelector :: !(Maybe V1LabelSelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1PodsMetricStatus where
parseJSON = A.withObject "V2beta1PodsMetricStatus" $ \o ->
V2beta1PodsMetricStatus
<$> (o .: "currentAverageValue")
<*> (o .: "metricName")
<*> (o .:? "selector")
instance A.ToJSON V2beta1PodsMetricStatus where
toJSON V2beta1PodsMetricStatus {..} =
_omitNulls
[ "currentAverageValue" .= v2beta1PodsMetricStatusCurrentAverageValue
, "metricName" .= v2beta1PodsMetricStatusMetricName
, "selector" .= v2beta1PodsMetricStatusSelector
]
mkV2beta1PodsMetricStatus
:: Quantity
-> Text
-> V2beta1PodsMetricStatus
mkV2beta1PodsMetricStatus v2beta1PodsMetricStatusCurrentAverageValue v2beta1PodsMetricStatusMetricName =
V2beta1PodsMetricStatus
{ v2beta1PodsMetricStatusCurrentAverageValue
, v2beta1PodsMetricStatusMetricName
, v2beta1PodsMetricStatusSelector = Nothing
}
data V2beta1ResourceMetricSource = V2beta1ResourceMetricSource
{ v2beta1ResourceMetricSourceName :: !(Text)
, v2beta1ResourceMetricSourceTargetAverageUtilization :: !(Maybe Int)
, v2beta1ResourceMetricSourceTargetAverageValue :: !(Maybe Quantity)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1ResourceMetricSource where
parseJSON = A.withObject "V2beta1ResourceMetricSource" $ \o ->
V2beta1ResourceMetricSource
<$> (o .: "name")
<*> (o .:? "targetAverageUtilization")
<*> (o .:? "targetAverageValue")
instance A.ToJSON V2beta1ResourceMetricSource where
toJSON V2beta1ResourceMetricSource {..} =
_omitNulls
[ "name" .= v2beta1ResourceMetricSourceName
, "targetAverageUtilization" .= v2beta1ResourceMetricSourceTargetAverageUtilization
, "targetAverageValue" .= v2beta1ResourceMetricSourceTargetAverageValue
]
mkV2beta1ResourceMetricSource
:: Text
-> V2beta1ResourceMetricSource
mkV2beta1ResourceMetricSource v2beta1ResourceMetricSourceName =
V2beta1ResourceMetricSource
{ v2beta1ResourceMetricSourceName
, v2beta1ResourceMetricSourceTargetAverageUtilization = Nothing
, v2beta1ResourceMetricSourceTargetAverageValue = Nothing
}
data V2beta1ResourceMetricStatus = V2beta1ResourceMetricStatus
{ v2beta1ResourceMetricStatusCurrentAverageUtilization :: !(Maybe Int)
, v2beta1ResourceMetricStatusCurrentAverageValue :: !(Quantity)
, v2beta1ResourceMetricStatusName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta1ResourceMetricStatus where
parseJSON = A.withObject "V2beta1ResourceMetricStatus" $ \o ->
V2beta1ResourceMetricStatus
<$> (o .:? "currentAverageUtilization")
<*> (o .: "currentAverageValue")
<*> (o .: "name")
instance A.ToJSON V2beta1ResourceMetricStatus where
toJSON V2beta1ResourceMetricStatus {..} =
_omitNulls
[ "currentAverageUtilization" .= v2beta1ResourceMetricStatusCurrentAverageUtilization
, "currentAverageValue" .= v2beta1ResourceMetricStatusCurrentAverageValue
, "name" .= v2beta1ResourceMetricStatusName
]
mkV2beta1ResourceMetricStatus
:: Quantity
-> Text
-> V2beta1ResourceMetricStatus
mkV2beta1ResourceMetricStatus v2beta1ResourceMetricStatusCurrentAverageValue v2beta1ResourceMetricStatusName =
V2beta1ResourceMetricStatus
{ v2beta1ResourceMetricStatusCurrentAverageUtilization = Nothing
, v2beta1ResourceMetricStatusCurrentAverageValue
, v2beta1ResourceMetricStatusName
}
data V2beta2CrossVersionObjectReference = V2beta2CrossVersionObjectReference
{ v2beta2CrossVersionObjectReferenceApiVersion :: !(Maybe Text)
, v2beta2CrossVersionObjectReferenceKind :: !(Text)
, v2beta2CrossVersionObjectReferenceName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2CrossVersionObjectReference where
parseJSON = A.withObject "V2beta2CrossVersionObjectReference" $ \o ->
V2beta2CrossVersionObjectReference
<$> (o .:? "apiVersion")
<*> (o .: "kind")
<*> (o .: "name")
instance A.ToJSON V2beta2CrossVersionObjectReference where
toJSON V2beta2CrossVersionObjectReference {..} =
_omitNulls
[ "apiVersion" .= v2beta2CrossVersionObjectReferenceApiVersion
, "kind" .= v2beta2CrossVersionObjectReferenceKind
, "name" .= v2beta2CrossVersionObjectReferenceName
]
mkV2beta2CrossVersionObjectReference
:: Text
-> Text
-> V2beta2CrossVersionObjectReference
mkV2beta2CrossVersionObjectReference v2beta2CrossVersionObjectReferenceKind v2beta2CrossVersionObjectReferenceName =
V2beta2CrossVersionObjectReference
{ v2beta2CrossVersionObjectReferenceApiVersion = Nothing
, v2beta2CrossVersionObjectReferenceKind
, v2beta2CrossVersionObjectReferenceName
}
data V2beta2ExternalMetricSource = V2beta2ExternalMetricSource
{ v2beta2ExternalMetricSourceMetric :: !(V2beta2MetricIdentifier)
, v2beta2ExternalMetricSourceTarget :: !(V2beta2MetricTarget)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2ExternalMetricSource where
parseJSON = A.withObject "V2beta2ExternalMetricSource" $ \o ->
V2beta2ExternalMetricSource
<$> (o .: "metric")
<*> (o .: "target")
instance A.ToJSON V2beta2ExternalMetricSource where
toJSON V2beta2ExternalMetricSource {..} =
_omitNulls
[ "metric" .= v2beta2ExternalMetricSourceMetric
, "target" .= v2beta2ExternalMetricSourceTarget
]
mkV2beta2ExternalMetricSource
:: V2beta2MetricIdentifier
-> V2beta2MetricTarget
-> V2beta2ExternalMetricSource
mkV2beta2ExternalMetricSource v2beta2ExternalMetricSourceMetric v2beta2ExternalMetricSourceTarget =
V2beta2ExternalMetricSource
{ v2beta2ExternalMetricSourceMetric
, v2beta2ExternalMetricSourceTarget
}
data V2beta2ExternalMetricStatus = V2beta2ExternalMetricStatus
{ v2beta2ExternalMetricStatusCurrent :: !(V2beta2MetricValueStatus)
, v2beta2ExternalMetricStatusMetric :: !(V2beta2MetricIdentifier)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2ExternalMetricStatus where
parseJSON = A.withObject "V2beta2ExternalMetricStatus" $ \o ->
V2beta2ExternalMetricStatus
<$> (o .: "current")
<*> (o .: "metric")
instance A.ToJSON V2beta2ExternalMetricStatus where
toJSON V2beta2ExternalMetricStatus {..} =
_omitNulls
[ "current" .= v2beta2ExternalMetricStatusCurrent
, "metric" .= v2beta2ExternalMetricStatusMetric
]
mkV2beta2ExternalMetricStatus
:: V2beta2MetricValueStatus
-> V2beta2MetricIdentifier
-> V2beta2ExternalMetricStatus
mkV2beta2ExternalMetricStatus v2beta2ExternalMetricStatusCurrent v2beta2ExternalMetricStatusMetric =
V2beta2ExternalMetricStatus
{ v2beta2ExternalMetricStatusCurrent
, v2beta2ExternalMetricStatusMetric
}
data V2beta2HorizontalPodAutoscaler = V2beta2HorizontalPodAutoscaler
{ v2beta2HorizontalPodAutoscalerApiVersion :: !(Maybe Text)
, v2beta2HorizontalPodAutoscalerKind :: !(Maybe Text)
, v2beta2HorizontalPodAutoscalerMetadata :: !(Maybe V1ObjectMeta)
, v2beta2HorizontalPodAutoscalerSpec :: !(Maybe V2beta2HorizontalPodAutoscalerSpec)
, v2beta2HorizontalPodAutoscalerStatus :: !(Maybe V2beta2HorizontalPodAutoscalerStatus)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2HorizontalPodAutoscaler where
parseJSON = A.withObject "V2beta2HorizontalPodAutoscaler" $ \o ->
V2beta2HorizontalPodAutoscaler
<$> (o .:? "apiVersion")
<*> (o .:? "kind")
<*> (o .:? "metadata")
<*> (o .:? "spec")
<*> (o .:? "status")
instance A.ToJSON V2beta2HorizontalPodAutoscaler where
toJSON V2beta2HorizontalPodAutoscaler {..} =
_omitNulls
[ "apiVersion" .= v2beta2HorizontalPodAutoscalerApiVersion
, "kind" .= v2beta2HorizontalPodAutoscalerKind
, "metadata" .= v2beta2HorizontalPodAutoscalerMetadata
, "spec" .= v2beta2HorizontalPodAutoscalerSpec
, "status" .= v2beta2HorizontalPodAutoscalerStatus
]
mkV2beta2HorizontalPodAutoscaler
:: V2beta2HorizontalPodAutoscaler
mkV2beta2HorizontalPodAutoscaler =
V2beta2HorizontalPodAutoscaler
{ v2beta2HorizontalPodAutoscalerApiVersion = Nothing
, v2beta2HorizontalPodAutoscalerKind = Nothing
, v2beta2HorizontalPodAutoscalerMetadata = Nothing
, v2beta2HorizontalPodAutoscalerSpec = Nothing
, v2beta2HorizontalPodAutoscalerStatus = Nothing
}
data V2beta2HorizontalPodAutoscalerCondition = V2beta2HorizontalPodAutoscalerCondition
{ v2beta2HorizontalPodAutoscalerConditionLastTransitionTime :: !(Maybe DateTime)
, v2beta2HorizontalPodAutoscalerConditionMessage :: !(Maybe Text)
, v2beta2HorizontalPodAutoscalerConditionReason :: !(Maybe Text)
, v2beta2HorizontalPodAutoscalerConditionStatus :: !(Text)
, v2beta2HorizontalPodAutoscalerConditionType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2HorizontalPodAutoscalerCondition where
parseJSON = A.withObject "V2beta2HorizontalPodAutoscalerCondition" $ \o ->
V2beta2HorizontalPodAutoscalerCondition
<$> (o .:? "lastTransitionTime")
<*> (o .:? "message")
<*> (o .:? "reason")
<*> (o .: "status")
<*> (o .: "type")
instance A.ToJSON V2beta2HorizontalPodAutoscalerCondition where
toJSON V2beta2HorizontalPodAutoscalerCondition {..} =
_omitNulls
[ "lastTransitionTime" .= v2beta2HorizontalPodAutoscalerConditionLastTransitionTime
, "message" .= v2beta2HorizontalPodAutoscalerConditionMessage
, "reason" .= v2beta2HorizontalPodAutoscalerConditionReason
, "status" .= v2beta2HorizontalPodAutoscalerConditionStatus
, "type" .= v2beta2HorizontalPodAutoscalerConditionType
]
mkV2beta2HorizontalPodAutoscalerCondition
:: Text
-> Text
-> V2beta2HorizontalPodAutoscalerCondition
mkV2beta2HorizontalPodAutoscalerCondition v2beta2HorizontalPodAutoscalerConditionStatus v2beta2HorizontalPodAutoscalerConditionType =
V2beta2HorizontalPodAutoscalerCondition
{ v2beta2HorizontalPodAutoscalerConditionLastTransitionTime = Nothing
, v2beta2HorizontalPodAutoscalerConditionMessage = Nothing
, v2beta2HorizontalPodAutoscalerConditionReason = Nothing
, v2beta2HorizontalPodAutoscalerConditionStatus
, v2beta2HorizontalPodAutoscalerConditionType
}
data V2beta2HorizontalPodAutoscalerList = V2beta2HorizontalPodAutoscalerList
{ v2beta2HorizontalPodAutoscalerListApiVersion :: !(Maybe Text)
, v2beta2HorizontalPodAutoscalerListItems :: !([V2beta2HorizontalPodAutoscaler])
, v2beta2HorizontalPodAutoscalerListKind :: !(Maybe Text)
, v2beta2HorizontalPodAutoscalerListMetadata :: !(Maybe V1ListMeta)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2HorizontalPodAutoscalerList where
parseJSON = A.withObject "V2beta2HorizontalPodAutoscalerList" $ \o ->
V2beta2HorizontalPodAutoscalerList
<$> (o .:? "apiVersion")
<*> (o .: "items")
<*> (o .:? "kind")
<*> (o .:? "metadata")
instance A.ToJSON V2beta2HorizontalPodAutoscalerList where
toJSON V2beta2HorizontalPodAutoscalerList {..} =
_omitNulls
[ "apiVersion" .= v2beta2HorizontalPodAutoscalerListApiVersion
, "items" .= v2beta2HorizontalPodAutoscalerListItems
, "kind" .= v2beta2HorizontalPodAutoscalerListKind
, "metadata" .= v2beta2HorizontalPodAutoscalerListMetadata
]
mkV2beta2HorizontalPodAutoscalerList
:: [V2beta2HorizontalPodAutoscaler]
-> V2beta2HorizontalPodAutoscalerList
mkV2beta2HorizontalPodAutoscalerList v2beta2HorizontalPodAutoscalerListItems =
V2beta2HorizontalPodAutoscalerList
{ v2beta2HorizontalPodAutoscalerListApiVersion = Nothing
, v2beta2HorizontalPodAutoscalerListItems
, v2beta2HorizontalPodAutoscalerListKind = Nothing
, v2beta2HorizontalPodAutoscalerListMetadata = Nothing
}
data V2beta2HorizontalPodAutoscalerSpec = V2beta2HorizontalPodAutoscalerSpec
{ v2beta2HorizontalPodAutoscalerSpecMaxReplicas :: !(Int)
, v2beta2HorizontalPodAutoscalerSpecMetrics :: !(Maybe [V2beta2MetricSpec])
, v2beta2HorizontalPodAutoscalerSpecMinReplicas :: !(Maybe Int)
, v2beta2HorizontalPodAutoscalerSpecScaleTargetRef :: !(V2beta2CrossVersionObjectReference)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2HorizontalPodAutoscalerSpec where
parseJSON = A.withObject "V2beta2HorizontalPodAutoscalerSpec" $ \o ->
V2beta2HorizontalPodAutoscalerSpec
<$> (o .: "maxReplicas")
<*> (o .:? "metrics")
<*> (o .:? "minReplicas")
<*> (o .: "scaleTargetRef")
instance A.ToJSON V2beta2HorizontalPodAutoscalerSpec where
toJSON V2beta2HorizontalPodAutoscalerSpec {..} =
_omitNulls
[ "maxReplicas" .= v2beta2HorizontalPodAutoscalerSpecMaxReplicas
, "metrics" .= v2beta2HorizontalPodAutoscalerSpecMetrics
, "minReplicas" .= v2beta2HorizontalPodAutoscalerSpecMinReplicas
, "scaleTargetRef" .= v2beta2HorizontalPodAutoscalerSpecScaleTargetRef
]
mkV2beta2HorizontalPodAutoscalerSpec
:: Int
-> V2beta2CrossVersionObjectReference
-> V2beta2HorizontalPodAutoscalerSpec
mkV2beta2HorizontalPodAutoscalerSpec v2beta2HorizontalPodAutoscalerSpecMaxReplicas v2beta2HorizontalPodAutoscalerSpecScaleTargetRef =
V2beta2HorizontalPodAutoscalerSpec
{ v2beta2HorizontalPodAutoscalerSpecMaxReplicas
, v2beta2HorizontalPodAutoscalerSpecMetrics = Nothing
, v2beta2HorizontalPodAutoscalerSpecMinReplicas = Nothing
, v2beta2HorizontalPodAutoscalerSpecScaleTargetRef
}
data V2beta2HorizontalPodAutoscalerStatus = V2beta2HorizontalPodAutoscalerStatus
{ v2beta2HorizontalPodAutoscalerStatusConditions :: !([V2beta2HorizontalPodAutoscalerCondition])
, v2beta2HorizontalPodAutoscalerStatusCurrentMetrics :: !(Maybe [V2beta2MetricStatus])
, v2beta2HorizontalPodAutoscalerStatusCurrentReplicas :: !(Int)
, v2beta2HorizontalPodAutoscalerStatusDesiredReplicas :: !(Int)
, v2beta2HorizontalPodAutoscalerStatusLastScaleTime :: !(Maybe DateTime)
, v2beta2HorizontalPodAutoscalerStatusObservedGeneration :: !(Maybe Integer)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2HorizontalPodAutoscalerStatus where
parseJSON = A.withObject "V2beta2HorizontalPodAutoscalerStatus" $ \o ->
V2beta2HorizontalPodAutoscalerStatus
<$> (o .: "conditions")
<*> (o .:? "currentMetrics")
<*> (o .: "currentReplicas")
<*> (o .: "desiredReplicas")
<*> (o .:? "lastScaleTime")
<*> (o .:? "observedGeneration")
instance A.ToJSON V2beta2HorizontalPodAutoscalerStatus where
toJSON V2beta2HorizontalPodAutoscalerStatus {..} =
_omitNulls
[ "conditions" .= v2beta2HorizontalPodAutoscalerStatusConditions
, "currentMetrics" .= v2beta2HorizontalPodAutoscalerStatusCurrentMetrics
, "currentReplicas" .= v2beta2HorizontalPodAutoscalerStatusCurrentReplicas
, "desiredReplicas" .= v2beta2HorizontalPodAutoscalerStatusDesiredReplicas
, "lastScaleTime" .= v2beta2HorizontalPodAutoscalerStatusLastScaleTime
, "observedGeneration" .= v2beta2HorizontalPodAutoscalerStatusObservedGeneration
]
mkV2beta2HorizontalPodAutoscalerStatus
:: [V2beta2HorizontalPodAutoscalerCondition]
-> Int
-> Int
-> V2beta2HorizontalPodAutoscalerStatus
mkV2beta2HorizontalPodAutoscalerStatus v2beta2HorizontalPodAutoscalerStatusConditions v2beta2HorizontalPodAutoscalerStatusCurrentReplicas v2beta2HorizontalPodAutoscalerStatusDesiredReplicas =
V2beta2HorizontalPodAutoscalerStatus
{ v2beta2HorizontalPodAutoscalerStatusConditions
, v2beta2HorizontalPodAutoscalerStatusCurrentMetrics = Nothing
, v2beta2HorizontalPodAutoscalerStatusCurrentReplicas
, v2beta2HorizontalPodAutoscalerStatusDesiredReplicas
, v2beta2HorizontalPodAutoscalerStatusLastScaleTime = Nothing
, v2beta2HorizontalPodAutoscalerStatusObservedGeneration = Nothing
}
data V2beta2MetricIdentifier = V2beta2MetricIdentifier
{ v2beta2MetricIdentifierName :: !(Text)
, v2beta2MetricIdentifierSelector :: !(Maybe V1LabelSelector)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2MetricIdentifier where
parseJSON = A.withObject "V2beta2MetricIdentifier" $ \o ->
V2beta2MetricIdentifier
<$> (o .: "name")
<*> (o .:? "selector")
instance A.ToJSON V2beta2MetricIdentifier where
toJSON V2beta2MetricIdentifier {..} =
_omitNulls
[ "name" .= v2beta2MetricIdentifierName
, "selector" .= v2beta2MetricIdentifierSelector
]
mkV2beta2MetricIdentifier
:: Text
-> V2beta2MetricIdentifier
mkV2beta2MetricIdentifier v2beta2MetricIdentifierName =
V2beta2MetricIdentifier
{ v2beta2MetricIdentifierName
, v2beta2MetricIdentifierSelector = Nothing
}
data V2beta2MetricSpec = V2beta2MetricSpec
{ v2beta2MetricSpecExternal :: !(Maybe V2beta2ExternalMetricSource)
, v2beta2MetricSpecObject :: !(Maybe V2beta2ObjectMetricSource)
, v2beta2MetricSpecPods :: !(Maybe V2beta2PodsMetricSource)
, v2beta2MetricSpecResource :: !(Maybe V2beta2ResourceMetricSource)
, v2beta2MetricSpecType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2MetricSpec where
parseJSON = A.withObject "V2beta2MetricSpec" $ \o ->
V2beta2MetricSpec
<$> (o .:? "external")
<*> (o .:? "object")
<*> (o .:? "pods")
<*> (o .:? "resource")
<*> (o .: "type")
instance A.ToJSON V2beta2MetricSpec where
toJSON V2beta2MetricSpec {..} =
_omitNulls
[ "external" .= v2beta2MetricSpecExternal
, "object" .= v2beta2MetricSpecObject
, "pods" .= v2beta2MetricSpecPods
, "resource" .= v2beta2MetricSpecResource
, "type" .= v2beta2MetricSpecType
]
mkV2beta2MetricSpec
:: Text
-> V2beta2MetricSpec
mkV2beta2MetricSpec v2beta2MetricSpecType =
V2beta2MetricSpec
{ v2beta2MetricSpecExternal = Nothing
, v2beta2MetricSpecObject = Nothing
, v2beta2MetricSpecPods = Nothing
, v2beta2MetricSpecResource = Nothing
, v2beta2MetricSpecType
}
data V2beta2MetricStatus = V2beta2MetricStatus
{ v2beta2MetricStatusExternal :: !(Maybe V2beta2ExternalMetricStatus)
, v2beta2MetricStatusObject :: !(Maybe V2beta2ObjectMetricStatus)
, v2beta2MetricStatusPods :: !(Maybe V2beta2PodsMetricStatus)
, v2beta2MetricStatusResource :: !(Maybe V2beta2ResourceMetricStatus)
, v2beta2MetricStatusType :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2MetricStatus where
parseJSON = A.withObject "V2beta2MetricStatus" $ \o ->
V2beta2MetricStatus
<$> (o .:? "external")
<*> (o .:? "object")
<*> (o .:? "pods")
<*> (o .:? "resource")
<*> (o .: "type")
instance A.ToJSON V2beta2MetricStatus where
toJSON V2beta2MetricStatus {..} =
_omitNulls
[ "external" .= v2beta2MetricStatusExternal
, "object" .= v2beta2MetricStatusObject
, "pods" .= v2beta2MetricStatusPods
, "resource" .= v2beta2MetricStatusResource
, "type" .= v2beta2MetricStatusType
]
mkV2beta2MetricStatus
:: Text
-> V2beta2MetricStatus
mkV2beta2MetricStatus v2beta2MetricStatusType =
V2beta2MetricStatus
{ v2beta2MetricStatusExternal = Nothing
, v2beta2MetricStatusObject = Nothing
, v2beta2MetricStatusPods = Nothing
, v2beta2MetricStatusResource = Nothing
, v2beta2MetricStatusType
}
data V2beta2MetricTarget = V2beta2MetricTarget
{ v2beta2MetricTargetAverageUtilization :: !(Maybe Int)
, v2beta2MetricTargetAverageValue :: !(Maybe Quantity)
, v2beta2MetricTargetType :: !(Text)
, v2beta2MetricTargetValue :: !(Maybe Quantity)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2MetricTarget where
parseJSON = A.withObject "V2beta2MetricTarget" $ \o ->
V2beta2MetricTarget
<$> (o .:? "averageUtilization")
<*> (o .:? "averageValue")
<*> (o .: "type")
<*> (o .:? "value")
instance A.ToJSON V2beta2MetricTarget where
toJSON V2beta2MetricTarget {..} =
_omitNulls
[ "averageUtilization" .= v2beta2MetricTargetAverageUtilization
, "averageValue" .= v2beta2MetricTargetAverageValue
, "type" .= v2beta2MetricTargetType
, "value" .= v2beta2MetricTargetValue
]
mkV2beta2MetricTarget
:: Text
-> V2beta2MetricTarget
mkV2beta2MetricTarget v2beta2MetricTargetType =
V2beta2MetricTarget
{ v2beta2MetricTargetAverageUtilization = Nothing
, v2beta2MetricTargetAverageValue = Nothing
, v2beta2MetricTargetType
, v2beta2MetricTargetValue = Nothing
}
data V2beta2MetricValueStatus = V2beta2MetricValueStatus
{ v2beta2MetricValueStatusAverageUtilization :: !(Maybe Int)
, v2beta2MetricValueStatusAverageValue :: !(Maybe Quantity)
, v2beta2MetricValueStatusValue :: !(Maybe Quantity)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2MetricValueStatus where
parseJSON = A.withObject "V2beta2MetricValueStatus" $ \o ->
V2beta2MetricValueStatus
<$> (o .:? "averageUtilization")
<*> (o .:? "averageValue")
<*> (o .:? "value")
instance A.ToJSON V2beta2MetricValueStatus where
toJSON V2beta2MetricValueStatus {..} =
_omitNulls
[ "averageUtilization" .= v2beta2MetricValueStatusAverageUtilization
, "averageValue" .= v2beta2MetricValueStatusAverageValue
, "value" .= v2beta2MetricValueStatusValue
]
mkV2beta2MetricValueStatus
:: V2beta2MetricValueStatus
mkV2beta2MetricValueStatus =
V2beta2MetricValueStatus
{ v2beta2MetricValueStatusAverageUtilization = Nothing
, v2beta2MetricValueStatusAverageValue = Nothing
, v2beta2MetricValueStatusValue = Nothing
}
data V2beta2ObjectMetricSource = V2beta2ObjectMetricSource
{ v2beta2ObjectMetricSourceDescribedObject :: !(V2beta2CrossVersionObjectReference)
, v2beta2ObjectMetricSourceMetric :: !(V2beta2MetricIdentifier)
, v2beta2ObjectMetricSourceTarget :: !(V2beta2MetricTarget)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2ObjectMetricSource where
parseJSON = A.withObject "V2beta2ObjectMetricSource" $ \o ->
V2beta2ObjectMetricSource
<$> (o .: "describedObject")
<*> (o .: "metric")
<*> (o .: "target")
instance A.ToJSON V2beta2ObjectMetricSource where
toJSON V2beta2ObjectMetricSource {..} =
_omitNulls
[ "describedObject" .= v2beta2ObjectMetricSourceDescribedObject
, "metric" .= v2beta2ObjectMetricSourceMetric
, "target" .= v2beta2ObjectMetricSourceTarget
]
mkV2beta2ObjectMetricSource
:: V2beta2CrossVersionObjectReference
-> V2beta2MetricIdentifier
-> V2beta2MetricTarget
-> V2beta2ObjectMetricSource
mkV2beta2ObjectMetricSource v2beta2ObjectMetricSourceDescribedObject v2beta2ObjectMetricSourceMetric v2beta2ObjectMetricSourceTarget =
V2beta2ObjectMetricSource
{ v2beta2ObjectMetricSourceDescribedObject
, v2beta2ObjectMetricSourceMetric
, v2beta2ObjectMetricSourceTarget
}
data V2beta2ObjectMetricStatus = V2beta2ObjectMetricStatus
{ v2beta2ObjectMetricStatusCurrent :: !(V2beta2MetricValueStatus)
, v2beta2ObjectMetricStatusDescribedObject :: !(V2beta2CrossVersionObjectReference)
, v2beta2ObjectMetricStatusMetric :: !(V2beta2MetricIdentifier)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2ObjectMetricStatus where
parseJSON = A.withObject "V2beta2ObjectMetricStatus" $ \o ->
V2beta2ObjectMetricStatus
<$> (o .: "current")
<*> (o .: "describedObject")
<*> (o .: "metric")
instance A.ToJSON V2beta2ObjectMetricStatus where
toJSON V2beta2ObjectMetricStatus {..} =
_omitNulls
[ "current" .= v2beta2ObjectMetricStatusCurrent
, "describedObject" .= v2beta2ObjectMetricStatusDescribedObject
, "metric" .= v2beta2ObjectMetricStatusMetric
]
mkV2beta2ObjectMetricStatus
:: V2beta2MetricValueStatus
-> V2beta2CrossVersionObjectReference
-> V2beta2MetricIdentifier
-> V2beta2ObjectMetricStatus
mkV2beta2ObjectMetricStatus v2beta2ObjectMetricStatusCurrent v2beta2ObjectMetricStatusDescribedObject v2beta2ObjectMetricStatusMetric =
V2beta2ObjectMetricStatus
{ v2beta2ObjectMetricStatusCurrent
, v2beta2ObjectMetricStatusDescribedObject
, v2beta2ObjectMetricStatusMetric
}
data V2beta2PodsMetricSource = V2beta2PodsMetricSource
{ v2beta2PodsMetricSourceMetric :: !(V2beta2MetricIdentifier)
, v2beta2PodsMetricSourceTarget :: !(V2beta2MetricTarget)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2PodsMetricSource where
parseJSON = A.withObject "V2beta2PodsMetricSource" $ \o ->
V2beta2PodsMetricSource
<$> (o .: "metric")
<*> (o .: "target")
instance A.ToJSON V2beta2PodsMetricSource where
toJSON V2beta2PodsMetricSource {..} =
_omitNulls
[ "metric" .= v2beta2PodsMetricSourceMetric
, "target" .= v2beta2PodsMetricSourceTarget
]
mkV2beta2PodsMetricSource
:: V2beta2MetricIdentifier
-> V2beta2MetricTarget
-> V2beta2PodsMetricSource
mkV2beta2PodsMetricSource v2beta2PodsMetricSourceMetric v2beta2PodsMetricSourceTarget =
V2beta2PodsMetricSource
{ v2beta2PodsMetricSourceMetric
, v2beta2PodsMetricSourceTarget
}
data V2beta2PodsMetricStatus = V2beta2PodsMetricStatus
{ v2beta2PodsMetricStatusCurrent :: !(V2beta2MetricValueStatus)
, v2beta2PodsMetricStatusMetric :: !(V2beta2MetricIdentifier)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2PodsMetricStatus where
parseJSON = A.withObject "V2beta2PodsMetricStatus" $ \o ->
V2beta2PodsMetricStatus
<$> (o .: "current")
<*> (o .: "metric")
instance A.ToJSON V2beta2PodsMetricStatus where
toJSON V2beta2PodsMetricStatus {..} =
_omitNulls
[ "current" .= v2beta2PodsMetricStatusCurrent
, "metric" .= v2beta2PodsMetricStatusMetric
]
mkV2beta2PodsMetricStatus
:: V2beta2MetricValueStatus
-> V2beta2MetricIdentifier
-> V2beta2PodsMetricStatus
mkV2beta2PodsMetricStatus v2beta2PodsMetricStatusCurrent v2beta2PodsMetricStatusMetric =
V2beta2PodsMetricStatus
{ v2beta2PodsMetricStatusCurrent
, v2beta2PodsMetricStatusMetric
}
data V2beta2ResourceMetricSource = V2beta2ResourceMetricSource
{ v2beta2ResourceMetricSourceName :: !(Text)
, v2beta2ResourceMetricSourceTarget :: !(V2beta2MetricTarget)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2ResourceMetricSource where
parseJSON = A.withObject "V2beta2ResourceMetricSource" $ \o ->
V2beta2ResourceMetricSource
<$> (o .: "name")
<*> (o .: "target")
instance A.ToJSON V2beta2ResourceMetricSource where
toJSON V2beta2ResourceMetricSource {..} =
_omitNulls
[ "name" .= v2beta2ResourceMetricSourceName
, "target" .= v2beta2ResourceMetricSourceTarget
]
mkV2beta2ResourceMetricSource
:: Text
-> V2beta2MetricTarget
-> V2beta2ResourceMetricSource
mkV2beta2ResourceMetricSource v2beta2ResourceMetricSourceName v2beta2ResourceMetricSourceTarget =
V2beta2ResourceMetricSource
{ v2beta2ResourceMetricSourceName
, v2beta2ResourceMetricSourceTarget
}
data V2beta2ResourceMetricStatus = V2beta2ResourceMetricStatus
{ v2beta2ResourceMetricStatusCurrent :: !(V2beta2MetricValueStatus)
, v2beta2ResourceMetricStatusName :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON V2beta2ResourceMetricStatus where
parseJSON = A.withObject "V2beta2ResourceMetricStatus" $ \o ->
V2beta2ResourceMetricStatus
<$> (o .: "current")
<*> (o .: "name")
instance A.ToJSON V2beta2ResourceMetricStatus where
toJSON V2beta2ResourceMetricStatus {..} =
_omitNulls
[ "current" .= v2beta2ResourceMetricStatusCurrent
, "name" .= v2beta2ResourceMetricStatusName
]
mkV2beta2ResourceMetricStatus
:: V2beta2MetricValueStatus
-> Text
-> V2beta2ResourceMetricStatus
mkV2beta2ResourceMetricStatus v2beta2ResourceMetricStatusCurrent v2beta2ResourceMetricStatusName =
V2beta2ResourceMetricStatus
{ v2beta2ResourceMetricStatusCurrent
, v2beta2ResourceMetricStatusName
}
data VersionInfo = VersionInfo
{ versionInfoBuildDate :: !(Text)
, versionInfoCompiler :: !(Text)
, versionInfoGitCommit :: !(Text)
, versionInfoGitTreeState :: !(Text)
, versionInfoGitVersion :: !(Text)
, versionInfoGoVersion :: !(Text)
, versionInfoMajor :: !(Text)
, versionInfoMinor :: !(Text)
, versionInfoPlatform :: !(Text)
} deriving (P.Show, P.Eq, P.Typeable)
instance A.FromJSON VersionInfo where
parseJSON = A.withObject "VersionInfo" $ \o ->
VersionInfo
<$> (o .: "buildDate")
<*> (o .: "compiler")
<*> (o .: "gitCommit")
<*> (o .: "gitTreeState")
<*> (o .: "gitVersion")
<*> (o .: "goVersion")
<*> (o .: "major")
<*> (o .: "minor")
<*> (o .: "platform")
instance A.ToJSON VersionInfo where
toJSON VersionInfo {..} =
_omitNulls
[ "buildDate" .= versionInfoBuildDate
, "compiler" .= versionInfoCompiler
, "gitCommit" .= versionInfoGitCommit
, "gitTreeState" .= versionInfoGitTreeState
, "gitVersion" .= versionInfoGitVersion
, "goVersion" .= versionInfoGoVersion
, "major" .= versionInfoMajor
, "minor" .= versionInfoMinor
, "platform" .= versionInfoPlatform
]
mkVersionInfo
:: Text
-> Text
-> Text
-> Text
-> Text
-> Text
-> Text
-> Text
-> Text
-> VersionInfo
mkVersionInfo versionInfoBuildDate versionInfoCompiler versionInfoGitCommit versionInfoGitTreeState versionInfoGitVersion versionInfoGoVersion versionInfoMajor versionInfoMinor versionInfoPlatform =
VersionInfo
{ versionInfoBuildDate
, versionInfoCompiler
, versionInfoGitCommit
, versionInfoGitTreeState
, versionInfoGitVersion
, versionInfoGoVersion
, versionInfoMajor
, versionInfoMinor
, versionInfoPlatform
}
data AuthApiKeyBearerToken =
AuthApiKeyBearerToken Text
deriving (P.Eq, P.Show, P.Typeable)
instance AuthMethod AuthApiKeyBearerToken where
applyAuthMethod _ a@(AuthApiKeyBearerToken secret) req =
P.pure $
if (P.typeOf a `P.elem` rAuthTypes req)
then req `setHeader` toHeader ("authorization", secret)
& L.over rAuthTypesL (P.filter (/= P.typeOf a))
else req