summaryrefslogtreecommitdiff
path: root/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/SendCapture.hs
diff options
context:
space:
mode:
Diffstat (limited to 'gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/SendCapture.hs')
-rw-r--r--gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/SendCapture.hs202
1 files changed, 202 insertions, 0 deletions
diff --git a/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/SendCapture.hs b/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/SendCapture.hs
new file mode 100644
index 0000000..87cace3
--- /dev/null
+++ b/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/SendCapture.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.SendCapture
+-- 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)
+--
+-- Send encoded debug capture data for component.
+--
+-- /See:/ <https://cloud.google.com/dataflow Dataflow API Reference> for @dataflow.projects.locations.jobs.debug.sendCapture@.
+module Network.Google.Resource.Dataflow.Projects.Locations.Jobs.Debug.SendCapture
+ (
+ -- * REST Resource
+ ProjectsLocationsJobsDebugSendCaptureResource
+
+ -- * Creating a Request
+ , projectsLocationsJobsDebugSendCapture
+ , ProjectsLocationsJobsDebugSendCapture
+
+ -- * Request Lenses
+ , pljdscXgafv
+ , pljdscJobId
+ , pljdscUploadProtocol
+ , pljdscLocation
+ , pljdscAccessToken
+ , pljdscUploadType
+ , pljdscPayload
+ , pljdscProjectId
+ , pljdscCallback
+ ) where
+
+import Network.Google.Dataflow.Types
+import Network.Google.Prelude
+
+-- | A resource alias for @dataflow.projects.locations.jobs.debug.sendCapture@ method which the
+-- 'ProjectsLocationsJobsDebugSendCapture' request conforms to.
+type ProjectsLocationsJobsDebugSendCaptureResource =
+ "v1b3" :>
+ "projects" :>
+ Capture "projectId" Text :>
+ "locations" :>
+ Capture "location" Text :>
+ "jobs" :>
+ Capture "jobId" Text :>
+ "debug" :>
+ "sendCapture" :>
+ QueryParam "$.xgafv" Xgafv :>
+ QueryParam "upload_protocol" Text :>
+ QueryParam "access_token" Text :>
+ QueryParam "uploadType" Text :>
+ QueryParam "callback" Text :>
+ QueryParam "alt" AltJSON :>
+ ReqBody '[JSON] SendDebugCaptureRequest :>
+ Post '[JSON] SendDebugCaptureResponse
+
+-- | Send encoded debug capture data for component.
+--
+-- /See:/ 'projectsLocationsJobsDebugSendCapture' smart constructor.
+data ProjectsLocationsJobsDebugSendCapture = ProjectsLocationsJobsDebugSendCapture'
+ { _pljdscXgafv :: !(Maybe Xgafv)
+ , _pljdscJobId :: !Text
+ , _pljdscUploadProtocol :: !(Maybe Text)
+ , _pljdscLocation :: !Text
+ , _pljdscAccessToken :: !(Maybe Text)
+ , _pljdscUploadType :: !(Maybe Text)
+ , _pljdscPayload :: !SendDebugCaptureRequest
+ , _pljdscProjectId :: !Text
+ , _pljdscCallback :: !(Maybe Text)
+ } deriving (Eq,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'ProjectsLocationsJobsDebugSendCapture' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'pljdscXgafv'
+--
+-- * 'pljdscJobId'
+--
+-- * 'pljdscUploadProtocol'
+--
+-- * 'pljdscLocation'
+--
+-- * 'pljdscAccessToken'
+--
+-- * 'pljdscUploadType'
+--
+-- * 'pljdscPayload'
+--
+-- * 'pljdscProjectId'
+--
+-- * 'pljdscCallback'
+projectsLocationsJobsDebugSendCapture
+ :: Text -- ^ 'pljdscJobId'
+ -> Text -- ^ 'pljdscLocation'
+ -> SendDebugCaptureRequest -- ^ 'pljdscPayload'
+ -> Text -- ^ 'pljdscProjectId'
+ -> ProjectsLocationsJobsDebugSendCapture
+projectsLocationsJobsDebugSendCapture pPljdscJobId_ pPljdscLocation_ pPljdscPayload_ pPljdscProjectId_ =
+ ProjectsLocationsJobsDebugSendCapture'
+ { _pljdscXgafv = Nothing
+ , _pljdscJobId = pPljdscJobId_
+ , _pljdscUploadProtocol = Nothing
+ , _pljdscLocation = pPljdscLocation_
+ , _pljdscAccessToken = Nothing
+ , _pljdscUploadType = Nothing
+ , _pljdscPayload = pPljdscPayload_
+ , _pljdscProjectId = pPljdscProjectId_
+ , _pljdscCallback = Nothing
+ }
+
+-- | V1 error format.
+pljdscXgafv :: Lens' ProjectsLocationsJobsDebugSendCapture (Maybe Xgafv)
+pljdscXgafv
+ = lens _pljdscXgafv (\ s a -> s{_pljdscXgafv = a})
+
+-- | The job id.
+pljdscJobId :: Lens' ProjectsLocationsJobsDebugSendCapture Text
+pljdscJobId
+ = lens _pljdscJobId (\ s a -> s{_pljdscJobId = a})
+
+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").
+pljdscUploadProtocol :: Lens' ProjectsLocationsJobsDebugSendCapture (Maybe Text)
+pljdscUploadProtocol
+ = lens _pljdscUploadProtocol
+ (\ s a -> s{_pljdscUploadProtocol = a})
+
+-- | The location which contains the job specified by job_id.
+pljdscLocation :: Lens' ProjectsLocationsJobsDebugSendCapture Text
+pljdscLocation
+ = lens _pljdscLocation
+ (\ s a -> s{_pljdscLocation = a})
+
+-- | OAuth access token.
+pljdscAccessToken :: Lens' ProjectsLocationsJobsDebugSendCapture (Maybe Text)
+pljdscAccessToken
+ = lens _pljdscAccessToken
+ (\ s a -> s{_pljdscAccessToken = a})
+
+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").
+pljdscUploadType :: Lens' ProjectsLocationsJobsDebugSendCapture (Maybe Text)
+pljdscUploadType
+ = lens _pljdscUploadType
+ (\ s a -> s{_pljdscUploadType = a})
+
+-- | Multipart request metadata.
+pljdscPayload :: Lens' ProjectsLocationsJobsDebugSendCapture SendDebugCaptureRequest
+pljdscPayload
+ = lens _pljdscPayload
+ (\ s a -> s{_pljdscPayload = a})
+
+-- | The project id.
+pljdscProjectId :: Lens' ProjectsLocationsJobsDebugSendCapture Text
+pljdscProjectId
+ = lens _pljdscProjectId
+ (\ s a -> s{_pljdscProjectId = a})
+
+-- | JSONP
+pljdscCallback :: Lens' ProjectsLocationsJobsDebugSendCapture (Maybe Text)
+pljdscCallback
+ = lens _pljdscCallback
+ (\ s a -> s{_pljdscCallback = a})
+
+instance GoogleRequest
+ ProjectsLocationsJobsDebugSendCapture where
+ type Rs ProjectsLocationsJobsDebugSendCapture =
+ SendDebugCaptureResponse
+ type Scopes ProjectsLocationsJobsDebugSendCapture =
+ '["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
+ ProjectsLocationsJobsDebugSendCapture'{..}
+ = go _pljdscProjectId _pljdscLocation _pljdscJobId
+ _pljdscXgafv
+ _pljdscUploadProtocol
+ _pljdscAccessToken
+ _pljdscUploadType
+ _pljdscCallback
+ (Just AltJSON)
+ _pljdscPayload
+ dataflowService
+ where go
+ = buildClient
+ (Proxy ::
+ Proxy ProjectsLocationsJobsDebugSendCaptureResource)
+ mempty