{-# 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.MediaConvert.Types.HlsProgramDateTime
-- 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.MediaConvert.Types.HlsProgramDateTime
  ( HlsProgramDateTime
      ( ..,
        HlsProgramDateTime_EXCLUDE,
        HlsProgramDateTime_INCLUDE
      ),
  )
where

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

-- | Includes or excludes EXT-X-PROGRAM-DATE-TIME tag in .m3u8 manifest
-- files. The value is calculated as follows: either the program date and
-- time are initialized using the input timecode source, or the time is
-- initialized using the input timecode source and the date is initialized
-- using the timestamp_offset.
newtype HlsProgramDateTime = HlsProgramDateTime'
  { HlsProgramDateTime -> Text
fromHlsProgramDateTime ::
      Core.Text
  }
  deriving stock
    ( Int -> HlsProgramDateTime -> ShowS
[HlsProgramDateTime] -> ShowS
HlsProgramDateTime -> String
(Int -> HlsProgramDateTime -> ShowS)
-> (HlsProgramDateTime -> String)
-> ([HlsProgramDateTime] -> ShowS)
-> Show HlsProgramDateTime
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [HlsProgramDateTime] -> ShowS
$cshowList :: [HlsProgramDateTime] -> ShowS
show :: HlsProgramDateTime -> String
$cshow :: HlsProgramDateTime -> String
showsPrec :: Int -> HlsProgramDateTime -> ShowS
$cshowsPrec :: Int -> HlsProgramDateTime -> ShowS
Prelude.Show,
      ReadPrec [HlsProgramDateTime]
ReadPrec HlsProgramDateTime
Int -> ReadS HlsProgramDateTime
ReadS [HlsProgramDateTime]
(Int -> ReadS HlsProgramDateTime)
-> ReadS [HlsProgramDateTime]
-> ReadPrec HlsProgramDateTime
-> ReadPrec [HlsProgramDateTime]
-> Read HlsProgramDateTime
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [HlsProgramDateTime]
$creadListPrec :: ReadPrec [HlsProgramDateTime]
readPrec :: ReadPrec HlsProgramDateTime
$creadPrec :: ReadPrec HlsProgramDateTime
readList :: ReadS [HlsProgramDateTime]
$creadList :: ReadS [HlsProgramDateTime]
readsPrec :: Int -> ReadS HlsProgramDateTime
$creadsPrec :: Int -> ReadS HlsProgramDateTime
Prelude.Read,
      HlsProgramDateTime -> HlsProgramDateTime -> Bool
(HlsProgramDateTime -> HlsProgramDateTime -> Bool)
-> (HlsProgramDateTime -> HlsProgramDateTime -> Bool)
-> Eq HlsProgramDateTime
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
$c/= :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
== :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
$c== :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
Prelude.Eq,
      Eq HlsProgramDateTime
Eq HlsProgramDateTime
-> (HlsProgramDateTime -> HlsProgramDateTime -> Ordering)
-> (HlsProgramDateTime -> HlsProgramDateTime -> Bool)
-> (HlsProgramDateTime -> HlsProgramDateTime -> Bool)
-> (HlsProgramDateTime -> HlsProgramDateTime -> Bool)
-> (HlsProgramDateTime -> HlsProgramDateTime -> Bool)
-> (HlsProgramDateTime -> HlsProgramDateTime -> HlsProgramDateTime)
-> (HlsProgramDateTime -> HlsProgramDateTime -> HlsProgramDateTime)
-> Ord HlsProgramDateTime
HlsProgramDateTime -> HlsProgramDateTime -> Bool
HlsProgramDateTime -> HlsProgramDateTime -> Ordering
HlsProgramDateTime -> HlsProgramDateTime -> HlsProgramDateTime
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 :: HlsProgramDateTime -> HlsProgramDateTime -> HlsProgramDateTime
$cmin :: HlsProgramDateTime -> HlsProgramDateTime -> HlsProgramDateTime
max :: HlsProgramDateTime -> HlsProgramDateTime -> HlsProgramDateTime
$cmax :: HlsProgramDateTime -> HlsProgramDateTime -> HlsProgramDateTime
>= :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
$c>= :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
> :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
$c> :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
<= :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
$c<= :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
< :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
$c< :: HlsProgramDateTime -> HlsProgramDateTime -> Bool
compare :: HlsProgramDateTime -> HlsProgramDateTime -> Ordering
$ccompare :: HlsProgramDateTime -> HlsProgramDateTime -> Ordering
$cp1Ord :: Eq HlsProgramDateTime
Prelude.Ord,
      (forall x. HlsProgramDateTime -> Rep HlsProgramDateTime x)
-> (forall x. Rep HlsProgramDateTime x -> HlsProgramDateTime)
-> Generic HlsProgramDateTime
forall x. Rep HlsProgramDateTime x -> HlsProgramDateTime
forall x. HlsProgramDateTime -> Rep HlsProgramDateTime x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep HlsProgramDateTime x -> HlsProgramDateTime
$cfrom :: forall x. HlsProgramDateTime -> Rep HlsProgramDateTime x
Prelude.Generic
    )
  deriving newtype
    ( Int -> HlsProgramDateTime -> Int
HlsProgramDateTime -> Int
(Int -> HlsProgramDateTime -> Int)
-> (HlsProgramDateTime -> Int) -> Hashable HlsProgramDateTime
forall a. (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: HlsProgramDateTime -> Int
$chash :: HlsProgramDateTime -> Int
hashWithSalt :: Int -> HlsProgramDateTime -> Int
$chashWithSalt :: Int -> HlsProgramDateTime -> Int
Prelude.Hashable,
      HlsProgramDateTime -> ()
(HlsProgramDateTime -> ()) -> NFData HlsProgramDateTime
forall a. (a -> ()) -> NFData a
rnf :: HlsProgramDateTime -> ()
$crnf :: HlsProgramDateTime -> ()
Prelude.NFData,
      Text -> Either String HlsProgramDateTime
(Text -> Either String HlsProgramDateTime)
-> FromText HlsProgramDateTime
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String HlsProgramDateTime
$cfromText :: Text -> Either String HlsProgramDateTime
Core.FromText,
      HlsProgramDateTime -> Text
(HlsProgramDateTime -> Text) -> ToText HlsProgramDateTime
forall a. (a -> Text) -> ToText a
toText :: HlsProgramDateTime -> Text
$ctoText :: HlsProgramDateTime -> Text
Core.ToText,
      HlsProgramDateTime -> ByteString
(HlsProgramDateTime -> ByteString)
-> ToByteString HlsProgramDateTime
forall a. (a -> ByteString) -> ToByteString a
toBS :: HlsProgramDateTime -> ByteString
$ctoBS :: HlsProgramDateTime -> ByteString
Core.ToByteString,
      HlsProgramDateTime -> ByteStringBuilder
(HlsProgramDateTime -> ByteStringBuilder)
-> ToLog HlsProgramDateTime
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: HlsProgramDateTime -> ByteStringBuilder
$cbuild :: HlsProgramDateTime -> ByteStringBuilder
Core.ToLog,
      HeaderName -> HlsProgramDateTime -> [Header]
(HeaderName -> HlsProgramDateTime -> [Header])
-> ToHeader HlsProgramDateTime
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> HlsProgramDateTime -> [Header]
$ctoHeader :: HeaderName -> HlsProgramDateTime -> [Header]
Core.ToHeader,
      HlsProgramDateTime -> QueryString
(HlsProgramDateTime -> QueryString) -> ToQuery HlsProgramDateTime
forall a. (a -> QueryString) -> ToQuery a
toQuery :: HlsProgramDateTime -> QueryString
$ctoQuery :: HlsProgramDateTime -> QueryString
Core.ToQuery,
      Value -> Parser [HlsProgramDateTime]
Value -> Parser HlsProgramDateTime
(Value -> Parser HlsProgramDateTime)
-> (Value -> Parser [HlsProgramDateTime])
-> FromJSON HlsProgramDateTime
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [HlsProgramDateTime]
$cparseJSONList :: Value -> Parser [HlsProgramDateTime]
parseJSON :: Value -> Parser HlsProgramDateTime
$cparseJSON :: Value -> Parser HlsProgramDateTime
Core.FromJSON,
      FromJSONKeyFunction [HlsProgramDateTime]
FromJSONKeyFunction HlsProgramDateTime
FromJSONKeyFunction HlsProgramDateTime
-> FromJSONKeyFunction [HlsProgramDateTime]
-> FromJSONKey HlsProgramDateTime
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [HlsProgramDateTime]
$cfromJSONKeyList :: FromJSONKeyFunction [HlsProgramDateTime]
fromJSONKey :: FromJSONKeyFunction HlsProgramDateTime
$cfromJSONKey :: FromJSONKeyFunction HlsProgramDateTime
Core.FromJSONKey,
      [HlsProgramDateTime] -> Encoding
[HlsProgramDateTime] -> Value
HlsProgramDateTime -> Encoding
HlsProgramDateTime -> Value
(HlsProgramDateTime -> Value)
-> (HlsProgramDateTime -> Encoding)
-> ([HlsProgramDateTime] -> Value)
-> ([HlsProgramDateTime] -> Encoding)
-> ToJSON HlsProgramDateTime
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [HlsProgramDateTime] -> Encoding
$ctoEncodingList :: [HlsProgramDateTime] -> Encoding
toJSONList :: [HlsProgramDateTime] -> Value
$ctoJSONList :: [HlsProgramDateTime] -> Value
toEncoding :: HlsProgramDateTime -> Encoding
$ctoEncoding :: HlsProgramDateTime -> Encoding
toJSON :: HlsProgramDateTime -> Value
$ctoJSON :: HlsProgramDateTime -> Value
Core.ToJSON,
      ToJSONKeyFunction [HlsProgramDateTime]
ToJSONKeyFunction HlsProgramDateTime
ToJSONKeyFunction HlsProgramDateTime
-> ToJSONKeyFunction [HlsProgramDateTime]
-> ToJSONKey HlsProgramDateTime
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [HlsProgramDateTime]
$ctoJSONKeyList :: ToJSONKeyFunction [HlsProgramDateTime]
toJSONKey :: ToJSONKeyFunction HlsProgramDateTime
$ctoJSONKey :: ToJSONKeyFunction HlsProgramDateTime
Core.ToJSONKey,
      [Node] -> Either String HlsProgramDateTime
([Node] -> Either String HlsProgramDateTime)
-> FromXML HlsProgramDateTime
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String HlsProgramDateTime
$cparseXML :: [Node] -> Either String HlsProgramDateTime
Core.FromXML,
      HlsProgramDateTime -> XML
(HlsProgramDateTime -> XML) -> ToXML HlsProgramDateTime
forall a. (a -> XML) -> ToXML a
toXML :: HlsProgramDateTime -> XML
$ctoXML :: HlsProgramDateTime -> XML
Core.ToXML
    )

pattern HlsProgramDateTime_EXCLUDE :: HlsProgramDateTime
pattern $bHlsProgramDateTime_EXCLUDE :: HlsProgramDateTime
$mHlsProgramDateTime_EXCLUDE :: forall r. HlsProgramDateTime -> (Void# -> r) -> (Void# -> r) -> r
HlsProgramDateTime_EXCLUDE = HlsProgramDateTime' "EXCLUDE"

pattern HlsProgramDateTime_INCLUDE :: HlsProgramDateTime
pattern $bHlsProgramDateTime_INCLUDE :: HlsProgramDateTime
$mHlsProgramDateTime_INCLUDE :: forall r. HlsProgramDateTime -> (Void# -> r) -> (Void# -> r) -> r
HlsProgramDateTime_INCLUDE = HlsProgramDateTime' "INCLUDE"

{-# COMPLETE
  HlsProgramDateTime_EXCLUDE,
  HlsProgramDateTime_INCLUDE,
  HlsProgramDateTime'
  #-}