{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}

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

-- |
-- Module      : Amazonka.IoTAnalytics.Types.DatastoreSummary
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.IoTAnalytics.Types.DatastoreSummary where

import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.IoTAnalytics.Types.DatastorePartitions
import Amazonka.IoTAnalytics.Types.DatastoreStatus
import Amazonka.IoTAnalytics.Types.DatastoreStorageSummary
import Amazonka.IoTAnalytics.Types.FileFormatType
import qualified Amazonka.Prelude as Prelude

-- | A summary of information about a data store.
--
-- /See:/ 'newDatastoreSummary' smart constructor.
data DatastoreSummary = DatastoreSummary'
  { -- | When the data store was created.
    DatastoreSummary -> Maybe POSIX
creationTime :: Prelude.Maybe Data.POSIX,
    -- | The name of the data store.
    DatastoreSummary -> Maybe Text
datastoreName :: Prelude.Maybe Prelude.Text,
    -- | Contains information about the partition dimensions in a data store.
    DatastoreSummary -> Maybe DatastorePartitions
datastorePartitions :: Prelude.Maybe DatastorePartitions,
    -- | Where data in a data store is stored.
    DatastoreSummary -> Maybe DatastoreStorageSummary
datastoreStorage :: Prelude.Maybe DatastoreStorageSummary,
    -- | The file format of the data in the data store.
    DatastoreSummary -> Maybe FileFormatType
fileFormatType :: Prelude.Maybe FileFormatType,
    -- | The last time when a new message arrived in the data store.
    --
    -- IoT Analytics updates this value at most once per minute for Amazon
    -- Simple Storage Service one data store. Hence, the
    -- @lastMessageArrivalTime@ value is an approximation.
    --
    -- This feature only applies to messages that arrived in the data store
    -- after October 23, 2020.
    DatastoreSummary -> Maybe POSIX
lastMessageArrivalTime :: Prelude.Maybe Data.POSIX,
    -- | The last time the data store was updated.
    DatastoreSummary -> Maybe POSIX
lastUpdateTime :: Prelude.Maybe Data.POSIX,
    -- | The status of the data store.
    DatastoreSummary -> Maybe DatastoreStatus
status :: Prelude.Maybe DatastoreStatus
  }
  deriving (DatastoreSummary -> DatastoreSummary -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DatastoreSummary -> DatastoreSummary -> Bool
$c/= :: DatastoreSummary -> DatastoreSummary -> Bool
== :: DatastoreSummary -> DatastoreSummary -> Bool
$c== :: DatastoreSummary -> DatastoreSummary -> Bool
Prelude.Eq, ReadPrec [DatastoreSummary]
ReadPrec DatastoreSummary
Int -> ReadS DatastoreSummary
ReadS [DatastoreSummary]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DatastoreSummary]
$creadListPrec :: ReadPrec [DatastoreSummary]
readPrec :: ReadPrec DatastoreSummary
$creadPrec :: ReadPrec DatastoreSummary
readList :: ReadS [DatastoreSummary]
$creadList :: ReadS [DatastoreSummary]
readsPrec :: Int -> ReadS DatastoreSummary
$creadsPrec :: Int -> ReadS DatastoreSummary
Prelude.Read, Int -> DatastoreSummary -> ShowS
[DatastoreSummary] -> ShowS
DatastoreSummary -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DatastoreSummary] -> ShowS
$cshowList :: [DatastoreSummary] -> ShowS
show :: DatastoreSummary -> String
$cshow :: DatastoreSummary -> String
showsPrec :: Int -> DatastoreSummary -> ShowS
$cshowsPrec :: Int -> DatastoreSummary -> ShowS
Prelude.Show, forall x. Rep DatastoreSummary x -> DatastoreSummary
forall x. DatastoreSummary -> Rep DatastoreSummary x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DatastoreSummary x -> DatastoreSummary
$cfrom :: forall x. DatastoreSummary -> Rep DatastoreSummary x
Prelude.Generic)

-- |
-- Create a value of 'DatastoreSummary' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'creationTime', 'datastoreSummary_creationTime' - When the data store was created.
--
-- 'datastoreName', 'datastoreSummary_datastoreName' - The name of the data store.
--
-- 'datastorePartitions', 'datastoreSummary_datastorePartitions' - Contains information about the partition dimensions in a data store.
--
-- 'datastoreStorage', 'datastoreSummary_datastoreStorage' - Where data in a data store is stored.
--
-- 'fileFormatType', 'datastoreSummary_fileFormatType' - The file format of the data in the data store.
--
-- 'lastMessageArrivalTime', 'datastoreSummary_lastMessageArrivalTime' - The last time when a new message arrived in the data store.
--
-- IoT Analytics updates this value at most once per minute for Amazon
-- Simple Storage Service one data store. Hence, the
-- @lastMessageArrivalTime@ value is an approximation.
--
-- This feature only applies to messages that arrived in the data store
-- after October 23, 2020.
--
-- 'lastUpdateTime', 'datastoreSummary_lastUpdateTime' - The last time the data store was updated.
--
-- 'status', 'datastoreSummary_status' - The status of the data store.
newDatastoreSummary ::
  DatastoreSummary
newDatastoreSummary :: DatastoreSummary
newDatastoreSummary =
  DatastoreSummary'
    { $sel:creationTime:DatastoreSummary' :: Maybe POSIX
creationTime = forall a. Maybe a
Prelude.Nothing,
      $sel:datastoreName:DatastoreSummary' :: Maybe Text
datastoreName = forall a. Maybe a
Prelude.Nothing,
      $sel:datastorePartitions:DatastoreSummary' :: Maybe DatastorePartitions
datastorePartitions = forall a. Maybe a
Prelude.Nothing,
      $sel:datastoreStorage:DatastoreSummary' :: Maybe DatastoreStorageSummary
datastoreStorage = forall a. Maybe a
Prelude.Nothing,
      $sel:fileFormatType:DatastoreSummary' :: Maybe FileFormatType
fileFormatType = forall a. Maybe a
Prelude.Nothing,
      $sel:lastMessageArrivalTime:DatastoreSummary' :: Maybe POSIX
lastMessageArrivalTime = forall a. Maybe a
Prelude.Nothing,
      $sel:lastUpdateTime:DatastoreSummary' :: Maybe POSIX
lastUpdateTime = forall a. Maybe a
Prelude.Nothing,
      $sel:status:DatastoreSummary' :: Maybe DatastoreStatus
status = forall a. Maybe a
Prelude.Nothing
    }

-- | When the data store was created.
datastoreSummary_creationTime :: Lens.Lens' DatastoreSummary (Prelude.Maybe Prelude.UTCTime)
datastoreSummary_creationTime :: Lens' DatastoreSummary (Maybe UTCTime)
datastoreSummary_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DatastoreSummary' {Maybe POSIX
creationTime :: Maybe POSIX
$sel:creationTime:DatastoreSummary' :: DatastoreSummary -> Maybe POSIX
creationTime} -> Maybe POSIX
creationTime) (\s :: DatastoreSummary
s@DatastoreSummary' {} Maybe POSIX
a -> DatastoreSummary
s {$sel:creationTime:DatastoreSummary' :: Maybe POSIX
creationTime = Maybe POSIX
a} :: DatastoreSummary) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time

-- | The name of the data store.
datastoreSummary_datastoreName :: Lens.Lens' DatastoreSummary (Prelude.Maybe Prelude.Text)
datastoreSummary_datastoreName :: Lens' DatastoreSummary (Maybe Text)
datastoreSummary_datastoreName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DatastoreSummary' {Maybe Text
datastoreName :: Maybe Text
$sel:datastoreName:DatastoreSummary' :: DatastoreSummary -> Maybe Text
datastoreName} -> Maybe Text
datastoreName) (\s :: DatastoreSummary
s@DatastoreSummary' {} Maybe Text
a -> DatastoreSummary
s {$sel:datastoreName:DatastoreSummary' :: Maybe Text
datastoreName = Maybe Text
a} :: DatastoreSummary)

-- | Contains information about the partition dimensions in a data store.
datastoreSummary_datastorePartitions :: Lens.Lens' DatastoreSummary (Prelude.Maybe DatastorePartitions)
datastoreSummary_datastorePartitions :: Lens' DatastoreSummary (Maybe DatastorePartitions)
datastoreSummary_datastorePartitions = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DatastoreSummary' {Maybe DatastorePartitions
datastorePartitions :: Maybe DatastorePartitions
$sel:datastorePartitions:DatastoreSummary' :: DatastoreSummary -> Maybe DatastorePartitions
datastorePartitions} -> Maybe DatastorePartitions
datastorePartitions) (\s :: DatastoreSummary
s@DatastoreSummary' {} Maybe DatastorePartitions
a -> DatastoreSummary
s {$sel:datastorePartitions:DatastoreSummary' :: Maybe DatastorePartitions
datastorePartitions = Maybe DatastorePartitions
a} :: DatastoreSummary)

-- | Where data in a data store is stored.
datastoreSummary_datastoreStorage :: Lens.Lens' DatastoreSummary (Prelude.Maybe DatastoreStorageSummary)
datastoreSummary_datastoreStorage :: Lens' DatastoreSummary (Maybe DatastoreStorageSummary)
datastoreSummary_datastoreStorage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DatastoreSummary' {Maybe DatastoreStorageSummary
datastoreStorage :: Maybe DatastoreStorageSummary
$sel:datastoreStorage:DatastoreSummary' :: DatastoreSummary -> Maybe DatastoreStorageSummary
datastoreStorage} -> Maybe DatastoreStorageSummary
datastoreStorage) (\s :: DatastoreSummary
s@DatastoreSummary' {} Maybe DatastoreStorageSummary
a -> DatastoreSummary
s {$sel:datastoreStorage:DatastoreSummary' :: Maybe DatastoreStorageSummary
datastoreStorage = Maybe DatastoreStorageSummary
a} :: DatastoreSummary)

-- | The file format of the data in the data store.
datastoreSummary_fileFormatType :: Lens.Lens' DatastoreSummary (Prelude.Maybe FileFormatType)
datastoreSummary_fileFormatType :: Lens' DatastoreSummary (Maybe FileFormatType)
datastoreSummary_fileFormatType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DatastoreSummary' {Maybe FileFormatType
fileFormatType :: Maybe FileFormatType
$sel:fileFormatType:DatastoreSummary' :: DatastoreSummary -> Maybe FileFormatType
fileFormatType} -> Maybe FileFormatType
fileFormatType) (\s :: DatastoreSummary
s@DatastoreSummary' {} Maybe FileFormatType
a -> DatastoreSummary
s {$sel:fileFormatType:DatastoreSummary' :: Maybe FileFormatType
fileFormatType = Maybe FileFormatType
a} :: DatastoreSummary)

-- | The last time when a new message arrived in the data store.
--
-- IoT Analytics updates this value at most once per minute for Amazon
-- Simple Storage Service one data store. Hence, the
-- @lastMessageArrivalTime@ value is an approximation.
--
-- This feature only applies to messages that arrived in the data store
-- after October 23, 2020.
datastoreSummary_lastMessageArrivalTime :: Lens.Lens' DatastoreSummary (Prelude.Maybe Prelude.UTCTime)
datastoreSummary_lastMessageArrivalTime :: Lens' DatastoreSummary (Maybe UTCTime)
datastoreSummary_lastMessageArrivalTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DatastoreSummary' {Maybe POSIX
lastMessageArrivalTime :: Maybe POSIX
$sel:lastMessageArrivalTime:DatastoreSummary' :: DatastoreSummary -> Maybe POSIX
lastMessageArrivalTime} -> Maybe POSIX
lastMessageArrivalTime) (\s :: DatastoreSummary
s@DatastoreSummary' {} Maybe POSIX
a -> DatastoreSummary
s {$sel:lastMessageArrivalTime:DatastoreSummary' :: Maybe POSIX
lastMessageArrivalTime = Maybe POSIX
a} :: DatastoreSummary) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time

-- | The last time the data store was updated.
datastoreSummary_lastUpdateTime :: Lens.Lens' DatastoreSummary (Prelude.Maybe Prelude.UTCTime)
datastoreSummary_lastUpdateTime :: Lens' DatastoreSummary (Maybe UTCTime)
datastoreSummary_lastUpdateTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DatastoreSummary' {Maybe POSIX
lastUpdateTime :: Maybe POSIX
$sel:lastUpdateTime:DatastoreSummary' :: DatastoreSummary -> Maybe POSIX
lastUpdateTime} -> Maybe POSIX
lastUpdateTime) (\s :: DatastoreSummary
s@DatastoreSummary' {} Maybe POSIX
a -> DatastoreSummary
s {$sel:lastUpdateTime:DatastoreSummary' :: Maybe POSIX
lastUpdateTime = Maybe POSIX
a} :: DatastoreSummary) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time

-- | The status of the data store.
datastoreSummary_status :: Lens.Lens' DatastoreSummary (Prelude.Maybe DatastoreStatus)
datastoreSummary_status :: Lens' DatastoreSummary (Maybe DatastoreStatus)
datastoreSummary_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DatastoreSummary' {Maybe DatastoreStatus
status :: Maybe DatastoreStatus
$sel:status:DatastoreSummary' :: DatastoreSummary -> Maybe DatastoreStatus
status} -> Maybe DatastoreStatus
status) (\s :: DatastoreSummary
s@DatastoreSummary' {} Maybe DatastoreStatus
a -> DatastoreSummary
s {$sel:status:DatastoreSummary' :: Maybe DatastoreStatus
status = Maybe DatastoreStatus
a} :: DatastoreSummary)

instance Data.FromJSON DatastoreSummary where
  parseJSON :: Value -> Parser DatastoreSummary
parseJSON =
    forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
      String
"DatastoreSummary"
      ( \Object
x ->
          Maybe POSIX
-> Maybe Text
-> Maybe DatastorePartitions
-> Maybe DatastoreStorageSummary
-> Maybe FileFormatType
-> Maybe POSIX
-> Maybe POSIX
-> Maybe DatastoreStatus
-> DatastoreSummary
DatastoreSummary'
            forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"creationTime")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"datastoreName")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"datastorePartitions")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"datastoreStorage")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"fileFormatType")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"lastMessageArrivalTime")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"lastUpdateTime")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"status")
      )

instance Prelude.Hashable DatastoreSummary where
  hashWithSalt :: Int -> DatastoreSummary -> Int
hashWithSalt Int
_salt DatastoreSummary' {Maybe Text
Maybe POSIX
Maybe DatastoreStatus
Maybe FileFormatType
Maybe DatastoreStorageSummary
Maybe DatastorePartitions
status :: Maybe DatastoreStatus
lastUpdateTime :: Maybe POSIX
lastMessageArrivalTime :: Maybe POSIX
fileFormatType :: Maybe FileFormatType
datastoreStorage :: Maybe DatastoreStorageSummary
datastorePartitions :: Maybe DatastorePartitions
datastoreName :: Maybe Text
creationTime :: Maybe POSIX
$sel:status:DatastoreSummary' :: DatastoreSummary -> Maybe DatastoreStatus
$sel:lastUpdateTime:DatastoreSummary' :: DatastoreSummary -> Maybe POSIX
$sel:lastMessageArrivalTime:DatastoreSummary' :: DatastoreSummary -> Maybe POSIX
$sel:fileFormatType:DatastoreSummary' :: DatastoreSummary -> Maybe FileFormatType
$sel:datastoreStorage:DatastoreSummary' :: DatastoreSummary -> Maybe DatastoreStorageSummary
$sel:datastorePartitions:DatastoreSummary' :: DatastoreSummary -> Maybe DatastorePartitions
$sel:datastoreName:DatastoreSummary' :: DatastoreSummary -> Maybe Text
$sel:creationTime:DatastoreSummary' :: DatastoreSummary -> Maybe POSIX
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
creationTime
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
datastoreName
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DatastorePartitions
datastorePartitions
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DatastoreStorageSummary
datastoreStorage
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe FileFormatType
fileFormatType
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
lastMessageArrivalTime
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
lastUpdateTime
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DatastoreStatus
status

instance Prelude.NFData DatastoreSummary where
  rnf :: DatastoreSummary -> ()
rnf DatastoreSummary' {Maybe Text
Maybe POSIX
Maybe DatastoreStatus
Maybe FileFormatType
Maybe DatastoreStorageSummary
Maybe DatastorePartitions
status :: Maybe DatastoreStatus
lastUpdateTime :: Maybe POSIX
lastMessageArrivalTime :: Maybe POSIX
fileFormatType :: Maybe FileFormatType
datastoreStorage :: Maybe DatastoreStorageSummary
datastorePartitions :: Maybe DatastorePartitions
datastoreName :: Maybe Text
creationTime :: Maybe POSIX
$sel:status:DatastoreSummary' :: DatastoreSummary -> Maybe DatastoreStatus
$sel:lastUpdateTime:DatastoreSummary' :: DatastoreSummary -> Maybe POSIX
$sel:lastMessageArrivalTime:DatastoreSummary' :: DatastoreSummary -> Maybe POSIX
$sel:fileFormatType:DatastoreSummary' :: DatastoreSummary -> Maybe FileFormatType
$sel:datastoreStorage:DatastoreSummary' :: DatastoreSummary -> Maybe DatastoreStorageSummary
$sel:datastorePartitions:DatastoreSummary' :: DatastoreSummary -> Maybe DatastorePartitions
$sel:datastoreName:DatastoreSummary' :: DatastoreSummary -> Maybe Text
$sel:creationTime:DatastoreSummary' :: DatastoreSummary -> Maybe POSIX
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
creationTime
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
datastoreName
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DatastorePartitions
datastorePartitions
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DatastoreStorageSummary
datastoreStorage
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe FileFormatType
fileFormatType
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
lastMessageArrivalTime
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
lastUpdateTime
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DatastoreStatus
status