{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}

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

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

import qualified Amazonka.Core as Core
import qualified Amazonka.Prelude as Prelude

newtype InputStartingPosition = InputStartingPosition'
  { InputStartingPosition -> Text
fromInputStartingPosition ::
      Core.Text
  }
  deriving stock
    ( Int -> InputStartingPosition -> ShowS
[InputStartingPosition] -> ShowS
InputStartingPosition -> String
(Int -> InputStartingPosition -> ShowS)
-> (InputStartingPosition -> String)
-> ([InputStartingPosition] -> ShowS)
-> Show InputStartingPosition
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InputStartingPosition] -> ShowS
$cshowList :: [InputStartingPosition] -> ShowS
show :: InputStartingPosition -> String
$cshow :: InputStartingPosition -> String
showsPrec :: Int -> InputStartingPosition -> ShowS
$cshowsPrec :: Int -> InputStartingPosition -> ShowS
Prelude.Show,
      ReadPrec [InputStartingPosition]
ReadPrec InputStartingPosition
Int -> ReadS InputStartingPosition
ReadS [InputStartingPosition]
(Int -> ReadS InputStartingPosition)
-> ReadS [InputStartingPosition]
-> ReadPrec InputStartingPosition
-> ReadPrec [InputStartingPosition]
-> Read InputStartingPosition
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [InputStartingPosition]
$creadListPrec :: ReadPrec [InputStartingPosition]
readPrec :: ReadPrec InputStartingPosition
$creadPrec :: ReadPrec InputStartingPosition
readList :: ReadS [InputStartingPosition]
$creadList :: ReadS [InputStartingPosition]
readsPrec :: Int -> ReadS InputStartingPosition
$creadsPrec :: Int -> ReadS InputStartingPosition
Prelude.Read,
      InputStartingPosition -> InputStartingPosition -> Bool
(InputStartingPosition -> InputStartingPosition -> Bool)
-> (InputStartingPosition -> InputStartingPosition -> Bool)
-> Eq InputStartingPosition
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InputStartingPosition -> InputStartingPosition -> Bool
$c/= :: InputStartingPosition -> InputStartingPosition -> Bool
== :: InputStartingPosition -> InputStartingPosition -> Bool
$c== :: InputStartingPosition -> InputStartingPosition -> Bool
Prelude.Eq,
      Eq InputStartingPosition
Eq InputStartingPosition
-> (InputStartingPosition -> InputStartingPosition -> Ordering)
-> (InputStartingPosition -> InputStartingPosition -> Bool)
-> (InputStartingPosition -> InputStartingPosition -> Bool)
-> (InputStartingPosition -> InputStartingPosition -> Bool)
-> (InputStartingPosition -> InputStartingPosition -> Bool)
-> (InputStartingPosition
    -> InputStartingPosition -> InputStartingPosition)
-> (InputStartingPosition
    -> InputStartingPosition -> InputStartingPosition)
-> Ord InputStartingPosition
InputStartingPosition -> InputStartingPosition -> Bool
InputStartingPosition -> InputStartingPosition -> Ordering
InputStartingPosition
-> InputStartingPosition -> InputStartingPosition
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: InputStartingPosition
-> InputStartingPosition -> InputStartingPosition
$cmin :: InputStartingPosition
-> InputStartingPosition -> InputStartingPosition
max :: InputStartingPosition
-> InputStartingPosition -> InputStartingPosition
$cmax :: InputStartingPosition
-> InputStartingPosition -> InputStartingPosition
>= :: InputStartingPosition -> InputStartingPosition -> Bool
$c>= :: InputStartingPosition -> InputStartingPosition -> Bool
> :: InputStartingPosition -> InputStartingPosition -> Bool
$c> :: InputStartingPosition -> InputStartingPosition -> Bool
<= :: InputStartingPosition -> InputStartingPosition -> Bool
$c<= :: InputStartingPosition -> InputStartingPosition -> Bool
< :: InputStartingPosition -> InputStartingPosition -> Bool
$c< :: InputStartingPosition -> InputStartingPosition -> Bool
compare :: InputStartingPosition -> InputStartingPosition -> Ordering
$ccompare :: InputStartingPosition -> InputStartingPosition -> Ordering
$cp1Ord :: Eq InputStartingPosition
Prelude.Ord,
      (forall x. InputStartingPosition -> Rep InputStartingPosition x)
-> (forall x. Rep InputStartingPosition x -> InputStartingPosition)
-> Generic InputStartingPosition
forall x. Rep InputStartingPosition x -> InputStartingPosition
forall x. InputStartingPosition -> Rep InputStartingPosition x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InputStartingPosition x -> InputStartingPosition
$cfrom :: forall x. InputStartingPosition -> Rep InputStartingPosition x
Prelude.Generic
    )
  deriving newtype
    ( Int -> InputStartingPosition -> Int
InputStartingPosition -> Int
(Int -> InputStartingPosition -> Int)
-> (InputStartingPosition -> Int) -> Hashable InputStartingPosition
forall a. (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: InputStartingPosition -> Int
$chash :: InputStartingPosition -> Int
hashWithSalt :: Int -> InputStartingPosition -> Int
$chashWithSalt :: Int -> InputStartingPosition -> Int
Prelude.Hashable,
      InputStartingPosition -> ()
(InputStartingPosition -> ()) -> NFData InputStartingPosition
forall a. (a -> ()) -> NFData a
rnf :: InputStartingPosition -> ()
$crnf :: InputStartingPosition -> ()
Prelude.NFData,
      Text -> Either String InputStartingPosition
(Text -> Either String InputStartingPosition)
-> FromText InputStartingPosition
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String InputStartingPosition
$cfromText :: Text -> Either String InputStartingPosition
Core.FromText,
      InputStartingPosition -> Text
(InputStartingPosition -> Text) -> ToText InputStartingPosition
forall a. (a -> Text) -> ToText a
toText :: InputStartingPosition -> Text
$ctoText :: InputStartingPosition -> Text
Core.ToText,
      InputStartingPosition -> ByteString
(InputStartingPosition -> ByteString)
-> ToByteString InputStartingPosition
forall a. (a -> ByteString) -> ToByteString a
toBS :: InputStartingPosition -> ByteString
$ctoBS :: InputStartingPosition -> ByteString
Core.ToByteString,
      InputStartingPosition -> ByteStringBuilder
(InputStartingPosition -> ByteStringBuilder)
-> ToLog InputStartingPosition
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: InputStartingPosition -> ByteStringBuilder
$cbuild :: InputStartingPosition -> ByteStringBuilder
Core.ToLog,
      HeaderName -> InputStartingPosition -> [Header]
(HeaderName -> InputStartingPosition -> [Header])
-> ToHeader InputStartingPosition
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> InputStartingPosition -> [Header]
$ctoHeader :: HeaderName -> InputStartingPosition -> [Header]
Core.ToHeader,
      InputStartingPosition -> QueryString
(InputStartingPosition -> QueryString)
-> ToQuery InputStartingPosition
forall a. (a -> QueryString) -> ToQuery a
toQuery :: InputStartingPosition -> QueryString
$ctoQuery :: InputStartingPosition -> QueryString
Core.ToQuery,
      Value -> Parser [InputStartingPosition]
Value -> Parser InputStartingPosition
(Value -> Parser InputStartingPosition)
-> (Value -> Parser [InputStartingPosition])
-> FromJSON InputStartingPosition
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [InputStartingPosition]
$cparseJSONList :: Value -> Parser [InputStartingPosition]
parseJSON :: Value -> Parser InputStartingPosition
$cparseJSON :: Value -> Parser InputStartingPosition
Core.FromJSON,
      FromJSONKeyFunction [InputStartingPosition]
FromJSONKeyFunction InputStartingPosition
FromJSONKeyFunction InputStartingPosition
-> FromJSONKeyFunction [InputStartingPosition]
-> FromJSONKey InputStartingPosition
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [InputStartingPosition]
$cfromJSONKeyList :: FromJSONKeyFunction [InputStartingPosition]
fromJSONKey :: FromJSONKeyFunction InputStartingPosition
$cfromJSONKey :: FromJSONKeyFunction InputStartingPosition
Core.FromJSONKey,
      [InputStartingPosition] -> Encoding
[InputStartingPosition] -> Value
InputStartingPosition -> Encoding
InputStartingPosition -> Value
(InputStartingPosition -> Value)
-> (InputStartingPosition -> Encoding)
-> ([InputStartingPosition] -> Value)
-> ([InputStartingPosition] -> Encoding)
-> ToJSON InputStartingPosition
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [InputStartingPosition] -> Encoding
$ctoEncodingList :: [InputStartingPosition] -> Encoding
toJSONList :: [InputStartingPosition] -> Value
$ctoJSONList :: [InputStartingPosition] -> Value
toEncoding :: InputStartingPosition -> Encoding
$ctoEncoding :: InputStartingPosition -> Encoding
toJSON :: InputStartingPosition -> Value
$ctoJSON :: InputStartingPosition -> Value
Core.ToJSON,
      ToJSONKeyFunction [InputStartingPosition]
ToJSONKeyFunction InputStartingPosition
ToJSONKeyFunction InputStartingPosition
-> ToJSONKeyFunction [InputStartingPosition]
-> ToJSONKey InputStartingPosition
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [InputStartingPosition]
$ctoJSONKeyList :: ToJSONKeyFunction [InputStartingPosition]
toJSONKey :: ToJSONKeyFunction InputStartingPosition
$ctoJSONKey :: ToJSONKeyFunction InputStartingPosition
Core.ToJSONKey,
      [Node] -> Either String InputStartingPosition
([Node] -> Either String InputStartingPosition)
-> FromXML InputStartingPosition
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String InputStartingPosition
$cparseXML :: [Node] -> Either String InputStartingPosition
Core.FromXML,
      InputStartingPosition -> XML
(InputStartingPosition -> XML) -> ToXML InputStartingPosition
forall a. (a -> XML) -> ToXML a
toXML :: InputStartingPosition -> XML
$ctoXML :: InputStartingPosition -> XML
Core.ToXML
    )

pattern InputStartingPosition_LAST_STOPPED_POINT :: InputStartingPosition
pattern $bInputStartingPosition_LAST_STOPPED_POINT :: InputStartingPosition
$mInputStartingPosition_LAST_STOPPED_POINT :: forall r.
InputStartingPosition -> (Void# -> r) -> (Void# -> r) -> r
InputStartingPosition_LAST_STOPPED_POINT = InputStartingPosition' "LAST_STOPPED_POINT"

pattern InputStartingPosition_NOW :: InputStartingPosition
pattern $bInputStartingPosition_NOW :: InputStartingPosition
$mInputStartingPosition_NOW :: forall r.
InputStartingPosition -> (Void# -> r) -> (Void# -> r) -> r
InputStartingPosition_NOW = InputStartingPosition' "NOW"

pattern InputStartingPosition_TRIM_HORIZON :: InputStartingPosition
pattern $bInputStartingPosition_TRIM_HORIZON :: InputStartingPosition
$mInputStartingPosition_TRIM_HORIZON :: forall r.
InputStartingPosition -> (Void# -> r) -> (Void# -> r) -> r
InputStartingPosition_TRIM_HORIZON = InputStartingPosition' "TRIM_HORIZON"

{-# COMPLETE
  InputStartingPosition_LAST_STOPPED_POINT,
  InputStartingPosition_NOW,
  InputStartingPosition_TRIM_HORIZON,
  InputStartingPosition'
  #-}