summaryrefslogtreecommitdiff
path: root/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/GetConfig.hs
diff options
context:
space:
mode:
Diffstat (limited to 'gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/GetConfig.hs')
-rw-r--r--gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/GetConfig.hs202
1 files changed, 202 insertions, 0 deletions
diff --git a/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/GetConfig.hs b/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/GetConfig.hs
new file mode 100644
index 0000000..dc417f8
--- /dev/null
+++ b/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/GetConfig.hs
@@ -0,0 +1,202 @@
+{-# LANGUAGE DataKinds #-}
+{-# LANGUAGE DeriveDataTypeable #-}
+{-# LANGUAGE DeriveGeneric #-}
+{-# LANGUAGE FlexibleInstances #-}
+{-# LANGUAGE NoImplicitPrelude #-}
+{-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE RecordWildCards #-}
+{-# LANGUAGE TypeFamilies #-}
+{-# LANGUAGE TypeOperators #-}
+
+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
+{-# OPTIONS_GHC -fno-warn-unused-binds #-}
+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
+
+-- |
+-- Module : Network.Google.Resource.Dataflow.Projects.Locations.Jobs.Debug.GetConfig
+-- Copyright : (c) 2015-2016 Brendan Hay
+-- License : Mozilla Public License, v. 2.0.
+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
+-- Stability : auto-generated
+-- Portability : non-portable (GHC extensions)
+--
+-- Get encoded debug configuration for component. Not cacheable.
+--
+-- /See:/ <https://cloud.google.com/dataflow Dataflow API Reference> for @dataflow.projects.locations.jobs.debug.getConfig@.
+module Network.Google.Resource.Dataflow.Projects.Locations.Jobs.Debug.GetConfig
+ (
+ -- * REST Resource
+ ProjectsLocationsJobsDebugGetConfigResource
+
+ -- * Creating a Request
+ , projectsLocationsJobsDebugGetConfig
+ , ProjectsLocationsJobsDebugGetConfig
+
+ -- * Request Lenses
+ , pljdgcXgafv
+ , pljdgcJobId
+ , pljdgcUploadProtocol
+ , pljdgcLocation
+ , pljdgcAccessToken
+ , pljdgcUploadType
+ , pljdgcPayload
+ , pljdgcProjectId
+ , pljdgcCallback
+ ) where
+
+import Network.Google.Dataflow.Types
+import Network.Google.Prelude
+
+-- | A resource alias for @dataflow.projects.locations.jobs.debug.getConfig@ method which the
+-- 'ProjectsLocationsJobsDebugGetConfig' request conforms to.
+type ProjectsLocationsJobsDebugGetConfigResource =
+ "v1b3" :>
+ "projects" :>
+ Capture "projectId" Text :>
+ "locations" :>
+ Capture "location" Text :>
+ "jobs" :>
+ Capture "jobId" Text :>
+ "debug" :>
+ "getConfig" :>
+ QueryParam "$.xgafv" Xgafv :>
+ QueryParam "upload_protocol" Text :>
+ QueryParam "access_token" Text :>
+ QueryParam "uploadType" Text :>
+ QueryParam "callback" Text :>
+ QueryParam "alt" AltJSON :>
+ ReqBody '[JSON] GetDebugConfigRequest :>
+ Post '[JSON] GetDebugConfigResponse
+
+-- | Get encoded debug configuration for component. Not cacheable.
+--
+-- /See:/ 'projectsLocationsJobsDebugGetConfig' smart constructor.
+data ProjectsLocationsJobsDebugGetConfig = ProjectsLocationsJobsDebugGetConfig'
+ { _pljdgcXgafv :: !(Maybe Xgafv)
+ , _pljdgcJobId :: !Text
+ , _pljdgcUploadProtocol :: !(Maybe Text)
+ , _pljdgcLocation :: !Text
+ , _pljdgcAccessToken :: !(Maybe Text)
+ , _pljdgcUploadType :: !(Maybe Text)
+ , _pljdgcPayload :: !GetDebugConfigRequest
+ , _pljdgcProjectId :: !Text
+ , _pljdgcCallback :: !(Maybe Text)
+ } deriving (Eq,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'ProjectsLocationsJobsDebugGetConfig' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'pljdgcXgafv'
+--
+-- * 'pljdgcJobId'
+--
+-- * 'pljdgcUploadProtocol'
+--
+-- * 'pljdgcLocation'
+--
+-- * 'pljdgcAccessToken'
+--
+-- * 'pljdgcUploadType'
+--
+-- * 'pljdgcPayload'
+--
+-- * 'pljdgcProjectId'
+--
+-- * 'pljdgcCallback'
+projectsLocationsJobsDebugGetConfig
+ :: Text -- ^ 'pljdgcJobId'
+ -> Text -- ^ 'pljdgcLocation'
+ -> GetDebugConfigRequest -- ^ 'pljdgcPayload'
+ -> Text -- ^ 'pljdgcProjectId'
+ -> ProjectsLocationsJobsDebugGetConfig
+projectsLocationsJobsDebugGetConfig pPljdgcJobId_ pPljdgcLocation_ pPljdgcPayload_ pPljdgcProjectId_ =
+ ProjectsLocationsJobsDebugGetConfig'
+ { _pljdgcXgafv = Nothing
+ , _pljdgcJobId = pPljdgcJobId_
+ , _pljdgcUploadProtocol = Nothing
+ , _pljdgcLocation = pPljdgcLocation_
+ , _pljdgcAccessToken = Nothing
+ , _pljdgcUploadType = Nothing
+ , _pljdgcPayload = pPljdgcPayload_
+ , _pljdgcProjectId = pPljdgcProjectId_
+ , _pljdgcCallback = Nothing
+ }
+
+-- | V1 error format.
+pljdgcXgafv :: Lens' ProjectsLocationsJobsDebugGetConfig (Maybe Xgafv)
+pljdgcXgafv
+ = lens _pljdgcXgafv (\ s a -> s{_pljdgcXgafv = a})
+
+-- | The job id.
+pljdgcJobId :: Lens' ProjectsLocationsJobsDebugGetConfig Text
+pljdgcJobId
+ = lens _pljdgcJobId (\ s a -> s{_pljdgcJobId = a})
+
+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").
+pljdgcUploadProtocol :: Lens' ProjectsLocationsJobsDebugGetConfig (Maybe Text)
+pljdgcUploadProtocol
+ = lens _pljdgcUploadProtocol
+ (\ s a -> s{_pljdgcUploadProtocol = a})
+
+-- | The location which contains the job specified by job_id.
+pljdgcLocation :: Lens' ProjectsLocationsJobsDebugGetConfig Text
+pljdgcLocation
+ = lens _pljdgcLocation
+ (\ s a -> s{_pljdgcLocation = a})
+
+-- | OAuth access token.
+pljdgcAccessToken :: Lens' ProjectsLocationsJobsDebugGetConfig (Maybe Text)
+pljdgcAccessToken
+ = lens _pljdgcAccessToken
+ (\ s a -> s{_pljdgcAccessToken = a})
+
+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").
+pljdgcUploadType :: Lens' ProjectsLocationsJobsDebugGetConfig (Maybe Text)
+pljdgcUploadType
+ = lens _pljdgcUploadType
+ (\ s a -> s{_pljdgcUploadType = a})
+
+-- | Multipart request metadata.
+pljdgcPayload :: Lens' ProjectsLocationsJobsDebugGetConfig GetDebugConfigRequest
+pljdgcPayload
+ = lens _pljdgcPayload
+ (\ s a -> s{_pljdgcPayload = a})
+
+-- | The project id.
+pljdgcProjectId :: Lens' ProjectsLocationsJobsDebugGetConfig Text
+pljdgcProjectId
+ = lens _pljdgcProjectId
+ (\ s a -> s{_pljdgcProjectId = a})
+
+-- | JSONP
+pljdgcCallback :: Lens' ProjectsLocationsJobsDebugGetConfig (Maybe Text)
+pljdgcCallback
+ = lens _pljdgcCallback
+ (\ s a -> s{_pljdgcCallback = a})
+
+instance GoogleRequest
+ ProjectsLocationsJobsDebugGetConfig where
+ type Rs ProjectsLocationsJobsDebugGetConfig =
+ GetDebugConfigResponse
+ type Scopes ProjectsLocationsJobsDebugGetConfig =
+ '["https://www.googleapis.com/auth/cloud-platform",
+ "https://www.googleapis.com/auth/compute",
+ "https://www.googleapis.com/auth/compute.readonly",
+ "https://www.googleapis.com/auth/userinfo.email"]
+ requestClient
+ ProjectsLocationsJobsDebugGetConfig'{..}
+ = go _pljdgcProjectId _pljdgcLocation _pljdgcJobId
+ _pljdgcXgafv
+ _pljdgcUploadProtocol
+ _pljdgcAccessToken
+ _pljdgcUploadType
+ _pljdgcCallback
+ (Just AltJSON)
+ _pljdgcPayload
+ dataflowService
+ where go
+ = buildClient
+ (Proxy ::
+ Proxy ProjectsLocationsJobsDebugGetConfigResource)
+ mempty