{-# 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.CloudErrorReporting.Projects.GroupStats.List
(
ProjectsGroupStatsListResource
, projectsGroupStatsList
, ProjectsGroupStatsList
, pgslXgafv
, pgslUploadProtocol
, pgslAccessToken
, pgslUploadType
, pgslTimedCountDuration
, pgslAlignment
, pgslProjectName
, pgslGroupId
, pgslAlignmentTime
, pgslPageToken
, pgslPageSize
, pgslServiceFilterService
, pgslOrder
, pgslServiceFilterResourceType
, pgslCallback
, pgslServiceFilterVersion
, pgslTimeRangePeriod
) where
import Network.Google.CloudErrorReporting.Types
import Network.Google.Prelude
type ProjectsGroupStatsListResource =
"v1beta1" :>
Capture "projectName" Text :>
"groupStats" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "timedCountDuration" GDuration :>
QueryParam "alignment" Text :>
QueryParams "groupId" Text :>
QueryParam "alignmentTime" DateTime' :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "serviceFilter.service" Text :>
QueryParam "order" Text :>
QueryParam "serviceFilter.resourceType" Text
:>
QueryParam "callback" Text :>
QueryParam "serviceFilter.version" Text
:>
QueryParam "timeRange.period" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListGroupStatsResponse
data ProjectsGroupStatsList = ProjectsGroupStatsList'
{ _pgslXgafv :: !(Maybe Xgafv)
, _pgslUploadProtocol :: !(Maybe Text)
, _pgslAccessToken :: !(Maybe Text)
, _pgslUploadType :: !(Maybe Text)
, _pgslTimedCountDuration :: !(Maybe GDuration)
, _pgslAlignment :: !(Maybe Text)
, _pgslProjectName :: !Text
, _pgslGroupId :: !(Maybe [Text])
, _pgslAlignmentTime :: !(Maybe DateTime')
, _pgslPageToken :: !(Maybe Text)
, _pgslPageSize :: !(Maybe (Textual Int32))
, _pgslServiceFilterService :: !(Maybe Text)
, _pgslOrder :: !(Maybe Text)
, _pgslServiceFilterResourceType :: !(Maybe Text)
, _pgslCallback :: !(Maybe Text)
, _pgslServiceFilterVersion :: !(Maybe Text)
, _pgslTimeRangePeriod :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsGroupStatsList
:: Text
-> ProjectsGroupStatsList
projectsGroupStatsList pPgslProjectName_ =
ProjectsGroupStatsList'
{ _pgslXgafv = Nothing
, _pgslUploadProtocol = Nothing
, _pgslAccessToken = Nothing
, _pgslUploadType = Nothing
, _pgslTimedCountDuration = Nothing
, _pgslAlignment = Nothing
, _pgslProjectName = pPgslProjectName_
, _pgslGroupId = Nothing
, _pgslAlignmentTime = Nothing
, _pgslPageToken = Nothing
, _pgslPageSize = Nothing
, _pgslServiceFilterService = Nothing
, _pgslOrder = Nothing
, _pgslServiceFilterResourceType = Nothing
, _pgslCallback = Nothing
, _pgslServiceFilterVersion = Nothing
, _pgslTimeRangePeriod = Nothing
}
pgslXgafv :: Lens' ProjectsGroupStatsList (Maybe Xgafv)
pgslXgafv
= lens _pgslXgafv (\ s a -> s{_pgslXgafv = a})
pgslUploadProtocol :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslUploadProtocol
= lens _pgslUploadProtocol
(\ s a -> s{_pgslUploadProtocol = a})
pgslAccessToken :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslAccessToken
= lens _pgslAccessToken
(\ s a -> s{_pgslAccessToken = a})
pgslUploadType :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslUploadType
= lens _pgslUploadType
(\ s a -> s{_pgslUploadType = a})
pgslTimedCountDuration :: Lens' ProjectsGroupStatsList (Maybe Scientific)
pgslTimedCountDuration
= lens _pgslTimedCountDuration
(\ s a -> s{_pgslTimedCountDuration = a})
. mapping _GDuration
pgslAlignment :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslAlignment
= lens _pgslAlignment
(\ s a -> s{_pgslAlignment = a})
pgslProjectName :: Lens' ProjectsGroupStatsList Text
pgslProjectName
= lens _pgslProjectName
(\ s a -> s{_pgslProjectName = a})
pgslGroupId :: Lens' ProjectsGroupStatsList [Text]
pgslGroupId
= lens _pgslGroupId (\ s a -> s{_pgslGroupId = a}) .
_Default
. _Coerce
pgslAlignmentTime :: Lens' ProjectsGroupStatsList (Maybe UTCTime)
pgslAlignmentTime
= lens _pgslAlignmentTime
(\ s a -> s{_pgslAlignmentTime = a})
. mapping _DateTime
pgslPageToken :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslPageToken
= lens _pgslPageToken
(\ s a -> s{_pgslPageToken = a})
pgslPageSize :: Lens' ProjectsGroupStatsList (Maybe Int32)
pgslPageSize
= lens _pgslPageSize (\ s a -> s{_pgslPageSize = a})
. mapping _Coerce
pgslServiceFilterService :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslServiceFilterService
= lens _pgslServiceFilterService
(\ s a -> s{_pgslServiceFilterService = a})
pgslOrder :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslOrder
= lens _pgslOrder (\ s a -> s{_pgslOrder = a})
pgslServiceFilterResourceType :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslServiceFilterResourceType
= lens _pgslServiceFilterResourceType
(\ s a -> s{_pgslServiceFilterResourceType = a})
pgslCallback :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslCallback
= lens _pgslCallback (\ s a -> s{_pgslCallback = a})
pgslServiceFilterVersion :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslServiceFilterVersion
= lens _pgslServiceFilterVersion
(\ s a -> s{_pgslServiceFilterVersion = a})
pgslTimeRangePeriod :: Lens' ProjectsGroupStatsList (Maybe Text)
pgslTimeRangePeriod
= lens _pgslTimeRangePeriod
(\ s a -> s{_pgslTimeRangePeriod = a})
instance GoogleRequest ProjectsGroupStatsList where
type Rs ProjectsGroupStatsList =
ListGroupStatsResponse
type Scopes ProjectsGroupStatsList =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient ProjectsGroupStatsList'{..}
= go _pgslProjectName _pgslXgafv _pgslUploadProtocol
_pgslAccessToken
_pgslUploadType
_pgslTimedCountDuration
_pgslAlignment
(_pgslGroupId ^. _Default)
_pgslAlignmentTime
_pgslPageToken
_pgslPageSize
_pgslServiceFilterService
_pgslOrder
_pgslServiceFilterResourceType
_pgslCallback
_pgslServiceFilterVersion
_pgslTimeRangePeriod
(Just AltJSON)
cloudErrorReportingService
where go
= buildClient
(Proxy :: Proxy ProjectsGroupStatsListResource)
mempty