{-# LANGUAGE DataKinds #-} {-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE ImportQualifiedPost #-} {-# LANGUAGE LambdaCase #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-duplicate-exports #-} {-# OPTIONS_GHC -fno-warn-name-shadowing #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- | -- Module : Gogol.Redis.Projects.Locations.Clusters.Get -- Copyright : (c) 2015-2025 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Toni Cebrián -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Gets the details of a specific Redis cluster. -- -- /See:/ for @redis.projects.locations.clusters.get@. module Gogol.Redis.Projects.Locations.Clusters.Get ( -- * Resource RedisProjectsLocationsClustersGetResource, -- ** Constructing a Request RedisProjectsLocationsClustersGet (..), newRedisProjectsLocationsClustersGet, ) where import Gogol.Prelude qualified as Core import Gogol.Redis.Types -- | A resource alias for @redis.projects.locations.clusters.get@ method which the -- 'RedisProjectsLocationsClustersGet' request conforms to. type RedisProjectsLocationsClustersGetResource = "v1" Core.:> Core.Capture "name" Core.Text Core.:> Core.QueryParam "$.xgafv" Xgafv Core.:> Core.QueryParam "access_token" Core.Text Core.:> Core.QueryParam "callback" Core.Text Core.:> Core.QueryParam "uploadType" Core.Text Core.:> Core.QueryParam "upload_protocol" Core.Text Core.:> Core.QueryParam "alt" Core.AltJSON Core.:> Core.Get '[Core.JSON] Cluster -- | Gets the details of a specific Redis cluster. -- -- /See:/ 'newRedisProjectsLocationsClustersGet' smart constructor. data RedisProjectsLocationsClustersGet = RedisProjectsLocationsClustersGet { -- | V1 error format. xgafv :: (Core.Maybe Xgafv), -- | OAuth access token. accessToken :: (Core.Maybe Core.Text), -- | JSONP callback :: (Core.Maybe Core.Text), -- | Required. Redis cluster resource name using the form: @projects\/{project_id}\/locations\/{location_id}\/clusters\/{cluster_id}@ where @location_id@ refers to a GCP region. name :: Core.Text, -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\"). uploadType :: (Core.Maybe Core.Text), -- | Upload protocol for media (e.g. \"raw\", \"multipart\"). uploadProtocol :: (Core.Maybe Core.Text) } deriving (Core.Eq, Core.Show, Core.Generic) -- | Creates a value of 'RedisProjectsLocationsClustersGet' with the minimum fields required to make a request. newRedisProjectsLocationsClustersGet :: -- | Required. Redis cluster resource name using the form: @projects\/{project_id}\/locations\/{location_id}\/clusters\/{cluster_id}@ where @location_id@ refers to a GCP region. See 'name'. Core.Text -> RedisProjectsLocationsClustersGet newRedisProjectsLocationsClustersGet name = RedisProjectsLocationsClustersGet { xgafv = Core.Nothing, accessToken = Core.Nothing, callback = Core.Nothing, name = name, uploadType = Core.Nothing, uploadProtocol = Core.Nothing } instance Core.GoogleRequest RedisProjectsLocationsClustersGet where type Rs RedisProjectsLocationsClustersGet = Cluster type Scopes RedisProjectsLocationsClustersGet = '[CloudPlatform'FullControl] requestClient RedisProjectsLocationsClustersGet {..} = go name xgafv accessToken callback uploadType uploadProtocol (Core.Just Core.AltJSON) redisService where go = Core.buildClient ( Core.Proxy :: Core.Proxy RedisProjectsLocationsClustersGetResource ) Core.mempty