git.iko.soy/gogol

on d74db49 help sign in

from801f00b

swap

to1 ahead, 8 behind

compare

.travis.yml+2−16

@@ -93,8 +93,6 @@ matrix:

9393 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

9494 - env: GHCVER=8.2.2 LIBRARY=gogol-acceleratedmobilepageurl

9595 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

96− - env: GHCVER=8.2.2 LIBRARY=gogol-accessapproval

97− addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

9896 - env: GHCVER=8.2.2 LIBRARY=gogol-accesscontextmanager

9997 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

10098 - env: GHCVER=8.2.2 LIBRARY=gogol-adexchange-buyer

@@ -173,10 +171,6 @@ matrix:

173171 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

174172 - env: GHCVER=8.2.2 LIBRARY=gogol-cloudkms

175173 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

176− - env: GHCVER=8.2.2 LIBRARY=gogol-cloudprivatecatalog

177− addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

178− - env: GHCVER=8.2.2 LIBRARY=gogol-cloudprivatecatalogproducer

179− addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

180174 - env: GHCVER=8.2.2 LIBRARY=gogol-cloudprofiler

181175 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

182176 - env: GHCVER=8.2.2 LIBRARY=gogol-cloudscheduler

@@ -189,8 +183,6 @@ matrix:

189183 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

190184 - env: GHCVER=8.2.2 LIBRARY=gogol-cloudtrace

191185 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

192− - env: GHCVER=8.2.2 LIBRARY=gogol-commentanalyzer

193− addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

194186 - env: GHCVER=8.2.2 LIBRARY=gogol-composer

195187 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

196188 - env: GHCVER=8.2.2 LIBRARY=gogol-consumersurveys

@@ -205,8 +197,6 @@ matrix:

205197 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

206198 - env: GHCVER=8.2.2 LIBRARY=gogol-dataflow

207199 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

208− - env: GHCVER=8.2.2 LIBRARY=gogol-datafusion

209− addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

210200 - env: GHCVER=8.2.2 LIBRARY=gogol-dataproc

211201 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

212202 - env: GHCVER=8.2.2 LIBRARY=gogol-datastore

@@ -235,8 +225,6 @@ matrix:

235225 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

236226 - env: GHCVER=8.2.2 LIBRARY=gogol-driveactivity

237227 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

238− - env: GHCVER=8.2.2 LIBRARY=gogol-factchecktools

239− addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

240228 - env: GHCVER=8.2.2 LIBRARY=gogol-file

241229 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

242230 - env: GHCVER=8.2.2 LIBRARY=gogol-firebase-dynamiclinks

@@ -305,6 +293,8 @@ matrix:

305293 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

306294 - env: GHCVER=8.2.2 LIBRARY=gogol-people

307295 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

296+ - env: GHCVER=8.2.2 LIBRARY=gogol-photoslibrary

297+ addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

308298 - env: GHCVER=8.2.2 LIBRARY=gogol-playcustomapp

309299 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

310300 - env: GHCVER=8.2.2 LIBRARY=gogol-play-moviespartner

@@ -333,8 +323,6 @@ matrix:

333323 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

334324 - env: GHCVER=8.2.2 LIBRARY=gogol-resourcemanager

335325 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

336− - env: GHCVER=8.2.2 LIBRARY=gogol-run

337− addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

338326 - env: GHCVER=8.2.2 LIBRARY=gogol-runtimeconfig

339327 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

340328 - env: GHCVER=8.2.2 LIBRARY=gogol-safebrowsing

@@ -343,8 +331,6 @@ matrix:

343331 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

344332 - env: GHCVER=8.2.2 LIBRARY=gogol-searchconsole

345333 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

346− - env: GHCVER=8.2.2 LIBRARY=gogol-securitycenter

347− addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

348334 - env: GHCVER=8.2.2 LIBRARY=gogol-servicebroker

349335 addons: { apt: { packages: [ghc-8.2.2], sources: [hvr-ghc] } }

350336 - env: GHCVER=8.2.2 LIBRARY=gogol-serviceconsumermanagement

core/gogol-core.cabal+1−1

@@ -61,7 +61,7 @@ library

6161 , lens >= 4.4

6262 , resourcet >= 1.1

6363 , scientific >= 0.3

64− , servant >= 0.14.1

64+ , servant >= 0.4.4

6565 , text >= 1.1

6666 , unordered-containers >= 0.2.5

6767

core/src/Network/Google/Prelude.hs+1−1

@@ -28,7 +28,7 @@ import Network.HTTP.Client as Export (RequestBody)

2828import Numeric.Natural as Export (Natural)

2929import Prelude as Export hiding (product, span, any, Word)

3030import Servant.API as Export hiding (Headers, Link, getResponse, Stream, ResponseHeader, Header, header)

31−import Servant.Links as Export hiding (Link)

31+import Servant.Utils.Links as Export hiding (Link)

3232import Web.HttpApiData as Export (FromHttpApiData (..), ToHttpApiData (..))

3333

3434import Network.Google.Data.Bytes as Export

gen/stack.yaml+1−1

@@ -1,4 +1,4 @@

1−resolver: lts-13.19

1+resolver: lts-13.7

22

33nix:

44 enable: false

gen/stack.yaml.lockdeleted−49

@@ -1,49 +0,0 @@

1−# This file was autogenerated by Stack.

2−# You should not edit this file by hand.

3−# For more information, please see the documentation at:

4−# https://docs.haskellstack.org/en/stable/lock_files

5−

6−packages:

7−- completed:

8− hackage: text-regex-replace-0.1.1.3@sha256:e7f612df671c93ced54a3d26528db37852069884e5cb67d5afbb49d3defb5eb9,1627

9− pantry-tree:

10− size: 360

11− sha256: 0edba698df19381c1fadb494dfd5278b35b6670bf29cab1a228f2fde9bb9ba89

12− original:

13− hackage: text-regex-replace-0.1.1.3

14−- completed:

15− hackage: ede-0.2.9@sha256:062198b65a661f015bff53c15d53d0b63eac547d44b09d96b7fb8d27752dfc79,3561

16− pantry-tree:

17− size: 5392

18− sha256: ee8d76f8f1ca483f29233498833c7159774efc3c0cb14027703cefac79c41315

19− original:

20− hackage: ede-0.2.9

21−- completed:

22− hackage: unexceptionalio-0.3.0@sha256:cd2d74906d336c0a0b827c935d31c39a8504c4414ffc4ab30ccbe22d0ba0cf69,1126

23− pantry-tree:

24− size: 217

25− sha256: 810f5bb08802115d17848c2a8233f95b16f51922edf6850aa663fc1c4067f38a

26− original:

27− hackage: unexceptionalio-0.3.0

28−- completed:

29− size: 51114

30− url: https://github.com/chrisdone/hindent/archive/ad0c2a9f8755d37f09b356ab7e45a4e49bcda0b3.tar.gz

31− cabal-file:

32− size: 3452

33− sha256: f3243ef357ed5464c6a5b6f38cbb73a30ec170d1ed0c7beb16c05f5f0ad61833

34− name: hindent

35− version: 5.2.7

36− sha256: 19954fc7dff3d008d9c7688d1c571999c1869f86e5c115aef8b28c2ae622972f

37− pantry-tree:

38− size: 1808

39− sha256: 25b9067b3429d448130aa1963527a8442a3f78f9198dc2a0c9b77616d2ede801

40− original:

41− size: 51114

42− url: https://github.com/chrisdone/hindent/archive/ad0c2a9f8755d37f09b356ab7e45a4e49bcda0b3.tar.gz

43− sha256: 19954fc7dff3d008d9c7688d1c571999c1869f86e5c115aef8b28c2ae622972f

44−snapshots:

45−- completed:

46− size: 498155

47− url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/13/19.yaml

48− sha256: b9367a80d4393d02e58a46b8a9fdfbd7bc19f59c0c2bbf90034ba15cf52cf213

49− original: lts-13.19

gogol-accessapproval/README.mddeleted−28

@@ -1,28 +0,0 @@

1−# gogol-accessapproval

2−

3−* [Version](#version)

4−* [Description](#description)

5−* [Contribute](#contribute)

6−* [Licence](#licence)

7−

8−

9−## Version

10−

11−`0.5.0`

12−

13−

14−## Description

15−

16−A client library for the Google Access Approval.

17−

18−

19−## Contribute

20−

21−For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/gogol/issues).

22−

23−> _Note:_ this library is an auto-generated Haskell package. Please see `gogol-gen` for more information.

24−

25−

26−## Licence

27−

28−`gogol-accessapproval` is released under the [Mozilla Public License Version 2.0](http://www.mozilla.org/MPL/).

gogol-accessapproval/gen/Network/Google/AccessApproval.hsdeleted−196

@@ -1,196 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE NoImplicitPrelude #-}

3−{-# LANGUAGE TypeOperators #-}

4−

5−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

7−

8−-- |

9−-- Module : Network.Google.AccessApproval

10−-- Copyright : (c) 2015-2016 Brendan Hay

11−-- License : Mozilla Public License, v. 2.0.

12−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

13−-- Stability : auto-generated

14−-- Portability : non-portable (GHC extensions)

15−--

16−-- An API for controlling access to data by Google personnel.

17−--

18−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference>

19−module Network.Google.AccessApproval

20− (

21− -- * Service Configuration

22− accessApprovalService

23−

24− -- * OAuth Scopes

25− , cloudPlatformScope

26−

27− -- * API Declaration

28− , AccessApprovalAPI

29−

30− -- * Resources

31−

32− -- ** accessapproval.folders.approvalRequests.approve

33− , module Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Approve

34−

35− -- ** accessapproval.folders.approvalRequests.dismiss

36− , module Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Dismiss

37−

38− -- ** accessapproval.folders.approvalRequests.get

39− , module Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Get

40−

41− -- ** accessapproval.folders.approvalRequests.list

42− , module Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.List

43−

44− -- ** accessapproval.folders.getAccessApprovalSettings

45− , module Network.Google.Resource.AccessApproval.Folders.GetAccessApprovalSettings

46−

47− -- ** accessapproval.folders.updateAccessApprovalSettings

48− , module Network.Google.Resource.AccessApproval.Folders.UpdateAccessApprovalSettings

49−

50− -- ** accessapproval.organizations.approvalRequests.approve

51− , module Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Approve

52−

53− -- ** accessapproval.organizations.approvalRequests.dismiss

54− , module Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Dismiss

55−

56− -- ** accessapproval.organizations.approvalRequests.get

57− , module Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Get

58−

59− -- ** accessapproval.organizations.approvalRequests.list

60− , module Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.List

61−

62− -- ** accessapproval.organizations.getAccessApprovalSettings

63− , module Network.Google.Resource.AccessApproval.Organizations.GetAccessApprovalSettings

64−

65− -- ** accessapproval.organizations.updateAccessApprovalSettings

66− , module Network.Google.Resource.AccessApproval.Organizations.UpdateAccessApprovalSettings

67−

68− -- ** accessapproval.projects.approvalRequests.approve

69− , module Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Approve

70−

71− -- ** accessapproval.projects.approvalRequests.dismiss

72− , module Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Dismiss

73−

74− -- ** accessapproval.projects.approvalRequests.get

75− , module Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Get

76−

77− -- ** accessapproval.projects.approvalRequests.list

78− , module Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.List

79−

80− -- ** accessapproval.projects.getAccessApprovalSettings

81− , module Network.Google.Resource.AccessApproval.Projects.GetAccessApprovalSettings

82−

83− -- ** accessapproval.projects.updateAccessApprovalSettings

84− , module Network.Google.Resource.AccessApproval.Projects.UpdateAccessApprovalSettings

85−

86− -- * Types

87−

88− -- ** ListApprovalRequestsResponse

89− , ListApprovalRequestsResponse

90− , listApprovalRequestsResponse

91− , larrNextPageToken

92− , larrApprovalRequests

93−

94− -- ** ApproveDecision

95− , ApproveDecision

96− , approveDecision

97− , adApproveTime

98− , adExpireTime

99−

100− -- ** AccessLocations

101− , AccessLocations

102− , accessLocations

103− , alPrincipalOfficeCountry

104− , alPrincipalPhysicalLocationCountry

105−

106− -- ** DismissDecision

107− , DismissDecision

108− , dismissDecision

109− , ddDismissTime

110−

111− -- ** AccessReasonType

112− , AccessReasonType (..)

113−

114− -- ** AccessApprovalSettings

115− , AccessApprovalSettings

116− , accessApprovalSettings

117− , aasName

118− , aasNotificationEmails

119−

120− -- ** ApprovalRequest

121− , ApprovalRequest

122− , approvalRequest

123− , arRequestedResourceName

124− , arRequestedExpiration

125− , arRequestTime

126− , arRequestedReason

127− , arName

128− , arApprove

129− , arDismiss

130− , arRequestedLocations

131−

132− -- ** DismissApprovalRequestMessage

133− , DismissApprovalRequestMessage

134− , dismissApprovalRequestMessage

135−

136− -- ** Xgafv

137− , Xgafv (..)

138−

139− -- ** ApproveApprovalRequestMessage

140− , ApproveApprovalRequestMessage

141− , approveApprovalRequestMessage

142− , aarmExpireTime

143−

144− -- ** AccessReason

145− , AccessReason

146− , accessReason

147− , arType

148− , arDetail

149− ) where

150−

151−import Network.Google.AccessApproval.Types

152−import Network.Google.Prelude

153−import Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Approve

154−import Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Dismiss

155−import Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Get

156−import Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.List

157−import Network.Google.Resource.AccessApproval.Folders.GetAccessApprovalSettings

158−import Network.Google.Resource.AccessApproval.Folders.UpdateAccessApprovalSettings

159−import Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Approve

160−import Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Dismiss

161−import Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Get

162−import Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.List

163−import Network.Google.Resource.AccessApproval.Organizations.GetAccessApprovalSettings

164−import Network.Google.Resource.AccessApproval.Organizations.UpdateAccessApprovalSettings

165−import Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Approve

166−import Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Dismiss

167−import Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Get

168−import Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.List

169−import Network.Google.Resource.AccessApproval.Projects.GetAccessApprovalSettings

170−import Network.Google.Resource.AccessApproval.Projects.UpdateAccessApprovalSettings

171−

172−{- $resources

173−TODO

174−-}

175−

176−-- | Represents the entirety of the methods and resources available for the Access Approval API service.

177−type AccessApprovalAPI =

178− FoldersApprovalRequestsListResource :<|>

179− FoldersApprovalRequestsGetResource

180− :<|> FoldersApprovalRequestsApproveResource

181− :<|> FoldersApprovalRequestsDismissResource

182− :<|> FoldersUpdateAccessApprovalSettingsResource

183− :<|> FoldersGetAccessApprovalSettingsResource

184− :<|> OrganizationsApprovalRequestsListResource

185− :<|> OrganizationsApprovalRequestsGetResource

186− :<|> OrganizationsApprovalRequestsApproveResource

187− :<|> OrganizationsApprovalRequestsDismissResource

188− :<|>

189− OrganizationsUpdateAccessApprovalSettingsResource

190− :<|> OrganizationsGetAccessApprovalSettingsResource

191− :<|> ProjectsApprovalRequestsListResource

192− :<|> ProjectsApprovalRequestsGetResource

193− :<|> ProjectsApprovalRequestsApproveResource

194− :<|> ProjectsApprovalRequestsDismissResource

195− :<|> ProjectsUpdateAccessApprovalSettingsResource

196− :<|> ProjectsGetAccessApprovalSettingsResource

gogol-accessapproval/gen/Network/Google/AccessApproval/Types.hsdeleted−100

@@ -1,100 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE NoImplicitPrelude #-}

5−{-# LANGUAGE OverloadedStrings #-}

6−

7−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

8−

9−-- |

10−-- Module : Network.Google.AccessApproval.Types

11−-- Copyright : (c) 2015-2016 Brendan Hay

12−-- License : Mozilla Public License, v. 2.0.

13−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

14−-- Stability : auto-generated

15−-- Portability : non-portable (GHC extensions)

16−--

17−module Network.Google.AccessApproval.Types

18− (

19− -- * Service Configuration

20− accessApprovalService

21−

22− -- * OAuth Scopes

23− , cloudPlatformScope

24−

25− -- * ListApprovalRequestsResponse

26− , ListApprovalRequestsResponse

27− , listApprovalRequestsResponse

28− , larrNextPageToken

29− , larrApprovalRequests

30−

31− -- * ApproveDecision

32− , ApproveDecision

33− , approveDecision

34− , adApproveTime

35− , adExpireTime

36−

37− -- * AccessLocations

38− , AccessLocations

39− , accessLocations

40− , alPrincipalOfficeCountry

41− , alPrincipalPhysicalLocationCountry

42−

43− -- * DismissDecision

44− , DismissDecision

45− , dismissDecision

46− , ddDismissTime

47−

48− -- * AccessReasonType

49− , AccessReasonType (..)

50−

51− -- * AccessApprovalSettings

52− , AccessApprovalSettings

53− , accessApprovalSettings

54− , aasName

55− , aasNotificationEmails

56−

57− -- * ApprovalRequest

58− , ApprovalRequest

59− , approvalRequest

60− , arRequestedResourceName

61− , arRequestedExpiration

62− , arRequestTime

63− , arRequestedReason

64− , arName

65− , arApprove

66− , arDismiss

67− , arRequestedLocations

68−

69− -- * DismissApprovalRequestMessage

70− , DismissApprovalRequestMessage

71− , dismissApprovalRequestMessage

72−

73− -- * Xgafv

74− , Xgafv (..)

75−

76− -- * ApproveApprovalRequestMessage

77− , ApproveApprovalRequestMessage

78− , approveApprovalRequestMessage

79− , aarmExpireTime

80−

81− -- * AccessReason

82− , AccessReason

83− , accessReason

84− , arType

85− , arDetail

86− ) where

87−

88−import Network.Google.AccessApproval.Types.Product

89−import Network.Google.AccessApproval.Types.Sum

90−import Network.Google.Prelude

91−

92−-- | Default request referring to version 'v1beta1' of the Access Approval API. This contains the host and root path used as a starting point for constructing service requests.

93−accessApprovalService :: ServiceConfig

94−accessApprovalService

95− = defaultService (ServiceId "accessapproval:v1beta1")

96− "accessapproval.googleapis.com"

97−

98−-- | View and manage your data across Google Cloud Platform services

99−cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]

100−cloudPlatformScope = Proxy

gogol-accessapproval/gen/Network/Google/AccessApproval/Types/Product.hsdeleted−546

@@ -1,546 +0,0 @@

1−{-# LANGUAGE DeriveDataTypeable #-}

2−{-# LANGUAGE DeriveGeneric #-}

3−{-# LANGUAGE NoImplicitPrelude #-}

4−{-# LANGUAGE OverloadedStrings #-}

5−{-# LANGUAGE RecordWildCards #-}

6−

7−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

8−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

9−

10−-- |

11−-- Module : Network.Google.AccessApproval.Types.Product

12−-- Copyright : (c) 2015-2016 Brendan Hay

13−-- License : Mozilla Public License, v. 2.0.

14−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

15−-- Stability : auto-generated

16−-- Portability : non-portable (GHC extensions)

17−--

18−module Network.Google.AccessApproval.Types.Product where

19−

20−import Network.Google.AccessApproval.Types.Sum

21−import Network.Google.Prelude

22−

23−-- | Response to listing of ApprovalRequest objects.

24−--

25−-- /See:/ 'listApprovalRequestsResponse' smart constructor.

26−data ListApprovalRequestsResponse =

27− ListApprovalRequestsResponse'

28− { _larrNextPageToken :: !(Maybe Text)

29− , _larrApprovalRequests :: !(Maybe [ApprovalRequest])

30− }

31− deriving (Eq, Show, Data, Typeable, Generic)

32−

33−

34−-- | Creates a value of 'ListApprovalRequestsResponse' with the minimum fields required to make a request.

35−--

36−-- Use one of the following lenses to modify other fields as desired:

37−--

38−-- * 'larrNextPageToken'

39−--

40−-- * 'larrApprovalRequests'

41−listApprovalRequestsResponse

42− :: ListApprovalRequestsResponse

43−listApprovalRequestsResponse =

44− ListApprovalRequestsResponse'

45− {_larrNextPageToken = Nothing, _larrApprovalRequests = Nothing}

46−

47−

48−-- | Token to retrieve the next page of results, or empty if there are no

49−-- more.

50−larrNextPageToken :: Lens' ListApprovalRequestsResponse (Maybe Text)

51−larrNextPageToken

52− = lens _larrNextPageToken

53− (\ s a -> s{_larrNextPageToken = a})

54−

55−-- | Approval request details.

56−larrApprovalRequests :: Lens' ListApprovalRequestsResponse [ApprovalRequest]

57−larrApprovalRequests

58− = lens _larrApprovalRequests

59− (\ s a -> s{_larrApprovalRequests = a})

60− . _Default

61− . _Coerce

62−

63−instance FromJSON ListApprovalRequestsResponse where

64− parseJSON

65− = withObject "ListApprovalRequestsResponse"

66− (\ o ->

67− ListApprovalRequestsResponse' <$>

68− (o .:? "nextPageToken") <*>

69− (o .:? "approvalRequests" .!= mempty))

70−

71−instance ToJSON ListApprovalRequestsResponse where

72− toJSON ListApprovalRequestsResponse'{..}

73− = object

74− (catMaybes

75− [("nextPageToken" .=) <$> _larrNextPageToken,

76− ("approvalRequests" .=) <$> _larrApprovalRequests])

77−

78−-- | A decision that has been made to approve access to a resource.

79−--

80−-- /See:/ 'approveDecision' smart constructor.

81−data ApproveDecision =

82− ApproveDecision'

83− { _adApproveTime :: !(Maybe DateTime')

84− , _adExpireTime :: !(Maybe DateTime')

85− }

86− deriving (Eq, Show, Data, Typeable, Generic)

87−

88−

89−-- | Creates a value of 'ApproveDecision' with the minimum fields required to make a request.

90−--

91−-- Use one of the following lenses to modify other fields as desired:

92−--

93−-- * 'adApproveTime'

94−--

95−-- * 'adExpireTime'

96−approveDecision

97− :: ApproveDecision

98−approveDecision =

99− ApproveDecision' {_adApproveTime = Nothing, _adExpireTime = Nothing}

100−

101−

102−-- | The time at which approval was granted.

103−adApproveTime :: Lens' ApproveDecision (Maybe UTCTime)

104−adApproveTime

105− = lens _adApproveTime

106− (\ s a -> s{_adApproveTime = a})

107− . mapping _DateTime

108−

109−-- | The time at which the approval expires.

110−adExpireTime :: Lens' ApproveDecision (Maybe UTCTime)

111−adExpireTime

112− = lens _adExpireTime (\ s a -> s{_adExpireTime = a})

113− . mapping _DateTime

114−

115−instance FromJSON ApproveDecision where

116− parseJSON

117− = withObject "ApproveDecision"

118− (\ o ->

119− ApproveDecision' <$>

120− (o .:? "approveTime") <*> (o .:? "expireTime"))

121−

122−instance ToJSON ApproveDecision where

123− toJSON ApproveDecision'{..}

124− = object

125− (catMaybes

126− [("approveTime" .=) <$> _adApproveTime,

127− ("expireTime" .=) <$> _adExpireTime])

128−

129−-- | Home office and physical location of the principal.

130−--

131−-- /See:/ 'accessLocations' smart constructor.

132−data AccessLocations =

133− AccessLocations'

134− { _alPrincipalOfficeCountry :: !(Maybe Text)

135− , _alPrincipalPhysicalLocationCountry :: !(Maybe Text)

136− }

137− deriving (Eq, Show, Data, Typeable, Generic)

138−

139−

140−-- | Creates a value of 'AccessLocations' with the minimum fields required to make a request.

141−--

142−-- Use one of the following lenses to modify other fields as desired:

143−--

144−-- * 'alPrincipalOfficeCountry'

145−--

146−-- * 'alPrincipalPhysicalLocationCountry'

147−accessLocations

148− :: AccessLocations

149−accessLocations =

150− AccessLocations'

151− { _alPrincipalOfficeCountry = Nothing

152− , _alPrincipalPhysicalLocationCountry = Nothing

153− }

154−

155−

156−-- | The \"home office\" location of the principal. A two-letter country code

157−-- (ISO 3166-1 alpha-2), such as \"US\", \"DE\" or \"GB\" or a region code.

158−-- In some limited situations Google systems may refer refer to a region

159−-- code instead of a country code. Possible Region Codes:

160−--

161−-- 1. ASI: Asia

162−-- 2. EUR: Europe

163−-- 3. OCE: Oceania

164−-- 4. AFR: Africa

165−-- 5. NAM: North America

166−-- 6. SAM: South America

167−-- 7. ANT: Antarctica

168−-- 8. ANY: Any location

169−alPrincipalOfficeCountry :: Lens' AccessLocations (Maybe Text)

170−alPrincipalOfficeCountry

171− = lens _alPrincipalOfficeCountry

172− (\ s a -> s{_alPrincipalOfficeCountry = a})

173−

174−-- | Physical location of the principal at the time of the access. A

175−-- two-letter country code (ISO 3166-1 alpha-2), such as \"US\", \"DE\" or

176−-- \"GB\" or a region code. In some limited situations Google systems may

177−-- refer refer to a region code instead of a country code. Possible Region

178−-- Codes:

179−--

180−-- 1. ASI: Asia

181−-- 2. EUR: Europe

182−-- 3. OCE: Oceania

183−-- 4. AFR: Africa

184−-- 5. NAM: North America

185−-- 6. SAM: South America

186−-- 7. ANT: Antarctica

187−-- 8. ANY: Any location

188−alPrincipalPhysicalLocationCountry :: Lens' AccessLocations (Maybe Text)

189−alPrincipalPhysicalLocationCountry

190− = lens _alPrincipalPhysicalLocationCountry

191− (\ s a -> s{_alPrincipalPhysicalLocationCountry = a})

192−

193−instance FromJSON AccessLocations where

194− parseJSON

195− = withObject "AccessLocations"

196− (\ o ->

197− AccessLocations' <$>

198− (o .:? "principalOfficeCountry") <*>

199− (o .:? "principalPhysicalLocationCountry"))

200−

201−instance ToJSON AccessLocations where

202− toJSON AccessLocations'{..}

203− = object

204− (catMaybes

205− [("principalOfficeCountry" .=) <$>

206− _alPrincipalOfficeCountry,

207− ("principalPhysicalLocationCountry" .=) <$>

208− _alPrincipalPhysicalLocationCountry])

209−

210−-- | A decision that has been made to dismiss an approval request.

211−--

212−-- /See:/ 'dismissDecision' smart constructor.

213−newtype DismissDecision =

214− DismissDecision'

215− { _ddDismissTime :: Maybe DateTime'

216− }

217− deriving (Eq, Show, Data, Typeable, Generic)

218−

219−

220−-- | Creates a value of 'DismissDecision' with the minimum fields required to make a request.

221−--

222−-- Use one of the following lenses to modify other fields as desired:

223−--

224−-- * 'ddDismissTime'

225−dismissDecision

226− :: DismissDecision

227−dismissDecision = DismissDecision' {_ddDismissTime = Nothing}

228−

229−

230−-- | The time at which the approval request was dismissed.

231−ddDismissTime :: Lens' DismissDecision (Maybe UTCTime)

232−ddDismissTime

233− = lens _ddDismissTime

234− (\ s a -> s{_ddDismissTime = a})

235− . mapping _DateTime

236−

237−instance FromJSON DismissDecision where

238− parseJSON

239− = withObject "DismissDecision"

240− (\ o -> DismissDecision' <$> (o .:? "dismissTime"))

241−

242−instance ToJSON DismissDecision where

243− toJSON DismissDecision'{..}

244− = object

245− (catMaybes [("dismissTime" .=) <$> _ddDismissTime])

246−

247−-- | Settings on a Project\/Folder\/Organization related to Access Approval.

248−--

249−-- /See:/ 'accessApprovalSettings' smart constructor.

250−data AccessApprovalSettings =

251− AccessApprovalSettings'

252− { _aasName :: !(Maybe Text)

253− , _aasNotificationEmails :: !(Maybe [Text])

254− }

255− deriving (Eq, Show, Data, Typeable, Generic)

256−

257−

258−-- | Creates a value of 'AccessApprovalSettings' with the minimum fields required to make a request.

259−--

260−-- Use one of the following lenses to modify other fields as desired:

261−--

262−-- * 'aasName'

263−--

264−-- * 'aasNotificationEmails'

265−accessApprovalSettings

266− :: AccessApprovalSettings

267−accessApprovalSettings =

268− AccessApprovalSettings' {_aasName = Nothing, _aasNotificationEmails = Nothing}

269−

270−

271−-- | The resource name of the settings. Format is one of:

272−-- \"projects\/{project_id}\/accessApprovalSettings\"

273−-- \"folders\/{folder_id}\/accessApprovalSettings\"

274−-- \"organizations\/{organization_id}\/accessApprovalSettings\"

275−aasName :: Lens' AccessApprovalSettings (Maybe Text)

276−aasName = lens _aasName (\ s a -> s{_aasName = a})

277−

278−-- | A list of email addresses to which notifications relating to approval

279−-- requests should be sent. Notifications relating to a resource will be

280−-- sent to all emails in the settings of ancestor resources of that

281−-- resource.

282−aasNotificationEmails :: Lens' AccessApprovalSettings [Text]

283−aasNotificationEmails

284− = lens _aasNotificationEmails

285− (\ s a -> s{_aasNotificationEmails = a})

286− . _Default

287− . _Coerce

288−

289−instance FromJSON AccessApprovalSettings where

290− parseJSON

291− = withObject "AccessApprovalSettings"

292− (\ o ->

293− AccessApprovalSettings' <$>

294− (o .:? "name") <*>

295− (o .:? "notificationEmails" .!= mempty))

296−

297−instance ToJSON AccessApprovalSettings where

298− toJSON AccessApprovalSettings'{..}

299− = object

300− (catMaybes

301− [("name" .=) <$> _aasName,

302− ("notificationEmails" .=) <$>

303− _aasNotificationEmails])

304−

305−-- | A request for the customer to approve access to a resource.

306−--

307−-- /See:/ 'approvalRequest' smart constructor.

308−data ApprovalRequest =

309− ApprovalRequest'

310− { _arRequestedResourceName :: !(Maybe Text)

311− , _arRequestedExpiration :: !(Maybe DateTime')

312− , _arRequestTime :: !(Maybe DateTime')

313− , _arRequestedReason :: !(Maybe AccessReason)

314− , _arName :: !(Maybe Text)

315− , _arApprove :: !(Maybe ApproveDecision)

316− , _arDismiss :: !(Maybe DismissDecision)

317− , _arRequestedLocations :: !(Maybe AccessLocations)

318− }

319− deriving (Eq, Show, Data, Typeable, Generic)

320−

321−

322−-- | Creates a value of 'ApprovalRequest' with the minimum fields required to make a request.

323−--

324−-- Use one of the following lenses to modify other fields as desired:

325−--

326−-- * 'arRequestedResourceName'

327−--

328−-- * 'arRequestedExpiration'

329−--

330−-- * 'arRequestTime'

331−--

332−-- * 'arRequestedReason'

333−--

334−-- * 'arName'

335−--

336−-- * 'arApprove'

337−--

338−-- * 'arDismiss'

339−--

340−-- * 'arRequestedLocations'

341−approvalRequest

342− :: ApprovalRequest

343−approvalRequest =

344− ApprovalRequest'

345− { _arRequestedResourceName = Nothing

346− , _arRequestedExpiration = Nothing

347− , _arRequestTime = Nothing

348− , _arRequestedReason = Nothing

349− , _arName = Nothing

350− , _arApprove = Nothing

351− , _arDismiss = Nothing

352− , _arRequestedLocations = Nothing

353− }

354−

355−

356−-- | The resource for which approval is being requested. The format of the

357−-- resource name is defined at

358−-- https:\/\/cloud.google.com\/apis\/design\/resource_names. The resource

359−-- name here may either be a \"full\" resource name (e.g.

360−-- \"\/\/library.googleapis.com\/shelves\/shelf1\/books\/book2\") or a

361−-- \"relative\" resource name (e.g. \"shelves\/shelf1\/books\/book2\") as

362−-- described in the resource name specification.

363−arRequestedResourceName :: Lens' ApprovalRequest (Maybe Text)

364−arRequestedResourceName

365− = lens _arRequestedResourceName

366− (\ s a -> s{_arRequestedResourceName = a})

367−

368−-- | The requested expiration for the approval. If the request is approved,

369−-- access will be granted from the time of approval until the expiration

370−-- time.

371−arRequestedExpiration :: Lens' ApprovalRequest (Maybe UTCTime)

372−arRequestedExpiration

373− = lens _arRequestedExpiration

374− (\ s a -> s{_arRequestedExpiration = a})

375− . mapping _DateTime

376−

377−-- | The time at which approval was requested.

378−arRequestTime :: Lens' ApprovalRequest (Maybe UTCTime)

379−arRequestTime

380− = lens _arRequestTime

381− (\ s a -> s{_arRequestTime = a})

382− . mapping _DateTime

383−

384−-- | The justification for which approval is being requested.

385−arRequestedReason :: Lens' ApprovalRequest (Maybe AccessReason)

386−arRequestedReason

387− = lens _arRequestedReason

388− (\ s a -> s{_arRequestedReason = a})

389−

390−-- | The resource name of the request. Format is

391−-- \"{projects|folders|organizations}\/{id}\/approvalRequests\/{approval_request_id}\".

392−arName :: Lens' ApprovalRequest (Maybe Text)

393−arName = lens _arName (\ s a -> s{_arName = a})

394−

395−-- | Access was approved.

396−arApprove :: Lens' ApprovalRequest (Maybe ApproveDecision)

397−arApprove

398− = lens _arApprove (\ s a -> s{_arApprove = a})

399−

400−-- | The request was dismissed.

401−arDismiss :: Lens' ApprovalRequest (Maybe DismissDecision)

402−arDismiss

403− = lens _arDismiss (\ s a -> s{_arDismiss = a})

404−

405−-- | The locations for which approval is being requested.

406−arRequestedLocations :: Lens' ApprovalRequest (Maybe AccessLocations)

407−arRequestedLocations

408− = lens _arRequestedLocations

409− (\ s a -> s{_arRequestedLocations = a})

410−

411−instance FromJSON ApprovalRequest where

412− parseJSON

413− = withObject "ApprovalRequest"

414− (\ o ->

415− ApprovalRequest' <$>

416− (o .:? "requestedResourceName") <*>

417− (o .:? "requestedExpiration")

418− <*> (o .:? "requestTime")

419− <*> (o .:? "requestedReason")

420− <*> (o .:? "name")

421− <*> (o .:? "approve")

422− <*> (o .:? "dismiss")

423− <*> (o .:? "requestedLocations"))

424−

425−instance ToJSON ApprovalRequest where

426− toJSON ApprovalRequest'{..}

427− = object

428− (catMaybes

429− [("requestedResourceName" .=) <$>

430− _arRequestedResourceName,

431− ("requestedExpiration" .=) <$>

432− _arRequestedExpiration,

433− ("requestTime" .=) <$> _arRequestTime,

434− ("requestedReason" .=) <$> _arRequestedReason,

435− ("name" .=) <$> _arName,

436− ("approve" .=) <$> _arApprove,

437− ("dismiss" .=) <$> _arDismiss,

438− ("requestedLocations" .=) <$> _arRequestedLocations])

439−

440−-- | Request to dismiss an approval request.

441−--

442−-- /See:/ 'dismissApprovalRequestMessage' smart constructor.

443−data DismissApprovalRequestMessage =

444− DismissApprovalRequestMessage'

445− deriving (Eq, Show, Data, Typeable, Generic)

446−

447−

448−-- | Creates a value of 'DismissApprovalRequestMessage' with the minimum fields required to make a request.

449−--

450−dismissApprovalRequestMessage

451− :: DismissApprovalRequestMessage

452−dismissApprovalRequestMessage = DismissApprovalRequestMessage'

453−

454−

455−instance FromJSON DismissApprovalRequestMessage where

456− parseJSON

457− = withObject "DismissApprovalRequestMessage"

458− (\ o -> pure DismissApprovalRequestMessage')

459−

460−instance ToJSON DismissApprovalRequestMessage where

461− toJSON = const emptyObject

462−

463−-- | Request to approve an ApprovalRequest.

464−--

465−-- /See:/ 'approveApprovalRequestMessage' smart constructor.

466−newtype ApproveApprovalRequestMessage =

467− ApproveApprovalRequestMessage'

468− { _aarmExpireTime :: Maybe DateTime'

469− }

470− deriving (Eq, Show, Data, Typeable, Generic)

471−

472−

473−-- | Creates a value of 'ApproveApprovalRequestMessage' with the minimum fields required to make a request.

474−--

475−-- Use one of the following lenses to modify other fields as desired:

476−--

477−-- * 'aarmExpireTime'

478−approveApprovalRequestMessage

479− :: ApproveApprovalRequestMessage

480−approveApprovalRequestMessage =

481− ApproveApprovalRequestMessage' {_aarmExpireTime = Nothing}

482−

483−

484−-- | The expiration time of this approval.

485−aarmExpireTime :: Lens' ApproveApprovalRequestMessage (Maybe UTCTime)

486−aarmExpireTime

487− = lens _aarmExpireTime

488− (\ s a -> s{_aarmExpireTime = a})

489− . mapping _DateTime

490−

491−instance FromJSON ApproveApprovalRequestMessage where

492− parseJSON

493− = withObject "ApproveApprovalRequestMessage"

494− (\ o ->

495− ApproveApprovalRequestMessage' <$>

496− (o .:? "expireTime"))

497−

498−instance ToJSON ApproveApprovalRequestMessage where

499− toJSON ApproveApprovalRequestMessage'{..}

500− = object

501− (catMaybes [("expireTime" .=) <$> _aarmExpireTime])

502−

503−--

504−-- /See:/ 'accessReason' smart constructor.

505−data AccessReason =

506− AccessReason'

507− { _arType :: !(Maybe AccessReasonType)

508− , _arDetail :: !(Maybe Text)

509− }

510− deriving (Eq, Show, Data, Typeable, Generic)

511−

512−

513−-- | Creates a value of 'AccessReason' with the minimum fields required to make a request.

514−--

515−-- Use one of the following lenses to modify other fields as desired:

516−--

517−-- * 'arType'

518−--

519−-- * 'arDetail'

520−accessReason

521− :: AccessReason

522−accessReason = AccessReason' {_arType = Nothing, _arDetail = Nothing}

523−

524−

525−-- | Type of access justification.

526−arType :: Lens' AccessReason (Maybe AccessReasonType)

527−arType = lens _arType (\ s a -> s{_arType = a})

528−

529−-- | More detail about certain reason types. See comments for each type

530−-- above.

531−arDetail :: Lens' AccessReason (Maybe Text)

532−arDetail = lens _arDetail (\ s a -> s{_arDetail = a})

533−

534−instance FromJSON AccessReason where

535− parseJSON

536− = withObject "AccessReason"

537− (\ o ->

538− AccessReason' <$>

539− (o .:? "type") <*> (o .:? "detail"))

540−

541−instance ToJSON AccessReason where

542− toJSON AccessReason'{..}

543− = object

544− (catMaybes

545− [("type" .=) <$> _arType,

546− ("detail" .=) <$> _arDetail])

gogol-accessapproval/gen/Network/Google/AccessApproval/Types/Sum.hsdeleted−100

@@ -1,100 +0,0 @@

1−{-# LANGUAGE DeriveDataTypeable #-}

2−{-# LANGUAGE DeriveGeneric #-}

3−{-# LANGUAGE LambdaCase #-}

4−{-# LANGUAGE NoImplicitPrelude #-}

5−{-# LANGUAGE OverloadedStrings #-}

6−

7−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

8−

9−-- |

10−-- Module : Network.Google.AccessApproval.Types.Sum

11−-- Copyright : (c) 2015-2016 Brendan Hay

12−-- License : Mozilla Public License, v. 2.0.

13−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

14−-- Stability : auto-generated

15−-- Portability : non-portable (GHC extensions)

16−--

17−module Network.Google.AccessApproval.Types.Sum where

18−

19−import Network.Google.Prelude hiding (Bytes)

20−

21−-- | Type of access justification.

22−data AccessReasonType

23− = TypeUnspecified

24− -- ^ @TYPE_UNSPECIFIED@

25− -- Default value for proto, shouldn\'t be used.

26− | CustomerInitiatedSupport

27− -- ^ @CUSTOMER_INITIATED_SUPPORT@

28− -- Customer made a request or raised an issue that required the principal

29− -- to access customer data. \`detail\` is of the form (\"#####\" is the

30− -- issue ID):

31− --

32− -- 1. \"Feedback Report: #####\"

33− -- 2. \"Case Number: #####\"

34− -- 3. \"Case ID: #####\"

35− -- 4. \"E-PIN Reference: #####\"

36− -- 5. \"Google-#####\"

37− -- 6. \"T-#####\"

38− | GoogleInitiatedService

39− -- ^ @GOOGLE_INITIATED_SERVICE@

40− -- The principal accessed customer data in order to diagnose or resolve a

41− -- suspected issue in services or a known outage. Often this access is used

42− -- to confirm that customers are not affected by a suspected service issue

43− -- or to remediate a reversible system issue.

44− | GoogleInitiatedReview

45− -- ^ @GOOGLE_INITIATED_REVIEW@

46− -- Google initiated service for security, fraud, abuse, or compliance

47− -- purposes.

48− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

49−

50−instance Hashable AccessReasonType

51−

52−instance FromHttpApiData AccessReasonType where

53− parseQueryParam = \case

54− "TYPE_UNSPECIFIED" -> Right TypeUnspecified

55− "CUSTOMER_INITIATED_SUPPORT" -> Right CustomerInitiatedSupport

56− "GOOGLE_INITIATED_SERVICE" -> Right GoogleInitiatedService

57− "GOOGLE_INITIATED_REVIEW" -> Right GoogleInitiatedReview

58− x -> Left ("Unable to parse AccessReasonType from: " <> x)

59−

60−instance ToHttpApiData AccessReasonType where

61− toQueryParam = \case

62− TypeUnspecified -> "TYPE_UNSPECIFIED"

63− CustomerInitiatedSupport -> "CUSTOMER_INITIATED_SUPPORT"

64− GoogleInitiatedService -> "GOOGLE_INITIATED_SERVICE"

65− GoogleInitiatedReview -> "GOOGLE_INITIATED_REVIEW"

66−

67−instance FromJSON AccessReasonType where

68− parseJSON = parseJSONText "AccessReasonType"

69−

70−instance ToJSON AccessReasonType where

71− toJSON = toJSONText

72−

73−-- | V1 error format.

74−data Xgafv

75− = X1

76− -- ^ @1@

77− -- v1 error format

78− | X2

79− -- ^ @2@

80− -- v2 error format

81− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

82−

83−instance Hashable Xgafv

84−

85−instance FromHttpApiData Xgafv where

86− parseQueryParam = \case

87− "1" -> Right X1

88− "2" -> Right X2

89− x -> Left ("Unable to parse Xgafv from: " <> x)

90−

91−instance ToHttpApiData Xgafv where

92− toQueryParam = \case

93− X1 -> "1"

94− X2 -> "2"

95−

96−instance FromJSON Xgafv where

97− parseJSON = parseJSONText "Xgafv"

98−

99−instance ToJSON Xgafv where

100− toJSON = toJSONText

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Folders/ApprovalRequests/Approve.hsdeleted−170

@@ -1,170 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Approve

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Approves a request and returns the updated ApprovalRequest. Returns

24−-- NOT_FOUND if the request does not exist. Returns FAILED_PRECONDITION if

25−-- the request exists but is not in a pending state.

26−--

27−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.folders.approvalRequests.approve@.

28−module Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Approve

29− (

30− -- * REST Resource

31− FoldersApprovalRequestsApproveResource

32−

33− -- * Creating a Request

34− , foldersApprovalRequestsApprove

35− , FoldersApprovalRequestsApprove

36−

37− -- * Request Lenses

38− , faraXgafv

39− , faraUploadProtocol

40− , faraAccessToken

41− , faraUploadType

42− , faraPayload

43− , faraName

44− , faraCallback

45− ) where

46−

47−import Network.Google.AccessApproval.Types

48−import Network.Google.Prelude

49−

50−-- | A resource alias for @accessapproval.folders.approvalRequests.approve@ method which the

51−-- 'FoldersApprovalRequestsApprove' request conforms to.

52−type FoldersApprovalRequestsApproveResource =

53− "v1beta1" :>

54− CaptureMode "name" "approve" Text :>

55− QueryParam "$.xgafv" Xgafv :>

56− QueryParam "upload_protocol" Text :>

57− QueryParam "access_token" Text :>

58− QueryParam "uploadType" Text :>

59− QueryParam "callback" Text :>

60− QueryParam "alt" AltJSON :>

61− ReqBody '[JSON] ApproveApprovalRequestMessage :>

62− Post '[JSON] ApprovalRequest

63−

64−-- | Approves a request and returns the updated ApprovalRequest. Returns

65−-- NOT_FOUND if the request does not exist. Returns FAILED_PRECONDITION if

66−-- the request exists but is not in a pending state.

67−--

68−-- /See:/ 'foldersApprovalRequestsApprove' smart constructor.

69−data FoldersApprovalRequestsApprove =

70− FoldersApprovalRequestsApprove'

71− { _faraXgafv :: !(Maybe Xgafv)

72− , _faraUploadProtocol :: !(Maybe Text)

73− , _faraAccessToken :: !(Maybe Text)

74− , _faraUploadType :: !(Maybe Text)

75− , _faraPayload :: !ApproveApprovalRequestMessage

76− , _faraName :: !Text

77− , _faraCallback :: !(Maybe Text)

78− }

79− deriving (Eq, Show, Data, Typeable, Generic)

80−

81−

82−-- | Creates a value of 'FoldersApprovalRequestsApprove' with the minimum fields required to make a request.

83−--

84−-- Use one of the following lenses to modify other fields as desired:

85−--

86−-- * 'faraXgafv'

87−--

88−-- * 'faraUploadProtocol'

89−--

90−-- * 'faraAccessToken'

91−--

92−-- * 'faraUploadType'

93−--

94−-- * 'faraPayload'

95−--

96−-- * 'faraName'

97−--

98−-- * 'faraCallback'

99−foldersApprovalRequestsApprove

100− :: ApproveApprovalRequestMessage -- ^ 'faraPayload'

101− -> Text -- ^ 'faraName'

102− -> FoldersApprovalRequestsApprove

103−foldersApprovalRequestsApprove pFaraPayload_ pFaraName_ =

104− FoldersApprovalRequestsApprove'

105− { _faraXgafv = Nothing

106− , _faraUploadProtocol = Nothing

107− , _faraAccessToken = Nothing

108− , _faraUploadType = Nothing

109− , _faraPayload = pFaraPayload_

110− , _faraName = pFaraName_

111− , _faraCallback = Nothing

112− }

113−

114−

115−-- | V1 error format.

116−faraXgafv :: Lens' FoldersApprovalRequestsApprove (Maybe Xgafv)

117−faraXgafv

118− = lens _faraXgafv (\ s a -> s{_faraXgafv = a})

119−

120−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

121−faraUploadProtocol :: Lens' FoldersApprovalRequestsApprove (Maybe Text)

122−faraUploadProtocol

123− = lens _faraUploadProtocol

124− (\ s a -> s{_faraUploadProtocol = a})

125−

126−-- | OAuth access token.

127−faraAccessToken :: Lens' FoldersApprovalRequestsApprove (Maybe Text)

128−faraAccessToken

129− = lens _faraAccessToken

130− (\ s a -> s{_faraAccessToken = a})

131−

132−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

133−faraUploadType :: Lens' FoldersApprovalRequestsApprove (Maybe Text)

134−faraUploadType

135− = lens _faraUploadType

136− (\ s a -> s{_faraUploadType = a})

137−

138−-- | Multipart request metadata.

139−faraPayload :: Lens' FoldersApprovalRequestsApprove ApproveApprovalRequestMessage

140−faraPayload

141− = lens _faraPayload (\ s a -> s{_faraPayload = a})

142−

143−-- | Name of the approval request to approve.

144−faraName :: Lens' FoldersApprovalRequestsApprove Text

145−faraName = lens _faraName (\ s a -> s{_faraName = a})

146−

147−-- | JSONP

148−faraCallback :: Lens' FoldersApprovalRequestsApprove (Maybe Text)

149−faraCallback

150− = lens _faraCallback (\ s a -> s{_faraCallback = a})

151−

152−instance GoogleRequest FoldersApprovalRequestsApprove

153− where

154− type Rs FoldersApprovalRequestsApprove =

155− ApprovalRequest

156− type Scopes FoldersApprovalRequestsApprove =

157− '["https://www.googleapis.com/auth/cloud-platform"]

158− requestClient FoldersApprovalRequestsApprove'{..}

159− = go _faraName _faraXgafv _faraUploadProtocol

160− _faraAccessToken

161− _faraUploadType

162− _faraCallback

163− (Just AltJSON)

164− _faraPayload

165− accessApprovalService

166− where go

167− = buildClient

168− (Proxy ::

169− Proxy FoldersApprovalRequestsApproveResource)

170− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Folders/ApprovalRequests/Dismiss.hsdeleted−174

@@ -1,174 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Dismiss

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Dismisses a request. Returns the updated ApprovalRequest. NOTE: This

24−-- does not deny access to the resource if another request has been made

25−-- and approved. It is equivalent in effect to ignoring the request

26−-- altogether. Returns NOT_FOUND if the request does not exist. Returns

27−-- FAILED_PRECONDITION if the request exists but is not in a pending state.

28−--

29−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.folders.approvalRequests.dismiss@.

30−module Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Dismiss

31− (

32− -- * REST Resource

33− FoldersApprovalRequestsDismissResource

34−

35− -- * Creating a Request

36− , foldersApprovalRequestsDismiss

37− , FoldersApprovalRequestsDismiss

38−

39− -- * Request Lenses

40− , fardXgafv

41− , fardUploadProtocol

42− , fardAccessToken

43− , fardUploadType

44− , fardPayload

45− , fardName

46− , fardCallback

47− ) where

48−

49−import Network.Google.AccessApproval.Types

50−import Network.Google.Prelude

51−

52−-- | A resource alias for @accessapproval.folders.approvalRequests.dismiss@ method which the

53−-- 'FoldersApprovalRequestsDismiss' request conforms to.

54−type FoldersApprovalRequestsDismissResource =

55− "v1beta1" :>

56− CaptureMode "name" "dismiss" Text :>

57− QueryParam "$.xgafv" Xgafv :>

58− QueryParam "upload_protocol" Text :>

59− QueryParam "access_token" Text :>

60− QueryParam "uploadType" Text :>

61− QueryParam "callback" Text :>

62− QueryParam "alt" AltJSON :>

63− ReqBody '[JSON] DismissApprovalRequestMessage :>

64− Post '[JSON] ApprovalRequest

65−

66−-- | Dismisses a request. Returns the updated ApprovalRequest. NOTE: This

67−-- does not deny access to the resource if another request has been made

68−-- and approved. It is equivalent in effect to ignoring the request

69−-- altogether. Returns NOT_FOUND if the request does not exist. Returns

70−-- FAILED_PRECONDITION if the request exists but is not in a pending state.

71−--

72−-- /See:/ 'foldersApprovalRequestsDismiss' smart constructor.

73−data FoldersApprovalRequestsDismiss =

74− FoldersApprovalRequestsDismiss'

75− { _fardXgafv :: !(Maybe Xgafv)

76− , _fardUploadProtocol :: !(Maybe Text)

77− , _fardAccessToken :: !(Maybe Text)

78− , _fardUploadType :: !(Maybe Text)

79− , _fardPayload :: !DismissApprovalRequestMessage

80− , _fardName :: !Text

81− , _fardCallback :: !(Maybe Text)

82− }

83− deriving (Eq, Show, Data, Typeable, Generic)

84−

85−

86−-- | Creates a value of 'FoldersApprovalRequestsDismiss' with the minimum fields required to make a request.

87−--

88−-- Use one of the following lenses to modify other fields as desired:

89−--

90−-- * 'fardXgafv'

91−--

92−-- * 'fardUploadProtocol'

93−--

94−-- * 'fardAccessToken'

95−--

96−-- * 'fardUploadType'

97−--

98−-- * 'fardPayload'

99−--

100−-- * 'fardName'

101−--

102−-- * 'fardCallback'

103−foldersApprovalRequestsDismiss

104− :: DismissApprovalRequestMessage -- ^ 'fardPayload'

105− -> Text -- ^ 'fardName'

106− -> FoldersApprovalRequestsDismiss

107−foldersApprovalRequestsDismiss pFardPayload_ pFardName_ =

108− FoldersApprovalRequestsDismiss'

109− { _fardXgafv = Nothing

110− , _fardUploadProtocol = Nothing

111− , _fardAccessToken = Nothing

112− , _fardUploadType = Nothing

113− , _fardPayload = pFardPayload_

114− , _fardName = pFardName_

115− , _fardCallback = Nothing

116− }

117−

118−

119−-- | V1 error format.

120−fardXgafv :: Lens' FoldersApprovalRequestsDismiss (Maybe Xgafv)

121−fardXgafv

122− = lens _fardXgafv (\ s a -> s{_fardXgafv = a})

123−

124−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

125−fardUploadProtocol :: Lens' FoldersApprovalRequestsDismiss (Maybe Text)

126−fardUploadProtocol

127− = lens _fardUploadProtocol

128− (\ s a -> s{_fardUploadProtocol = a})

129−

130−-- | OAuth access token.

131−fardAccessToken :: Lens' FoldersApprovalRequestsDismiss (Maybe Text)

132−fardAccessToken

133− = lens _fardAccessToken

134− (\ s a -> s{_fardAccessToken = a})

135−

136−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

137−fardUploadType :: Lens' FoldersApprovalRequestsDismiss (Maybe Text)

138−fardUploadType

139− = lens _fardUploadType

140− (\ s a -> s{_fardUploadType = a})

141−

142−-- | Multipart request metadata.

143−fardPayload :: Lens' FoldersApprovalRequestsDismiss DismissApprovalRequestMessage

144−fardPayload

145− = lens _fardPayload (\ s a -> s{_fardPayload = a})

146−

147−-- | Name of the ApprovalRequest to dismiss.

148−fardName :: Lens' FoldersApprovalRequestsDismiss Text

149−fardName = lens _fardName (\ s a -> s{_fardName = a})

150−

151−-- | JSONP

152−fardCallback :: Lens' FoldersApprovalRequestsDismiss (Maybe Text)

153−fardCallback

154− = lens _fardCallback (\ s a -> s{_fardCallback = a})

155−

156−instance GoogleRequest FoldersApprovalRequestsDismiss

157− where

158− type Rs FoldersApprovalRequestsDismiss =

159− ApprovalRequest

160− type Scopes FoldersApprovalRequestsDismiss =

161− '["https://www.googleapis.com/auth/cloud-platform"]

162− requestClient FoldersApprovalRequestsDismiss'{..}

163− = go _fardName _fardXgafv _fardUploadProtocol

164− _fardAccessToken

165− _fardUploadType

166− _fardCallback

167− (Just AltJSON)

168− _fardPayload

169− accessApprovalService

170− where go

171− = buildClient

172− (Proxy ::

173− Proxy FoldersApprovalRequestsDismissResource)

174− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Folders/ApprovalRequests/Get.hsdeleted−153

@@ -1,153 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Get

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Gets an approval request. Returns NOT_FOUND if the request does not

24−-- exist.

25−--

26−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.folders.approvalRequests.get@.

27−module Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Get

28− (

29− -- * REST Resource

30− FoldersApprovalRequestsGetResource

31−

32− -- * Creating a Request

33− , foldersApprovalRequestsGet

34− , FoldersApprovalRequestsGet

35−

36− -- * Request Lenses

37− , fargXgafv

38− , fargUploadProtocol

39− , fargAccessToken

40− , fargUploadType

41− , fargName

42− , fargCallback

43− ) where

44−

45−import Network.Google.AccessApproval.Types

46−import Network.Google.Prelude

47−

48−-- | A resource alias for @accessapproval.folders.approvalRequests.get@ method which the

49−-- 'FoldersApprovalRequestsGet' request conforms to.

50−type FoldersApprovalRequestsGetResource =

51− "v1beta1" :>

52− Capture "name" Text :>

53− QueryParam "$.xgafv" Xgafv :>

54− QueryParam "upload_protocol" Text :>

55− QueryParam "access_token" Text :>

56− QueryParam "uploadType" Text :>

57− QueryParam "callback" Text :>

58− QueryParam "alt" AltJSON :>

59− Get '[JSON] ApprovalRequest

60−

61−-- | Gets an approval request. Returns NOT_FOUND if the request does not

62−-- exist.

63−--

64−-- /See:/ 'foldersApprovalRequestsGet' smart constructor.

65−data FoldersApprovalRequestsGet =

66− FoldersApprovalRequestsGet'

67− { _fargXgafv :: !(Maybe Xgafv)

68− , _fargUploadProtocol :: !(Maybe Text)

69− , _fargAccessToken :: !(Maybe Text)

70− , _fargUploadType :: !(Maybe Text)

71− , _fargName :: !Text

72− , _fargCallback :: !(Maybe Text)

73− }

74− deriving (Eq, Show, Data, Typeable, Generic)

75−

76−

77−-- | Creates a value of 'FoldersApprovalRequestsGet' with the minimum fields required to make a request.

78−--

79−-- Use one of the following lenses to modify other fields as desired:

80−--

81−-- * 'fargXgafv'

82−--

83−-- * 'fargUploadProtocol'

84−--

85−-- * 'fargAccessToken'

86−--

87−-- * 'fargUploadType'

88−--

89−-- * 'fargName'

90−--

91−-- * 'fargCallback'

92−foldersApprovalRequestsGet

93− :: Text -- ^ 'fargName'

94− -> FoldersApprovalRequestsGet

95−foldersApprovalRequestsGet pFargName_ =

96− FoldersApprovalRequestsGet'

97− { _fargXgafv = Nothing

98− , _fargUploadProtocol = Nothing

99− , _fargAccessToken = Nothing

100− , _fargUploadType = Nothing

101− , _fargName = pFargName_

102− , _fargCallback = Nothing

103− }

104−

105−

106−-- | V1 error format.

107−fargXgafv :: Lens' FoldersApprovalRequestsGet (Maybe Xgafv)

108−fargXgafv

109− = lens _fargXgafv (\ s a -> s{_fargXgafv = a})

110−

111−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

112−fargUploadProtocol :: Lens' FoldersApprovalRequestsGet (Maybe Text)

113−fargUploadProtocol

114− = lens _fargUploadProtocol

115− (\ s a -> s{_fargUploadProtocol = a})

116−

117−-- | OAuth access token.

118−fargAccessToken :: Lens' FoldersApprovalRequestsGet (Maybe Text)

119−fargAccessToken

120− = lens _fargAccessToken

121− (\ s a -> s{_fargAccessToken = a})

122−

123−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

124−fargUploadType :: Lens' FoldersApprovalRequestsGet (Maybe Text)

125−fargUploadType

126− = lens _fargUploadType

127− (\ s a -> s{_fargUploadType = a})

128−

129−-- | Name of the approval request to retrieve.

130−fargName :: Lens' FoldersApprovalRequestsGet Text

131−fargName = lens _fargName (\ s a -> s{_fargName = a})

132−

133−-- | JSONP

134−fargCallback :: Lens' FoldersApprovalRequestsGet (Maybe Text)

135−fargCallback

136− = lens _fargCallback (\ s a -> s{_fargCallback = a})

137−

138−instance GoogleRequest FoldersApprovalRequestsGet

139− where

140− type Rs FoldersApprovalRequestsGet = ApprovalRequest

141− type Scopes FoldersApprovalRequestsGet =

142− '["https://www.googleapis.com/auth/cloud-platform"]

143− requestClient FoldersApprovalRequestsGet'{..}

144− = go _fargName _fargXgafv _fargUploadProtocol

145− _fargAccessToken

146− _fargUploadType

147− _fargCallback

148− (Just AltJSON)

149− accessApprovalService

150− where go

151− = buildClient

152− (Proxy :: Proxy FoldersApprovalRequestsGetResource)

153− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Folders/ApprovalRequests/List.hsdeleted−204

@@ -1,204 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.List

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Lists approval requests associated with a project, folder, or

24−-- organization. Approval requests can be filtered by state (pending,

25−-- active, dismissed). The order is reverse chronological.

26−--

27−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.folders.approvalRequests.list@.

28−module Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.List

29− (

30− -- * REST Resource

31− FoldersApprovalRequestsListResource

32−

33− -- * Creating a Request

34− , foldersApprovalRequestsList

35− , FoldersApprovalRequestsList

36−

37− -- * Request Lenses

38− , farlParent

39− , farlXgafv

40− , farlUploadProtocol

41− , farlAccessToken

42− , farlUploadType

43− , farlFilter

44− , farlPageToken

45− , farlPageSize

46− , farlCallback

47− ) where

48−

49−import Network.Google.AccessApproval.Types

50−import Network.Google.Prelude

51−

52−-- | A resource alias for @accessapproval.folders.approvalRequests.list@ method which the

53−-- 'FoldersApprovalRequestsList' request conforms to.

54−type FoldersApprovalRequestsListResource =

55− "v1beta1" :>

56− Capture "parent" Text :>

57− "approvalRequests" :>

58− QueryParam "$.xgafv" Xgafv :>

59− QueryParam "upload_protocol" Text :>

60− QueryParam "access_token" Text :>

61− QueryParam "uploadType" Text :>

62− QueryParam "filter" Text :>

63− QueryParam "pageToken" Text :>

64− QueryParam "pageSize" (Textual Int32) :>

65− QueryParam "callback" Text :>

66− QueryParam "alt" AltJSON :>

67− Get '[JSON] ListApprovalRequestsResponse

68−

69−-- | Lists approval requests associated with a project, folder, or

70−-- organization. Approval requests can be filtered by state (pending,

71−-- active, dismissed). The order is reverse chronological.

72−--

73−-- /See:/ 'foldersApprovalRequestsList' smart constructor.

74−data FoldersApprovalRequestsList =

75− FoldersApprovalRequestsList'

76− { _farlParent :: !Text

77− , _farlXgafv :: !(Maybe Xgafv)

78− , _farlUploadProtocol :: !(Maybe Text)

79− , _farlAccessToken :: !(Maybe Text)

80− , _farlUploadType :: !(Maybe Text)

81− , _farlFilter :: !(Maybe Text)

82− , _farlPageToken :: !(Maybe Text)

83− , _farlPageSize :: !(Maybe (Textual Int32))

84− , _farlCallback :: !(Maybe Text)

85− }

86− deriving (Eq, Show, Data, Typeable, Generic)

87−

88−

89−-- | Creates a value of 'FoldersApprovalRequestsList' with the minimum fields required to make a request.

90−--

91−-- Use one of the following lenses to modify other fields as desired:

92−--

93−-- * 'farlParent'

94−--

95−-- * 'farlXgafv'

96−--

97−-- * 'farlUploadProtocol'

98−--

99−-- * 'farlAccessToken'

100−--

101−-- * 'farlUploadType'

102−--

103−-- * 'farlFilter'

104−--

105−-- * 'farlPageToken'

106−--

107−-- * 'farlPageSize'

108−--

109−-- * 'farlCallback'

110−foldersApprovalRequestsList

111− :: Text -- ^ 'farlParent'

112− -> FoldersApprovalRequestsList

113−foldersApprovalRequestsList pFarlParent_ =

114− FoldersApprovalRequestsList'

115− { _farlParent = pFarlParent_

116− , _farlXgafv = Nothing

117− , _farlUploadProtocol = Nothing

118− , _farlAccessToken = Nothing

119− , _farlUploadType = Nothing

120− , _farlFilter = Nothing

121− , _farlPageToken = Nothing

122− , _farlPageSize = Nothing

123− , _farlCallback = Nothing

124− }

125−

126−

127−-- | The parent resource. This may be \"projects\/{project_id}\",

128−-- \"folders\/{folder_id}\", or \"organizations\/{organization_id}\".

129−farlParent :: Lens' FoldersApprovalRequestsList Text

130−farlParent

131− = lens _farlParent (\ s a -> s{_farlParent = a})

132−

133−-- | V1 error format.

134−farlXgafv :: Lens' FoldersApprovalRequestsList (Maybe Xgafv)

135−farlXgafv

136− = lens _farlXgafv (\ s a -> s{_farlXgafv = a})

137−

138−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

139−farlUploadProtocol :: Lens' FoldersApprovalRequestsList (Maybe Text)

140−farlUploadProtocol

141− = lens _farlUploadProtocol

142− (\ s a -> s{_farlUploadProtocol = a})

143−

144−-- | OAuth access token.

145−farlAccessToken :: Lens' FoldersApprovalRequestsList (Maybe Text)

146−farlAccessToken

147− = lens _farlAccessToken

148− (\ s a -> s{_farlAccessToken = a})

149−

150−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

151−farlUploadType :: Lens' FoldersApprovalRequestsList (Maybe Text)

152−farlUploadType

153− = lens _farlUploadType

154− (\ s a -> s{_farlUploadType = a})

155−

156−-- | A filter on the type of approval requests to retrieve. Must be one of

157−-- the following values:

158−--

159−-- 1. [not set]: Requests that are pending or have active approvals.

160−-- 2. ALL: All requests.

161−-- 3. PENDING: Only pending requests.

162−-- 4. ACTIVE: Only active (i.e. currently approved) requests.

163−-- 5. DISMISSED: Only dismissed (including expired) requests.

164−farlFilter :: Lens' FoldersApprovalRequestsList (Maybe Text)

165−farlFilter

166− = lens _farlFilter (\ s a -> s{_farlFilter = a})

167−

168−-- | A token identifying the page of results to return.

169−farlPageToken :: Lens' FoldersApprovalRequestsList (Maybe Text)

170−farlPageToken

171− = lens _farlPageToken

172− (\ s a -> s{_farlPageToken = a})

173−

174−-- | Requested page size.

175−farlPageSize :: Lens' FoldersApprovalRequestsList (Maybe Int32)

176−farlPageSize

177− = lens _farlPageSize (\ s a -> s{_farlPageSize = a})

178− . mapping _Coerce

179−

180−-- | JSONP

181−farlCallback :: Lens' FoldersApprovalRequestsList (Maybe Text)

182−farlCallback

183− = lens _farlCallback (\ s a -> s{_farlCallback = a})

184−

185−instance GoogleRequest FoldersApprovalRequestsList

186− where

187− type Rs FoldersApprovalRequestsList =

188− ListApprovalRequestsResponse

189− type Scopes FoldersApprovalRequestsList =

190− '["https://www.googleapis.com/auth/cloud-platform"]

191− requestClient FoldersApprovalRequestsList'{..}

192− = go _farlParent _farlXgafv _farlUploadProtocol

193− _farlAccessToken

194− _farlUploadType

195− _farlFilter

196− _farlPageToken

197− _farlPageSize

198− _farlCallback

199− (Just AltJSON)

200− accessApprovalService

201− where go

202− = buildClient

203− (Proxy :: Proxy FoldersApprovalRequestsListResource)

204− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Folders/GetAccessApprovalSettings.hsdeleted−156

@@ -1,156 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Folders.GetAccessApprovalSettings

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Gets the settings associated with a project, folder, or organization.

24−--

25−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.folders.getAccessApprovalSettings@.

26−module Network.Google.Resource.AccessApproval.Folders.GetAccessApprovalSettings

27− (

28− -- * REST Resource

29− FoldersGetAccessApprovalSettingsResource

30−

31− -- * Creating a Request

32− , foldersGetAccessApprovalSettings

33− , FoldersGetAccessApprovalSettings

34−

35− -- * Request Lenses

36− , fgaasXgafv

37− , fgaasUploadProtocol

38− , fgaasAccessToken

39− , fgaasUploadType

40− , fgaasName

41− , fgaasCallback

42− ) where

43−

44−import Network.Google.AccessApproval.Types

45−import Network.Google.Prelude

46−

47−-- | A resource alias for @accessapproval.folders.getAccessApprovalSettings@ method which the

48−-- 'FoldersGetAccessApprovalSettings' request conforms to.

49−type FoldersGetAccessApprovalSettingsResource =

50− "v1beta1" :>

51− Capture "name" Text :>

52− QueryParam "$.xgafv" Xgafv :>

53− QueryParam "upload_protocol" Text :>

54− QueryParam "access_token" Text :>

55− QueryParam "uploadType" Text :>

56− QueryParam "callback" Text :>

57− QueryParam "alt" AltJSON :>

58− Get '[JSON] AccessApprovalSettings

59−

60−-- | Gets the settings associated with a project, folder, or organization.

61−--

62−-- /See:/ 'foldersGetAccessApprovalSettings' smart constructor.

63−data FoldersGetAccessApprovalSettings =

64− FoldersGetAccessApprovalSettings'

65− { _fgaasXgafv :: !(Maybe Xgafv)

66− , _fgaasUploadProtocol :: !(Maybe Text)

67− , _fgaasAccessToken :: !(Maybe Text)

68− , _fgaasUploadType :: !(Maybe Text)

69− , _fgaasName :: !Text

70− , _fgaasCallback :: !(Maybe Text)

71− }

72− deriving (Eq, Show, Data, Typeable, Generic)

73−

74−

75−-- | Creates a value of 'FoldersGetAccessApprovalSettings' with the minimum fields required to make a request.

76−--

77−-- Use one of the following lenses to modify other fields as desired:

78−--

79−-- * 'fgaasXgafv'

80−--

81−-- * 'fgaasUploadProtocol'

82−--

83−-- * 'fgaasAccessToken'

84−--

85−-- * 'fgaasUploadType'

86−--

87−-- * 'fgaasName'

88−--

89−-- * 'fgaasCallback'

90−foldersGetAccessApprovalSettings

91− :: Text -- ^ 'fgaasName'

92− -> FoldersGetAccessApprovalSettings

93−foldersGetAccessApprovalSettings pFgaasName_ =

94− FoldersGetAccessApprovalSettings'

95− { _fgaasXgafv = Nothing

96− , _fgaasUploadProtocol = Nothing

97− , _fgaasAccessToken = Nothing

98− , _fgaasUploadType = Nothing

99− , _fgaasName = pFgaasName_

100− , _fgaasCallback = Nothing

101− }

102−

103−

104−-- | V1 error format.

105−fgaasXgafv :: Lens' FoldersGetAccessApprovalSettings (Maybe Xgafv)

106−fgaasXgafv

107− = lens _fgaasXgafv (\ s a -> s{_fgaasXgafv = a})

108−

109−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

110−fgaasUploadProtocol :: Lens' FoldersGetAccessApprovalSettings (Maybe Text)

111−fgaasUploadProtocol

112− = lens _fgaasUploadProtocol

113− (\ s a -> s{_fgaasUploadProtocol = a})

114−

115−-- | OAuth access token.

116−fgaasAccessToken :: Lens' FoldersGetAccessApprovalSettings (Maybe Text)

117−fgaasAccessToken

118− = lens _fgaasAccessToken

119− (\ s a -> s{_fgaasAccessToken = a})

120−

121−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

122−fgaasUploadType :: Lens' FoldersGetAccessApprovalSettings (Maybe Text)

123−fgaasUploadType

124− = lens _fgaasUploadType

125− (\ s a -> s{_fgaasUploadType = a})

126−

127−-- | Name of the AccessApprovalSettings to retrieve.

128−fgaasName :: Lens' FoldersGetAccessApprovalSettings Text

129−fgaasName

130− = lens _fgaasName (\ s a -> s{_fgaasName = a})

131−

132−-- | JSONP

133−fgaasCallback :: Lens' FoldersGetAccessApprovalSettings (Maybe Text)

134−fgaasCallback

135− = lens _fgaasCallback

136− (\ s a -> s{_fgaasCallback = a})

137−

138−instance GoogleRequest

139− FoldersGetAccessApprovalSettings

140− where

141− type Rs FoldersGetAccessApprovalSettings =

142− AccessApprovalSettings

143− type Scopes FoldersGetAccessApprovalSettings =

144− '["https://www.googleapis.com/auth/cloud-platform"]

145− requestClient FoldersGetAccessApprovalSettings'{..}

146− = go _fgaasName _fgaasXgafv _fgaasUploadProtocol

147− _fgaasAccessToken

148− _fgaasUploadType

149− _fgaasCallback

150− (Just AltJSON)

151− accessApprovalService

152− where go

153− = buildClient

154− (Proxy ::

155− Proxy FoldersGetAccessApprovalSettingsResource)

156− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Folders/UpdateAccessApprovalSettings.hsdeleted−175

@@ -1,175 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Folders.UpdateAccessApprovalSettings

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Updates the settings associated with a project, folder, or organization.

24−-- Completely replaces the existing settings.

25−--

26−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.folders.updateAccessApprovalSettings@.

27−module Network.Google.Resource.AccessApproval.Folders.UpdateAccessApprovalSettings

28− (

29− -- * REST Resource

30− FoldersUpdateAccessApprovalSettingsResource

31−

32− -- * Creating a Request

33− , foldersUpdateAccessApprovalSettings

34− , FoldersUpdateAccessApprovalSettings

35−

36− -- * Request Lenses

37− , fuaasXgafv

38− , fuaasUploadProtocol

39− , fuaasAccessToken

40− , fuaasUploadType

41− , fuaasPayload

42− , fuaasName

43− , fuaasCallback

44− ) where

45−

46−import Network.Google.AccessApproval.Types

47−import Network.Google.Prelude

48−

49−-- | A resource alias for @accessapproval.folders.updateAccessApprovalSettings@ method which the

50−-- 'FoldersUpdateAccessApprovalSettings' request conforms to.

51−type FoldersUpdateAccessApprovalSettingsResource =

52− "v1beta1" :>

53− Capture "name" Text :>

54− QueryParam "$.xgafv" Xgafv :>

55− QueryParam "upload_protocol" Text :>

56− QueryParam "access_token" Text :>

57− QueryParam "uploadType" Text :>

58− QueryParam "callback" Text :>

59− QueryParam "alt" AltJSON :>

60− ReqBody '[JSON] AccessApprovalSettings :>

61− Patch '[JSON] AccessApprovalSettings

62−

63−-- | Updates the settings associated with a project, folder, or organization.

64−-- Completely replaces the existing settings.

65−--

66−-- /See:/ 'foldersUpdateAccessApprovalSettings' smart constructor.

67−data FoldersUpdateAccessApprovalSettings =

68− FoldersUpdateAccessApprovalSettings'

69− { _fuaasXgafv :: !(Maybe Xgafv)

70− , _fuaasUploadProtocol :: !(Maybe Text)

71− , _fuaasAccessToken :: !(Maybe Text)

72− , _fuaasUploadType :: !(Maybe Text)

73− , _fuaasPayload :: !AccessApprovalSettings

74− , _fuaasName :: !Text

75− , _fuaasCallback :: !(Maybe Text)

76− }

77− deriving (Eq, Show, Data, Typeable, Generic)

78−

79−

80−-- | Creates a value of 'FoldersUpdateAccessApprovalSettings' with the minimum fields required to make a request.

81−--

82−-- Use one of the following lenses to modify other fields as desired:

83−--

84−-- * 'fuaasXgafv'

85−--

86−-- * 'fuaasUploadProtocol'

87−--

88−-- * 'fuaasAccessToken'

89−--

90−-- * 'fuaasUploadType'

91−--

92−-- * 'fuaasPayload'

93−--

94−-- * 'fuaasName'

95−--

96−-- * 'fuaasCallback'

97−foldersUpdateAccessApprovalSettings

98− :: AccessApprovalSettings -- ^ 'fuaasPayload'

99− -> Text -- ^ 'fuaasName'

100− -> FoldersUpdateAccessApprovalSettings

101−foldersUpdateAccessApprovalSettings pFuaasPayload_ pFuaasName_ =

102− FoldersUpdateAccessApprovalSettings'

103− { _fuaasXgafv = Nothing

104− , _fuaasUploadProtocol = Nothing

105− , _fuaasAccessToken = Nothing

106− , _fuaasUploadType = Nothing

107− , _fuaasPayload = pFuaasPayload_

108− , _fuaasName = pFuaasName_

109− , _fuaasCallback = Nothing

110− }

111−

112−

113−-- | V1 error format.

114−fuaasXgafv :: Lens' FoldersUpdateAccessApprovalSettings (Maybe Xgafv)

115−fuaasXgafv

116− = lens _fuaasXgafv (\ s a -> s{_fuaasXgafv = a})

117−

118−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

119−fuaasUploadProtocol :: Lens' FoldersUpdateAccessApprovalSettings (Maybe Text)

120−fuaasUploadProtocol

121− = lens _fuaasUploadProtocol

122− (\ s a -> s{_fuaasUploadProtocol = a})

123−

124−-- | OAuth access token.

125−fuaasAccessToken :: Lens' FoldersUpdateAccessApprovalSettings (Maybe Text)

126−fuaasAccessToken

127− = lens _fuaasAccessToken

128− (\ s a -> s{_fuaasAccessToken = a})

129−

130−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

131−fuaasUploadType :: Lens' FoldersUpdateAccessApprovalSettings (Maybe Text)

132−fuaasUploadType

133− = lens _fuaasUploadType

134− (\ s a -> s{_fuaasUploadType = a})

135−

136−-- | Multipart request metadata.

137−fuaasPayload :: Lens' FoldersUpdateAccessApprovalSettings AccessApprovalSettings

138−fuaasPayload

139− = lens _fuaasPayload (\ s a -> s{_fuaasPayload = a})

140−

141−-- | The resource name of the settings. Format is one of:

142−-- \"projects\/{project_id}\/accessApprovalSettings\"

143−-- \"folders\/{folder_id}\/accessApprovalSettings\"

144−-- \"organizations\/{organization_id}\/accessApprovalSettings\"

145−fuaasName :: Lens' FoldersUpdateAccessApprovalSettings Text

146−fuaasName

147− = lens _fuaasName (\ s a -> s{_fuaasName = a})

148−

149−-- | JSONP

150−fuaasCallback :: Lens' FoldersUpdateAccessApprovalSettings (Maybe Text)

151−fuaasCallback

152− = lens _fuaasCallback

153− (\ s a -> s{_fuaasCallback = a})

154−

155−instance GoogleRequest

156− FoldersUpdateAccessApprovalSettings

157− where

158− type Rs FoldersUpdateAccessApprovalSettings =

159− AccessApprovalSettings

160− type Scopes FoldersUpdateAccessApprovalSettings =

161− '["https://www.googleapis.com/auth/cloud-platform"]

162− requestClient

163− FoldersUpdateAccessApprovalSettings'{..}

164− = go _fuaasName _fuaasXgafv _fuaasUploadProtocol

165− _fuaasAccessToken

166− _fuaasUploadType

167− _fuaasCallback

168− (Just AltJSON)

169− _fuaasPayload

170− accessApprovalService

171− where go

172− = buildClient

173− (Proxy ::

174− Proxy FoldersUpdateAccessApprovalSettingsResource)

175− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Organizations/ApprovalRequests/Approve.hsdeleted−172

@@ -1,172 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Approve

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Approves a request and returns the updated ApprovalRequest. Returns

24−-- NOT_FOUND if the request does not exist. Returns FAILED_PRECONDITION if

25−-- the request exists but is not in a pending state.

26−--

27−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.organizations.approvalRequests.approve@.

28−module Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Approve

29− (

30− -- * REST Resource

31− OrganizationsApprovalRequestsApproveResource

32−

33− -- * Creating a Request

34− , organizationsApprovalRequestsApprove

35− , OrganizationsApprovalRequestsApprove

36−

37− -- * Request Lenses

38− , oaraXgafv

39− , oaraUploadProtocol

40− , oaraAccessToken

41− , oaraUploadType

42− , oaraPayload

43− , oaraName

44− , oaraCallback

45− ) where

46−

47−import Network.Google.AccessApproval.Types

48−import Network.Google.Prelude

49−

50−-- | A resource alias for @accessapproval.organizations.approvalRequests.approve@ method which the

51−-- 'OrganizationsApprovalRequestsApprove' request conforms to.

52−type OrganizationsApprovalRequestsApproveResource =

53− "v1beta1" :>

54− CaptureMode "name" "approve" Text :>

55− QueryParam "$.xgafv" Xgafv :>

56− QueryParam "upload_protocol" Text :>

57− QueryParam "access_token" Text :>

58− QueryParam "uploadType" Text :>

59− QueryParam "callback" Text :>

60− QueryParam "alt" AltJSON :>

61− ReqBody '[JSON] ApproveApprovalRequestMessage :>

62− Post '[JSON] ApprovalRequest

63−

64−-- | Approves a request and returns the updated ApprovalRequest. Returns

65−-- NOT_FOUND if the request does not exist. Returns FAILED_PRECONDITION if

66−-- the request exists but is not in a pending state.

67−--

68−-- /See:/ 'organizationsApprovalRequestsApprove' smart constructor.

69−data OrganizationsApprovalRequestsApprove =

70− OrganizationsApprovalRequestsApprove'

71− { _oaraXgafv :: !(Maybe Xgafv)

72− , _oaraUploadProtocol :: !(Maybe Text)

73− , _oaraAccessToken :: !(Maybe Text)

74− , _oaraUploadType :: !(Maybe Text)

75− , _oaraPayload :: !ApproveApprovalRequestMessage

76− , _oaraName :: !Text

77− , _oaraCallback :: !(Maybe Text)

78− }

79− deriving (Eq, Show, Data, Typeable, Generic)

80−

81−

82−-- | Creates a value of 'OrganizationsApprovalRequestsApprove' with the minimum fields required to make a request.

83−--

84−-- Use one of the following lenses to modify other fields as desired:

85−--

86−-- * 'oaraXgafv'

87−--

88−-- * 'oaraUploadProtocol'

89−--

90−-- * 'oaraAccessToken'

91−--

92−-- * 'oaraUploadType'

93−--

94−-- * 'oaraPayload'

95−--

96−-- * 'oaraName'

97−--

98−-- * 'oaraCallback'

99−organizationsApprovalRequestsApprove

100− :: ApproveApprovalRequestMessage -- ^ 'oaraPayload'

101− -> Text -- ^ 'oaraName'

102− -> OrganizationsApprovalRequestsApprove

103−organizationsApprovalRequestsApprove pOaraPayload_ pOaraName_ =

104− OrganizationsApprovalRequestsApprove'

105− { _oaraXgafv = Nothing

106− , _oaraUploadProtocol = Nothing

107− , _oaraAccessToken = Nothing

108− , _oaraUploadType = Nothing

109− , _oaraPayload = pOaraPayload_

110− , _oaraName = pOaraName_

111− , _oaraCallback = Nothing

112− }

113−

114−

115−-- | V1 error format.

116−oaraXgafv :: Lens' OrganizationsApprovalRequestsApprove (Maybe Xgafv)

117−oaraXgafv

118− = lens _oaraXgafv (\ s a -> s{_oaraXgafv = a})

119−

120−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

121−oaraUploadProtocol :: Lens' OrganizationsApprovalRequestsApprove (Maybe Text)

122−oaraUploadProtocol

123− = lens _oaraUploadProtocol

124− (\ s a -> s{_oaraUploadProtocol = a})

125−

126−-- | OAuth access token.

127−oaraAccessToken :: Lens' OrganizationsApprovalRequestsApprove (Maybe Text)

128−oaraAccessToken

129− = lens _oaraAccessToken

130− (\ s a -> s{_oaraAccessToken = a})

131−

132−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

133−oaraUploadType :: Lens' OrganizationsApprovalRequestsApprove (Maybe Text)

134−oaraUploadType

135− = lens _oaraUploadType

136− (\ s a -> s{_oaraUploadType = a})

137−

138−-- | Multipart request metadata.

139−oaraPayload :: Lens' OrganizationsApprovalRequestsApprove ApproveApprovalRequestMessage

140−oaraPayload

141− = lens _oaraPayload (\ s a -> s{_oaraPayload = a})

142−

143−-- | Name of the approval request to approve.

144−oaraName :: Lens' OrganizationsApprovalRequestsApprove Text

145−oaraName = lens _oaraName (\ s a -> s{_oaraName = a})

146−

147−-- | JSONP

148−oaraCallback :: Lens' OrganizationsApprovalRequestsApprove (Maybe Text)

149−oaraCallback

150− = lens _oaraCallback (\ s a -> s{_oaraCallback = a})

151−

152−instance GoogleRequest

153− OrganizationsApprovalRequestsApprove

154− where

155− type Rs OrganizationsApprovalRequestsApprove =

156− ApprovalRequest

157− type Scopes OrganizationsApprovalRequestsApprove =

158− '["https://www.googleapis.com/auth/cloud-platform"]

159− requestClient

160− OrganizationsApprovalRequestsApprove'{..}

161− = go _oaraName _oaraXgafv _oaraUploadProtocol

162− _oaraAccessToken

163− _oaraUploadType

164− _oaraCallback

165− (Just AltJSON)

166− _oaraPayload

167− accessApprovalService

168− where go

169− = buildClient

170− (Proxy ::

171− Proxy OrganizationsApprovalRequestsApproveResource)

172− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Organizations/ApprovalRequests/Dismiss.hsdeleted−176

@@ -1,176 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Dismiss

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Dismisses a request. Returns the updated ApprovalRequest. NOTE: This

24−-- does not deny access to the resource if another request has been made

25−-- and approved. It is equivalent in effect to ignoring the request

26−-- altogether. Returns NOT_FOUND if the request does not exist. Returns

27−-- FAILED_PRECONDITION if the request exists but is not in a pending state.

28−--

29−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.organizations.approvalRequests.dismiss@.

30−module Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Dismiss

31− (

32− -- * REST Resource

33− OrganizationsApprovalRequestsDismissResource

34−

35− -- * Creating a Request

36− , organizationsApprovalRequestsDismiss

37− , OrganizationsApprovalRequestsDismiss

38−

39− -- * Request Lenses

40− , oardXgafv

41− , oardUploadProtocol

42− , oardAccessToken

43− , oardUploadType

44− , oardPayload

45− , oardName

46− , oardCallback

47− ) where

48−

49−import Network.Google.AccessApproval.Types

50−import Network.Google.Prelude

51−

52−-- | A resource alias for @accessapproval.organizations.approvalRequests.dismiss@ method which the

53−-- 'OrganizationsApprovalRequestsDismiss' request conforms to.

54−type OrganizationsApprovalRequestsDismissResource =

55− "v1beta1" :>

56− CaptureMode "name" "dismiss" Text :>

57− QueryParam "$.xgafv" Xgafv :>

58− QueryParam "upload_protocol" Text :>

59− QueryParam "access_token" Text :>

60− QueryParam "uploadType" Text :>

61− QueryParam "callback" Text :>

62− QueryParam "alt" AltJSON :>

63− ReqBody '[JSON] DismissApprovalRequestMessage :>

64− Post '[JSON] ApprovalRequest

65−

66−-- | Dismisses a request. Returns the updated ApprovalRequest. NOTE: This

67−-- does not deny access to the resource if another request has been made

68−-- and approved. It is equivalent in effect to ignoring the request

69−-- altogether. Returns NOT_FOUND if the request does not exist. Returns

70−-- FAILED_PRECONDITION if the request exists but is not in a pending state.

71−--

72−-- /See:/ 'organizationsApprovalRequestsDismiss' smart constructor.

73−data OrganizationsApprovalRequestsDismiss =

74− OrganizationsApprovalRequestsDismiss'

75− { _oardXgafv :: !(Maybe Xgafv)

76− , _oardUploadProtocol :: !(Maybe Text)

77− , _oardAccessToken :: !(Maybe Text)

78− , _oardUploadType :: !(Maybe Text)

79− , _oardPayload :: !DismissApprovalRequestMessage

80− , _oardName :: !Text

81− , _oardCallback :: !(Maybe Text)

82− }

83− deriving (Eq, Show, Data, Typeable, Generic)

84−

85−

86−-- | Creates a value of 'OrganizationsApprovalRequestsDismiss' with the minimum fields required to make a request.

87−--

88−-- Use one of the following lenses to modify other fields as desired:

89−--

90−-- * 'oardXgafv'

91−--

92−-- * 'oardUploadProtocol'

93−--

94−-- * 'oardAccessToken'

95−--

96−-- * 'oardUploadType'

97−--

98−-- * 'oardPayload'

99−--

100−-- * 'oardName'

101−--

102−-- * 'oardCallback'

103−organizationsApprovalRequestsDismiss

104− :: DismissApprovalRequestMessage -- ^ 'oardPayload'

105− -> Text -- ^ 'oardName'

106− -> OrganizationsApprovalRequestsDismiss

107−organizationsApprovalRequestsDismiss pOardPayload_ pOardName_ =

108− OrganizationsApprovalRequestsDismiss'

109− { _oardXgafv = Nothing

110− , _oardUploadProtocol = Nothing

111− , _oardAccessToken = Nothing

112− , _oardUploadType = Nothing

113− , _oardPayload = pOardPayload_

114− , _oardName = pOardName_

115− , _oardCallback = Nothing

116− }

117−

118−

119−-- | V1 error format.

120−oardXgafv :: Lens' OrganizationsApprovalRequestsDismiss (Maybe Xgafv)

121−oardXgafv

122− = lens _oardXgafv (\ s a -> s{_oardXgafv = a})

123−

124−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

125−oardUploadProtocol :: Lens' OrganizationsApprovalRequestsDismiss (Maybe Text)

126−oardUploadProtocol

127− = lens _oardUploadProtocol

128− (\ s a -> s{_oardUploadProtocol = a})

129−

130−-- | OAuth access token.

131−oardAccessToken :: Lens' OrganizationsApprovalRequestsDismiss (Maybe Text)

132−oardAccessToken

133− = lens _oardAccessToken

134− (\ s a -> s{_oardAccessToken = a})

135−

136−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

137−oardUploadType :: Lens' OrganizationsApprovalRequestsDismiss (Maybe Text)

138−oardUploadType

139− = lens _oardUploadType

140− (\ s a -> s{_oardUploadType = a})

141−

142−-- | Multipart request metadata.

143−oardPayload :: Lens' OrganizationsApprovalRequestsDismiss DismissApprovalRequestMessage

144−oardPayload

145− = lens _oardPayload (\ s a -> s{_oardPayload = a})

146−

147−-- | Name of the ApprovalRequest to dismiss.

148−oardName :: Lens' OrganizationsApprovalRequestsDismiss Text

149−oardName = lens _oardName (\ s a -> s{_oardName = a})

150−

151−-- | JSONP

152−oardCallback :: Lens' OrganizationsApprovalRequestsDismiss (Maybe Text)

153−oardCallback

154− = lens _oardCallback (\ s a -> s{_oardCallback = a})

155−

156−instance GoogleRequest

157− OrganizationsApprovalRequestsDismiss

158− where

159− type Rs OrganizationsApprovalRequestsDismiss =

160− ApprovalRequest

161− type Scopes OrganizationsApprovalRequestsDismiss =

162− '["https://www.googleapis.com/auth/cloud-platform"]

163− requestClient

164− OrganizationsApprovalRequestsDismiss'{..}

165− = go _oardName _oardXgafv _oardUploadProtocol

166− _oardAccessToken

167− _oardUploadType

168− _oardCallback

169− (Just AltJSON)

170− _oardPayload

171− accessApprovalService

172− where go

173− = buildClient

174− (Proxy ::

175− Proxy OrganizationsApprovalRequestsDismissResource)

176− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Organizations/ApprovalRequests/Get.hsdeleted−156

@@ -1,156 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Get

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Gets an approval request. Returns NOT_FOUND if the request does not

24−-- exist.

25−--

26−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.organizations.approvalRequests.get@.

27−module Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Get

28− (

29− -- * REST Resource

30− OrganizationsApprovalRequestsGetResource

31−

32− -- * Creating a Request

33− , organizationsApprovalRequestsGet

34− , OrganizationsApprovalRequestsGet

35−

36− -- * Request Lenses

37− , oargXgafv

38− , oargUploadProtocol

39− , oargAccessToken

40− , oargUploadType

41− , oargName

42− , oargCallback

43− ) where

44−

45−import Network.Google.AccessApproval.Types

46−import Network.Google.Prelude

47−

48−-- | A resource alias for @accessapproval.organizations.approvalRequests.get@ method which the

49−-- 'OrganizationsApprovalRequestsGet' request conforms to.

50−type OrganizationsApprovalRequestsGetResource =

51− "v1beta1" :>

52− Capture "name" Text :>

53− QueryParam "$.xgafv" Xgafv :>

54− QueryParam "upload_protocol" Text :>

55− QueryParam "access_token" Text :>

56− QueryParam "uploadType" Text :>

57− QueryParam "callback" Text :>

58− QueryParam "alt" AltJSON :>

59− Get '[JSON] ApprovalRequest

60−

61−-- | Gets an approval request. Returns NOT_FOUND if the request does not

62−-- exist.

63−--

64−-- /See:/ 'organizationsApprovalRequestsGet' smart constructor.

65−data OrganizationsApprovalRequestsGet =

66− OrganizationsApprovalRequestsGet'

67− { _oargXgafv :: !(Maybe Xgafv)

68− , _oargUploadProtocol :: !(Maybe Text)

69− , _oargAccessToken :: !(Maybe Text)

70− , _oargUploadType :: !(Maybe Text)

71− , _oargName :: !Text

72− , _oargCallback :: !(Maybe Text)

73− }

74− deriving (Eq, Show, Data, Typeable, Generic)

75−

76−

77−-- | Creates a value of 'OrganizationsApprovalRequestsGet' with the minimum fields required to make a request.

78−--

79−-- Use one of the following lenses to modify other fields as desired:

80−--

81−-- * 'oargXgafv'

82−--

83−-- * 'oargUploadProtocol'

84−--

85−-- * 'oargAccessToken'

86−--

87−-- * 'oargUploadType'

88−--

89−-- * 'oargName'

90−--

91−-- * 'oargCallback'

92−organizationsApprovalRequestsGet

93− :: Text -- ^ 'oargName'

94− -> OrganizationsApprovalRequestsGet

95−organizationsApprovalRequestsGet pOargName_ =

96− OrganizationsApprovalRequestsGet'

97− { _oargXgafv = Nothing

98− , _oargUploadProtocol = Nothing

99− , _oargAccessToken = Nothing

100− , _oargUploadType = Nothing

101− , _oargName = pOargName_

102− , _oargCallback = Nothing

103− }

104−

105−

106−-- | V1 error format.

107−oargXgafv :: Lens' OrganizationsApprovalRequestsGet (Maybe Xgafv)

108−oargXgafv

109− = lens _oargXgafv (\ s a -> s{_oargXgafv = a})

110−

111−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

112−oargUploadProtocol :: Lens' OrganizationsApprovalRequestsGet (Maybe Text)

113−oargUploadProtocol

114− = lens _oargUploadProtocol

115− (\ s a -> s{_oargUploadProtocol = a})

116−

117−-- | OAuth access token.

118−oargAccessToken :: Lens' OrganizationsApprovalRequestsGet (Maybe Text)

119−oargAccessToken

120− = lens _oargAccessToken

121− (\ s a -> s{_oargAccessToken = a})

122−

123−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

124−oargUploadType :: Lens' OrganizationsApprovalRequestsGet (Maybe Text)

125−oargUploadType

126− = lens _oargUploadType

127− (\ s a -> s{_oargUploadType = a})

128−

129−-- | Name of the approval request to retrieve.

130−oargName :: Lens' OrganizationsApprovalRequestsGet Text

131−oargName = lens _oargName (\ s a -> s{_oargName = a})

132−

133−-- | JSONP

134−oargCallback :: Lens' OrganizationsApprovalRequestsGet (Maybe Text)

135−oargCallback

136− = lens _oargCallback (\ s a -> s{_oargCallback = a})

137−

138−instance GoogleRequest

139− OrganizationsApprovalRequestsGet

140− where

141− type Rs OrganizationsApprovalRequestsGet =

142− ApprovalRequest

143− type Scopes OrganizationsApprovalRequestsGet =

144− '["https://www.googleapis.com/auth/cloud-platform"]

145− requestClient OrganizationsApprovalRequestsGet'{..}

146− = go _oargName _oargXgafv _oargUploadProtocol

147− _oargAccessToken

148− _oargUploadType

149− _oargCallback

150− (Just AltJSON)

151− accessApprovalService

152− where go

153− = buildClient

154− (Proxy ::

155− Proxy OrganizationsApprovalRequestsGetResource)

156− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Organizations/ApprovalRequests/List.hsdeleted−206

@@ -1,206 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.List

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Lists approval requests associated with a project, folder, or

24−-- organization. Approval requests can be filtered by state (pending,

25−-- active, dismissed). The order is reverse chronological.

26−--

27−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.organizations.approvalRequests.list@.

28−module Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.List

29− (

30− -- * REST Resource

31− OrganizationsApprovalRequestsListResource

32−

33− -- * Creating a Request

34− , organizationsApprovalRequestsList

35− , OrganizationsApprovalRequestsList

36−

37− -- * Request Lenses

38− , oarlParent

39− , oarlXgafv

40− , oarlUploadProtocol

41− , oarlAccessToken

42− , oarlUploadType

43− , oarlFilter

44− , oarlPageToken

45− , oarlPageSize

46− , oarlCallback

47− ) where

48−

49−import Network.Google.AccessApproval.Types

50−import Network.Google.Prelude

51−

52−-- | A resource alias for @accessapproval.organizations.approvalRequests.list@ method which the

53−-- 'OrganizationsApprovalRequestsList' request conforms to.

54−type OrganizationsApprovalRequestsListResource =

55− "v1beta1" :>

56− Capture "parent" Text :>

57− "approvalRequests" :>

58− QueryParam "$.xgafv" Xgafv :>

59− QueryParam "upload_protocol" Text :>

60− QueryParam "access_token" Text :>

61− QueryParam "uploadType" Text :>

62− QueryParam "filter" Text :>

63− QueryParam "pageToken" Text :>

64− QueryParam "pageSize" (Textual Int32) :>

65− QueryParam "callback" Text :>

66− QueryParam "alt" AltJSON :>

67− Get '[JSON] ListApprovalRequestsResponse

68−

69−-- | Lists approval requests associated with a project, folder, or

70−-- organization. Approval requests can be filtered by state (pending,

71−-- active, dismissed). The order is reverse chronological.

72−--

73−-- /See:/ 'organizationsApprovalRequestsList' smart constructor.

74−data OrganizationsApprovalRequestsList =

75− OrganizationsApprovalRequestsList'

76− { _oarlParent :: !Text

77− , _oarlXgafv :: !(Maybe Xgafv)

78− , _oarlUploadProtocol :: !(Maybe Text)

79− , _oarlAccessToken :: !(Maybe Text)

80− , _oarlUploadType :: !(Maybe Text)

81− , _oarlFilter :: !(Maybe Text)

82− , _oarlPageToken :: !(Maybe Text)

83− , _oarlPageSize :: !(Maybe (Textual Int32))

84− , _oarlCallback :: !(Maybe Text)

85− }

86− deriving (Eq, Show, Data, Typeable, Generic)

87−

88−

89−-- | Creates a value of 'OrganizationsApprovalRequestsList' with the minimum fields required to make a request.

90−--

91−-- Use one of the following lenses to modify other fields as desired:

92−--

93−-- * 'oarlParent'

94−--

95−-- * 'oarlXgafv'

96−--

97−-- * 'oarlUploadProtocol'

98−--

99−-- * 'oarlAccessToken'

100−--

101−-- * 'oarlUploadType'

102−--

103−-- * 'oarlFilter'

104−--

105−-- * 'oarlPageToken'

106−--

107−-- * 'oarlPageSize'

108−--

109−-- * 'oarlCallback'

110−organizationsApprovalRequestsList

111− :: Text -- ^ 'oarlParent'

112− -> OrganizationsApprovalRequestsList

113−organizationsApprovalRequestsList pOarlParent_ =

114− OrganizationsApprovalRequestsList'

115− { _oarlParent = pOarlParent_

116− , _oarlXgafv = Nothing

117− , _oarlUploadProtocol = Nothing

118− , _oarlAccessToken = Nothing

119− , _oarlUploadType = Nothing

120− , _oarlFilter = Nothing

121− , _oarlPageToken = Nothing

122− , _oarlPageSize = Nothing

123− , _oarlCallback = Nothing

124− }

125−

126−

127−-- | The parent resource. This may be \"projects\/{project_id}\",

128−-- \"folders\/{folder_id}\", or \"organizations\/{organization_id}\".

129−oarlParent :: Lens' OrganizationsApprovalRequestsList Text

130−oarlParent

131− = lens _oarlParent (\ s a -> s{_oarlParent = a})

132−

133−-- | V1 error format.

134−oarlXgafv :: Lens' OrganizationsApprovalRequestsList (Maybe Xgafv)

135−oarlXgafv

136− = lens _oarlXgafv (\ s a -> s{_oarlXgafv = a})

137−

138−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

139−oarlUploadProtocol :: Lens' OrganizationsApprovalRequestsList (Maybe Text)

140−oarlUploadProtocol

141− = lens _oarlUploadProtocol

142− (\ s a -> s{_oarlUploadProtocol = a})

143−

144−-- | OAuth access token.

145−oarlAccessToken :: Lens' OrganizationsApprovalRequestsList (Maybe Text)

146−oarlAccessToken

147− = lens _oarlAccessToken

148− (\ s a -> s{_oarlAccessToken = a})

149−

150−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

151−oarlUploadType :: Lens' OrganizationsApprovalRequestsList (Maybe Text)

152−oarlUploadType

153− = lens _oarlUploadType

154− (\ s a -> s{_oarlUploadType = a})

155−

156−-- | A filter on the type of approval requests to retrieve. Must be one of

157−-- the following values:

158−--

159−-- 1. [not set]: Requests that are pending or have active approvals.

160−-- 2. ALL: All requests.

161−-- 3. PENDING: Only pending requests.

162−-- 4. ACTIVE: Only active (i.e. currently approved) requests.

163−-- 5. DISMISSED: Only dismissed (including expired) requests.

164−oarlFilter :: Lens' OrganizationsApprovalRequestsList (Maybe Text)

165−oarlFilter

166− = lens _oarlFilter (\ s a -> s{_oarlFilter = a})

167−

168−-- | A token identifying the page of results to return.

169−oarlPageToken :: Lens' OrganizationsApprovalRequestsList (Maybe Text)

170−oarlPageToken

171− = lens _oarlPageToken

172− (\ s a -> s{_oarlPageToken = a})

173−

174−-- | Requested page size.

175−oarlPageSize :: Lens' OrganizationsApprovalRequestsList (Maybe Int32)

176−oarlPageSize

177− = lens _oarlPageSize (\ s a -> s{_oarlPageSize = a})

178− . mapping _Coerce

179−

180−-- | JSONP

181−oarlCallback :: Lens' OrganizationsApprovalRequestsList (Maybe Text)

182−oarlCallback

183− = lens _oarlCallback (\ s a -> s{_oarlCallback = a})

184−

185−instance GoogleRequest

186− OrganizationsApprovalRequestsList

187− where

188− type Rs OrganizationsApprovalRequestsList =

189− ListApprovalRequestsResponse

190− type Scopes OrganizationsApprovalRequestsList =

191− '["https://www.googleapis.com/auth/cloud-platform"]

192− requestClient OrganizationsApprovalRequestsList'{..}

193− = go _oarlParent _oarlXgafv _oarlUploadProtocol

194− _oarlAccessToken

195− _oarlUploadType

196− _oarlFilter

197− _oarlPageToken

198− _oarlPageSize

199− _oarlCallback

200− (Just AltJSON)

201− accessApprovalService

202− where go

203− = buildClient

204− (Proxy ::

205− Proxy OrganizationsApprovalRequestsListResource)

206− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Organizations/GetAccessApprovalSettings.hsdeleted−157

@@ -1,157 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Organizations.GetAccessApprovalSettings

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Gets the settings associated with a project, folder, or organization.

24−--

25−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.organizations.getAccessApprovalSettings@.

26−module Network.Google.Resource.AccessApproval.Organizations.GetAccessApprovalSettings

27− (

28− -- * REST Resource

29− OrganizationsGetAccessApprovalSettingsResource

30−

31− -- * Creating a Request

32− , organizationsGetAccessApprovalSettings

33− , OrganizationsGetAccessApprovalSettings

34−

35− -- * Request Lenses

36− , ogaasXgafv

37− , ogaasUploadProtocol

38− , ogaasAccessToken

39− , ogaasUploadType

40− , ogaasName

41− , ogaasCallback

42− ) where

43−

44−import Network.Google.AccessApproval.Types

45−import Network.Google.Prelude

46−

47−-- | A resource alias for @accessapproval.organizations.getAccessApprovalSettings@ method which the

48−-- 'OrganizationsGetAccessApprovalSettings' request conforms to.

49−type OrganizationsGetAccessApprovalSettingsResource =

50− "v1beta1" :>

51− Capture "name" Text :>

52− QueryParam "$.xgafv" Xgafv :>

53− QueryParam "upload_protocol" Text :>

54− QueryParam "access_token" Text :>

55− QueryParam "uploadType" Text :>

56− QueryParam "callback" Text :>

57− QueryParam "alt" AltJSON :>

58− Get '[JSON] AccessApprovalSettings

59−

60−-- | Gets the settings associated with a project, folder, or organization.

61−--

62−-- /See:/ 'organizationsGetAccessApprovalSettings' smart constructor.

63−data OrganizationsGetAccessApprovalSettings =

64− OrganizationsGetAccessApprovalSettings'

65− { _ogaasXgafv :: !(Maybe Xgafv)

66− , _ogaasUploadProtocol :: !(Maybe Text)

67− , _ogaasAccessToken :: !(Maybe Text)

68− , _ogaasUploadType :: !(Maybe Text)

69− , _ogaasName :: !Text

70− , _ogaasCallback :: !(Maybe Text)

71− }

72− deriving (Eq, Show, Data, Typeable, Generic)

73−

74−

75−-- | Creates a value of 'OrganizationsGetAccessApprovalSettings' with the minimum fields required to make a request.

76−--

77−-- Use one of the following lenses to modify other fields as desired:

78−--

79−-- * 'ogaasXgafv'

80−--

81−-- * 'ogaasUploadProtocol'

82−--

83−-- * 'ogaasAccessToken'

84−--

85−-- * 'ogaasUploadType'

86−--

87−-- * 'ogaasName'

88−--

89−-- * 'ogaasCallback'

90−organizationsGetAccessApprovalSettings

91− :: Text -- ^ 'ogaasName'

92− -> OrganizationsGetAccessApprovalSettings

93−organizationsGetAccessApprovalSettings pOgaasName_ =

94− OrganizationsGetAccessApprovalSettings'

95− { _ogaasXgafv = Nothing

96− , _ogaasUploadProtocol = Nothing

97− , _ogaasAccessToken = Nothing

98− , _ogaasUploadType = Nothing

99− , _ogaasName = pOgaasName_

100− , _ogaasCallback = Nothing

101− }

102−

103−

104−-- | V1 error format.

105−ogaasXgafv :: Lens' OrganizationsGetAccessApprovalSettings (Maybe Xgafv)

106−ogaasXgafv

107− = lens _ogaasXgafv (\ s a -> s{_ogaasXgafv = a})

108−

109−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

110−ogaasUploadProtocol :: Lens' OrganizationsGetAccessApprovalSettings (Maybe Text)

111−ogaasUploadProtocol

112− = lens _ogaasUploadProtocol

113− (\ s a -> s{_ogaasUploadProtocol = a})

114−

115−-- | OAuth access token.

116−ogaasAccessToken :: Lens' OrganizationsGetAccessApprovalSettings (Maybe Text)

117−ogaasAccessToken

118− = lens _ogaasAccessToken

119− (\ s a -> s{_ogaasAccessToken = a})

120−

121−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

122−ogaasUploadType :: Lens' OrganizationsGetAccessApprovalSettings (Maybe Text)

123−ogaasUploadType

124− = lens _ogaasUploadType

125− (\ s a -> s{_ogaasUploadType = a})

126−

127−-- | Name of the AccessApprovalSettings to retrieve.

128−ogaasName :: Lens' OrganizationsGetAccessApprovalSettings Text

129−ogaasName

130− = lens _ogaasName (\ s a -> s{_ogaasName = a})

131−

132−-- | JSONP

133−ogaasCallback :: Lens' OrganizationsGetAccessApprovalSettings (Maybe Text)

134−ogaasCallback

135− = lens _ogaasCallback

136− (\ s a -> s{_ogaasCallback = a})

137−

138−instance GoogleRequest

139− OrganizationsGetAccessApprovalSettings

140− where

141− type Rs OrganizationsGetAccessApprovalSettings =

142− AccessApprovalSettings

143− type Scopes OrganizationsGetAccessApprovalSettings =

144− '["https://www.googleapis.com/auth/cloud-platform"]

145− requestClient

146− OrganizationsGetAccessApprovalSettings'{..}

147− = go _ogaasName _ogaasXgafv _ogaasUploadProtocol

148− _ogaasAccessToken

149− _ogaasUploadType

150− _ogaasCallback

151− (Just AltJSON)

152− accessApprovalService

153− where go

154− = buildClient

155− (Proxy ::

156− Proxy OrganizationsGetAccessApprovalSettingsResource)

157− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Organizations/UpdateAccessApprovalSettings.hsdeleted−177

@@ -1,177 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Organizations.UpdateAccessApprovalSettings

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Updates the settings associated with a project, folder, or organization.

24−-- Completely replaces the existing settings.

25−--

26−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.organizations.updateAccessApprovalSettings@.

27−module Network.Google.Resource.AccessApproval.Organizations.UpdateAccessApprovalSettings

28− (

29− -- * REST Resource

30− OrganizationsUpdateAccessApprovalSettingsResource

31−

32− -- * Creating a Request

33− , organizationsUpdateAccessApprovalSettings

34− , OrganizationsUpdateAccessApprovalSettings

35−

36− -- * Request Lenses

37− , ouaasXgafv

38− , ouaasUploadProtocol

39− , ouaasAccessToken

40− , ouaasUploadType

41− , ouaasPayload

42− , ouaasName

43− , ouaasCallback

44− ) where

45−

46−import Network.Google.AccessApproval.Types

47−import Network.Google.Prelude

48−

49−-- | A resource alias for @accessapproval.organizations.updateAccessApprovalSettings@ method which the

50−-- 'OrganizationsUpdateAccessApprovalSettings' request conforms to.

51−type OrganizationsUpdateAccessApprovalSettingsResource

52− =

53− "v1beta1" :>

54− Capture "name" Text :>

55− QueryParam "$.xgafv" Xgafv :>

56− QueryParam "upload_protocol" Text :>

57− QueryParam "access_token" Text :>

58− QueryParam "uploadType" Text :>

59− QueryParam "callback" Text :>

60− QueryParam "alt" AltJSON :>

61− ReqBody '[JSON] AccessApprovalSettings :>

62− Patch '[JSON] AccessApprovalSettings

63−

64−-- | Updates the settings associated with a project, folder, or organization.

65−-- Completely replaces the existing settings.

66−--

67−-- /See:/ 'organizationsUpdateAccessApprovalSettings' smart constructor.

68−data OrganizationsUpdateAccessApprovalSettings =

69− OrganizationsUpdateAccessApprovalSettings'

70− { _ouaasXgafv :: !(Maybe Xgafv)

71− , _ouaasUploadProtocol :: !(Maybe Text)

72− , _ouaasAccessToken :: !(Maybe Text)

73− , _ouaasUploadType :: !(Maybe Text)

74− , _ouaasPayload :: !AccessApprovalSettings

75− , _ouaasName :: !Text

76− , _ouaasCallback :: !(Maybe Text)

77− }

78− deriving (Eq, Show, Data, Typeable, Generic)

79−

80−

81−-- | Creates a value of 'OrganizationsUpdateAccessApprovalSettings' with the minimum fields required to make a request.

82−--

83−-- Use one of the following lenses to modify other fields as desired:

84−--

85−-- * 'ouaasXgafv'

86−--

87−-- * 'ouaasUploadProtocol'

88−--

89−-- * 'ouaasAccessToken'

90−--

91−-- * 'ouaasUploadType'

92−--

93−-- * 'ouaasPayload'

94−--

95−-- * 'ouaasName'

96−--

97−-- * 'ouaasCallback'

98−organizationsUpdateAccessApprovalSettings

99− :: AccessApprovalSettings -- ^ 'ouaasPayload'

100− -> Text -- ^ 'ouaasName'

101− -> OrganizationsUpdateAccessApprovalSettings

102−organizationsUpdateAccessApprovalSettings pOuaasPayload_ pOuaasName_ =

103− OrganizationsUpdateAccessApprovalSettings'

104− { _ouaasXgafv = Nothing

105− , _ouaasUploadProtocol = Nothing

106− , _ouaasAccessToken = Nothing

107− , _ouaasUploadType = Nothing

108− , _ouaasPayload = pOuaasPayload_

109− , _ouaasName = pOuaasName_

110− , _ouaasCallback = Nothing

111− }

112−

113−

114−-- | V1 error format.

115−ouaasXgafv :: Lens' OrganizationsUpdateAccessApprovalSettings (Maybe Xgafv)

116−ouaasXgafv

117− = lens _ouaasXgafv (\ s a -> s{_ouaasXgafv = a})

118−

119−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

120−ouaasUploadProtocol :: Lens' OrganizationsUpdateAccessApprovalSettings (Maybe Text)

121−ouaasUploadProtocol

122− = lens _ouaasUploadProtocol

123− (\ s a -> s{_ouaasUploadProtocol = a})

124−

125−-- | OAuth access token.

126−ouaasAccessToken :: Lens' OrganizationsUpdateAccessApprovalSettings (Maybe Text)

127−ouaasAccessToken

128− = lens _ouaasAccessToken

129− (\ s a -> s{_ouaasAccessToken = a})

130−

131−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

132−ouaasUploadType :: Lens' OrganizationsUpdateAccessApprovalSettings (Maybe Text)

133−ouaasUploadType

134− = lens _ouaasUploadType

135− (\ s a -> s{_ouaasUploadType = a})

136−

137−-- | Multipart request metadata.

138−ouaasPayload :: Lens' OrganizationsUpdateAccessApprovalSettings AccessApprovalSettings

139−ouaasPayload

140− = lens _ouaasPayload (\ s a -> s{_ouaasPayload = a})

141−

142−-- | The resource name of the settings. Format is one of:

143−-- \"projects\/{project_id}\/accessApprovalSettings\"

144−-- \"folders\/{folder_id}\/accessApprovalSettings\"

145−-- \"organizations\/{organization_id}\/accessApprovalSettings\"

146−ouaasName :: Lens' OrganizationsUpdateAccessApprovalSettings Text

147−ouaasName

148− = lens _ouaasName (\ s a -> s{_ouaasName = a})

149−

150−-- | JSONP

151−ouaasCallback :: Lens' OrganizationsUpdateAccessApprovalSettings (Maybe Text)

152−ouaasCallback

153− = lens _ouaasCallback

154− (\ s a -> s{_ouaasCallback = a})

155−

156−instance GoogleRequest

157− OrganizationsUpdateAccessApprovalSettings

158− where

159− type Rs OrganizationsUpdateAccessApprovalSettings =

160− AccessApprovalSettings

161− type Scopes OrganizationsUpdateAccessApprovalSettings

162− = '["https://www.googleapis.com/auth/cloud-platform"]

163− requestClient

164− OrganizationsUpdateAccessApprovalSettings'{..}

165− = go _ouaasName _ouaasXgafv _ouaasUploadProtocol

166− _ouaasAccessToken

167− _ouaasUploadType

168− _ouaasCallback

169− (Just AltJSON)

170− _ouaasPayload

171− accessApprovalService

172− where go

173− = buildClient

174− (Proxy ::

175− Proxy

176− OrganizationsUpdateAccessApprovalSettingsResource)

177− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Projects/ApprovalRequests/Approve.hsdeleted−171

@@ -1,171 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Approve

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Approves a request and returns the updated ApprovalRequest. Returns

24−-- NOT_FOUND if the request does not exist. Returns FAILED_PRECONDITION if

25−-- the request exists but is not in a pending state.

26−--

27−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.projects.approvalRequests.approve@.

28−module Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Approve

29− (

30− -- * REST Resource

31− ProjectsApprovalRequestsApproveResource

32−

33− -- * Creating a Request

34− , projectsApprovalRequestsApprove

35− , ProjectsApprovalRequestsApprove

36−

37− -- * Request Lenses

38− , paraXgafv

39− , paraUploadProtocol

40− , paraAccessToken

41− , paraUploadType

42− , paraPayload

43− , paraName

44− , paraCallback

45− ) where

46−

47−import Network.Google.AccessApproval.Types

48−import Network.Google.Prelude

49−

50−-- | A resource alias for @accessapproval.projects.approvalRequests.approve@ method which the

51−-- 'ProjectsApprovalRequestsApprove' request conforms to.

52−type ProjectsApprovalRequestsApproveResource =

53− "v1beta1" :>

54− CaptureMode "name" "approve" Text :>

55− QueryParam "$.xgafv" Xgafv :>

56− QueryParam "upload_protocol" Text :>

57− QueryParam "access_token" Text :>

58− QueryParam "uploadType" Text :>

59− QueryParam "callback" Text :>

60− QueryParam "alt" AltJSON :>

61− ReqBody '[JSON] ApproveApprovalRequestMessage :>

62− Post '[JSON] ApprovalRequest

63−

64−-- | Approves a request and returns the updated ApprovalRequest. Returns

65−-- NOT_FOUND if the request does not exist. Returns FAILED_PRECONDITION if

66−-- the request exists but is not in a pending state.

67−--

68−-- /See:/ 'projectsApprovalRequestsApprove' smart constructor.

69−data ProjectsApprovalRequestsApprove =

70− ProjectsApprovalRequestsApprove'

71− { _paraXgafv :: !(Maybe Xgafv)

72− , _paraUploadProtocol :: !(Maybe Text)

73− , _paraAccessToken :: !(Maybe Text)

74− , _paraUploadType :: !(Maybe Text)

75− , _paraPayload :: !ApproveApprovalRequestMessage

76− , _paraName :: !Text

77− , _paraCallback :: !(Maybe Text)

78− }

79− deriving (Eq, Show, Data, Typeable, Generic)

80−

81−

82−-- | Creates a value of 'ProjectsApprovalRequestsApprove' with the minimum fields required to make a request.

83−--

84−-- Use one of the following lenses to modify other fields as desired:

85−--

86−-- * 'paraXgafv'

87−--

88−-- * 'paraUploadProtocol'

89−--

90−-- * 'paraAccessToken'

91−--

92−-- * 'paraUploadType'

93−--

94−-- * 'paraPayload'

95−--

96−-- * 'paraName'

97−--

98−-- * 'paraCallback'

99−projectsApprovalRequestsApprove

100− :: ApproveApprovalRequestMessage -- ^ 'paraPayload'

101− -> Text -- ^ 'paraName'

102− -> ProjectsApprovalRequestsApprove

103−projectsApprovalRequestsApprove pParaPayload_ pParaName_ =

104− ProjectsApprovalRequestsApprove'

105− { _paraXgafv = Nothing

106− , _paraUploadProtocol = Nothing

107− , _paraAccessToken = Nothing

108− , _paraUploadType = Nothing

109− , _paraPayload = pParaPayload_

110− , _paraName = pParaName_

111− , _paraCallback = Nothing

112− }

113−

114−

115−-- | V1 error format.

116−paraXgafv :: Lens' ProjectsApprovalRequestsApprove (Maybe Xgafv)

117−paraXgafv

118− = lens _paraXgafv (\ s a -> s{_paraXgafv = a})

119−

120−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

121−paraUploadProtocol :: Lens' ProjectsApprovalRequestsApprove (Maybe Text)

122−paraUploadProtocol

123− = lens _paraUploadProtocol

124− (\ s a -> s{_paraUploadProtocol = a})

125−

126−-- | OAuth access token.

127−paraAccessToken :: Lens' ProjectsApprovalRequestsApprove (Maybe Text)

128−paraAccessToken

129− = lens _paraAccessToken

130− (\ s a -> s{_paraAccessToken = a})

131−

132−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

133−paraUploadType :: Lens' ProjectsApprovalRequestsApprove (Maybe Text)

134−paraUploadType

135− = lens _paraUploadType

136− (\ s a -> s{_paraUploadType = a})

137−

138−-- | Multipart request metadata.

139−paraPayload :: Lens' ProjectsApprovalRequestsApprove ApproveApprovalRequestMessage

140−paraPayload

141− = lens _paraPayload (\ s a -> s{_paraPayload = a})

142−

143−-- | Name of the approval request to approve.

144−paraName :: Lens' ProjectsApprovalRequestsApprove Text

145−paraName = lens _paraName (\ s a -> s{_paraName = a})

146−

147−-- | JSONP

148−paraCallback :: Lens' ProjectsApprovalRequestsApprove (Maybe Text)

149−paraCallback

150− = lens _paraCallback (\ s a -> s{_paraCallback = a})

151−

152−instance GoogleRequest

153− ProjectsApprovalRequestsApprove

154− where

155− type Rs ProjectsApprovalRequestsApprove =

156− ApprovalRequest

157− type Scopes ProjectsApprovalRequestsApprove =

158− '["https://www.googleapis.com/auth/cloud-platform"]

159− requestClient ProjectsApprovalRequestsApprove'{..}

160− = go _paraName _paraXgafv _paraUploadProtocol

161− _paraAccessToken

162− _paraUploadType

163− _paraCallback

164− (Just AltJSON)

165− _paraPayload

166− accessApprovalService

167− where go

168− = buildClient

169− (Proxy ::

170− Proxy ProjectsApprovalRequestsApproveResource)

171− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Projects/ApprovalRequests/Dismiss.hsdeleted−175

@@ -1,175 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Dismiss

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Dismisses a request. Returns the updated ApprovalRequest. NOTE: This

24−-- does not deny access to the resource if another request has been made

25−-- and approved. It is equivalent in effect to ignoring the request

26−-- altogether. Returns NOT_FOUND if the request does not exist. Returns

27−-- FAILED_PRECONDITION if the request exists but is not in a pending state.

28−--

29−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.projects.approvalRequests.dismiss@.

30−module Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Dismiss

31− (

32− -- * REST Resource

33− ProjectsApprovalRequestsDismissResource

34−

35− -- * Creating a Request

36− , projectsApprovalRequestsDismiss

37− , ProjectsApprovalRequestsDismiss

38−

39− -- * Request Lenses

40− , pardXgafv

41− , pardUploadProtocol

42− , pardAccessToken

43− , pardUploadType

44− , pardPayload

45− , pardName

46− , pardCallback

47− ) where

48−

49−import Network.Google.AccessApproval.Types

50−import Network.Google.Prelude

51−

52−-- | A resource alias for @accessapproval.projects.approvalRequests.dismiss@ method which the

53−-- 'ProjectsApprovalRequestsDismiss' request conforms to.

54−type ProjectsApprovalRequestsDismissResource =

55− "v1beta1" :>

56− CaptureMode "name" "dismiss" Text :>

57− QueryParam "$.xgafv" Xgafv :>

58− QueryParam "upload_protocol" Text :>

59− QueryParam "access_token" Text :>

60− QueryParam "uploadType" Text :>

61− QueryParam "callback" Text :>

62− QueryParam "alt" AltJSON :>

63− ReqBody '[JSON] DismissApprovalRequestMessage :>

64− Post '[JSON] ApprovalRequest

65−

66−-- | Dismisses a request. Returns the updated ApprovalRequest. NOTE: This

67−-- does not deny access to the resource if another request has been made

68−-- and approved. It is equivalent in effect to ignoring the request

69−-- altogether. Returns NOT_FOUND if the request does not exist. Returns

70−-- FAILED_PRECONDITION if the request exists but is not in a pending state.

71−--

72−-- /See:/ 'projectsApprovalRequestsDismiss' smart constructor.

73−data ProjectsApprovalRequestsDismiss =

74− ProjectsApprovalRequestsDismiss'

75− { _pardXgafv :: !(Maybe Xgafv)

76− , _pardUploadProtocol :: !(Maybe Text)

77− , _pardAccessToken :: !(Maybe Text)

78− , _pardUploadType :: !(Maybe Text)

79− , _pardPayload :: !DismissApprovalRequestMessage

80− , _pardName :: !Text

81− , _pardCallback :: !(Maybe Text)

82− }

83− deriving (Eq, Show, Data, Typeable, Generic)

84−

85−

86−-- | Creates a value of 'ProjectsApprovalRequestsDismiss' with the minimum fields required to make a request.

87−--

88−-- Use one of the following lenses to modify other fields as desired:

89−--

90−-- * 'pardXgafv'

91−--

92−-- * 'pardUploadProtocol'

93−--

94−-- * 'pardAccessToken'

95−--

96−-- * 'pardUploadType'

97−--

98−-- * 'pardPayload'

99−--

100−-- * 'pardName'

101−--

102−-- * 'pardCallback'

103−projectsApprovalRequestsDismiss

104− :: DismissApprovalRequestMessage -- ^ 'pardPayload'

105− -> Text -- ^ 'pardName'

106− -> ProjectsApprovalRequestsDismiss

107−projectsApprovalRequestsDismiss pPardPayload_ pPardName_ =

108− ProjectsApprovalRequestsDismiss'

109− { _pardXgafv = Nothing

110− , _pardUploadProtocol = Nothing

111− , _pardAccessToken = Nothing

112− , _pardUploadType = Nothing

113− , _pardPayload = pPardPayload_

114− , _pardName = pPardName_

115− , _pardCallback = Nothing

116− }

117−

118−

119−-- | V1 error format.

120−pardXgafv :: Lens' ProjectsApprovalRequestsDismiss (Maybe Xgafv)

121−pardXgafv

122− = lens _pardXgafv (\ s a -> s{_pardXgafv = a})

123−

124−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

125−pardUploadProtocol :: Lens' ProjectsApprovalRequestsDismiss (Maybe Text)

126−pardUploadProtocol

127− = lens _pardUploadProtocol

128− (\ s a -> s{_pardUploadProtocol = a})

129−

130−-- | OAuth access token.

131−pardAccessToken :: Lens' ProjectsApprovalRequestsDismiss (Maybe Text)

132−pardAccessToken

133− = lens _pardAccessToken

134− (\ s a -> s{_pardAccessToken = a})

135−

136−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

137−pardUploadType :: Lens' ProjectsApprovalRequestsDismiss (Maybe Text)

138−pardUploadType

139− = lens _pardUploadType

140− (\ s a -> s{_pardUploadType = a})

141−

142−-- | Multipart request metadata.

143−pardPayload :: Lens' ProjectsApprovalRequestsDismiss DismissApprovalRequestMessage

144−pardPayload

145− = lens _pardPayload (\ s a -> s{_pardPayload = a})

146−

147−-- | Name of the ApprovalRequest to dismiss.

148−pardName :: Lens' ProjectsApprovalRequestsDismiss Text

149−pardName = lens _pardName (\ s a -> s{_pardName = a})

150−

151−-- | JSONP

152−pardCallback :: Lens' ProjectsApprovalRequestsDismiss (Maybe Text)

153−pardCallback

154− = lens _pardCallback (\ s a -> s{_pardCallback = a})

155−

156−instance GoogleRequest

157− ProjectsApprovalRequestsDismiss

158− where

159− type Rs ProjectsApprovalRequestsDismiss =

160− ApprovalRequest

161− type Scopes ProjectsApprovalRequestsDismiss =

162− '["https://www.googleapis.com/auth/cloud-platform"]

163− requestClient ProjectsApprovalRequestsDismiss'{..}

164− = go _pardName _pardXgafv _pardUploadProtocol

165− _pardAccessToken

166− _pardUploadType

167− _pardCallback

168− (Just AltJSON)

169− _pardPayload

170− accessApprovalService

171− where go

172− = buildClient

173− (Proxy ::

174− Proxy ProjectsApprovalRequestsDismissResource)

175− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Projects/ApprovalRequests/Get.hsdeleted−153

@@ -1,153 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Get

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Gets an approval request. Returns NOT_FOUND if the request does not

24−-- exist.

25−--

26−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.projects.approvalRequests.get@.

27−module Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Get

28− (

29− -- * REST Resource

30− ProjectsApprovalRequestsGetResource

31−

32− -- * Creating a Request

33− , projectsApprovalRequestsGet

34− , ProjectsApprovalRequestsGet

35−

36− -- * Request Lenses

37− , pargXgafv

38− , pargUploadProtocol

39− , pargAccessToken

40− , pargUploadType

41− , pargName

42− , pargCallback

43− ) where

44−

45−import Network.Google.AccessApproval.Types

46−import Network.Google.Prelude

47−

48−-- | A resource alias for @accessapproval.projects.approvalRequests.get@ method which the

49−-- 'ProjectsApprovalRequestsGet' request conforms to.

50−type ProjectsApprovalRequestsGetResource =

51− "v1beta1" :>

52− Capture "name" Text :>

53− QueryParam "$.xgafv" Xgafv :>

54− QueryParam "upload_protocol" Text :>

55− QueryParam "access_token" Text :>

56− QueryParam "uploadType" Text :>

57− QueryParam "callback" Text :>

58− QueryParam "alt" AltJSON :>

59− Get '[JSON] ApprovalRequest

60−

61−-- | Gets an approval request. Returns NOT_FOUND if the request does not

62−-- exist.

63−--

64−-- /See:/ 'projectsApprovalRequestsGet' smart constructor.

65−data ProjectsApprovalRequestsGet =

66− ProjectsApprovalRequestsGet'

67− { _pargXgafv :: !(Maybe Xgafv)

68− , _pargUploadProtocol :: !(Maybe Text)

69− , _pargAccessToken :: !(Maybe Text)

70− , _pargUploadType :: !(Maybe Text)

71− , _pargName :: !Text

72− , _pargCallback :: !(Maybe Text)

73− }

74− deriving (Eq, Show, Data, Typeable, Generic)

75−

76−

77−-- | Creates a value of 'ProjectsApprovalRequestsGet' with the minimum fields required to make a request.

78−--

79−-- Use one of the following lenses to modify other fields as desired:

80−--

81−-- * 'pargXgafv'

82−--

83−-- * 'pargUploadProtocol'

84−--

85−-- * 'pargAccessToken'

86−--

87−-- * 'pargUploadType'

88−--

89−-- * 'pargName'

90−--

91−-- * 'pargCallback'

92−projectsApprovalRequestsGet

93− :: Text -- ^ 'pargName'

94− -> ProjectsApprovalRequestsGet

95−projectsApprovalRequestsGet pPargName_ =

96− ProjectsApprovalRequestsGet'

97− { _pargXgafv = Nothing

98− , _pargUploadProtocol = Nothing

99− , _pargAccessToken = Nothing

100− , _pargUploadType = Nothing

101− , _pargName = pPargName_

102− , _pargCallback = Nothing

103− }

104−

105−

106−-- | V1 error format.

107−pargXgafv :: Lens' ProjectsApprovalRequestsGet (Maybe Xgafv)

108−pargXgafv

109− = lens _pargXgafv (\ s a -> s{_pargXgafv = a})

110−

111−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

112−pargUploadProtocol :: Lens' ProjectsApprovalRequestsGet (Maybe Text)

113−pargUploadProtocol

114− = lens _pargUploadProtocol

115− (\ s a -> s{_pargUploadProtocol = a})

116−

117−-- | OAuth access token.

118−pargAccessToken :: Lens' ProjectsApprovalRequestsGet (Maybe Text)

119−pargAccessToken

120− = lens _pargAccessToken

121− (\ s a -> s{_pargAccessToken = a})

122−

123−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

124−pargUploadType :: Lens' ProjectsApprovalRequestsGet (Maybe Text)

125−pargUploadType

126− = lens _pargUploadType

127− (\ s a -> s{_pargUploadType = a})

128−

129−-- | Name of the approval request to retrieve.

130−pargName :: Lens' ProjectsApprovalRequestsGet Text

131−pargName = lens _pargName (\ s a -> s{_pargName = a})

132−

133−-- | JSONP

134−pargCallback :: Lens' ProjectsApprovalRequestsGet (Maybe Text)

135−pargCallback

136− = lens _pargCallback (\ s a -> s{_pargCallback = a})

137−

138−instance GoogleRequest ProjectsApprovalRequestsGet

139− where

140− type Rs ProjectsApprovalRequestsGet = ApprovalRequest

141− type Scopes ProjectsApprovalRequestsGet =

142− '["https://www.googleapis.com/auth/cloud-platform"]

143− requestClient ProjectsApprovalRequestsGet'{..}

144− = go _pargName _pargXgafv _pargUploadProtocol

145− _pargAccessToken

146− _pargUploadType

147− _pargCallback

148− (Just AltJSON)

149− accessApprovalService

150− where go

151− = buildClient

152− (Proxy :: Proxy ProjectsApprovalRequestsGetResource)

153− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Projects/ApprovalRequests/List.hsdeleted−204

@@ -1,204 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.List

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Lists approval requests associated with a project, folder, or

24−-- organization. Approval requests can be filtered by state (pending,

25−-- active, dismissed). The order is reverse chronological.

26−--

27−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.projects.approvalRequests.list@.

28−module Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.List

29− (

30− -- * REST Resource

31− ProjectsApprovalRequestsListResource

32−

33− -- * Creating a Request

34− , projectsApprovalRequestsList

35− , ProjectsApprovalRequestsList

36−

37− -- * Request Lenses

38− , parlParent

39− , parlXgafv

40− , parlUploadProtocol

41− , parlAccessToken

42− , parlUploadType

43− , parlFilter

44− , parlPageToken

45− , parlPageSize

46− , parlCallback

47− ) where

48−

49−import Network.Google.AccessApproval.Types

50−import Network.Google.Prelude

51−

52−-- | A resource alias for @accessapproval.projects.approvalRequests.list@ method which the

53−-- 'ProjectsApprovalRequestsList' request conforms to.

54−type ProjectsApprovalRequestsListResource =

55− "v1beta1" :>

56− Capture "parent" Text :>

57− "approvalRequests" :>

58− QueryParam "$.xgafv" Xgafv :>

59− QueryParam "upload_protocol" Text :>

60− QueryParam "access_token" Text :>

61− QueryParam "uploadType" Text :>

62− QueryParam "filter" Text :>

63− QueryParam "pageToken" Text :>

64− QueryParam "pageSize" (Textual Int32) :>

65− QueryParam "callback" Text :>

66− QueryParam "alt" AltJSON :>

67− Get '[JSON] ListApprovalRequestsResponse

68−

69−-- | Lists approval requests associated with a project, folder, or

70−-- organization. Approval requests can be filtered by state (pending,

71−-- active, dismissed). The order is reverse chronological.

72−--

73−-- /See:/ 'projectsApprovalRequestsList' smart constructor.

74−data ProjectsApprovalRequestsList =

75− ProjectsApprovalRequestsList'

76− { _parlParent :: !Text

77− , _parlXgafv :: !(Maybe Xgafv)

78− , _parlUploadProtocol :: !(Maybe Text)

79− , _parlAccessToken :: !(Maybe Text)

80− , _parlUploadType :: !(Maybe Text)

81− , _parlFilter :: !(Maybe Text)

82− , _parlPageToken :: !(Maybe Text)

83− , _parlPageSize :: !(Maybe (Textual Int32))

84− , _parlCallback :: !(Maybe Text)

85− }

86− deriving (Eq, Show, Data, Typeable, Generic)

87−

88−

89−-- | Creates a value of 'ProjectsApprovalRequestsList' with the minimum fields required to make a request.

90−--

91−-- Use one of the following lenses to modify other fields as desired:

92−--

93−-- * 'parlParent'

94−--

95−-- * 'parlXgafv'

96−--

97−-- * 'parlUploadProtocol'

98−--

99−-- * 'parlAccessToken'

100−--

101−-- * 'parlUploadType'

102−--

103−-- * 'parlFilter'

104−--

105−-- * 'parlPageToken'

106−--

107−-- * 'parlPageSize'

108−--

109−-- * 'parlCallback'

110−projectsApprovalRequestsList

111− :: Text -- ^ 'parlParent'

112− -> ProjectsApprovalRequestsList

113−projectsApprovalRequestsList pParlParent_ =

114− ProjectsApprovalRequestsList'

115− { _parlParent = pParlParent_

116− , _parlXgafv = Nothing

117− , _parlUploadProtocol = Nothing

118− , _parlAccessToken = Nothing

119− , _parlUploadType = Nothing

120− , _parlFilter = Nothing

121− , _parlPageToken = Nothing

122− , _parlPageSize = Nothing

123− , _parlCallback = Nothing

124− }

125−

126−

127−-- | The parent resource. This may be \"projects\/{project_id}\",

128−-- \"folders\/{folder_id}\", or \"organizations\/{organization_id}\".

129−parlParent :: Lens' ProjectsApprovalRequestsList Text

130−parlParent

131− = lens _parlParent (\ s a -> s{_parlParent = a})

132−

133−-- | V1 error format.

134−parlXgafv :: Lens' ProjectsApprovalRequestsList (Maybe Xgafv)

135−parlXgafv

136− = lens _parlXgafv (\ s a -> s{_parlXgafv = a})

137−

138−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

139−parlUploadProtocol :: Lens' ProjectsApprovalRequestsList (Maybe Text)

140−parlUploadProtocol

141− = lens _parlUploadProtocol

142− (\ s a -> s{_parlUploadProtocol = a})

143−

144−-- | OAuth access token.

145−parlAccessToken :: Lens' ProjectsApprovalRequestsList (Maybe Text)

146−parlAccessToken

147− = lens _parlAccessToken

148− (\ s a -> s{_parlAccessToken = a})

149−

150−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

151−parlUploadType :: Lens' ProjectsApprovalRequestsList (Maybe Text)

152−parlUploadType

153− = lens _parlUploadType

154− (\ s a -> s{_parlUploadType = a})

155−

156−-- | A filter on the type of approval requests to retrieve. Must be one of

157−-- the following values:

158−--

159−-- 1. [not set]: Requests that are pending or have active approvals.

160−-- 2. ALL: All requests.

161−-- 3. PENDING: Only pending requests.

162−-- 4. ACTIVE: Only active (i.e. currently approved) requests.

163−-- 5. DISMISSED: Only dismissed (including expired) requests.

164−parlFilter :: Lens' ProjectsApprovalRequestsList (Maybe Text)

165−parlFilter

166− = lens _parlFilter (\ s a -> s{_parlFilter = a})

167−

168−-- | A token identifying the page of results to return.

169−parlPageToken :: Lens' ProjectsApprovalRequestsList (Maybe Text)

170−parlPageToken

171− = lens _parlPageToken

172− (\ s a -> s{_parlPageToken = a})

173−

174−-- | Requested page size.

175−parlPageSize :: Lens' ProjectsApprovalRequestsList (Maybe Int32)

176−parlPageSize

177− = lens _parlPageSize (\ s a -> s{_parlPageSize = a})

178− . mapping _Coerce

179−

180−-- | JSONP

181−parlCallback :: Lens' ProjectsApprovalRequestsList (Maybe Text)

182−parlCallback

183− = lens _parlCallback (\ s a -> s{_parlCallback = a})

184−

185−instance GoogleRequest ProjectsApprovalRequestsList

186− where

187− type Rs ProjectsApprovalRequestsList =

188− ListApprovalRequestsResponse

189− type Scopes ProjectsApprovalRequestsList =

190− '["https://www.googleapis.com/auth/cloud-platform"]

191− requestClient ProjectsApprovalRequestsList'{..}

192− = go _parlParent _parlXgafv _parlUploadProtocol

193− _parlAccessToken

194− _parlUploadType

195− _parlFilter

196− _parlPageToken

197− _parlPageSize

198− _parlCallback

199− (Just AltJSON)

200− accessApprovalService

201− where go

202− = buildClient

203− (Proxy :: Proxy ProjectsApprovalRequestsListResource)

204− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Projects/GetAccessApprovalSettings.hsdeleted−156

@@ -1,156 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Projects.GetAccessApprovalSettings

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Gets the settings associated with a project, folder, or organization.

24−--

25−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.projects.getAccessApprovalSettings@.

26−module Network.Google.Resource.AccessApproval.Projects.GetAccessApprovalSettings

27− (

28− -- * REST Resource

29− ProjectsGetAccessApprovalSettingsResource

30−

31− -- * Creating a Request

32− , projectsGetAccessApprovalSettings

33− , ProjectsGetAccessApprovalSettings

34−

35− -- * Request Lenses

36− , pgaasXgafv

37− , pgaasUploadProtocol

38− , pgaasAccessToken

39− , pgaasUploadType

40− , pgaasName

41− , pgaasCallback

42− ) where

43−

44−import Network.Google.AccessApproval.Types

45−import Network.Google.Prelude

46−

47−-- | A resource alias for @accessapproval.projects.getAccessApprovalSettings@ method which the

48−-- 'ProjectsGetAccessApprovalSettings' request conforms to.

49−type ProjectsGetAccessApprovalSettingsResource =

50− "v1beta1" :>

51− Capture "name" Text :>

52− QueryParam "$.xgafv" Xgafv :>

53− QueryParam "upload_protocol" Text :>

54− QueryParam "access_token" Text :>

55− QueryParam "uploadType" Text :>

56− QueryParam "callback" Text :>

57− QueryParam "alt" AltJSON :>

58− Get '[JSON] AccessApprovalSettings

59−

60−-- | Gets the settings associated with a project, folder, or organization.

61−--

62−-- /See:/ 'projectsGetAccessApprovalSettings' smart constructor.

63−data ProjectsGetAccessApprovalSettings =

64− ProjectsGetAccessApprovalSettings'

65− { _pgaasXgafv :: !(Maybe Xgafv)

66− , _pgaasUploadProtocol :: !(Maybe Text)

67− , _pgaasAccessToken :: !(Maybe Text)

68− , _pgaasUploadType :: !(Maybe Text)

69− , _pgaasName :: !Text

70− , _pgaasCallback :: !(Maybe Text)

71− }

72− deriving (Eq, Show, Data, Typeable, Generic)

73−

74−

75−-- | Creates a value of 'ProjectsGetAccessApprovalSettings' with the minimum fields required to make a request.

76−--

77−-- Use one of the following lenses to modify other fields as desired:

78−--

79−-- * 'pgaasXgafv'

80−--

81−-- * 'pgaasUploadProtocol'

82−--

83−-- * 'pgaasAccessToken'

84−--

85−-- * 'pgaasUploadType'

86−--

87−-- * 'pgaasName'

88−--

89−-- * 'pgaasCallback'

90−projectsGetAccessApprovalSettings

91− :: Text -- ^ 'pgaasName'

92− -> ProjectsGetAccessApprovalSettings

93−projectsGetAccessApprovalSettings pPgaasName_ =

94− ProjectsGetAccessApprovalSettings'

95− { _pgaasXgafv = Nothing

96− , _pgaasUploadProtocol = Nothing

97− , _pgaasAccessToken = Nothing

98− , _pgaasUploadType = Nothing

99− , _pgaasName = pPgaasName_

100− , _pgaasCallback = Nothing

101− }

102−

103−

104−-- | V1 error format.

105−pgaasXgafv :: Lens' ProjectsGetAccessApprovalSettings (Maybe Xgafv)

106−pgaasXgafv

107− = lens _pgaasXgafv (\ s a -> s{_pgaasXgafv = a})

108−

109−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

110−pgaasUploadProtocol :: Lens' ProjectsGetAccessApprovalSettings (Maybe Text)

111−pgaasUploadProtocol

112− = lens _pgaasUploadProtocol

113− (\ s a -> s{_pgaasUploadProtocol = a})

114−

115−-- | OAuth access token.

116−pgaasAccessToken :: Lens' ProjectsGetAccessApprovalSettings (Maybe Text)

117−pgaasAccessToken

118− = lens _pgaasAccessToken

119− (\ s a -> s{_pgaasAccessToken = a})

120−

121−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

122−pgaasUploadType :: Lens' ProjectsGetAccessApprovalSettings (Maybe Text)

123−pgaasUploadType

124− = lens _pgaasUploadType

125− (\ s a -> s{_pgaasUploadType = a})

126−

127−-- | Name of the AccessApprovalSettings to retrieve.

128−pgaasName :: Lens' ProjectsGetAccessApprovalSettings Text

129−pgaasName

130− = lens _pgaasName (\ s a -> s{_pgaasName = a})

131−

132−-- | JSONP

133−pgaasCallback :: Lens' ProjectsGetAccessApprovalSettings (Maybe Text)

134−pgaasCallback

135− = lens _pgaasCallback

136− (\ s a -> s{_pgaasCallback = a})

137−

138−instance GoogleRequest

139− ProjectsGetAccessApprovalSettings

140− where

141− type Rs ProjectsGetAccessApprovalSettings =

142− AccessApprovalSettings

143− type Scopes ProjectsGetAccessApprovalSettings =

144− '["https://www.googleapis.com/auth/cloud-platform"]

145− requestClient ProjectsGetAccessApprovalSettings'{..}

146− = go _pgaasName _pgaasXgafv _pgaasUploadProtocol

147− _pgaasAccessToken

148− _pgaasUploadType

149− _pgaasCallback

150− (Just AltJSON)

151− accessApprovalService

152− where go

153− = buildClient

154− (Proxy ::

155− Proxy ProjectsGetAccessApprovalSettingsResource)

156− mempty

gogol-accessapproval/gen/Network/Google/Resource/AccessApproval/Projects/UpdateAccessApprovalSettings.hsdeleted−175

@@ -1,175 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessApproval.Projects.UpdateAccessApprovalSettings

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Updates the settings associated with a project, folder, or organization.

24−-- Completely replaces the existing settings.

25−--

26−-- /See:/ <https://cloud.google.com/access-approval/docs Access Approval API Reference> for @accessapproval.projects.updateAccessApprovalSettings@.

27−module Network.Google.Resource.AccessApproval.Projects.UpdateAccessApprovalSettings

28− (

29− -- * REST Resource

30− ProjectsUpdateAccessApprovalSettingsResource

31−

32− -- * Creating a Request

33− , projectsUpdateAccessApprovalSettings

34− , ProjectsUpdateAccessApprovalSettings

35−

36− -- * Request Lenses

37− , puaasXgafv

38− , puaasUploadProtocol

39− , puaasAccessToken

40− , puaasUploadType

41− , puaasPayload

42− , puaasName

43− , puaasCallback

44− ) where

45−

46−import Network.Google.AccessApproval.Types

47−import Network.Google.Prelude

48−

49−-- | A resource alias for @accessapproval.projects.updateAccessApprovalSettings@ method which the

50−-- 'ProjectsUpdateAccessApprovalSettings' request conforms to.

51−type ProjectsUpdateAccessApprovalSettingsResource =

52− "v1beta1" :>

53− Capture "name" Text :>

54− QueryParam "$.xgafv" Xgafv :>

55− QueryParam "upload_protocol" Text :>

56− QueryParam "access_token" Text :>

57− QueryParam "uploadType" Text :>

58− QueryParam "callback" Text :>

59− QueryParam "alt" AltJSON :>

60− ReqBody '[JSON] AccessApprovalSettings :>

61− Patch '[JSON] AccessApprovalSettings

62−

63−-- | Updates the settings associated with a project, folder, or organization.

64−-- Completely replaces the existing settings.

65−--

66−-- /See:/ 'projectsUpdateAccessApprovalSettings' smart constructor.

67−data ProjectsUpdateAccessApprovalSettings =

68− ProjectsUpdateAccessApprovalSettings'

69− { _puaasXgafv :: !(Maybe Xgafv)

70− , _puaasUploadProtocol :: !(Maybe Text)

71− , _puaasAccessToken :: !(Maybe Text)

72− , _puaasUploadType :: !(Maybe Text)

73− , _puaasPayload :: !AccessApprovalSettings

74− , _puaasName :: !Text

75− , _puaasCallback :: !(Maybe Text)

76− }

77− deriving (Eq, Show, Data, Typeable, Generic)

78−

79−

80−-- | Creates a value of 'ProjectsUpdateAccessApprovalSettings' with the minimum fields required to make a request.

81−--

82−-- Use one of the following lenses to modify other fields as desired:

83−--

84−-- * 'puaasXgafv'

85−--

86−-- * 'puaasUploadProtocol'

87−--

88−-- * 'puaasAccessToken'

89−--

90−-- * 'puaasUploadType'

91−--

92−-- * 'puaasPayload'

93−--

94−-- * 'puaasName'

95−--

96−-- * 'puaasCallback'

97−projectsUpdateAccessApprovalSettings

98− :: AccessApprovalSettings -- ^ 'puaasPayload'

99− -> Text -- ^ 'puaasName'

100− -> ProjectsUpdateAccessApprovalSettings

101−projectsUpdateAccessApprovalSettings pPuaasPayload_ pPuaasName_ =

102− ProjectsUpdateAccessApprovalSettings'

103− { _puaasXgafv = Nothing

104− , _puaasUploadProtocol = Nothing

105− , _puaasAccessToken = Nothing

106− , _puaasUploadType = Nothing

107− , _puaasPayload = pPuaasPayload_

108− , _puaasName = pPuaasName_

109− , _puaasCallback = Nothing

110− }

111−

112−

113−-- | V1 error format.

114−puaasXgafv :: Lens' ProjectsUpdateAccessApprovalSettings (Maybe Xgafv)

115−puaasXgafv

116− = lens _puaasXgafv (\ s a -> s{_puaasXgafv = a})

117−

118−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

119−puaasUploadProtocol :: Lens' ProjectsUpdateAccessApprovalSettings (Maybe Text)

120−puaasUploadProtocol

121− = lens _puaasUploadProtocol

122− (\ s a -> s{_puaasUploadProtocol = a})

123−

124−-- | OAuth access token.

125−puaasAccessToken :: Lens' ProjectsUpdateAccessApprovalSettings (Maybe Text)

126−puaasAccessToken

127− = lens _puaasAccessToken

128− (\ s a -> s{_puaasAccessToken = a})

129−

130−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

131−puaasUploadType :: Lens' ProjectsUpdateAccessApprovalSettings (Maybe Text)

132−puaasUploadType

133− = lens _puaasUploadType

134− (\ s a -> s{_puaasUploadType = a})

135−

136−-- | Multipart request metadata.

137−puaasPayload :: Lens' ProjectsUpdateAccessApprovalSettings AccessApprovalSettings

138−puaasPayload

139− = lens _puaasPayload (\ s a -> s{_puaasPayload = a})

140−

141−-- | The resource name of the settings. Format is one of:

142−-- \"projects\/{project_id}\/accessApprovalSettings\"

143−-- \"folders\/{folder_id}\/accessApprovalSettings\"

144−-- \"organizations\/{organization_id}\/accessApprovalSettings\"

145−puaasName :: Lens' ProjectsUpdateAccessApprovalSettings Text

146−puaasName

147− = lens _puaasName (\ s a -> s{_puaasName = a})

148−

149−-- | JSONP

150−puaasCallback :: Lens' ProjectsUpdateAccessApprovalSettings (Maybe Text)

151−puaasCallback

152− = lens _puaasCallback

153− (\ s a -> s{_puaasCallback = a})

154−

155−instance GoogleRequest

156− ProjectsUpdateAccessApprovalSettings

157− where

158− type Rs ProjectsUpdateAccessApprovalSettings =

159− AccessApprovalSettings

160− type Scopes ProjectsUpdateAccessApprovalSettings =

161− '["https://www.googleapis.com/auth/cloud-platform"]

162− requestClient

163− ProjectsUpdateAccessApprovalSettings'{..}

164− = go _puaasName _puaasXgafv _puaasUploadProtocol

165− _puaasAccessToken

166− _puaasUploadType

167− _puaasCallback

168− (Just AltJSON)

169− _puaasPayload

170− accessApprovalService

171− where go

172− = buildClient

173− (Proxy ::

174− Proxy ProjectsUpdateAccessApprovalSettingsResource)

175− mempty

gogol-accessapproval/gogol-accessapproval.cabaldeleted−63

@@ -1,63 +0,0 @@

1−name: gogol-accessapproval

2−version: 0.5.0

3−synopsis: Google Access Approval SDK.

4−homepage: https://github.com/brendanhay/gogol

5−bug-reports: https://github.com/brendanhay/gogol/issues

6−license: OtherLicense

7−license-file: LICENSE

8−author: Brendan Hay

9−maintainer: Brendan Hay <brendan.g.hay@gmail.com>

10−copyright: Copyright (c) 2015-2016 Brendan Hay

11−category: Network, Google, Cloud

12−build-type: Simple

13−cabal-version: >= 1.10

14−extra-source-files: README.md src/.gitkeep

15−

16−description:

17− An API for controlling access to data by Google personnel.

18− .

19− /Warning:/ This is an experimental prototype/preview release which is still

20− under exploratory development and not intended for public use, caveat emptor!

21− .

22− This library is compatible with version @v1beta1@

23− of the API.

24−

25−source-repository head

26− type: git

27− location: git://github.com/brendanhay/gogol.git

28−

29−library

30− default-language: Haskell2010

31− hs-source-dirs: src gen

32−

33− ghc-options: -Wall

34−

35− exposed-modules:

36− Network.Google.AccessApproval

37− , Network.Google.AccessApproval.Types

38− , Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Approve

39− , Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Dismiss

40− , Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.Get

41− , Network.Google.Resource.AccessApproval.Folders.ApprovalRequests.List

42− , Network.Google.Resource.AccessApproval.Folders.GetAccessApprovalSettings

43− , Network.Google.Resource.AccessApproval.Folders.UpdateAccessApprovalSettings

44− , Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Approve

45− , Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Dismiss

46− , Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.Get

47− , Network.Google.Resource.AccessApproval.Organizations.ApprovalRequests.List

48− , Network.Google.Resource.AccessApproval.Organizations.GetAccessApprovalSettings

49− , Network.Google.Resource.AccessApproval.Organizations.UpdateAccessApprovalSettings

50− , Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Approve

51− , Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Dismiss

52− , Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.Get

53− , Network.Google.Resource.AccessApproval.Projects.ApprovalRequests.List

54− , Network.Google.Resource.AccessApproval.Projects.GetAccessApprovalSettings

55− , Network.Google.Resource.AccessApproval.Projects.UpdateAccessApprovalSettings

56−

57− other-modules:

58− Network.Google.AccessApproval.Types.Product

59− , Network.Google.AccessApproval.Types.Sum

60−

61− build-depends:

62− gogol-core == 0.5.0.*

63− , base >= 4.7 && < 5

gogol-accesscontextmanager/gen/Network/Google/AccessContextManager.hs+1−33

@@ -75,18 +75,9 @@ module Network.Google.AccessContextManager

7575 -- ** accesscontextmanager.accessPolicies.servicePerimeters.patch

7676 , module Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Patch

7777

78− -- ** accesscontextmanager.operations.cancel

79− , module Network.Google.Resource.AccessContextManager.Operations.Cancel

80−

81− -- ** accesscontextmanager.operations.delete

82− , module Network.Google.Resource.AccessContextManager.Operations.Delete

83−

8478 -- ** accesscontextmanager.operations.get

8579 , module Network.Google.Resource.AccessContextManager.Operations.Get

8680

87− -- ** accesscontextmanager.operations.list

88− , module Network.Google.Resource.AccessContextManager.Operations.List

89−

9081 -- * Types

9182

9283 -- ** Status

@@ -102,16 +93,6 @@ module Network.Google.AccessContextManager

10293 , blConditions

10394 , blCombiningFunction

10495

105− -- ** ListOperationsResponse

106− , ListOperationsResponse

107− , listOperationsResponse

108− , lorNextPageToken

109− , lorOperations

110−

111− -- ** CancelOperationRequest

112− , CancelOperationRequest

113− , cancelOperationRequest

114−

11596 -- ** AccessLevel

11697 , AccessLevel

11798 , accessLevel

@@ -128,6 +109,7 @@ module Network.Google.AccessContextManager

128109 -- ** ServicePerimeterConfig

129110 , ServicePerimeterConfig

130111 , servicePerimeterConfig

112+ , spcUnrestrictedServices

131113 , spcResources

132114 , spcRestrictedServices

133115 , spcAccessLevels

@@ -144,10 +126,6 @@ module Network.Google.AccessContextManager

144126 -- ** ServicePerimeterPerimeterType

145127 , ServicePerimeterPerimeterType (..)

146128

147− -- ** Empty

148− , Empty

149− , empty

150−

151129 -- ** OSConstraintOSType

152130 , OSConstraintOSType (..)

153131

@@ -178,7 +156,6 @@ module Network.Google.AccessContextManager

178156 , osConstraint

179157 , ocOSType

180158 , ocMinimumVersion

181− , ocRequireVerifiedChromeOS

182159

183160 -- ** AccessPolicy

184161 , AccessPolicy

@@ -213,8 +190,6 @@ module Network.Google.AccessContextManager

213190 , DevicePolicy

214191 , devicePolicy

215192 , dpOSConstraints

216− , dpRequireAdminApproval

217− , dpRequireCorpOwned

218193 , dpRequireScreenlock

219194 , dpAllowedEncryptionStatuses

220195 , dpAllowedDeviceManagementLevels

@@ -223,7 +198,6 @@ module Network.Google.AccessContextManager

223198 , Condition

224199 , condition

225200 , cMembers

226− , cRegions

227201 , cNegate

228202 , cIPSubnetworks

229203 , cDevicePolicy

@@ -252,10 +226,7 @@ import Network.Google.Resource.AccessContextManager.AccessPolicies.Ser

252226import Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Get

253227import Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.List

254228import Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Patch

255−import Network.Google.Resource.AccessContextManager.Operations.Cancel

256−import Network.Google.Resource.AccessContextManager.Operations.Delete

257229import Network.Google.Resource.AccessContextManager.Operations.Get

258−import Network.Google.Resource.AccessContextManager.Operations.List

259230

260231{- $resources

261232TODO

@@ -278,7 +249,4 @@ type AccessContextManagerAPI =

278249 :<|> AccessPoliciesGetResource

279250 :<|> AccessPoliciesCreateResource

280251 :<|> AccessPoliciesDeleteResource

281− :<|> OperationsListResource

282252 :<|> OperationsGetResource

283− :<|> OperationsCancelResource

284− :<|> OperationsDeleteResource

gogol-accesscontextmanager/gen/Network/Google/AccessContextManager/Types.hs+3−20

@@ -35,16 +35,6 @@ module Network.Google.AccessContextManager.Types

3535 , blConditions

3636 , blCombiningFunction

3737

38− -- * ListOperationsResponse

39− , ListOperationsResponse

40− , listOperationsResponse

41− , lorNextPageToken

42− , lorOperations

43−

44− -- * CancelOperationRequest

45− , CancelOperationRequest

46− , cancelOperationRequest

47−

4838 -- * AccessLevel

4939 , AccessLevel

5040 , accessLevel

@@ -61,6 +51,7 @@ module Network.Google.AccessContextManager.Types

6151 -- * ServicePerimeterConfig

6252 , ServicePerimeterConfig

6353 , servicePerimeterConfig

54+ , spcUnrestrictedServices

6455 , spcResources

6556 , spcRestrictedServices

6657 , spcAccessLevels

@@ -77,10 +68,6 @@ module Network.Google.AccessContextManager.Types

7768 -- * ServicePerimeterPerimeterType

7869 , ServicePerimeterPerimeterType (..)

7970

80− -- * Empty

81− , Empty

82− , empty

83−

8471 -- * OSConstraintOSType

8572 , OSConstraintOSType (..)

8673

@@ -111,7 +98,6 @@ module Network.Google.AccessContextManager.Types

11198 , osConstraint

11299 , ocOSType

113100 , ocMinimumVersion

114− , ocRequireVerifiedChromeOS

115101

116102 -- * AccessPolicy

117103 , AccessPolicy

@@ -146,8 +132,6 @@ module Network.Google.AccessContextManager.Types

146132 , DevicePolicy

147133 , devicePolicy

148134 , dpOSConstraints

149− , dpRequireAdminApproval

150− , dpRequireCorpOwned

151135 , dpRequireScreenlock

152136 , dpAllowedEncryptionStatuses

153137 , dpAllowedDeviceManagementLevels

@@ -156,7 +140,6 @@ module Network.Google.AccessContextManager.Types

156140 , Condition

157141 , condition

158142 , cMembers

159− , cRegions

160143 , cNegate

161144 , cIPSubnetworks

162145 , cDevicePolicy

@@ -172,11 +155,11 @@ import Network.Google.AccessContextManager.Types.Product

172155import Network.Google.AccessContextManager.Types.Sum

173156import Network.Google.Prelude

174157

175−-- | Default request referring to version 'v1' of the Access Context Manager API. This contains the host and root path used as a starting point for constructing service requests.

158+-- | Default request referring to version 'v1beta' of the Access Context Manager API. This contains the host and root path used as a starting point for constructing service requests.

176159accessContextManagerService :: ServiceConfig

177160accessContextManagerService

178161 = defaultService

179− (ServiceId "accesscontextmanager:v1")

162+ (ServiceId "accesscontextmanager:v1beta")

180163 "accesscontextmanager.googleapis.com"

181164

182165-- | View and manage your data across Google Cloud Platform services

gogol-accesscontextmanager/gen/Network/Google/AccessContextManager/Types/Product.hs+57−185

@@ -174,83 +174,6 @@ instance ToJSON BasicLevel where

174174 [("conditions" .=) <$> _blConditions,

175175 ("combiningFunction" .=) <$> _blCombiningFunction])

176176

177−-- | The response message for Operations.ListOperations.

178−--

179−-- /See:/ 'listOperationsResponse' smart constructor.

180−data ListOperationsResponse =

181− ListOperationsResponse'

182− { _lorNextPageToken :: !(Maybe Text)

183− , _lorOperations :: !(Maybe [Operation])

184− }

185− deriving (Eq, Show, Data, Typeable, Generic)

186−

187−

188−-- | Creates a value of 'ListOperationsResponse' with the minimum fields required to make a request.

189−--

190−-- Use one of the following lenses to modify other fields as desired:

191−--

192−-- * 'lorNextPageToken'

193−--

194−-- * 'lorOperations'

195−listOperationsResponse

196− :: ListOperationsResponse

197−listOperationsResponse =

198− ListOperationsResponse'

199− {_lorNextPageToken = Nothing, _lorOperations = Nothing}

200−

201−

202−-- | The standard List next-page token.

203−lorNextPageToken :: Lens' ListOperationsResponse (Maybe Text)

204−lorNextPageToken

205− = lens _lorNextPageToken

206− (\ s a -> s{_lorNextPageToken = a})

207−

208−-- | A list of operations that matches the specified filter in the request.

209−lorOperations :: Lens' ListOperationsResponse [Operation]

210−lorOperations

211− = lens _lorOperations

212− (\ s a -> s{_lorOperations = a})

213− . _Default

214− . _Coerce

215−

216−instance FromJSON ListOperationsResponse where

217− parseJSON

218− = withObject "ListOperationsResponse"

219− (\ o ->

220− ListOperationsResponse' <$>

221− (o .:? "nextPageToken") <*>

222− (o .:? "operations" .!= mempty))

223−

224−instance ToJSON ListOperationsResponse where

225− toJSON ListOperationsResponse'{..}

226− = object

227− (catMaybes

228− [("nextPageToken" .=) <$> _lorNextPageToken,

229− ("operations" .=) <$> _lorOperations])

230−

231−-- | The request message for Operations.CancelOperation.

232−--

233−-- /See:/ 'cancelOperationRequest' smart constructor.

234−data CancelOperationRequest =

235− CancelOperationRequest'

236− deriving (Eq, Show, Data, Typeable, Generic)

237−

238−

239−-- | Creates a value of 'CancelOperationRequest' with the minimum fields required to make a request.

240−--

241−cancelOperationRequest

242− :: CancelOperationRequest

243−cancelOperationRequest = CancelOperationRequest'

244−

245−

246−instance FromJSON CancelOperationRequest where

247− parseJSON

248− = withObject "CancelOperationRequest"

249− (\ o -> pure CancelOperationRequest')

250−

251−instance ToJSON CancelOperationRequest where

252− toJSON = const emptyObject

253−

254177-- | An \`AccessLevel\` is a label that can be applied to requests to GCP

255178-- services, along with a list of requirements necessary for the label to

256179-- be applied.

@@ -357,9 +280,10 @@ instance ToJSON AccessLevel where

357280-- /See:/ 'servicePerimeterConfig' smart constructor.

358281data ServicePerimeterConfig =

359282 ServicePerimeterConfig'

360− { _spcResources :: !(Maybe [Text])

361− , _spcRestrictedServices :: !(Maybe [Text])

362− , _spcAccessLevels :: !(Maybe [Text])

283+ { _spcUnrestrictedServices :: !(Maybe [Text])

284+ , _spcResources :: !(Maybe [Text])

285+ , _spcRestrictedServices :: !(Maybe [Text])

286+ , _spcAccessLevels :: !(Maybe [Text])

363287 }

364288 deriving (Eq, Show, Data, Typeable, Generic)

365289

@@ -368,6 +292,8 @@ data ServicePerimeterConfig =

368292--

369293-- Use one of the following lenses to modify other fields as desired:

370294--

295+-- * 'spcUnrestrictedServices'

296+--

371297-- * 'spcResources'

372298--

373299-- * 'spcRestrictedServices'

@@ -377,12 +303,32 @@ servicePerimeterConfig

377303 :: ServicePerimeterConfig

378304servicePerimeterConfig =

379305 ServicePerimeterConfig'

380− { _spcResources = Nothing

306+ { _spcUnrestrictedServices = Nothing

307+ , _spcResources = Nothing

381308 , _spcRestrictedServices = Nothing

382309 , _spcAccessLevels = Nothing

383310 }

384311

385312

313+-- | GCP services that are not subject to the Service Perimeter restrictions.

314+-- May contain a list of services or a single wildcard \"*\". For example,

315+-- if \`logging.googleapis.com\` is unrestricted, users can access logs

316+-- inside the perimeter as if the perimeter doesn\'t exist, and it also

317+-- means VMs inside the perimeter can access logs outside the perimeter.

318+-- The wildcard means that unless explicitly specified by

319+-- \"restricted_services\" list, any service is treated as unrestricted.

320+-- One of the fields \"restricted_services\", \"unrestricted_services\"

321+-- must contain a wildcard \"*\", otherwise the Service Perimeter

322+-- specification is invalid. It also means that both field being empty is

323+-- invalid as well. \"unrestricted_services\" can be empty if and only if

324+-- \"restricted_services\" list contains a \"*\" wildcard.

325+spcUnrestrictedServices :: Lens' ServicePerimeterConfig [Text]

326+spcUnrestrictedServices

327+ = lens _spcUnrestrictedServices

328+ (\ s a -> s{_spcUnrestrictedServices = a})

329+ . _Default

330+ . _Coerce

331+

386332-- | A list of GCP resources that are inside of the service perimeter.

387333-- Currently only projects are allowed. Format:

388334-- \`projects\/{project_number}\`

@@ -392,10 +338,17 @@ spcResources

392338 . _Default

393339 . _Coerce

394340

395−-- | GCP services that are subject to the Service Perimeter restrictions. For

396−-- example, if \`storage.googleapis.com\` is specified, access to the

397−-- storage buckets inside the perimeter must meet the perimeter\'s access

398−-- restrictions.

341+-- | GCP services that are subject to the Service Perimeter restrictions. May

342+-- contain a list of services or a single wildcard \"*\". For example, if

343+-- \`storage.googleapis.com\` is specified, access to the storage buckets

344+-- inside the perimeter must meet the perimeter\'s access restrictions.

345+-- Wildcard means that unless explicitly specified by

346+-- \"unrestricted_services\" list, any service is treated as restricted.

347+-- One of the fields \"restricted_services\", \"unrestricted_services\"

348+-- must contain a wildcard \"*\", otherwise the Service Perimeter

349+-- specification is invalid. It also means that both field being empty is

350+-- invalid as well. \"restricted_services\" can be empty if and only if

351+-- \"unrestricted_services\" list contains a \"*\" wildcard.

399352spcRestrictedServices :: Lens' ServicePerimeterConfig [Text]

400353spcRestrictedServices

401354 = lens _spcRestrictedServices

@@ -424,15 +377,18 @@ instance FromJSON ServicePerimeterConfig where

424377 = withObject "ServicePerimeterConfig"

425378 (\ o ->

426379 ServicePerimeterConfig' <$>

427− (o .:? "resources" .!= mempty) <*>

428− (o .:? "restrictedServices" .!= mempty)

380+ (o .:? "unrestrictedServices" .!= mempty) <*>

381+ (o .:? "resources" .!= mempty)

382+ <*> (o .:? "restrictedServices" .!= mempty)

429383 <*> (o .:? "accessLevels" .!= mempty))

430384

431385instance ToJSON ServicePerimeterConfig where

432386 toJSON ServicePerimeterConfig'{..}

433387 = object

434388 (catMaybes

435− [("resources" .=) <$> _spcResources,

389+ [("unrestrictedServices" .=) <$>

390+ _spcUnrestrictedServices,

391+ ("resources" .=) <$> _spcResources,

436392 ("restrictedServices" .=) <$> _spcRestrictedServices,

437393 ("accessLevels" .=) <$> _spcAccessLevels])

438394

@@ -531,31 +487,6 @@ instance ToJSON Operation where

531487 ("name" .=) <$> _oName,

532488 ("metadata" .=) <$> _oMetadata])

533489

534−-- | A generic empty message that you can re-use to avoid defining duplicated

535−-- empty messages in your APIs. A typical example is to use it as the

536−-- request or the response type of an API method. For instance: service Foo

537−-- { rpc Bar(google.protobuf.Empty) returns (google.protobuf.Empty); } The

538−-- JSON representation for \`Empty\` is empty JSON object \`{}\`.

539−--

540−-- /See:/ 'empty' smart constructor.

541−data Empty =

542− Empty'

543− deriving (Eq, Show, Data, Typeable, Generic)

544−

545−

546−-- | Creates a value of 'Empty' with the minimum fields required to make a request.

547−--

548−empty

549− :: Empty

550−empty = Empty'

551−

552−

553−instance FromJSON Empty where

554− parseJSON = withObject "Empty" (\ o -> pure Empty')

555−

556−instance ToJSON Empty where

557− toJSON = const emptyObject

558−

559490-- | \`ServicePerimeter\` describes a set of GCP resources which can freely

560491-- import and export data amongst themselves, but not export outside of the

561492-- \`ServicePerimeter\`. If a request with a source within this

@@ -613,16 +544,17 @@ servicePerimeter =

613544

614545

615546-- | Current ServicePerimeter configuration. Specifies sets of resources,

616−-- restricted services and access levels that determine perimeter content

617−-- and boundaries.

547+-- restricted\/unrestricted services and access levels that determine

548+-- perimeter content and boundaries.

618549spStatus :: Lens' ServicePerimeter (Maybe ServicePerimeterConfig)

619550spStatus = lens _spStatus (\ s a -> s{_spStatus = a})

620551

621552-- | Perimeter type indicator. A single project is allowed to be a member of

622553-- single regular perimeter, but multiple service perimeter bridges. A

623554-- project cannot be a included in a perimeter bridge without being

624−-- included in regular perimeter. For perimeter bridges, the restricted

625−-- service list as well as access level lists must be empty.

555+-- included in regular perimeter. For perimeter bridges,

556+-- restricted\/unrestricted service lists as well as access lists must be

557+-- empty.

626558spPerimeterType :: Lens' ServicePerimeter (Maybe ServicePerimeterPerimeterType)

627559spPerimeterType

628560 = lens _spPerimeterType

@@ -776,9 +708,8 @@ instance ToJSON StatusDetailsItem where

776708-- /See:/ 'osConstraint' smart constructor.

777709data OSConstraint =

778710 OSConstraint'

779− { _ocOSType :: !(Maybe OSConstraintOSType)

780− , _ocMinimumVersion :: !(Maybe Text)

781− , _ocRequireVerifiedChromeOS :: !(Maybe Bool)

711+ { _ocOSType :: !(Maybe OSConstraintOSType)

712+ , _ocMinimumVersion :: !(Maybe Text)

782713 }

783714 deriving (Eq, Show, Data, Typeable, Generic)

784715

@@ -790,16 +721,9 @@ data OSConstraint =

790721-- * 'ocOSType'

791722--

792723-- * 'ocMinimumVersion'

793−--

794−-- * 'ocRequireVerifiedChromeOS'

795724osConstraint

796725 :: OSConstraint

797−osConstraint =

798− OSConstraint'

799− { _ocOSType = Nothing

800− , _ocMinimumVersion = Nothing

801− , _ocRequireVerifiedChromeOS = Nothing

802− }

726+osConstraint = OSConstraint' {_ocOSType = Nothing, _ocMinimumVersion = Nothing}

803727

804728

805729-- | Required. The allowed OS type.

@@ -814,31 +738,19 @@ ocMinimumVersion

814738 = lens _ocMinimumVersion

815739 (\ s a -> s{_ocMinimumVersion = a})

816740

817−-- | Only allows requests from devices with a verified Chrome OS.

818−-- Verifications includes requirements that the device is

819−-- enterprise-managed, conformant to Dasher domain policies, and the caller

820−-- has permission to call the API targeted by the request.

821−ocRequireVerifiedChromeOS :: Lens' OSConstraint (Maybe Bool)

822−ocRequireVerifiedChromeOS

823− = lens _ocRequireVerifiedChromeOS

824− (\ s a -> s{_ocRequireVerifiedChromeOS = a})

825−

826741instance FromJSON OSConstraint where

827742 parseJSON

828743 = withObject "OSConstraint"

829744 (\ o ->

830745 OSConstraint' <$>

831− (o .:? "osType") <*> (o .:? "minimumVersion") <*>

832− (o .:? "requireVerifiedChromeOs"))

746+ (o .:? "osType") <*> (o .:? "minimumVersion"))

833747

834748instance ToJSON OSConstraint where

835749 toJSON OSConstraint'{..}

836750 = object

837751 (catMaybes

838752 [("osType" .=) <$> _ocOSType,

839− ("minimumVersion" .=) <$> _ocMinimumVersion,

840− ("requireVerifiedChromeOs" .=) <$>

841− _ocRequireVerifiedChromeOS])

753+ ("minimumVersion" .=) <$> _ocMinimumVersion])

842754

843755-- | \`AccessPolicy\` is a container for \`AccessLevels\` (which define the

844756-- necessary attributes to use GCP services) and \`ServicePerimeters\`

@@ -1093,8 +1005,6 @@ instance ToJSON OperationMetadata where

10931005data DevicePolicy =

10941006 DevicePolicy'

10951007 { _dpOSConstraints :: !(Maybe [OSConstraint])

1096− , _dpRequireAdminApproval :: !(Maybe Bool)

1097− , _dpRequireCorpOwned :: !(Maybe Bool)

10981008 , _dpRequireScreenlock :: !(Maybe Bool)

10991009 , _dpAllowedEncryptionStatuses :: !(Maybe [Text])

11001010 , _dpAllowedDeviceManagementLevels :: !(Maybe [Text])

@@ -1108,10 +1018,6 @@ data DevicePolicy =

11081018--

11091019-- * 'dpOSConstraints'

11101020--

1111−-- * 'dpRequireAdminApproval'

1112−--

1113−-- * 'dpRequireCorpOwned'

1114−--

11151021-- * 'dpRequireScreenlock'

11161022--

11171023-- * 'dpAllowedEncryptionStatuses'

@@ -1122,8 +1028,6 @@ devicePolicy

11221028devicePolicy =

11231029 DevicePolicy'

11241030 { _dpOSConstraints = Nothing

1125− , _dpRequireAdminApproval = Nothing

1126− , _dpRequireCorpOwned = Nothing

11271031 , _dpRequireScreenlock = Nothing

11281032 , _dpAllowedEncryptionStatuses = Nothing

11291033 , _dpAllowedDeviceManagementLevels = Nothing

@@ -1138,18 +1042,6 @@ dpOSConstraints

11381042 . _Default

11391043 . _Coerce

11401044

1141−-- | Whether the device needs to be approved by the customer admin.

1142−dpRequireAdminApproval :: Lens' DevicePolicy (Maybe Bool)

1143−dpRequireAdminApproval

1144− = lens _dpRequireAdminApproval

1145− (\ s a -> s{_dpRequireAdminApproval = a})

1146−

1147−-- | Whether the device needs to be corp owned.

1148−dpRequireCorpOwned :: Lens' DevicePolicy (Maybe Bool)

1149−dpRequireCorpOwned

1150− = lens _dpRequireCorpOwned

1151− (\ s a -> s{_dpRequireCorpOwned = a})

1152−

11531045-- | Whether or not screenlock is required for the DevicePolicy to be true.

11541046-- Defaults to \`false\`.

11551047dpRequireScreenlock :: Lens' DevicePolicy (Maybe Bool)

@@ -1180,9 +1072,7 @@ instance FromJSON DevicePolicy where

11801072 (\ o ->

11811073 DevicePolicy' <$>

11821074 (o .:? "osConstraints" .!= mempty) <*>

1183− (o .:? "requireAdminApproval")

1184− <*> (o .:? "requireCorpOwned")

1185− <*> (o .:? "requireScreenlock")

1075+ (o .:? "requireScreenlock")

11861076 <*> (o .:? "allowedEncryptionStatuses" .!= mempty)

11871077 <*>

11881078 (o .:? "allowedDeviceManagementLevels" .!= mempty))

@@ -1192,9 +1082,6 @@ instance ToJSON DevicePolicy where

11921082 = object

11931083 (catMaybes

11941084 [("osConstraints" .=) <$> _dpOSConstraints,

1195− ("requireAdminApproval" .=) <$>

1196− _dpRequireAdminApproval,

1197− ("requireCorpOwned" .=) <$> _dpRequireCorpOwned,

11981085 ("requireScreenlock" .=) <$> _dpRequireScreenlock,

11991086 ("allowedEncryptionStatuses" .=) <$>

12001087 _dpAllowedEncryptionStatuses,

@@ -1212,7 +1099,6 @@ instance ToJSON DevicePolicy where

12121099data Condition =

12131100 Condition'

12141101 { _cMembers :: !(Maybe [Text])

1215− , _cRegions :: !(Maybe [Text])

12161102 , _cNegate :: !(Maybe Bool)

12171103 , _cIPSubnetworks :: !(Maybe [Text])

12181104 , _cDevicePolicy :: !(Maybe DevicePolicy)

@@ -1227,8 +1113,6 @@ data Condition =

12271113--

12281114-- * 'cMembers'

12291115--

1230−-- * 'cRegions'

1231−--

12321116-- * 'cNegate'

12331117--

12341118-- * 'cIPSubnetworks'

@@ -1241,7 +1125,6 @@ condition

12411125condition =

12421126 Condition'

12431127 { _cMembers = Nothing

1244− , _cRegions = Nothing

12451128 , _cNegate = Nothing

12461129 , _cIPSubnetworks = Nothing

12471130 , _cDevicePolicy = Nothing

@@ -1259,14 +1142,6 @@ cMembers

12591142 _Default

12601143 . _Coerce

12611144

1262−-- | The request must originate from one of the provided countries\/regions.

1263−-- Must be valid ISO 3166-1 alpha-2 codes.

1264−cRegions :: Lens' Condition [Text]

1265−cRegions

1266− = lens _cRegions (\ s a -> s{_cRegions = a}) .

1267− _Default

1268− . _Coerce

1269−

12701145-- | Whether to negate the Condition. If true, the Condition becomes a NAND

12711146-- over its non-empty fields, each field must be false for the Condition

12721147-- overall to be satisfied. Defaults to false.

@@ -1312,10 +1187,8 @@ instance FromJSON Condition where

13121187 = withObject "Condition"

13131188 (\ o ->

13141189 Condition' <$>

1315− (o .:? "members" .!= mempty) <*>

1316− (o .:? "regions" .!= mempty)

1317− <*> (o .:? "negate")

1318− <*> (o .:? "ipSubnetworks" .!= mempty)

1190+ (o .:? "members" .!= mempty) <*> (o .:? "negate") <*>

1191+ (o .:? "ipSubnetworks" .!= mempty)

13191192 <*> (o .:? "devicePolicy")

13201193 <*> (o .:? "requiredAccessLevels" .!= mempty))

13211194

@@ -1324,7 +1197,6 @@ instance ToJSON Condition where

13241197 = object

13251198 (catMaybes

13261199 [("members" .=) <$> _cMembers,

1327− ("regions" .=) <$> _cRegions,

13281200 ("negate" .=) <$> _cNegate,

13291201 ("ipSubnetworks" .=) <$> _cIPSubnetworks,

13301202 ("devicePolicy" .=) <$> _cDevicePolicy,

gogol-accesscontextmanager/gen/Network/Google/AccessContextManager/Types/Sum.hs+13−2

@@ -55,8 +55,9 @@ instance ToJSON BasicLevelCombiningFunction where

5555-- | Perimeter type indicator. A single project is allowed to be a member of

5656-- single regular perimeter, but multiple service perimeter bridges. A

5757-- project cannot be a included in a perimeter bridge without being

58−-- included in regular perimeter. For perimeter bridges, the restricted

59−-- service list as well as access level lists must be empty.

58+-- included in regular perimeter. For perimeter bridges,

59+-- restricted\/unrestricted service lists as well as access lists must be

60+-- empty.

6061data ServicePerimeterPerimeterType

6162 = PerimeterTypeRegular

6263 -- ^ @PERIMETER_TYPE_REGULAR@

@@ -102,6 +103,12 @@ data OSConstraintOSType

102103 | DesktopChromeOS

103104 -- ^ @DESKTOP_CHROME_OS@

104105 -- A desktop ChromeOS operating system.

106+ | Android

107+ -- ^ @ANDROID@

108+ -- An Android operating system.

109+ | Ios

110+ -- ^ @IOS@

111+ -- An iOS operating system.

105112 deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

106113

107114instance Hashable OSConstraintOSType

@@ -113,6 +120,8 @@ instance FromHttpApiData OSConstraintOSType where

113120 "DESKTOP_WINDOWS" -> Right DesktopWindows

114121 "DESKTOP_LINUX" -> Right DesktopLinux

115122 "DESKTOP_CHROME_OS" -> Right DesktopChromeOS

123+ "ANDROID" -> Right Android

124+ "IOS" -> Right Ios

116125 x -> Left ("Unable to parse OSConstraintOSType from: " <> x)

117126

118127instance ToHttpApiData OSConstraintOSType where

@@ -122,6 +131,8 @@ instance ToHttpApiData OSConstraintOSType where

122131 DesktopWindows -> "DESKTOP_WINDOWS"

123132 DesktopLinux -> "DESKTOP_LINUX"

124133 DesktopChromeOS -> "DESKTOP_CHROME_OS"

134+ Android -> "ANDROID"

135+ Ios -> "IOS"

125136

126137instance FromJSON OSConstraintOSType where

127138 parseJSON = parseJSONText "OSConstraintOSType"

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/AccessLevels/Create.hs+1−1

@@ -51,7 +51,7 @@ import Network.Google.Prelude

5151-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.create@ method which the

5252-- 'AccessPoliciesAccessLevelsCreate' request conforms to.

5353type AccessPoliciesAccessLevelsCreateResource =

54− "v1" :>

54+ "v1beta" :>

5555 Capture "parent" Text :>

5656 "accessLevels" :>

5757 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/AccessLevels/Delete.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

4949-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.delete@ method which the

5050-- 'AccessPoliciesAccessLevelsDelete' request conforms to.

5151type AccessPoliciesAccessLevelsDeleteResource =

52− "v1" :>

52+ "v1beta" :>

5353 Capture "name" Text :>

5454 QueryParam "$.xgafv" Xgafv :>

5555 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/AccessLevels/Get.hs+1−1

@@ -48,7 +48,7 @@ import Network.Google.Prelude

4848-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.get@ method which the

4949-- 'AccessPoliciesAccessLevelsGet' request conforms to.

5050type AccessPoliciesAccessLevelsGetResource =

51− "v1" :>

51+ "v1beta" :>

5252 Capture "name" Text :>

5353 QueryParam "$.xgafv" Xgafv :>

5454 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/AccessLevels/List.hs+1−1

@@ -50,7 +50,7 @@ import Network.Google.Prelude

5050-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.list@ method which the

5151-- 'AccessPoliciesAccessLevelsList' request conforms to.

5252type AccessPoliciesAccessLevelsListResource =

53− "v1" :>

53+ "v1beta" :>

5454 Capture "parent" Text :>

5555 "accessLevels" :>

5656 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/AccessLevels/Patch.hs+1−1

@@ -52,7 +52,7 @@ import Network.Google.Prelude

5252-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.patch@ method which the

5353-- 'AccessPoliciesAccessLevelsPatch' request conforms to.

5454type AccessPoliciesAccessLevelsPatchResource =

55− "v1" :>

55+ "v1beta" :>

5656 Capture "name" Text :>

5757 QueryParam "$.xgafv" Xgafv :>

5858 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/Create.hs+1−1

@@ -51,7 +51,7 @@ import Network.Google.Prelude

5151-- | A resource alias for @accesscontextmanager.accessPolicies.create@ method which the

5252-- 'AccessPoliciesCreate' request conforms to.

5353type AccessPoliciesCreateResource =

54− "v1" :>

54+ "v1beta" :>

5555 "accessPolicies" :>

5656 QueryParam "$.xgafv" Xgafv :>

5757 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/Delete.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

4949-- | A resource alias for @accesscontextmanager.accessPolicies.delete@ method which the

5050-- 'AccessPoliciesDelete' request conforms to.

5151type AccessPoliciesDeleteResource =

52− "v1" :>

52+ "v1beta" :>

5353 Capture "name" Text :>

5454 QueryParam "$.xgafv" Xgafv :>

5555 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/Get.hs+1−1

@@ -47,7 +47,7 @@ import Network.Google.Prelude

4747-- | A resource alias for @accesscontextmanager.accessPolicies.get@ method which the

4848-- 'AccessPoliciesGet' request conforms to.

4949type AccessPoliciesGetResource =

50− "v1" :>

50+ "v1beta" :>

5151 Capture "name" Text :>

5252 QueryParam "$.xgafv" Xgafv :>

5353 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/List.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

4949-- | A resource alias for @accesscontextmanager.accessPolicies.list@ method which the

5050-- 'AccessPoliciesList' request conforms to.

5151type AccessPoliciesListResource =

52− "v1" :>

52+ "v1beta" :>

5353 "accessPolicies" :>

5454 QueryParam "parent" Text :>

5555 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/Patch.hs+1−1

@@ -52,7 +52,7 @@ import Network.Google.Prelude

5252-- | A resource alias for @accesscontextmanager.accessPolicies.patch@ method which the

5353-- 'AccessPoliciesPatch' request conforms to.

5454type AccessPoliciesPatchResource =

55− "v1" :>

55+ "v1beta" :>

5656 Capture "name" Text :>

5757 QueryParam "$.xgafv" Xgafv :>

5858 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/ServicePerimeters/Create.hs+1−1

@@ -51,7 +51,7 @@ import Network.Google.Prelude

5151-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.create@ method which the

5252-- 'AccessPoliciesServicePerimetersCreate' request conforms to.

5353type AccessPoliciesServicePerimetersCreateResource =

54− "v1" :>

54+ "v1beta" :>

5555 Capture "parent" Text :>

5656 "servicePerimeters" :>

5757 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/ServicePerimeters/Delete.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

4949-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.delete@ method which the

5050-- 'AccessPoliciesServicePerimetersDelete' request conforms to.

5151type AccessPoliciesServicePerimetersDeleteResource =

52− "v1" :>

52+ "v1beta" :>

5353 Capture "name" Text :>

5454 QueryParam "$.xgafv" Xgafv :>

5555 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/ServicePerimeters/Get.hs+1−1

@@ -47,7 +47,7 @@ import Network.Google.Prelude

4747-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.get@ method which the

4848-- 'AccessPoliciesServicePerimetersGet' request conforms to.

4949type AccessPoliciesServicePerimetersGetResource =

50− "v1" :>

50+ "v1beta" :>

5151 Capture "name" Text :>

5252 QueryParam "$.xgafv" Xgafv :>

5353 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/ServicePerimeters/List.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

4949-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.list@ method which the

5050-- 'AccessPoliciesServicePerimetersList' request conforms to.

5151type AccessPoliciesServicePerimetersListResource =

52− "v1" :>

52+ "v1beta" :>

5353 Capture "parent" Text :>

5454 "servicePerimeters" :>

5555 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/ServicePerimeters/Patch.hs+1−1

@@ -52,7 +52,7 @@ import Network.Google.Prelude

5252-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.patch@ method which the

5353-- 'AccessPoliciesServicePerimetersPatch' request conforms to.

5454type AccessPoliciesServicePerimetersPatchResource =

55− "v1" :>

55+ "v1beta" :>

5656 Capture "name" Text :>

5757 QueryParam "$.xgafv" Xgafv :>

5858 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/Operations/Cancel.hsdeleted−177

@@ -1,177 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessContextManager.Operations.Cancel

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Starts asynchronous cancellation on a long-running operation. The server

24−-- makes a best effort to cancel the operation, but success is not

25−-- guaranteed. If the server doesn\'t support this method, it returns

26−-- \`google.rpc.Code.UNIMPLEMENTED\`. Clients can use

27−-- Operations.GetOperation or other methods to check whether the

28−-- cancellation succeeded or whether the operation completed despite

29−-- cancellation. On successful cancellation, the operation is not deleted;

30−-- instead, it becomes an operation with an Operation.error value with a

31−-- google.rpc.Status.code of 1, corresponding to \`Code.CANCELLED\`.

32−--

33−-- /See:/ <https://cloud.google.com/access-context-manager/docs/reference/rest/ Access Context Manager API Reference> for @accesscontextmanager.operations.cancel@.

34−module Network.Google.Resource.AccessContextManager.Operations.Cancel

35− (

36− -- * REST Resource

37− OperationsCancelResource

38−

39− -- * Creating a Request

40− , operationsCancel

41− , OperationsCancel

42−

43− -- * Request Lenses

44− , ocXgafv

45− , ocUploadProtocol

46− , ocAccessToken

47− , ocUploadType

48− , ocPayload

49− , ocName

50− , ocCallback

51− ) where

52−

53−import Network.Google.AccessContextManager.Types

54−import Network.Google.Prelude

55−

56−-- | A resource alias for @accesscontextmanager.operations.cancel@ method which the

57−-- 'OperationsCancel' request conforms to.

58−type OperationsCancelResource =

59− "v1" :>

60− CaptureMode "name" "cancel" Text :>

61− QueryParam "$.xgafv" Xgafv :>

62− QueryParam "upload_protocol" Text :>

63− QueryParam "access_token" Text :>

64− QueryParam "uploadType" Text :>

65− QueryParam "callback" Text :>

66− QueryParam "alt" AltJSON :>

67− ReqBody '[JSON] CancelOperationRequest :>

68− Post '[JSON] Empty

69−

70−-- | Starts asynchronous cancellation on a long-running operation. The server

71−-- makes a best effort to cancel the operation, but success is not

72−-- guaranteed. If the server doesn\'t support this method, it returns

73−-- \`google.rpc.Code.UNIMPLEMENTED\`. Clients can use

74−-- Operations.GetOperation or other methods to check whether the

75−-- cancellation succeeded or whether the operation completed despite

76−-- cancellation. On successful cancellation, the operation is not deleted;

77−-- instead, it becomes an operation with an Operation.error value with a

78−-- google.rpc.Status.code of 1, corresponding to \`Code.CANCELLED\`.

79−--

80−-- /See:/ 'operationsCancel' smart constructor.

81−data OperationsCancel =

82− OperationsCancel'

83− { _ocXgafv :: !(Maybe Xgafv)

84− , _ocUploadProtocol :: !(Maybe Text)

85− , _ocAccessToken :: !(Maybe Text)

86− , _ocUploadType :: !(Maybe Text)

87− , _ocPayload :: !CancelOperationRequest

88− , _ocName :: !Text

89− , _ocCallback :: !(Maybe Text)

90− }

91− deriving (Eq, Show, Data, Typeable, Generic)

92−

93−

94−-- | Creates a value of 'OperationsCancel' with the minimum fields required to make a request.

95−--

96−-- Use one of the following lenses to modify other fields as desired:

97−--

98−-- * 'ocXgafv'

99−--

100−-- * 'ocUploadProtocol'

101−--

102−-- * 'ocAccessToken'

103−--

104−-- * 'ocUploadType'

105−--

106−-- * 'ocPayload'

107−--

108−-- * 'ocName'

109−--

110−-- * 'ocCallback'

111−operationsCancel

112− :: CancelOperationRequest -- ^ 'ocPayload'

113− -> Text -- ^ 'ocName'

114− -> OperationsCancel

115−operationsCancel pOcPayload_ pOcName_ =

116− OperationsCancel'

117− { _ocXgafv = Nothing

118− , _ocUploadProtocol = Nothing

119− , _ocAccessToken = Nothing

120− , _ocUploadType = Nothing

121− , _ocPayload = pOcPayload_

122− , _ocName = pOcName_

123− , _ocCallback = Nothing

124− }

125−

126−

127−-- | V1 error format.

128−ocXgafv :: Lens' OperationsCancel (Maybe Xgafv)

129−ocXgafv = lens _ocXgafv (\ s a -> s{_ocXgafv = a})

130−

131−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

132−ocUploadProtocol :: Lens' OperationsCancel (Maybe Text)

133−ocUploadProtocol

134− = lens _ocUploadProtocol

135− (\ s a -> s{_ocUploadProtocol = a})

136−

137−-- | OAuth access token.

138−ocAccessToken :: Lens' OperationsCancel (Maybe Text)

139−ocAccessToken

140− = lens _ocAccessToken

141− (\ s a -> s{_ocAccessToken = a})

142−

143−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

144−ocUploadType :: Lens' OperationsCancel (Maybe Text)

145−ocUploadType

146− = lens _ocUploadType (\ s a -> s{_ocUploadType = a})

147−

148−-- | Multipart request metadata.

149−ocPayload :: Lens' OperationsCancel CancelOperationRequest

150−ocPayload

151− = lens _ocPayload (\ s a -> s{_ocPayload = a})

152−

153−-- | The name of the operation resource to be cancelled.

154−ocName :: Lens' OperationsCancel Text

155−ocName = lens _ocName (\ s a -> s{_ocName = a})

156−

157−-- | JSONP

158−ocCallback :: Lens' OperationsCancel (Maybe Text)

159−ocCallback

160− = lens _ocCallback (\ s a -> s{_ocCallback = a})

161−

162−instance GoogleRequest OperationsCancel where

163− type Rs OperationsCancel = Empty

164− type Scopes OperationsCancel =

165− '["https://www.googleapis.com/auth/cloud-platform"]

166− requestClient OperationsCancel'{..}

167− = go _ocName _ocXgafv _ocUploadProtocol

168− _ocAccessToken

169− _ocUploadType

170− _ocCallback

171− (Just AltJSON)

172− _ocPayload

173− accessContextManagerService

174− where go

175− = buildClient

176− (Proxy :: Proxy OperationsCancelResource)

177− mempty

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/Operations/Delete.hsdeleted−153

@@ -1,153 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessContextManager.Operations.Delete

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Deletes a long-running operation. This method indicates that the client

24−-- is no longer interested in the operation result. It does not cancel the

25−-- operation. If the server doesn\'t support this method, it returns

26−-- \`google.rpc.Code.UNIMPLEMENTED\`.

27−--

28−-- /See:/ <https://cloud.google.com/access-context-manager/docs/reference/rest/ Access Context Manager API Reference> for @accesscontextmanager.operations.delete@.

29−module Network.Google.Resource.AccessContextManager.Operations.Delete

30− (

31− -- * REST Resource

32− OperationsDeleteResource

33−

34− -- * Creating a Request

35− , operationsDelete

36− , OperationsDelete

37−

38− -- * Request Lenses

39− , odXgafv

40− , odUploadProtocol

41− , odAccessToken

42− , odUploadType

43− , odName

44− , odCallback

45− ) where

46−

47−import Network.Google.AccessContextManager.Types

48−import Network.Google.Prelude

49−

50−-- | A resource alias for @accesscontextmanager.operations.delete@ method which the

51−-- 'OperationsDelete' request conforms to.

52−type OperationsDeleteResource =

53− "v1" :>

54− Capture "name" Text :>

55− QueryParam "$.xgafv" Xgafv :>

56− QueryParam "upload_protocol" Text :>

57− QueryParam "access_token" Text :>

58− QueryParam "uploadType" Text :>

59− QueryParam "callback" Text :>

60− QueryParam "alt" AltJSON :> Delete '[JSON] Empty

61−

62−-- | Deletes a long-running operation. This method indicates that the client

63−-- is no longer interested in the operation result. It does not cancel the

64−-- operation. If the server doesn\'t support this method, it returns

65−-- \`google.rpc.Code.UNIMPLEMENTED\`.

66−--

67−-- /See:/ 'operationsDelete' smart constructor.

68−data OperationsDelete =

69− OperationsDelete'

70− { _odXgafv :: !(Maybe Xgafv)

71− , _odUploadProtocol :: !(Maybe Text)

72− , _odAccessToken :: !(Maybe Text)

73− , _odUploadType :: !(Maybe Text)

74− , _odName :: !Text

75− , _odCallback :: !(Maybe Text)

76− }

77− deriving (Eq, Show, Data, Typeable, Generic)

78−

79−

80−-- | Creates a value of 'OperationsDelete' with the minimum fields required to make a request.

81−--

82−-- Use one of the following lenses to modify other fields as desired:

83−--

84−-- * 'odXgafv'

85−--

86−-- * 'odUploadProtocol'

87−--

88−-- * 'odAccessToken'

89−--

90−-- * 'odUploadType'

91−--

92−-- * 'odName'

93−--

94−-- * 'odCallback'

95−operationsDelete

96− :: Text -- ^ 'odName'

97− -> OperationsDelete

98−operationsDelete pOdName_ =

99− OperationsDelete'

100− { _odXgafv = Nothing

101− , _odUploadProtocol = Nothing

102− , _odAccessToken = Nothing

103− , _odUploadType = Nothing

104− , _odName = pOdName_

105− , _odCallback = Nothing

106− }

107−

108−

109−-- | V1 error format.

110−odXgafv :: Lens' OperationsDelete (Maybe Xgafv)

111−odXgafv = lens _odXgafv (\ s a -> s{_odXgafv = a})

112−

113−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

114−odUploadProtocol :: Lens' OperationsDelete (Maybe Text)

115−odUploadProtocol

116− = lens _odUploadProtocol

117− (\ s a -> s{_odUploadProtocol = a})

118−

119−-- | OAuth access token.

120−odAccessToken :: Lens' OperationsDelete (Maybe Text)

121−odAccessToken

122− = lens _odAccessToken

123− (\ s a -> s{_odAccessToken = a})

124−

125−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

126−odUploadType :: Lens' OperationsDelete (Maybe Text)

127−odUploadType

128− = lens _odUploadType (\ s a -> s{_odUploadType = a})

129−

130−-- | The name of the operation resource to be deleted.

131−odName :: Lens' OperationsDelete Text

132−odName = lens _odName (\ s a -> s{_odName = a})

133−

134−-- | JSONP

135−odCallback :: Lens' OperationsDelete (Maybe Text)

136−odCallback

137− = lens _odCallback (\ s a -> s{_odCallback = a})

138−

139−instance GoogleRequest OperationsDelete where

140− type Rs OperationsDelete = Empty

141− type Scopes OperationsDelete =

142− '["https://www.googleapis.com/auth/cloud-platform"]

143− requestClient OperationsDelete'{..}

144− = go _odName _odXgafv _odUploadProtocol

145− _odAccessToken

146− _odUploadType

147− _odCallback

148− (Just AltJSON)

149− accessContextManagerService

150− where go

151− = buildClient

152− (Proxy :: Proxy OperationsDeleteResource)

153− mempty

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/Operations/Get.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

4949-- | A resource alias for @accesscontextmanager.operations.get@ method which the

5050-- 'OperationsGet' request conforms to.

5151type OperationsGetResource =

52− "v1" :>

52+ "v1beta" :>

5353 Capture "name" Text :>

5454 QueryParam "$.xgafv" Xgafv :>

5555 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/Operations/List.hsdeleted−201

@@ -1,201 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AccessContextManager.Operations.List

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Lists operations that match the specified filter in the request. If the

24−-- server doesn\'t support this method, it returns \`UNIMPLEMENTED\`. NOTE:

25−-- the \`name\` binding allows API services to override the binding to use

26−-- different resource name schemes, such as \`users\/*\/operations\`. To

27−-- override the binding, API services can add a binding such as

28−-- \`\"\/v1\/{name=users\/*}\/operations\"\` to their service

29−-- configuration. For backwards compatibility, the default name includes

30−-- the operations collection id, however overriding users must ensure the

31−-- name binding is the parent resource, without the operations collection

32−-- id.

33−--

34−-- /See:/ <https://cloud.google.com/access-context-manager/docs/reference/rest/ Access Context Manager API Reference> for @accesscontextmanager.operations.list@.

35−module Network.Google.Resource.AccessContextManager.Operations.List

36− (

37− -- * REST Resource

38− OperationsListResource

39−

40− -- * Creating a Request

41− , operationsList

42− , OperationsList

43−

44− -- * Request Lenses

45− , olXgafv

46− , olUploadProtocol

47− , olAccessToken

48− , olUploadType

49− , olName

50− , olFilter

51− , olPageToken

52− , olPageSize

53− , olCallback

54− ) where

55−

56−import Network.Google.AccessContextManager.Types

57−import Network.Google.Prelude

58−

59−-- | A resource alias for @accesscontextmanager.operations.list@ method which the

60−-- 'OperationsList' request conforms to.

61−type OperationsListResource =

62− "v1" :>

63− Capture "name" Text :>

64− QueryParam "$.xgafv" Xgafv :>

65− QueryParam "upload_protocol" Text :>

66− QueryParam "access_token" Text :>

67− QueryParam "uploadType" Text :>

68− QueryParam "filter" Text :>

69− QueryParam "pageToken" Text :>

70− QueryParam "pageSize" (Textual Int32) :>

71− QueryParam "callback" Text :>

72− QueryParam "alt" AltJSON :>

73− Get '[JSON] ListOperationsResponse

74−

75−-- | Lists operations that match the specified filter in the request. If the

76−-- server doesn\'t support this method, it returns \`UNIMPLEMENTED\`. NOTE:

77−-- the \`name\` binding allows API services to override the binding to use

78−-- different resource name schemes, such as \`users\/*\/operations\`. To

79−-- override the binding, API services can add a binding such as

80−-- \`\"\/v1\/{name=users\/*}\/operations\"\` to their service

81−-- configuration. For backwards compatibility, the default name includes

82−-- the operations collection id, however overriding users must ensure the

83−-- name binding is the parent resource, without the operations collection

84−-- id.

85−--

86−-- /See:/ 'operationsList' smart constructor.

87−data OperationsList =

88− OperationsList'

89− { _olXgafv :: !(Maybe Xgafv)

90− , _olUploadProtocol :: !(Maybe Text)

91− , _olAccessToken :: !(Maybe Text)

92− , _olUploadType :: !(Maybe Text)

93− , _olName :: !Text

94− , _olFilter :: !(Maybe Text)

95− , _olPageToken :: !(Maybe Text)

96− , _olPageSize :: !(Maybe (Textual Int32))

97− , _olCallback :: !(Maybe Text)

98− }

99− deriving (Eq, Show, Data, Typeable, Generic)

100−

101−

102−-- | Creates a value of 'OperationsList' with the minimum fields required to make a request.

103−--

104−-- Use one of the following lenses to modify other fields as desired:

105−--

106−-- * 'olXgafv'

107−--

108−-- * 'olUploadProtocol'

109−--

110−-- * 'olAccessToken'

111−--

112−-- * 'olUploadType'

113−--

114−-- * 'olName'

115−--

116−-- * 'olFilter'

117−--

118−-- * 'olPageToken'

119−--

120−-- * 'olPageSize'

121−--

122−-- * 'olCallback'

123−operationsList

124− :: Text -- ^ 'olName'

125− -> OperationsList

126−operationsList pOlName_ =

127− OperationsList'

128− { _olXgafv = Nothing

129− , _olUploadProtocol = Nothing

130− , _olAccessToken = Nothing

131− , _olUploadType = Nothing

132− , _olName = pOlName_

133− , _olFilter = Nothing

134− , _olPageToken = Nothing

135− , _olPageSize = Nothing

136− , _olCallback = Nothing

137− }

138−

139−

140−-- | V1 error format.

141−olXgafv :: Lens' OperationsList (Maybe Xgafv)

142−olXgafv = lens _olXgafv (\ s a -> s{_olXgafv = a})

143−

144−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

145−olUploadProtocol :: Lens' OperationsList (Maybe Text)

146−olUploadProtocol

147− = lens _olUploadProtocol

148− (\ s a -> s{_olUploadProtocol = a})

149−

150−-- | OAuth access token.

151−olAccessToken :: Lens' OperationsList (Maybe Text)

152−olAccessToken

153− = lens _olAccessToken

154− (\ s a -> s{_olAccessToken = a})

155−

156−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

157−olUploadType :: Lens' OperationsList (Maybe Text)

158−olUploadType

159− = lens _olUploadType (\ s a -> s{_olUploadType = a})

160−

161−-- | The name of the operation\'s parent resource.

162−olName :: Lens' OperationsList Text

163−olName = lens _olName (\ s a -> s{_olName = a})

164−

165−-- | The standard list filter.

166−olFilter :: Lens' OperationsList (Maybe Text)

167−olFilter = lens _olFilter (\ s a -> s{_olFilter = a})

168−

169−-- | The standard list page token.

170−olPageToken :: Lens' OperationsList (Maybe Text)

171−olPageToken

172− = lens _olPageToken (\ s a -> s{_olPageToken = a})

173−

174−-- | The standard list page size.

175−olPageSize :: Lens' OperationsList (Maybe Int32)

176−olPageSize

177− = lens _olPageSize (\ s a -> s{_olPageSize = a}) .

178− mapping _Coerce

179−

180−-- | JSONP

181−olCallback :: Lens' OperationsList (Maybe Text)

182−olCallback

183− = lens _olCallback (\ s a -> s{_olCallback = a})

184−

185−instance GoogleRequest OperationsList where

186− type Rs OperationsList = ListOperationsResponse

187− type Scopes OperationsList =

188− '["https://www.googleapis.com/auth/cloud-platform"]

189− requestClient OperationsList'{..}

190− = go _olName _olXgafv _olUploadProtocol

191− _olAccessToken

192− _olUploadType

193− _olFilter

194− _olPageToken

195− _olPageSize

196− _olCallback

197− (Just AltJSON)

198− accessContextManagerService

199− where go

200− = buildClient (Proxy :: Proxy OperationsListResource)

201− mempty

gogol-accesscontextmanager/gogol-accesscontextmanager.cabal+1−4

@@ -20,7 +20,7 @@ description:

2020 /Warning:/ This is an experimental prototype/preview release which is still

2121 under exploratory development and not intended for public use, caveat emptor!

2222 .

23− This library is compatible with version @v1@

23+ This library is compatible with version @v1beta@

2424 of the API.

2525

2626source-repository head

@@ -51,10 +51,7 @@ library

5151 , Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Get

5252 , Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.List

5353 , Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Patch

54− , Network.Google.Resource.AccessContextManager.Operations.Cancel

55− , Network.Google.Resource.AccessContextManager.Operations.Delete

5654 , Network.Google.Resource.AccessContextManager.Operations.Get

57− , Network.Google.Resource.AccessContextManager.Operations.List

5855

5956 other-modules:

6057 Network.Google.AccessContextManager.Types.Product

gogol-adexchangebuyer2/gen/Network/Google/AdExchangeBuyer2.hs+6−1

@@ -133,6 +133,9 @@ module Network.Google.AdExchangeBuyer2

133133 -- ** adexchangebuyer2.accounts.publisherProfiles.list

134134 , module Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.List

135135

136+ -- ** adexchangebuyer2.bidders.accounts.creatives.delete

137+ , module Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.Creatives.Delete

138+

136139 -- ** adexchangebuyer2.bidders.accounts.filterSets.bidMetrics.list

137140 , module Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidMetrics.List

138141

@@ -1164,6 +1167,7 @@ import Network.Google.Resource.AdExchangeBuyer2.Accounts.Proposals.Res

11641167import Network.Google.Resource.AdExchangeBuyer2.Accounts.Proposals.Update

11651168import Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.Get

11661169import Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.List

1170+import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.Creatives.Delete

11671171import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidMetrics.List

11681172import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponseErrors.List

11691173import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponsesWithoutBids.List

@@ -1199,7 +1203,8 @@ TODO

11991203

12001204-- | Represents the entirety of the methods and resources available for the Ad Exchange Buyer API II service.

12011205type AdExchangeBuyer2API =

1202− BiddersAccountsFilterSetsFilteredBidRequestsListResource

1206+ BiddersAccountsCreativesDeleteResource :<|>

1207+ BiddersAccountsFilterSetsFilteredBidRequestsListResource

12031208 :<|>

12041209 BiddersAccountsFilterSetsBidResponsesWithoutBidsListResource

12051210 :<|>

gogol-adexchangebuyer2/gen/Network/Google/AdExchangeBuyer2/Types/Product.hs+2−4

@@ -2224,7 +2224,7 @@ instance ToJSON PricePerBuyer where

22242224 ("advertiserIds" .=) <$> _ppbAdvertiserIds,

22252225 ("buyer" .=) <$> _ppbBuyer])

22262226

2227−-- | A creative and its classification data.

2227+-- | A creative and its classification data. Next ID: 40

22282228--

22292229-- /See:/ 'creative' smart constructor.

22302230data Creative =

@@ -2531,9 +2531,7 @@ cOpenAuctionStatus

25312531 = lens _cOpenAuctionStatus

25322532 (\ s a -> s{_cOpenAuctionStatus = a})

25332533

2534−-- | \'OutputOnly The filtering stats for this creative. Deprecated; please

2535−-- use bidders.accounts.filterSets.filteredBids.creatives.list method

2536−-- instead.

2534+-- | \'OutputOnly The filtering stats for this creative.

25372535cFilteringStats :: Lens' Creative (Maybe FilteringStats)

25382536cFilteringStats

25392537 = lens _cFilteringStats

gogol-adexchangebuyer2/gen/Network/Google/AdExchangeBuyer2/Types/Sum.hs−6

@@ -1631,10 +1631,6 @@ data ClientEntityType

16311631 | CETAgency

16321632 -- ^ @AGENCY@

16331633 -- An advertising agency.

1634− | CETEntityTypeUnclassified

1635− -- ^ @ENTITY_TYPE_UNCLASSIFIED@

1636− -- An explicit value for a client that was not yet classified as any

1637− -- particular entity.

16381634 deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

16391635

16401636instance Hashable ClientEntityType

@@ -1645,7 +1641,6 @@ instance FromHttpApiData ClientEntityType where

16451641 "ADVERTISER" -> Right CETAdvertiser

16461642 "BRAND" -> Right CETBrand

16471643 "AGENCY" -> Right CETAgency

1648− "ENTITY_TYPE_UNCLASSIFIED" -> Right CETEntityTypeUnclassified

16491644 x -> Left ("Unable to parse ClientEntityType from: " <> x)

16501645

16511646instance ToHttpApiData ClientEntityType where

@@ -1654,7 +1649,6 @@ instance ToHttpApiData ClientEntityType where

16541649 CETAdvertiser -> "ADVERTISER"

16551650 CETBrand -> "BRAND"

16561651 CETAgency -> "AGENCY"

1657− CETEntityTypeUnclassified -> "ENTITY_TYPE_UNCLASSIFIED"

16581652

16591653instance FromJSON ClientEntityType where

16601654 parseJSON = parseJSONText "ClientEntityType"

gogol-adexchangebuyer2/gen/Network/Google/Resource/AdExchangeBuyer2/Bidders/Accounts/Creatives/Delete.hsnew file+176

@@ -0,0 +1,176 @@

1+{-# LANGUAGE DataKinds #-}

2+{-# LANGUAGE DeriveDataTypeable #-}

3+{-# LANGUAGE DeriveGeneric #-}

4+{-# LANGUAGE FlexibleInstances #-}

5+{-# LANGUAGE NoImplicitPrelude #-}

6+{-# LANGUAGE OverloadedStrings #-}

7+{-# LANGUAGE RecordWildCards #-}

8+{-# LANGUAGE TypeFamilies #-}

9+{-# LANGUAGE TypeOperators #-}

10+

11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14+

15+-- |

16+-- Module : Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.Creatives.Delete

17+-- Copyright : (c) 2015-2016 Brendan Hay

18+-- License : Mozilla Public License, v. 2.0.

19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20+-- Stability : auto-generated

21+-- Portability : non-portable (GHC extensions)

22+--

23+-- Deletes a single creative. A creative is deactivated upon deletion and

24+-- does not count against active snippet quota. A deleted creative should

25+-- not be used in bidding (all bids with that creative will be rejected).

26+--

27+-- /See:/ <https://developers.google.com/authorized-buyers/apis/reference/rest/ Ad Exchange Buyer API II Reference> for @adexchangebuyer2.bidders.accounts.creatives.delete@.

28+module Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.Creatives.Delete

29+ (

30+ -- * REST Resource

31+ BiddersAccountsCreativesDeleteResource

32+

33+ -- * Creating a Request

34+ , biddersAccountsCreativesDelete

35+ , BiddersAccountsCreativesDelete

36+

37+ -- * Request Lenses

38+ , bacdXgafv

39+ , bacdUploadProtocol

40+ , bacdAccessToken

41+ , bacdUploadType

42+ , bacdCreativeId

43+ , bacdOwnerName

44+ , bacdCallback

45+ ) where

46+

47+import Network.Google.AdExchangeBuyer2.Types

48+import Network.Google.Prelude

49+

50+-- | A resource alias for @adexchangebuyer2.bidders.accounts.creatives.delete@ method which the

51+-- 'BiddersAccountsCreativesDelete' request conforms to.

52+type BiddersAccountsCreativesDeleteResource =

53+ "v2beta1" :>

54+ Capture "ownerName" Text :>

55+ "creatives" :>

56+ Capture "creativeId" Text :>

57+ QueryParam "$.xgafv" Xgafv :>

58+ QueryParam "upload_protocol" Text :>

59+ QueryParam "access_token" Text :>

60+ QueryParam "uploadType" Text :>

61+ QueryParam "callback" Text :>

62+ QueryParam "alt" AltJSON :> Delete '[JSON] Empty

63+

64+-- | Deletes a single creative. A creative is deactivated upon deletion and

65+-- does not count against active snippet quota. A deleted creative should

66+-- not be used in bidding (all bids with that creative will be rejected).

67+--

68+-- /See:/ 'biddersAccountsCreativesDelete' smart constructor.

69+data BiddersAccountsCreativesDelete =

70+ BiddersAccountsCreativesDelete'

71+ { _bacdXgafv :: !(Maybe Xgafv)

72+ , _bacdUploadProtocol :: !(Maybe Text)

73+ , _bacdAccessToken :: !(Maybe Text)

74+ , _bacdUploadType :: !(Maybe Text)

75+ , _bacdCreativeId :: !Text

76+ , _bacdOwnerName :: !Text

77+ , _bacdCallback :: !(Maybe Text)

78+ }

79+ deriving (Eq, Show, Data, Typeable, Generic)

80+

81+

82+-- | Creates a value of 'BiddersAccountsCreativesDelete' with the minimum fields required to make a request.

83+--

84+-- Use one of the following lenses to modify other fields as desired:

85+--

86+-- * 'bacdXgafv'

87+--

88+-- * 'bacdUploadProtocol'

89+--

90+-- * 'bacdAccessToken'

91+--

92+-- * 'bacdUploadType'

93+--

94+-- * 'bacdCreativeId'

95+--

96+-- * 'bacdOwnerName'

97+--

98+-- * 'bacdCallback'

99+biddersAccountsCreativesDelete

100+ :: Text -- ^ 'bacdCreativeId'

101+ -> Text -- ^ 'bacdOwnerName'

102+ -> BiddersAccountsCreativesDelete

103+biddersAccountsCreativesDelete pBacdCreativeId_ pBacdOwnerName_ =

104+ BiddersAccountsCreativesDelete'

105+ { _bacdXgafv = Nothing

106+ , _bacdUploadProtocol = Nothing

107+ , _bacdAccessToken = Nothing

108+ , _bacdUploadType = Nothing

109+ , _bacdCreativeId = pBacdCreativeId_

110+ , _bacdOwnerName = pBacdOwnerName_

111+ , _bacdCallback = Nothing

112+ }

113+

114+

115+-- | V1 error format.

116+bacdXgafv :: Lens' BiddersAccountsCreativesDelete (Maybe Xgafv)

117+bacdXgafv

118+ = lens _bacdXgafv (\ s a -> s{_bacdXgafv = a})

119+

120+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

121+bacdUploadProtocol :: Lens' BiddersAccountsCreativesDelete (Maybe Text)

122+bacdUploadProtocol

123+ = lens _bacdUploadProtocol

124+ (\ s a -> s{_bacdUploadProtocol = a})

125+

126+-- | OAuth access token.

127+bacdAccessToken :: Lens' BiddersAccountsCreativesDelete (Maybe Text)

128+bacdAccessToken

129+ = lens _bacdAccessToken

130+ (\ s a -> s{_bacdAccessToken = a})

131+

132+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

133+bacdUploadType :: Lens' BiddersAccountsCreativesDelete (Maybe Text)

134+bacdUploadType

135+ = lens _bacdUploadType

136+ (\ s a -> s{_bacdUploadType = a})

137+

138+-- | The ID of the creative to delete.

139+bacdCreativeId :: Lens' BiddersAccountsCreativesDelete Text

140+bacdCreativeId

141+ = lens _bacdCreativeId

142+ (\ s a -> s{_bacdCreativeId = a})

143+

144+-- | Name of the owner (bidder or account) of the creative to be deleted. For

145+-- example: - For an account-level creative for the buyer account

146+-- representing bidder 123: \`bidders\/123\/accounts\/123\` - For an

147+-- account-level creative for the child seat buyer account 456 whose bidder

148+-- is 123: \`bidders\/123\/accounts\/456\`

149+bacdOwnerName :: Lens' BiddersAccountsCreativesDelete Text

150+bacdOwnerName

151+ = lens _bacdOwnerName

152+ (\ s a -> s{_bacdOwnerName = a})

153+

154+-- | JSONP

155+bacdCallback :: Lens' BiddersAccountsCreativesDelete (Maybe Text)

156+bacdCallback

157+ = lens _bacdCallback (\ s a -> s{_bacdCallback = a})

158+

159+instance GoogleRequest BiddersAccountsCreativesDelete

160+ where

161+ type Rs BiddersAccountsCreativesDelete = Empty

162+ type Scopes BiddersAccountsCreativesDelete =

163+ '["https://www.googleapis.com/auth/adexchange.buyer"]

164+ requestClient BiddersAccountsCreativesDelete'{..}

165+ = go _bacdOwnerName _bacdCreativeId _bacdXgafv

166+ _bacdUploadProtocol

167+ _bacdAccessToken

168+ _bacdUploadType

169+ _bacdCallback

170+ (Just AltJSON)

171+ adExchangeBuyer2Service

172+ where go

173+ = buildClient

174+ (Proxy ::

175+ Proxy BiddersAccountsCreativesDeleteResource)

176+ mempty

gogol-adexchangebuyer2/gogol-adexchangebuyer2.cabal+1

@@ -71,6 +71,7 @@ library

7171 , Network.Google.Resource.AdExchangeBuyer2.Accounts.Proposals.Update

7272 , Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.Get

7373 , Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.List

74+ , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.Creatives.Delete

7475 , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidMetrics.List

7576 , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponseErrors.List

7677 , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponsesWithoutBids.List

gogol-admin-directory/gen/Network/Google/Directory.hs+2

@@ -899,9 +899,11 @@ module Network.Google.Directory

899899 , useIncludeInGlobalAddressList

900900 , useGender

901901 , usePhones

902+ , useRecoveryEmail

902903 , useName

903904 , usePassword

904905 , useEmails

906+ , useRecoveryPhone

905907 , useIms

906908 , useKeywords

907909 , useIsAdmin

gogol-admin-directory/gen/Network/Google/Directory/Types.hs+2

@@ -550,9 +550,11 @@ module Network.Google.Directory.Types

550550 , useIncludeInGlobalAddressList

551551 , useGender

552552 , usePhones

553+ , useRecoveryEmail

553554 , useName

554555 , usePassword

555556 , useEmails

557+ , useRecoveryPhone

556558 , useIms

557559 , useKeywords

558560 , useIsAdmin

gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+66−6

@@ -2552,24 +2552,38 @@ buildingAddress =

25522552

25532553

25542554-- | Optional. BCP-47 language code of the contents of this address (if

2555−-- known).

2555+-- known). This is often the UI language of the input form or is expected

2556+-- to match one of the languages used in the address\' country\/region, or

2557+-- their transliterated equivalents. This can affect formatting in certain

2558+-- countries, but is not critical to the correctness of the data and will

2559+-- never affect any validation or other non-formatting related operations.

2560+-- If this value is not known, it should be omitted (rather than specifying

2561+-- a possibly incorrect default). Examples: \"zh-Hant\", \"ja\",

2562+-- \"ja-Latn\", \"en\".

25562563baLanguageCode :: Lens' BuildingAddress (Maybe Text)

25572564baLanguageCode

25582565 = lens _baLanguageCode

25592566 (\ s a -> s{_baLanguageCode = a})

25602567

2561−-- | Required. CLDR region code of the country\/region of the address.

2568+-- | Required. CLDR region code of the country\/region of the address. This

2569+-- is never inferred and it is up to the user to ensure the value is

2570+-- correct. See http:\/\/cldr.unicode.org\/ and

2571+-- http:\/\/www.unicode.org\/cldr\/charts\/30\/supplemental\/territory_information.html

25622572baRegionCode :: Lens' BuildingAddress (Maybe Text)

25632573baRegionCode

25642574 = lens _baRegionCode (\ s a -> s{_baRegionCode = a})

25652575

2566−-- | Optional. Sublocality of the address.

2576+-- | Optional. Sublocality of the address. For example, this can be

2577+-- neighborhoods, boroughs, districts.

25672578baSublocality :: Lens' BuildingAddress (Maybe Text)

25682579baSublocality

25692580 = lens _baSublocality

25702581 (\ s a -> s{_baSublocality = a})

25712582

2572−-- | Optional. Postal code of the address.

2583+-- | Optional. Postal code of the address. Not all countries use or require

2584+-- postal codes to be present, but where they are used, they may trigger

2585+-- additional validation with other parts of the address (e.g. state\/zip

2586+-- validation in the U.S.A.).

25732587baPostalCode :: Lens' BuildingAddress (Maybe Text)

25742588baPostalCode

25752589 = lens _baPostalCode (\ s a -> s{_baPostalCode = a})

@@ -2583,13 +2597,34 @@ baLocality

25832597 = lens _baLocality (\ s a -> s{_baLocality = a})

25842598

25852599-- | Optional. Highest administrative subdivision which is used for postal

2586−-- addresses of a country or region.

2600+-- addresses of a country or region. For example, this can be a state, a

2601+-- province, an oblast, or a prefecture. Specifically, for Spain this is

2602+-- the province and not the autonomous community (e.g. \"Barcelona\" and

2603+-- not \"Catalonia\"). Many countries don\'t use an administrative area in

2604+-- postal addresses. E.g. in Switzerland this should be left unpopulated.

25872605baAdministrativeArea :: Lens' BuildingAddress (Maybe Text)

25882606baAdministrativeArea

25892607 = lens _baAdministrativeArea

25902608 (\ s a -> s{_baAdministrativeArea = a})

25912609

25922610-- | Unstructured address lines describing the lower levels of an address.

2611+-- Because values in addressLines do not have type information and may

2612+-- sometimes contain multiple values in a single field (e.g. \"Austin,

2613+-- TX\"), it is important that the line order is clear. The order of

2614+-- address lines should be \"envelope order\" for the country\/region of

2615+-- the address. In places where this can vary (e.g. Japan),

2616+-- address_language is used to make it explicit (e.g. \"ja\" for

2617+-- large-to-small ordering and \"ja-Latn\" or \"en\" for small-to-large).

2618+-- This way, the most specific line of an address can be selected based on

2619+-- the language. The minimum permitted structural representation of an

2620+-- address consists of a regionCode with all remaining information placed

2621+-- in the addressLines. It would be possible to format such an address very

2622+-- approximately without geocoding, but no semantic reasoning could be made

2623+-- about any of the address components until it was at least partially

2624+-- resolved. Creating an address only containing a regionCode and

2625+-- addressLines, and then geocoding is the recommended way to handle

2626+-- completely unstructured addresses (as opposed to guessing which parts of

2627+-- the address should be localities or administrative areas).

25932628baAddressLines :: Lens' BuildingAddress [Text]

25942629baAddressLines

25952630 = lens _baAddressLines

@@ -4196,9 +4231,11 @@ data User =

41964231 , _useIncludeInGlobalAddressList :: !(Maybe Bool)

41974232 , _useGender :: !(Maybe JSONValue)

41984233 , _usePhones :: !(Maybe JSONValue)

4234+ , _useRecoveryEmail :: !(Maybe Text)

41994235 , _useName :: !(Maybe UserName)

42004236 , _usePassword :: !(Maybe Text)

42014237 , _useEmails :: !(Maybe JSONValue)

4238+ , _useRecoveryPhone :: !(Maybe Text)

42024239 , _useIms :: !(Maybe JSONValue)

42034240 , _useKeywords :: !(Maybe JSONValue)

42044241 , _useIsAdmin :: !(Maybe Bool)

@@ -4274,12 +4311,16 @@ data User =

42744311--

42754312-- * 'usePhones'

42764313--

4314+-- * 'useRecoveryEmail'

4315+--

42774316-- * 'useName'

42784317--

42794318-- * 'usePassword'

42804319--

42814320-- * 'useEmails'

42824321--

4322+-- * 'useRecoveryPhone'

4323+--

42834324-- * 'useIms'

42844325--

42854326-- * 'useKeywords'

@@ -4339,9 +4380,11 @@ user =

43394380 , _useIncludeInGlobalAddressList = Nothing

43404381 , _useGender = Nothing

43414382 , _usePhones = Nothing

4383+ , _useRecoveryEmail = Nothing

43424384 , _useName = Nothing

43434385 , _usePassword = Nothing

43444386 , _useEmails = Nothing

4387+ , _useRecoveryPhone = Nothing

43454388 , _useIms = Nothing

43464389 , _useKeywords = Nothing

43474390 , _useIsAdmin = Nothing

@@ -4501,6 +4544,12 @@ usePhones :: Lens' User (Maybe JSONValue)

45014544usePhones

45024545 = lens _usePhones (\ s a -> s{_usePhones = a})

45034546

4547+-- | Recovery email of the user.

4548+useRecoveryEmail :: Lens' User (Maybe Text)

4549+useRecoveryEmail

4550+ = lens _useRecoveryEmail

4551+ (\ s a -> s{_useRecoveryEmail = a})

4552+

45044553-- | User\'s name

45054554useName :: Lens' User (Maybe UserName)

45064555useName = lens _useName (\ s a -> s{_useName = a})

@@ -4514,6 +4563,12 @@ useEmails :: Lens' User (Maybe JSONValue)

45144563useEmails

45154564 = lens _useEmails (\ s a -> s{_useEmails = a})

45164565

4566+-- | Recovery phone of the user.

4567+useRecoveryPhone :: Lens' User (Maybe Text)

4568+useRecoveryPhone

4569+ = lens _useRecoveryPhone

4570+ (\ s a -> s{_useRecoveryPhone = a})

4571+

45174572useIms :: Lens' User (Maybe JSONValue)

45184573useIms = lens _useIms (\ s a -> s{_useIms = a})

45194574

@@ -4619,9 +4674,11 @@ instance FromJSON User where

46194674 <*> (o .:? "includeInGlobalAddressList")

46204675 <*> (o .:? "gender")

46214676 <*> (o .:? "phones")

4677+ <*> (o .:? "recoveryEmail")

46224678 <*> (o .:? "name")

46234679 <*> (o .:? "password")

46244680 <*> (o .:? "emails")

4681+ <*> (o .:? "recoveryPhone")

46254682 <*> (o .:? "ims")

46264683 <*> (o .:? "keywords")

46274684 <*> (o .:? "isAdmin")

@@ -4670,9 +4727,12 @@ instance ToJSON User where

46704727 _useIncludeInGlobalAddressList,

46714728 ("gender" .=) <$> _useGender,

46724729 ("phones" .=) <$> _usePhones,

4730+ ("recoveryEmail" .=) <$> _useRecoveryEmail,

46734731 ("name" .=) <$> _useName,

46744732 ("password" .=) <$> _usePassword,

4675− ("emails" .=) <$> _useEmails, ("ims" .=) <$> _useIms,

4733+ ("emails" .=) <$> _useEmails,

4734+ ("recoveryPhone" .=) <$> _useRecoveryPhone,

4735+ ("ims" .=) <$> _useIms,

46764736 ("keywords" .=) <$> _useKeywords,

46774737 ("isAdmin" .=) <$> _useIsAdmin,

46784738 ("isEnrolledIn2Sv" .=) <$> _useIsEnrolledIn2Sv,

gogol-alertcenter/gen/Network/Google/AlertCenter.hs+12−17

@@ -127,22 +127,6 @@ module Network.Google.AlertCenter

127127 , notification

128128 , nCloudPubsubTopic

129129

130− -- ** ActivityRule

131− , ActivityRule

132− , activityRule

133− , arSupersededAlerts

134− , arActionNames

135− , arSupersedingAlert

136− , arTriggerSource

137− , arWindowSize

138− , arUpdateTime

139− , arName

140− , arThreshold

141− , arQuery

142− , arDisplayName

143− , arDescription

144− , arCreateTime

145−

146130 -- ** AccountWarning

147131 , AccountWarning

148132 , accountWarning

@@ -199,7 +183,6 @@ module Network.Google.AlertCenter

199183 , aAlertId

200184 , aSecurityInvestigationToolLink

201185 , aCustomerId

202− , aUpdateTime

203186 , aEndTime

204187 , aSource

205188 , aDeleted

@@ -211,6 +194,13 @@ module Network.Google.AlertCenter

211194 , attachment

212195 , aCSV

213196

197+ -- ** RequestInfo

198+ , RequestInfo

199+ , requestInfo

200+ , riNumberOfRequests

201+ , riAppDeveloperEmail

202+ , riAppName

203+

214204 -- ** GoogleOperations

215205 , GoogleOperations

216206 , googleOperations

@@ -231,6 +221,11 @@ module Network.Google.AlertCenter

231221 -- ** Xgafv

232222 , Xgafv (..)

233223

224+ -- ** AppMakerSQLSetupNotification

225+ , AppMakerSQLSetupNotification

226+ , appMakerSQLSetupNotification

227+ , amsqlsnRequestInfo

228+

234229 -- ** DomainWideTakeoutInitiated

235230 , DomainWideTakeoutInitiated

236231 , domainWideTakeoutInitiated

gogol-alertcenter/gen/Network/Google/AlertCenter/Types.hs+12−17

@@ -94,22 +94,6 @@ module Network.Google.AlertCenter.Types

9494 , notification

9595 , nCloudPubsubTopic

9696

97− -- * ActivityRule

98− , ActivityRule

99− , activityRule

100− , arSupersededAlerts

101− , arActionNames

102− , arSupersedingAlert

103− , arTriggerSource

104− , arWindowSize

105− , arUpdateTime

106− , arName

107− , arThreshold

108− , arQuery

109− , arDisplayName

110− , arDescription

111− , arCreateTime

112−

11397 -- * AccountWarning

11498 , AccountWarning

11599 , accountWarning

@@ -166,7 +150,6 @@ module Network.Google.AlertCenter.Types

166150 , aAlertId

167151 , aSecurityInvestigationToolLink

168152 , aCustomerId

169− , aUpdateTime

170153 , aEndTime

171154 , aSource

172155 , aDeleted

@@ -178,6 +161,13 @@ module Network.Google.AlertCenter.Types

178161 , attachment

179162 , aCSV

180163

164+ -- * RequestInfo

165+ , RequestInfo

166+ , requestInfo

167+ , riNumberOfRequests

168+ , riAppDeveloperEmail

169+ , riAppName

170+

181171 -- * GoogleOperations

182172 , GoogleOperations

183173 , googleOperations

@@ -198,6 +188,11 @@ module Network.Google.AlertCenter.Types

198188 -- * Xgafv

199189 , Xgafv (..)

200190

191+ -- * AppMakerSQLSetupNotification

192+ , AppMakerSQLSetupNotification

193+ , appMakerSQLSetupNotification

194+ , amsqlsnRequestInfo

195+

201196 -- * DomainWideTakeoutInitiated

202197 , DomainWideTakeoutInitiated

203198 , domainWideTakeoutInitiated

gogol-alertcenter/gen/Network/Google/AlertCenter/Types/Product.hs+113−191

@@ -644,184 +644,6 @@ instance ToJSON Notification where

644644 (catMaybes

645645 [("cloudPubsubTopic" .=) <$> _nCloudPubsubTopic])

646646

647−-- | Alerts from G Suite Security Center rules service configured by admin.

648−--

649−-- /See:/ 'activityRule' smart constructor.

650−data ActivityRule =

651− ActivityRule'

652− { _arSupersededAlerts :: !(Maybe [Text])

653− , _arActionNames :: !(Maybe [Text])

654− , _arSupersedingAlert :: !(Maybe Text)

655− , _arTriggerSource :: !(Maybe Text)

656− , _arWindowSize :: !(Maybe GDuration)

657− , _arUpdateTime :: !(Maybe DateTime')

658− , _arName :: !(Maybe Text)

659− , _arThreshold :: !(Maybe Text)

660− , _arQuery :: !(Maybe Text)

661− , _arDisplayName :: !(Maybe Text)

662− , _arDescription :: !(Maybe Text)

663− , _arCreateTime :: !(Maybe DateTime')

664− }

665− deriving (Eq, Show, Data, Typeable, Generic)

666−

667−

668−-- | Creates a value of 'ActivityRule' with the minimum fields required to make a request.

669−--

670−-- Use one of the following lenses to modify other fields as desired:

671−--

672−-- * 'arSupersededAlerts'

673−--

674−-- * 'arActionNames'

675−--

676−-- * 'arSupersedingAlert'

677−--

678−-- * 'arTriggerSource'

679−--

680−-- * 'arWindowSize'

681−--

682−-- * 'arUpdateTime'

683−--

684−-- * 'arName'

685−--

686−-- * 'arThreshold'

687−--

688−-- * 'arQuery'

689−--

690−-- * 'arDisplayName'

691−--

692−-- * 'arDescription'

693−--

694−-- * 'arCreateTime'

695−activityRule

696− :: ActivityRule

697−activityRule =

698− ActivityRule'

699− { _arSupersededAlerts = Nothing

700− , _arActionNames = Nothing

701− , _arSupersedingAlert = Nothing

702− , _arTriggerSource = Nothing

703− , _arWindowSize = Nothing

704− , _arUpdateTime = Nothing

705− , _arName = Nothing

706− , _arThreshold = Nothing

707− , _arQuery = Nothing

708− , _arDisplayName = Nothing

709− , _arDescription = Nothing

710− , _arCreateTime = Nothing

711− }

712−

713−

714−-- | List of alert ids superseded by this alert. It is used to indicate that

715−-- this alert is essentially extension of superseded alerts and we found

716−-- the relationship after creating these alerts.

717−arSupersededAlerts :: Lens' ActivityRule [Text]

718−arSupersededAlerts

719− = lens _arSupersededAlerts

720− (\ s a -> s{_arSupersededAlerts = a})

721− . _Default

722− . _Coerce

723−

724−-- | List of action names associated with the rule threshold.

725−arActionNames :: Lens' ActivityRule [Text]

726−arActionNames

727− = lens _arActionNames

728− (\ s a -> s{_arActionNames = a})

729− . _Default

730− . _Coerce

731−

732−-- | Alert id superseding this alert. It is used to indicate that superseding

733−-- alert is essentially extension of this alert and we found the

734−-- relationship after creating both alerts.

735−arSupersedingAlert :: Lens' ActivityRule (Maybe Text)

736−arSupersedingAlert

737− = lens _arSupersedingAlert

738− (\ s a -> s{_arSupersedingAlert = a})

739−

740−-- | The trigger sources for this rule. * GMAIL_EVENTS * DEVICE_EVENTS *

741−-- USER_EVENTS

742−arTriggerSource :: Lens' ActivityRule (Maybe Text)

743−arTriggerSource

744− = lens _arTriggerSource

745− (\ s a -> s{_arTriggerSource = a})

746−

747−-- | Rule window size. Possible values are 1 hour or 24 hours.

748−arWindowSize :: Lens' ActivityRule (Maybe Scientific)

749−arWindowSize

750− = lens _arWindowSize (\ s a -> s{_arWindowSize = a})

751− . mapping _GDuration

752−

753−-- | The timestamp of the last update to the rule.

754−arUpdateTime :: Lens' ActivityRule (Maybe UTCTime)

755−arUpdateTime

756− = lens _arUpdateTime (\ s a -> s{_arUpdateTime = a})

757− . mapping _DateTime

758−

759−-- | Rule name.

760−arName :: Lens' ActivityRule (Maybe Text)

761−arName = lens _arName (\ s a -> s{_arName = a})

762−

763−-- | Alert threshold is for example “COUNT > 5”.

764−arThreshold :: Lens' ActivityRule (Maybe Text)

765−arThreshold

766− = lens _arThreshold (\ s a -> s{_arThreshold = a})

767−

768−-- | Query that is used to get the data from the associated source.

769−arQuery :: Lens' ActivityRule (Maybe Text)

770−arQuery = lens _arQuery (\ s a -> s{_arQuery = a})

771−

772−-- | Alert display name.

773−arDisplayName :: Lens' ActivityRule (Maybe Text)

774−arDisplayName

775− = lens _arDisplayName

776− (\ s a -> s{_arDisplayName = a})

777−

778−-- | Description of the rule.

779−arDescription :: Lens' ActivityRule (Maybe Text)

780−arDescription

781− = lens _arDescription

782− (\ s a -> s{_arDescription = a})

783−

784−-- | Rule create timestamp.

785−arCreateTime :: Lens' ActivityRule (Maybe UTCTime)

786−arCreateTime

787− = lens _arCreateTime (\ s a -> s{_arCreateTime = a})

788− . mapping _DateTime

789−

790−instance FromJSON ActivityRule where

791− parseJSON

792− = withObject "ActivityRule"

793− (\ o ->

794− ActivityRule' <$>

795− (o .:? "supersededAlerts" .!= mempty) <*>

796− (o .:? "actionNames" .!= mempty)

797− <*> (o .:? "supersedingAlert")

798− <*> (o .:? "triggerSource")

799− <*> (o .:? "windowSize")

800− <*> (o .:? "updateTime")

801− <*> (o .:? "name")

802− <*> (o .:? "threshold")

803− <*> (o .:? "query")

804− <*> (o .:? "displayName")

805− <*> (o .:? "description")

806− <*> (o .:? "createTime"))

807−

808−instance ToJSON ActivityRule where

809− toJSON ActivityRule'{..}

810− = object

811− (catMaybes

812− [("supersededAlerts" .=) <$> _arSupersededAlerts,

813− ("actionNames" .=) <$> _arActionNames,

814− ("supersedingAlert" .=) <$> _arSupersedingAlert,

815− ("triggerSource" .=) <$> _arTriggerSource,

816− ("windowSize" .=) <$> _arWindowSize,

817− ("updateTime" .=) <$> _arUpdateTime,

818− ("name" .=) <$> _arName,

819− ("threshold" .=) <$> _arThreshold,

820− ("query" .=) <$> _arQuery,

821− ("displayName" .=) <$> _arDisplayName,

822− ("description" .=) <$> _arDescription,

823− ("createTime" .=) <$> _arCreateTime])

824−

825647-- | Alerts for user account warning events.

826648--

827649-- /See:/ 'accountWarning' smart constructor.

@@ -1257,7 +1079,6 @@ data Alert =

12571079 , _aAlertId :: !(Maybe Text)

12581080 , _aSecurityInvestigationToolLink :: !(Maybe Text)

12591081 , _aCustomerId :: !(Maybe Text)

1260− , _aUpdateTime :: !(Maybe DateTime')

12611082 , _aEndTime :: !(Maybe DateTime')

12621083 , _aSource :: !(Maybe Text)

12631084 , _aDeleted :: !(Maybe Bool)

@@ -1281,8 +1102,6 @@ data Alert =

12811102--

12821103-- * 'aCustomerId'

12831104--

1284−-- * 'aUpdateTime'

1285−--

12861105-- * 'aEndTime'

12871106--

12881107-- * 'aSource'

@@ -1301,7 +1120,6 @@ alert =

13011120 , _aAlertId = Nothing

13021121 , _aSecurityInvestigationToolLink = Nothing

13031122 , _aCustomerId = Nothing

1304− , _aUpdateTime = Nothing

13051123 , _aEndTime = Nothing

13061124 , _aSource = Nothing

13071125 , _aDeleted = Nothing

@@ -1340,15 +1158,9 @@ aCustomerId :: Lens' Alert (Maybe Text)

13401158aCustomerId

13411159 = lens _aCustomerId (\ s a -> s{_aCustomerId = a})

13421160

1343−-- | Output only. The time this alert was last updated.

1344−aUpdateTime :: Lens' Alert (Maybe UTCTime)

1345−aUpdateTime

1346− = lens _aUpdateTime (\ s a -> s{_aUpdateTime = a}) .

1347− mapping _DateTime

1348−

13491161-- | Optional. The time the event that caused this alert ceased being active.

13501162-- If provided, the end time must not be earlier than the start time. If

1351−-- not provided, it indicates an ongoing alert.

1163+-- not provided, the end time defaults to the start time.

13521164aEndTime :: Lens' Alert (Maybe UTCTime)

13531165aEndTime

13541166 = lens _aEndTime (\ s a -> s{_aEndTime = a}) .

@@ -1387,7 +1199,6 @@ instance FromJSON Alert where

13871199 (o .:? "alertId")

13881200 <*> (o .:? "securityInvestigationToolLink")

13891201 <*> (o .:? "customerId")

1390− <*> (o .:? "updateTime")

13911202 <*> (o .:? "endTime")

13921203 <*> (o .:? "source")

13931204 <*> (o .:? "deleted")

@@ -1403,7 +1214,6 @@ instance ToJSON Alert where

14031214 ("securityInvestigationToolLink" .=) <$>

14041215 _aSecurityInvestigationToolLink,

14051216 ("customerId" .=) <$> _aCustomerId,

1406− ("updateTime" .=) <$> _aUpdateTime,

14071217 ("endTime" .=) <$> _aEndTime,

14081218 ("source" .=) <$> _aSource,

14091219 ("deleted" .=) <$> _aDeleted, ("type" .=) <$> _aType,

@@ -1442,6 +1252,76 @@ instance ToJSON Attachment where

14421252 toJSON Attachment'{..}

14431253 = object (catMaybes [("csv" .=) <$> _aCSV])

14441254

1255+-- | Requests for one application that needs default SQL setup.

1256+--

1257+-- /See:/ 'requestInfo' smart constructor.

1258+data RequestInfo =

1259+ RequestInfo'

1260+ { _riNumberOfRequests :: !(Maybe (Textual Int64))

1261+ , _riAppDeveloperEmail :: !(Maybe [Text])

1262+ , _riAppName :: !(Maybe Text)

1263+ }

1264+ deriving (Eq, Show, Data, Typeable, Generic)

1265+

1266+

1267+-- | Creates a value of 'RequestInfo' with the minimum fields required to make a request.

1268+--

1269+-- Use one of the following lenses to modify other fields as desired:

1270+--

1271+-- * 'riNumberOfRequests'

1272+--

1273+-- * 'riAppDeveloperEmail'

1274+--

1275+-- * 'riAppName'

1276+requestInfo

1277+ :: RequestInfo

1278+requestInfo =

1279+ RequestInfo'

1280+ { _riNumberOfRequests = Nothing

1281+ , _riAppDeveloperEmail = Nothing

1282+ , _riAppName = Nothing

1283+ }

1284+

1285+

1286+-- | Required. Number of requests sent for this application to set up default

1287+-- SQL instance.

1288+riNumberOfRequests :: Lens' RequestInfo (Maybe Int64)

1289+riNumberOfRequests

1290+ = lens _riNumberOfRequests

1291+ (\ s a -> s{_riNumberOfRequests = a})

1292+ . mapping _Coerce

1293+

1294+-- | List of app developers who triggered notifications for above

1295+-- application.

1296+riAppDeveloperEmail :: Lens' RequestInfo [Text]

1297+riAppDeveloperEmail

1298+ = lens _riAppDeveloperEmail

1299+ (\ s a -> s{_riAppDeveloperEmail = a})

1300+ . _Default

1301+ . _Coerce

1302+

1303+-- | Required. The application that requires the SQL setup.

1304+riAppName :: Lens' RequestInfo (Maybe Text)

1305+riAppName

1306+ = lens _riAppName (\ s a -> s{_riAppName = a})

1307+

1308+instance FromJSON RequestInfo where

1309+ parseJSON

1310+ = withObject "RequestInfo"

1311+ (\ o ->

1312+ RequestInfo' <$>

1313+ (o .:? "numberOfRequests") <*>

1314+ (o .:? "appDeveloperEmail" .!= mempty)

1315+ <*> (o .:? "appName"))

1316+

1317+instance ToJSON RequestInfo where

1318+ toJSON RequestInfo'{..}

1319+ = object

1320+ (catMaybes

1321+ [("numberOfRequests" .=) <$> _riNumberOfRequests,

1322+ ("appDeveloperEmail" .=) <$> _riAppDeveloperEmail,

1323+ ("appName" .=) <$> _riAppName])

1324+

14451325-- | An incident reported by Google Operations for a G Suite application.

14461326--

14471327-- /See:/ 'googleOperations' smart constructor.

@@ -1572,6 +1452,48 @@ instance ToJSON SuspiciousActivity where

15721452 [("email" .=) <$> _saEmail,

15731453 ("events" .=) <$> _saEvents])

15741454

1455+-- | Alerts from App Maker to notify admins to set up default SQL instance.

1456+--

1457+-- /See:/ 'appMakerSQLSetupNotification' smart constructor.

1458+newtype AppMakerSQLSetupNotification =

1459+ AppMakerSQLSetupNotification'

1460+ { _amsqlsnRequestInfo :: Maybe [RequestInfo]

1461+ }

1462+ deriving (Eq, Show, Data, Typeable, Generic)

1463+

1464+

1465+-- | Creates a value of 'AppMakerSQLSetupNotification' with the minimum fields required to make a request.

1466+--

1467+-- Use one of the following lenses to modify other fields as desired:

1468+--

1469+-- * 'amsqlsnRequestInfo'

1470+appMakerSQLSetupNotification

1471+ :: AppMakerSQLSetupNotification

1472+appMakerSQLSetupNotification =

1473+ AppMakerSQLSetupNotification' {_amsqlsnRequestInfo = Nothing}

1474+

1475+

1476+-- | List of applications with requests for default SQL set up.

1477+amsqlsnRequestInfo :: Lens' AppMakerSQLSetupNotification [RequestInfo]

1478+amsqlsnRequestInfo

1479+ = lens _amsqlsnRequestInfo

1480+ (\ s a -> s{_amsqlsnRequestInfo = a})

1481+ . _Default

1482+ . _Coerce

1483+

1484+instance FromJSON AppMakerSQLSetupNotification where

1485+ parseJSON

1486+ = withObject "AppMakerSQLSetupNotification"

1487+ (\ o ->

1488+ AppMakerSQLSetupNotification' <$>

1489+ (o .:? "requestInfo" .!= mempty))

1490+

1491+instance ToJSON AppMakerSQLSetupNotification where

1492+ toJSON AppMakerSQLSetupNotification'{..}

1493+ = object

1494+ (catMaybes

1495+ [("requestInfo" .=) <$> _amsqlsnRequestInfo])

1496+

15751497-- | A takeout operation for the entire domain was initiated by an admin.

15761498-- Derived from audit logs.

15771499--

gogol-alertcenter/gen/Network/Google/Resource/AlertCenter/Alerts/List.hs+2−2

@@ -138,8 +138,8 @@ alUploadProtocol

138138-- | Optional. The sort order of the list results. If not specified results

139139-- may be returned in arbitrary order. You can sort the results in

140140-- descending order based on the creation timestamp using

141−-- \`order_by=\"create_time desc\"\`. Currently, supported sorting are

142−-- \`create_time asc\`, \`create_time desc\`, \`update_time desc\`

141+-- \`order_by=\"create_time desc\"\`. Currently, only sorting by

142+-- \`create_time desc\` is supported.

143143alOrderBy :: Lens' AlertsList (Maybe Text)

144144alOrderBy

145145 = lens _alOrderBy (\ s a -> s{_alOrderBy = a})

gogol-analyticsreporting/gen/Network/Google/AnalyticsReporting.hs+1−142

@@ -33,9 +33,6 @@ module Network.Google.AnalyticsReporting

3333 -- ** analyticsreporting.reports.batchGet

3434 , module Network.Google.Resource.AnalyticsReporting.Reports.BatchGet

3535

36− -- ** analyticsreporting.userActivity.search

37− , module Network.Google.Resource.AnalyticsReporting.UserActivity.Search

38−

3936 -- * Types

4037

4138 -- ** MetricFilter

@@ -46,15 +43,6 @@ module Network.Google.AnalyticsReporting

4643 , mfMetricName

4744 , mfComparisonValue

4845

49− -- ** EventData

50− , EventData

51− , eventData

52− , edEventCategory

53− , edEventCount

54− , edEventValue

55− , edEventLabel

56− , edEventAction

57−

5846 -- ** MetricFilterOperator

5947 , MetricFilterOperator (..)

6048

@@ -103,11 +91,6 @@ module Network.Google.AnalyticsReporting

10391 , mheName

10492 , mheType

10593

106− -- ** GoalSetData

107− , GoalSetData

108− , goalSetData

109− , gsdGoals

110−

11194 -- ** CohortGroup

11295 , CohortGroup

11396 , cohortGroup

@@ -156,16 +139,6 @@ module Network.Google.AnalyticsReporting

156139 , phTotalPivotGroupsCount

157140 , phPivotHeaderEntries

158141

159− -- ** SearchUserActivityRequest

160− , SearchUserActivityRequest

161− , searchUserActivityRequest

162− , suarViewId

163− , suarDateRange

164− , suarUser

165− , suarPageToken

166− , suarPageSize

167− , suarActivityTypes

168−

169142 -- ** MetricHeader

170143 , MetricHeader

171144 , metricHeader

@@ -195,15 +168,6 @@ module Network.Google.AnalyticsReporting

195168 , rData

196169 , rColumnHeader

197170

198− -- ** PageviewData

199− , PageviewData

200− , pageviewData

201− , pdPageTitle

202− , pdPagePath

203−

204− -- ** EcommerceDataActionType

205− , EcommerceDataActionType (..)

206−

207171 -- ** ReportData

208172 , ReportData

209173 , reportData

@@ -243,12 +207,6 @@ module Network.Google.AnalyticsReporting

243207 -- ** OrderBySortOrder

244208 , OrderBySortOrder (..)

245209

246− -- ** User

247− , User

248− , user

249− , uUserId

250− , uType

251−

252210 -- ** Pivot

253211 , Pivot

254212 , pivot

@@ -258,14 +216,6 @@ module Network.Google.AnalyticsReporting

258216 , pDimensions

259217 , pDimensionFilterClauses

260218

261− -- ** TransactionData

262− , TransactionData

263− , transactionData

264− , tdTransactionId

265− , tdTransactionTax

266− , tdTransactionShipping

267− , tdTransactionRevenue

268−

269219 -- ** SequenceSegment

270220 , SequenceSegment

271221 , sequenceSegment

@@ -306,50 +256,9 @@ module Network.Google.AnalyticsReporting

306256 , grrUseResourceQuotas

307257 , grrReportRequests

308258

309− -- ** UserActivitySession

310− , UserActivitySession

311− , userActivitySession

312− , uasPlatform

313− , uasDeviceCategory

314− , uasActivities

315− , uasSessionDate

316− , uasDataSource

317− , uasSessionId

318−

319259 -- ** SegmentSequenceStepMatchType

320260 , SegmentSequenceStepMatchType (..)

321261

322− -- ** GoalData

323− , GoalData

324− , goalData

325− , gdGoalPreviousStep2

326− , gdGoalName

327− , gdGoalPreviousStep3

328− , gdGoalIndex

329− , gdGoalCompletionLocation

330− , gdGoalPreviousStep1

331− , gdGoalCompletions

332− , gdGoalValue

333−

334− -- ** Activity

335− , Activity

336− , activity

337− , aEvent

338− , aHostname

339− , aActivityType

340− , aMedium

341− , aPageview

342− , aCampaign

343− , aGoals

344− , aChannelGrouping

345− , aAppview

346− , aSource

347− , aActivityTime

348− , aEcommerce

349− , aCustomDimension

350− , aKeyword

351− , aLandingPagePath

352−

353262 -- ** Cohort

354263 , Cohort

355264 , cohort

@@ -360,17 +269,6 @@ module Network.Google.AnalyticsReporting

360269 -- ** SegmentMetricFilterScope

361270 , SegmentMetricFilterScope (..)

362271

363− -- ** EcommerceData

364− , EcommerceData

365− , ecommerceData

366− , edEcommerceType

367− , edTransaction

368− , edProducts

369− , edActionType

370−

371− -- ** EcommerceDataEcommerceType

372− , EcommerceDataEcommerceType (..)

373−

374272 -- ** DimensionFilter

375273 , DimensionFilter

376274 , dimensionFilter

@@ -390,32 +288,15 @@ module Network.Google.AnalyticsReporting

390288 -- ** DimensionFilterOperator

391289 , DimensionFilterOperator (..)

392290

393− -- ** ActivityActivityType

394− , ActivityActivityType (..)

395−

396291 -- ** MetricFormattingType

397292 , MetricFormattingType (..)

398293

399− -- ** CustomDimension

400− , CustomDimension

401− , customDimension

402− , cdValue

403− , cdIndex

404−

405294 -- ** Segment

406295 , Segment

407296 , segment

408297 , sDynamicSegment

409298 , sSegmentId

410299

411− -- ** ProductData

412− , ProductData

413− , productData

414− , pdProductName

415− , pdProductSKU

416− , pdItemRevenue

417− , pdProductQuantity

418−

419300 -- ** SegmentDimensionFilterOperator

420301 , SegmentDimensionFilterOperator (..)

421302

@@ -451,42 +332,20 @@ module Network.Google.AnalyticsReporting

451332 -- ** MetricFilterClauseOperator

452333 , MetricFilterClauseOperator (..)

453334

454− -- ** UserType

455− , UserType (..)

456−

457335 -- ** ColumnHeader

458336 , ColumnHeader

459337 , columnHeader

460338 , chMetricHeader

461339 , chDimensions

462−

463− -- ** SearchUserActivityResponse

464− , SearchUserActivityResponse

465− , searchUserActivityResponse

466− , suarNextPageToken

467− , suarSampleRate

468− , suarSessions

469− , suarTotalRows

470−

471− -- ** ScreenviewData

472− , ScreenviewData

473− , screenviewData

474− , sdMobileDeviceModel

475− , sdMobileDeviceBranding

476− , sdAppName

477− , sdScreenName

478340 ) where

479341

480342import Network.Google.AnalyticsReporting.Types

481343import Network.Google.Prelude

482344import Network.Google.Resource.AnalyticsReporting.Reports.BatchGet

483−import Network.Google.Resource.AnalyticsReporting.UserActivity.Search

484345

485346{- $resources

486347TODO

487348-}

488349

489350-- | Represents the entirety of the methods and resources available for the Analytics Reporting API service.

490−type AnalyticsReportingAPI =

491− ReportsBatchGetResource :<|>

492− UserActivitySearchResource

351+type AnalyticsReportingAPI = ReportsBatchGetResource

gogol-analyticsreporting/gen/Network/Google/AnalyticsReporting/Types.hs−135

@@ -31,15 +31,6 @@ module Network.Google.AnalyticsReporting.Types

3131 , mfMetricName

3232 , mfComparisonValue

3333

34− -- * EventData

35− , EventData

36− , eventData

37− , edEventCategory

38− , edEventCount

39− , edEventValue

40− , edEventLabel

41− , edEventAction

42−

4334 -- * MetricFilterOperator

4435 , MetricFilterOperator (..)

4536

@@ -88,11 +79,6 @@ module Network.Google.AnalyticsReporting.Types

8879 , mheName

8980 , mheType

9081

91− -- * GoalSetData

92− , GoalSetData

93− , goalSetData

94− , gsdGoals

95−

9682 -- * CohortGroup

9783 , CohortGroup

9884 , cohortGroup

@@ -141,16 +127,6 @@ module Network.Google.AnalyticsReporting.Types

141127 , phTotalPivotGroupsCount

142128 , phPivotHeaderEntries

143129

144− -- * SearchUserActivityRequest

145− , SearchUserActivityRequest

146− , searchUserActivityRequest

147− , suarViewId

148− , suarDateRange

149− , suarUser

150− , suarPageToken

151− , suarPageSize

152− , suarActivityTypes

153−

154130 -- * MetricHeader

155131 , MetricHeader

156132 , metricHeader

@@ -180,15 +156,6 @@ module Network.Google.AnalyticsReporting.Types

180156 , rData

181157 , rColumnHeader

182158

183− -- * PageviewData

184− , PageviewData

185− , pageviewData

186− , pdPageTitle

187− , pdPagePath

188−

189− -- * EcommerceDataActionType

190− , EcommerceDataActionType (..)

191−

192159 -- * ReportData

193160 , ReportData

194161 , reportData

@@ -228,12 +195,6 @@ module Network.Google.AnalyticsReporting.Types

228195 -- * OrderBySortOrder

229196 , OrderBySortOrder (..)

230197

231− -- * User

232− , User

233− , user

234− , uUserId

235− , uType

236−

237198 -- * Pivot

238199 , Pivot

239200 , pivot

@@ -243,14 +204,6 @@ module Network.Google.AnalyticsReporting.Types

243204 , pDimensions

244205 , pDimensionFilterClauses

245206

246− -- * TransactionData

247− , TransactionData

248− , transactionData

249− , tdTransactionId

250− , tdTransactionTax

251− , tdTransactionShipping

252− , tdTransactionRevenue

253−

254207 -- * SequenceSegment

255208 , SequenceSegment

256209 , sequenceSegment

@@ -291,50 +244,9 @@ module Network.Google.AnalyticsReporting.Types

291244 , grrUseResourceQuotas

292245 , grrReportRequests

293246

294− -- * UserActivitySession

295− , UserActivitySession

296− , userActivitySession

297− , uasPlatform

298− , uasDeviceCategory

299− , uasActivities

300− , uasSessionDate

301− , uasDataSource

302− , uasSessionId

303−

304247 -- * SegmentSequenceStepMatchType

305248 , SegmentSequenceStepMatchType (..)

306249

307− -- * GoalData

308− , GoalData

309− , goalData

310− , gdGoalPreviousStep2

311− , gdGoalName

312− , gdGoalPreviousStep3

313− , gdGoalIndex

314− , gdGoalCompletionLocation

315− , gdGoalPreviousStep1

316− , gdGoalCompletions

317− , gdGoalValue

318−

319− -- * Activity

320− , Activity

321− , activity

322− , aEvent

323− , aHostname

324− , aActivityType

325− , aMedium

326− , aPageview

327− , aCampaign

328− , aGoals

329− , aChannelGrouping

330− , aAppview

331− , aSource

332− , aActivityTime

333− , aEcommerce

334− , aCustomDimension

335− , aKeyword

336− , aLandingPagePath

337−

338250 -- * Cohort

339251 , Cohort

340252 , cohort

@@ -345,17 +257,6 @@ module Network.Google.AnalyticsReporting.Types

345257 -- * SegmentMetricFilterScope

346258 , SegmentMetricFilterScope (..)

347259

348− -- * EcommerceData

349− , EcommerceData

350− , ecommerceData

351− , edEcommerceType

352− , edTransaction

353− , edProducts

354− , edActionType

355−

356− -- * EcommerceDataEcommerceType

357− , EcommerceDataEcommerceType (..)

358−

359260 -- * DimensionFilter

360261 , DimensionFilter

361262 , dimensionFilter

@@ -375,32 +276,15 @@ module Network.Google.AnalyticsReporting.Types

375276 -- * DimensionFilterOperator

376277 , DimensionFilterOperator (..)

377278

378− -- * ActivityActivityType

379− , ActivityActivityType (..)

380−

381279 -- * MetricFormattingType

382280 , MetricFormattingType (..)

383281

384− -- * CustomDimension

385− , CustomDimension

386− , customDimension

387− , cdValue

388− , cdIndex

389−

390282 -- * Segment

391283 , Segment

392284 , segment

393285 , sDynamicSegment

394286 , sSegmentId

395287

396− -- * ProductData

397− , ProductData

398− , productData

399− , pdProductName

400− , pdProductSKU

401− , pdItemRevenue

402− , pdProductQuantity

403−

404288 -- * SegmentDimensionFilterOperator

405289 , SegmentDimensionFilterOperator (..)

406290

@@ -436,30 +320,11 @@ module Network.Google.AnalyticsReporting.Types

436320 -- * MetricFilterClauseOperator

437321 , MetricFilterClauseOperator (..)

438322

439− -- * UserType

440− , UserType (..)

441−

442323 -- * ColumnHeader

443324 , ColumnHeader

444325 , columnHeader

445326 , chMetricHeader

446327 , chDimensions

447−

448− -- * SearchUserActivityResponse

449− , SearchUserActivityResponse

450− , searchUserActivityResponse

451− , suarNextPageToken

452− , suarSampleRate

453− , suarSessions

454− , suarTotalRows

455−

456− -- * ScreenviewData

457− , ScreenviewData

458− , screenviewData

459− , sdMobileDeviceModel

460− , sdMobileDeviceBranding

461− , sdAppName

462− , sdScreenName

463328 ) where

464329

465330import Network.Google.AnalyticsReporting.Types.Product

gogol-analyticsreporting/gen/Network/Google/AnalyticsReporting/Types/Product.hs−1237

@@ -100,94 +100,6 @@ instance ToJSON MetricFilter where

100100 ("metricName" .=) <$> _mfMetricName,

101101 ("comparisonValue" .=) <$> _mfComparisonValue])

102102

103−-- | Represents all the details pertaining to an event.

104−--

105−-- /See:/ 'eventData' smart constructor.

106−data EventData =

107− EventData'

108− { _edEventCategory :: !(Maybe Text)

109− , _edEventCount :: !(Maybe (Textual Int64))

110− , _edEventValue :: !(Maybe (Textual Int64))

111− , _edEventLabel :: !(Maybe Text)

112− , _edEventAction :: !(Maybe Text)

113− }

114− deriving (Eq, Show, Data, Typeable, Generic)

115−

116−

117−-- | Creates a value of 'EventData' with the minimum fields required to make a request.

118−--

119−-- Use one of the following lenses to modify other fields as desired:

120−--

121−-- * 'edEventCategory'

122−--

123−-- * 'edEventCount'

124−--

125−-- * 'edEventValue'

126−--

127−-- * 'edEventLabel'

128−--

129−-- * 'edEventAction'

130−eventData

131− :: EventData

132−eventData =

133− EventData'

134− { _edEventCategory = Nothing

135− , _edEventCount = Nothing

136− , _edEventValue = Nothing

137− , _edEventLabel = Nothing

138− , _edEventAction = Nothing

139− }

140−

141−

142−-- | The object on the page that was interacted with. Eg: \'Video\'.

143−edEventCategory :: Lens' EventData (Maybe Text)

144−edEventCategory

145− = lens _edEventCategory

146− (\ s a -> s{_edEventCategory = a})

147−

148−-- | Number of such events in this activity.

149−edEventCount :: Lens' EventData (Maybe Int64)

150−edEventCount

151− = lens _edEventCount (\ s a -> s{_edEventCount = a})

152− . mapping _Coerce

153−

154−-- | Numeric value associated with the event.

155−edEventValue :: Lens' EventData (Maybe Int64)

156−edEventValue

157− = lens _edEventValue (\ s a -> s{_edEventValue = a})

158− . mapping _Coerce

159−

160−-- | Label attached with the event.

161−edEventLabel :: Lens' EventData (Maybe Text)

162−edEventLabel

163− = lens _edEventLabel (\ s a -> s{_edEventLabel = a})

164−

165−-- | Type of interaction with the object. Eg: \'play\'.

166−edEventAction :: Lens' EventData (Maybe Text)

167−edEventAction

168− = lens _edEventAction

169− (\ s a -> s{_edEventAction = a})

170−

171−instance FromJSON EventData where

172− parseJSON

173− = withObject "EventData"

174− (\ o ->

175− EventData' <$>

176− (o .:? "eventCategory") <*> (o .:? "eventCount") <*>

177− (o .:? "eventValue")

178− <*> (o .:? "eventLabel")

179− <*> (o .:? "eventAction"))

180−

181−instance ToJSON EventData where

182− toJSON EventData'{..}

183− = object

184− (catMaybes

185− [("eventCategory" .=) <$> _edEventCategory,

186− ("eventCount" .=) <$> _edEventCount,

187− ("eventValue" .=) <$> _edEventValue,

188− ("eventLabel" .=) <$> _edEventLabel,

189− ("eventAction" .=) <$> _edEventAction])

190−

191103-- | A row in the report.

192104--

193105-- /See:/ 'reportRow' smart constructor.

@@ -686,42 +598,6 @@ instance ToJSON MetricHeaderEntry where

686598 (catMaybes

687599 [("name" .=) <$> _mheName, ("type" .=) <$> _mheType])

688600

689−-- | Represents a set of goals that were reached in an activity.

690−--

691−-- /See:/ 'goalSetData' smart constructor.

692−newtype GoalSetData =

693− GoalSetData'

694− { _gsdGoals :: Maybe [GoalData]

695− }

696− deriving (Eq, Show, Data, Typeable, Generic)

697−

698−

699−-- | Creates a value of 'GoalSetData' with the minimum fields required to make a request.

700−--

701−-- Use one of the following lenses to modify other fields as desired:

702−--

703−-- * 'gsdGoals'

704−goalSetData

705− :: GoalSetData

706−goalSetData = GoalSetData' {_gsdGoals = Nothing}

707−

708−

709−-- | All the goals that were reached in the current activity.

710−gsdGoals :: Lens' GoalSetData [GoalData]

711−gsdGoals

712− = lens _gsdGoals (\ s a -> s{_gsdGoals = a}) .

713− _Default

714− . _Coerce

715−

716−instance FromJSON GoalSetData where

717− parseJSON

718− = withObject "GoalSetData"

719− (\ o -> GoalSetData' <$> (o .:? "goals" .!= mempty))

720−

721−instance ToJSON GoalSetData where

722− toJSON GoalSetData'{..}

723− = object (catMaybes [("goals" .=) <$> _gsdGoals])

724−

725601-- | Defines a cohort group. For example: \"cohortGroup\": { \"cohorts\": [{

726602-- \"name\": \"cohort 1\", \"type\": \"FIRST_VISIT_DATE\", \"dateRange\": {

727603-- \"startDate\": \"2015-08-01\", \"endDate\": \"2015-08-01\" } },{

@@ -1140,123 +1016,6 @@ instance ToJSON PivotHeader where

11401016 _phTotalPivotGroupsCount,

11411017 ("pivotHeaderEntries" .=) <$> _phPivotHeaderEntries])

11421018

1143−-- | The request to fetch User Report from Reporting API \`userActivity:get\`

1144−-- call.

1145−--

1146−-- /See:/ 'searchUserActivityRequest' smart constructor.

1147−data SearchUserActivityRequest =

1148− SearchUserActivityRequest'

1149− { _suarViewId :: !(Maybe Text)

1150− , _suarDateRange :: !(Maybe DateRange)

1151− , _suarUser :: !(Maybe User)

1152− , _suarPageToken :: !(Maybe Text)

1153− , _suarPageSize :: !(Maybe (Textual Int32))

1154− , _suarActivityTypes :: !(Maybe [Text])

1155− }

1156− deriving (Eq, Show, Data, Typeable, Generic)

1157−

1158−

1159−-- | Creates a value of 'SearchUserActivityRequest' with the minimum fields required to make a request.

1160−--

1161−-- Use one of the following lenses to modify other fields as desired:

1162−--

1163−-- * 'suarViewId'

1164−--

1165−-- * 'suarDateRange'

1166−--

1167−-- * 'suarUser'

1168−--

1169−-- * 'suarPageToken'

1170−--

1171−-- * 'suarPageSize'

1172−--

1173−-- * 'suarActivityTypes'

1174−searchUserActivityRequest

1175− :: SearchUserActivityRequest

1176−searchUserActivityRequest =

1177− SearchUserActivityRequest'

1178− { _suarViewId = Nothing

1179− , _suarDateRange = Nothing

1180− , _suarUser = Nothing

1181− , _suarPageToken = Nothing

1182− , _suarPageSize = Nothing

1183− , _suarActivityTypes = Nothing

1184− }

1185−

1186−

1187−-- | Required. The Analytics [view

1188−-- ID](https:\/\/support.google.com\/analytics\/answer\/1009618) from which

1189−-- to retrieve data. Every

1190−-- [SearchUserActivityRequest](#SearchUserActivityRequest) must contain the

1191−-- \`viewId\`.

1192−suarViewId :: Lens' SearchUserActivityRequest (Maybe Text)

1193−suarViewId

1194− = lens _suarViewId (\ s a -> s{_suarViewId = a})

1195−

1196−-- | Date range for which to retrieve the user activity. If a date range is

1197−-- not provided, the default date range is (startDate: current date - 7

1198−-- days, endDate: current date - 1 day).

1199−suarDateRange :: Lens' SearchUserActivityRequest (Maybe DateRange)

1200−suarDateRange

1201− = lens _suarDateRange

1202− (\ s a -> s{_suarDateRange = a})

1203−

1204−-- | Required. Unique user Id to query for. Every

1205−-- [SearchUserActivityRequest](#SearchUserActivityRequest) must contain

1206−-- this field.

1207−suarUser :: Lens' SearchUserActivityRequest (Maybe User)

1208−suarUser = lens _suarUser (\ s a -> s{_suarUser = a})

1209−

1210−-- | A continuation token to get the next page of the results. Adding this to

1211−-- the request will return the rows after the pageToken. The pageToken

1212−-- should be the value returned in the nextPageToken parameter in the

1213−-- response to the [SearchUserActivityRequest](#SearchUserActivityRequest)

1214−-- request.

1215−suarPageToken :: Lens' SearchUserActivityRequest (Maybe Text)

1216−suarPageToken

1217− = lens _suarPageToken

1218− (\ s a -> s{_suarPageToken = a})

1219−

1220−-- | Page size is for paging and specifies the maximum number of returned

1221−-- rows. Page size should be > 0. If the value is 0 or if the field isn\'t

1222−-- specified, the request returns the default of 1000 rows per page.

1223−suarPageSize :: Lens' SearchUserActivityRequest (Maybe Int32)

1224−suarPageSize

1225− = lens _suarPageSize (\ s a -> s{_suarPageSize = a})

1226− . mapping _Coerce

1227−

1228−-- | Set of all activity types being requested. Only acvities matching these

1229−-- types will be returned in the response. If empty, all activies will be

1230−-- returned.

1231−suarActivityTypes :: Lens' SearchUserActivityRequest [Text]

1232−suarActivityTypes

1233− = lens _suarActivityTypes

1234− (\ s a -> s{_suarActivityTypes = a})

1235− . _Default

1236− . _Coerce

1237−

1238−instance FromJSON SearchUserActivityRequest where

1239− parseJSON

1240− = withObject "SearchUserActivityRequest"

1241− (\ o ->

1242− SearchUserActivityRequest' <$>

1243− (o .:? "viewId") <*> (o .:? "dateRange") <*>

1244− (o .:? "user")

1245− <*> (o .:? "pageToken")

1246− <*> (o .:? "pageSize")

1247− <*> (o .:? "activityTypes" .!= mempty))

1248−

1249−instance ToJSON SearchUserActivityRequest where

1250− toJSON SearchUserActivityRequest'{..}

1251− = object

1252− (catMaybes

1253− [("viewId" .=) <$> _suarViewId,

1254− ("dateRange" .=) <$> _suarDateRange,

1255− ("user" .=) <$> _suarUser,

1256− ("pageToken" .=) <$> _suarPageToken,

1257− ("pageSize" .=) <$> _suarPageSize,

1258− ("activityTypes" .=) <$> _suarActivityTypes])

1259−

12601019-- | The headers for the metrics.

12611020--

12621021-- /See:/ 'metricHeader' smart constructor.

@@ -1495,53 +1254,6 @@ instance ToJSON Report where

14951254 ("data" .=) <$> _rData,

14961255 ("columnHeader" .=) <$> _rColumnHeader])

14971256

1498−-- | Represents details collected when the visitor views a page.

1499−--

1500−-- /See:/ 'pageviewData' smart constructor.

1501−data PageviewData =

1502− PageviewData'

1503− { _pdPageTitle :: !(Maybe Text)

1504− , _pdPagePath :: !(Maybe Text)

1505− }

1506− deriving (Eq, Show, Data, Typeable, Generic)

1507−

1508−

1509−-- | Creates a value of 'PageviewData' with the minimum fields required to make a request.

1510−--

1511−-- Use one of the following lenses to modify other fields as desired:

1512−--

1513−-- * 'pdPageTitle'

1514−--

1515−-- * 'pdPagePath'

1516−pageviewData

1517− :: PageviewData

1518−pageviewData = PageviewData' {_pdPageTitle = Nothing, _pdPagePath = Nothing}

1519−

1520−

1521−-- | The title of the page that the visitor viewed.

1522−pdPageTitle :: Lens' PageviewData (Maybe Text)

1523−pdPageTitle

1524− = lens _pdPageTitle (\ s a -> s{_pdPageTitle = a})

1525−

1526−-- | The URL of the page that the visitor viewed.

1527−pdPagePath :: Lens' PageviewData (Maybe Text)

1528−pdPagePath

1529− = lens _pdPagePath (\ s a -> s{_pdPagePath = a})

1530−

1531−instance FromJSON PageviewData where

1532− parseJSON

1533− = withObject "PageviewData"

1534− (\ o ->

1535− PageviewData' <$>

1536− (o .:? "pageTitle") <*> (o .:? "pagePath"))

1537−

1538−instance ToJSON PageviewData where

1539− toJSON PageviewData'{..}

1540− = object

1541− (catMaybes

1542− [("pageTitle" .=) <$> _pdPageTitle,

1543− ("pagePath" .=) <$> _pdPagePath])

1544−

15451257-- | The data part of the report.

15461258--

15471259-- /See:/ 'reportData' smart constructor.

@@ -1919,50 +1631,6 @@ instance ToJSON SegmentDefinition where

19191631 (catMaybes

19201632 [("segmentFilters" .=) <$> _sdSegmentFilters])

19211633

1922−-- | Contains information to identify a particular user uniquely.

1923−--

1924−-- /See:/ 'user' smart constructor.

1925−data User =

1926− User'

1927− { _uUserId :: !(Maybe Text)

1928− , _uType :: !(Maybe UserType)

1929− }

1930− deriving (Eq, Show, Data, Typeable, Generic)

1931−

1932−

1933−-- | Creates a value of 'User' with the minimum fields required to make a request.

1934−--

1935−-- Use one of the following lenses to modify other fields as desired:

1936−--

1937−-- * 'uUserId'

1938−--

1939−-- * 'uType'

1940−user

1941− :: User

1942−user = User' {_uUserId = Nothing, _uType = Nothing}

1943−

1944−

1945−-- | Unique Id of the user for which the data is being requested.

1946−uUserId :: Lens' User (Maybe Text)

1947−uUserId = lens _uUserId (\ s a -> s{_uUserId = a})

1948−

1949−-- | Type of the user in the request. The field \`userId\` is associated with

1950−-- this type.

1951−uType :: Lens' User (Maybe UserType)

1952−uType = lens _uType (\ s a -> s{_uType = a})

1953−

1954−instance FromJSON User where

1955− parseJSON

1956− = withObject "User"

1957− (\ o ->

1958− User' <$> (o .:? "userId") <*> (o .:? "type"))

1959−

1960−instance ToJSON User where

1961− toJSON User'{..}

1962− = object

1963− (catMaybes

1964− [("userId" .=) <$> _uUserId, ("type" .=) <$> _uType])

1965−

19661634-- | The Pivot describes the pivot section in the request. The Pivot helps

19671635-- rearrange the information in the table for certain reports by pivoting

19681636-- your data on a second dimension.

@@ -2081,89 +1749,6 @@ instance ToJSON Pivot where

20811749 ("dimensionFilterClauses" .=) <$>

20821750 _pDimensionFilterClauses])

20831751

2084−-- | Represents details collected when the visitor performs a transaction on

2085−-- the page.

2086−--

2087−-- /See:/ 'transactionData' smart constructor.

2088−data TransactionData =

2089− TransactionData'

2090− { _tdTransactionId :: !(Maybe Text)

2091− , _tdTransactionTax :: !(Maybe (Textual Double))

2092− , _tdTransactionShipping :: !(Maybe (Textual Double))

2093− , _tdTransactionRevenue :: !(Maybe (Textual Double))

2094− }

2095− deriving (Eq, Show, Data, Typeable, Generic)

2096−

2097−

2098−-- | Creates a value of 'TransactionData' with the minimum fields required to make a request.

2099−--

2100−-- Use one of the following lenses to modify other fields as desired:

2101−--

2102−-- * 'tdTransactionId'

2103−--

2104−-- * 'tdTransactionTax'

2105−--

2106−-- * 'tdTransactionShipping'

2107−--

2108−-- * 'tdTransactionRevenue'

2109−transactionData

2110− :: TransactionData

2111−transactionData =

2112− TransactionData'

2113− { _tdTransactionId = Nothing

2114− , _tdTransactionTax = Nothing

2115− , _tdTransactionShipping = Nothing

2116− , _tdTransactionRevenue = Nothing

2117− }

2118−

2119−

2120−-- | The transaction ID, supplied by the e-commerce tracking method, for the

2121−-- purchase in the shopping cart.

2122−tdTransactionId :: Lens' TransactionData (Maybe Text)

2123−tdTransactionId

2124− = lens _tdTransactionId

2125− (\ s a -> s{_tdTransactionId = a})

2126−

2127−-- | Total tax for the transaction.

2128−tdTransactionTax :: Lens' TransactionData (Maybe Double)

2129−tdTransactionTax

2130− = lens _tdTransactionTax

2131− (\ s a -> s{_tdTransactionTax = a})

2132− . mapping _Coerce

2133−

2134−-- | Total cost of shipping.

2135−tdTransactionShipping :: Lens' TransactionData (Maybe Double)

2136−tdTransactionShipping

2137− = lens _tdTransactionShipping

2138− (\ s a -> s{_tdTransactionShipping = a})

2139− . mapping _Coerce

2140−

2141−-- | The total sale revenue (excluding shipping and tax) of the transaction.

2142−tdTransactionRevenue :: Lens' TransactionData (Maybe Double)

2143−tdTransactionRevenue

2144− = lens _tdTransactionRevenue

2145− (\ s a -> s{_tdTransactionRevenue = a})

2146− . mapping _Coerce

2147−

2148−instance FromJSON TransactionData where

2149− parseJSON

2150− = withObject "TransactionData"

2151− (\ o ->

2152− TransactionData' <$>

2153− (o .:? "transactionId") <*> (o .:? "transactionTax")

2154− <*> (o .:? "transactionShipping")

2155− <*> (o .:? "transactionRevenue"))

2156−

2157−instance ToJSON TransactionData where

2158− toJSON TransactionData'{..}

2159− = object

2160− (catMaybes

2161− [("transactionId" .=) <$> _tdTransactionId,

2162− ("transactionTax" .=) <$> _tdTransactionTax,

2163− ("transactionShipping" .=) <$>

2164− _tdTransactionShipping,

2165− ("transactionRevenue" .=) <$> _tdTransactionRevenue])

2166−

21671752-- | Sequence conditions consist of one or more steps, where each step is

21681753-- defined by one or more dimension\/metric conditions. Multiple steps can

21691754-- be combined with special sequence operators.

@@ -2453,462 +2038,6 @@ instance ToJSON GetReportsRequest where

24532038 [("useResourceQuotas" .=) <$> _grrUseResourceQuotas,

24542039 ("reportRequests" .=) <$> _grrReportRequests])

24552040

2456−-- | This represents a user session performed on a specific device at a

2457−-- certain time over a period of time.

2458−--

2459−-- /See:/ 'userActivitySession' smart constructor.

2460−data UserActivitySession =

2461− UserActivitySession'

2462− { _uasPlatform :: !(Maybe Text)

2463− , _uasDeviceCategory :: !(Maybe Text)

2464− , _uasActivities :: !(Maybe [Activity])

2465− , _uasSessionDate :: !(Maybe Text)

2466− , _uasDataSource :: !(Maybe Text)

2467− , _uasSessionId :: !(Maybe Text)

2468− }

2469− deriving (Eq, Show, Data, Typeable, Generic)

2470−

2471−

2472−-- | Creates a value of 'UserActivitySession' with the minimum fields required to make a request.

2473−--

2474−-- Use one of the following lenses to modify other fields as desired:

2475−--

2476−-- * 'uasPlatform'

2477−--

2478−-- * 'uasDeviceCategory'

2479−--

2480−-- * 'uasActivities'

2481−--

2482−-- * 'uasSessionDate'

2483−--

2484−-- * 'uasDataSource'

2485−--

2486−-- * 'uasSessionId'

2487−userActivitySession

2488− :: UserActivitySession

2489−userActivitySession =

2490− UserActivitySession'

2491− { _uasPlatform = Nothing

2492− , _uasDeviceCategory = Nothing

2493− , _uasActivities = Nothing

2494− , _uasSessionDate = Nothing

2495− , _uasDataSource = Nothing

2496− , _uasSessionId = Nothing

2497− }

2498−

2499−

2500−-- | Platform on which the activity happened: \"android\", \"ios\" etc.

2501−uasPlatform :: Lens' UserActivitySession (Maybe Text)

2502−uasPlatform

2503− = lens _uasPlatform (\ s a -> s{_uasPlatform = a})

2504−

2505−-- | The type of device used: \"mobile\", \"tablet\" etc.

2506−uasDeviceCategory :: Lens' UserActivitySession (Maybe Text)

2507−uasDeviceCategory

2508− = lens _uasDeviceCategory

2509− (\ s a -> s{_uasDeviceCategory = a})

2510−

2511−-- | Represents a detailed view into each of the activity in this session.

2512−uasActivities :: Lens' UserActivitySession [Activity]

2513−uasActivities

2514− = lens _uasActivities

2515− (\ s a -> s{_uasActivities = a})

2516− . _Default

2517− . _Coerce

2518−

2519−-- | Date of this session in ISO-8601 format.

2520−uasSessionDate :: Lens' UserActivitySession (Maybe Text)

2521−uasSessionDate

2522− = lens _uasSessionDate

2523− (\ s a -> s{_uasSessionDate = a})

2524−

2525−-- | The data source of a hit. By default, hits sent from analytics.js are

2526−-- reported as \"web\" and hits sent from the mobile SDKs are reported as

2527−-- \"app\". These values can be overridden in the Measurement Protocol.

2528−uasDataSource :: Lens' UserActivitySession (Maybe Text)

2529−uasDataSource

2530− = lens _uasDataSource

2531− (\ s a -> s{_uasDataSource = a})

2532−

2533−-- | Unique ID of the session.

2534−uasSessionId :: Lens' UserActivitySession (Maybe Text)

2535−uasSessionId

2536− = lens _uasSessionId (\ s a -> s{_uasSessionId = a})

2537−

2538−instance FromJSON UserActivitySession where

2539− parseJSON

2540− = withObject "UserActivitySession"

2541− (\ o ->

2542− UserActivitySession' <$>

2543− (o .:? "platform") <*> (o .:? "deviceCategory") <*>

2544− (o .:? "activities" .!= mempty)

2545− <*> (o .:? "sessionDate")

2546− <*> (o .:? "dataSource")

2547− <*> (o .:? "sessionId"))

2548−

2549−instance ToJSON UserActivitySession where

2550− toJSON UserActivitySession'{..}

2551− = object

2552− (catMaybes

2553− [("platform" .=) <$> _uasPlatform,

2554− ("deviceCategory" .=) <$> _uasDeviceCategory,

2555− ("activities" .=) <$> _uasActivities,

2556− ("sessionDate" .=) <$> _uasSessionDate,

2557− ("dataSource" .=) <$> _uasDataSource,

2558− ("sessionId" .=) <$> _uasSessionId])

2559−

2560−-- | Represents all the details pertaining to a goal.

2561−--

2562−-- /See:/ 'goalData' smart constructor.

2563−data GoalData =

2564− GoalData'

2565− { _gdGoalPreviousStep2 :: !(Maybe Text)

2566− , _gdGoalName :: !(Maybe Text)

2567− , _gdGoalPreviousStep3 :: !(Maybe Text)

2568− , _gdGoalIndex :: !(Maybe (Textual Int32))

2569− , _gdGoalCompletionLocation :: !(Maybe Text)

2570− , _gdGoalPreviousStep1 :: !(Maybe Text)

2571− , _gdGoalCompletions :: !(Maybe (Textual Int64))

2572− , _gdGoalValue :: !(Maybe (Textual Double))

2573− }

2574− deriving (Eq, Show, Data, Typeable, Generic)

2575−

2576−

2577−-- | Creates a value of 'GoalData' with the minimum fields required to make a request.

2578−--

2579−-- Use one of the following lenses to modify other fields as desired:

2580−--

2581−-- * 'gdGoalPreviousStep2'

2582−--

2583−-- * 'gdGoalName'

2584−--

2585−-- * 'gdGoalPreviousStep3'

2586−--

2587−-- * 'gdGoalIndex'

2588−--

2589−-- * 'gdGoalCompletionLocation'

2590−--

2591−-- * 'gdGoalPreviousStep1'

2592−--

2593−-- * 'gdGoalCompletions'

2594−--

2595−-- * 'gdGoalValue'

2596−goalData

2597− :: GoalData

2598−goalData =

2599− GoalData'

2600− { _gdGoalPreviousStep2 = Nothing

2601− , _gdGoalName = Nothing

2602− , _gdGoalPreviousStep3 = Nothing

2603− , _gdGoalIndex = Nothing

2604− , _gdGoalCompletionLocation = Nothing

2605− , _gdGoalPreviousStep1 = Nothing

2606− , _gdGoalCompletions = Nothing

2607− , _gdGoalValue = Nothing

2608− }

2609−

2610−

2611−-- | URL of the page two steps prior to the goal completion.

2612−gdGoalPreviousStep2 :: Lens' GoalData (Maybe Text)

2613−gdGoalPreviousStep2

2614− = lens _gdGoalPreviousStep2

2615− (\ s a -> s{_gdGoalPreviousStep2 = a})

2616−

2617−-- | Name of the goal.

2618−gdGoalName :: Lens' GoalData (Maybe Text)

2619−gdGoalName

2620− = lens _gdGoalName (\ s a -> s{_gdGoalName = a})

2621−

2622−-- | URL of the page three steps prior to the goal completion.

2623−gdGoalPreviousStep3 :: Lens' GoalData (Maybe Text)

2624−gdGoalPreviousStep3

2625− = lens _gdGoalPreviousStep3

2626− (\ s a -> s{_gdGoalPreviousStep3 = a})

2627−

2628−-- | This identifies the goal as configured for the profile.

2629−gdGoalIndex :: Lens' GoalData (Maybe Int32)

2630−gdGoalIndex

2631− = lens _gdGoalIndex (\ s a -> s{_gdGoalIndex = a}) .

2632− mapping _Coerce

2633−

2634−-- | URL of the page where this goal was completed.

2635−gdGoalCompletionLocation :: Lens' GoalData (Maybe Text)

2636−gdGoalCompletionLocation

2637− = lens _gdGoalCompletionLocation

2638− (\ s a -> s{_gdGoalCompletionLocation = a})

2639−

2640−-- | URL of the page one step prior to the goal completion.

2641−gdGoalPreviousStep1 :: Lens' GoalData (Maybe Text)

2642−gdGoalPreviousStep1

2643− = lens _gdGoalPreviousStep1

2644− (\ s a -> s{_gdGoalPreviousStep1 = a})

2645−

2646−-- | Total number of goal completions in this activity.

2647−gdGoalCompletions :: Lens' GoalData (Maybe Int64)

2648−gdGoalCompletions

2649− = lens _gdGoalCompletions

2650− (\ s a -> s{_gdGoalCompletions = a})

2651− . mapping _Coerce

2652−

2653−-- | Value in this goal.

2654−gdGoalValue :: Lens' GoalData (Maybe Double)

2655−gdGoalValue

2656− = lens _gdGoalValue (\ s a -> s{_gdGoalValue = a}) .

2657− mapping _Coerce

2658−

2659−instance FromJSON GoalData where

2660− parseJSON

2661− = withObject "GoalData"

2662− (\ o ->

2663− GoalData' <$>

2664− (o .:? "goalPreviousStep2") <*> (o .:? "goalName")

2665− <*> (o .:? "goalPreviousStep3")

2666− <*> (o .:? "goalIndex")

2667− <*> (o .:? "goalCompletionLocation")

2668− <*> (o .:? "goalPreviousStep1")

2669− <*> (o .:? "goalCompletions")

2670− <*> (o .:? "goalValue"))

2671−

2672−instance ToJSON GoalData where

2673− toJSON GoalData'{..}

2674− = object

2675− (catMaybes

2676− [("goalPreviousStep2" .=) <$> _gdGoalPreviousStep2,

2677− ("goalName" .=) <$> _gdGoalName,

2678− ("goalPreviousStep3" .=) <$> _gdGoalPreviousStep3,

2679− ("goalIndex" .=) <$> _gdGoalIndex,

2680− ("goalCompletionLocation" .=) <$>

2681− _gdGoalCompletionLocation,

2682− ("goalPreviousStep1" .=) <$> _gdGoalPreviousStep1,

2683− ("goalCompletions" .=) <$> _gdGoalCompletions,

2684− ("goalValue" .=) <$> _gdGoalValue])

2685−

2686−-- | An Activity represents data for an activity of a user. Note that an

2687−-- Activity is different from a hit. A hit might result in multiple

2688−-- Activity\'s. For example, if a hit includes a transaction and a goal

2689−-- completion, there will be two Activity protos for this hit, one for

2690−-- ECOMMERCE and one for GOAL. Conversely, multiple hits can also construct

2691−-- one Activity. In classic e-commerce, data for one transaction might be

2692−-- sent through multiple hits. These hits will be merged into one ECOMMERCE

2693−-- Activity.

2694−--

2695−-- /See:/ 'activity' smart constructor.

2696−data Activity =

2697− Activity'

2698− { _aEvent :: !(Maybe EventData)

2699− , _aHostname :: !(Maybe Text)

2700− , _aActivityType :: !(Maybe ActivityActivityType)

2701− , _aMedium :: !(Maybe Text)

2702− , _aPageview :: !(Maybe PageviewData)

2703− , _aCampaign :: !(Maybe Text)

2704− , _aGoals :: !(Maybe GoalSetData)

2705− , _aChannelGrouping :: !(Maybe Text)

2706− , _aAppview :: !(Maybe ScreenviewData)

2707− , _aSource :: !(Maybe Text)

2708− , _aActivityTime :: !(Maybe DateTime')

2709− , _aEcommerce :: !(Maybe EcommerceData)

2710− , _aCustomDimension :: !(Maybe [CustomDimension])

2711− , _aKeyword :: !(Maybe Text)

2712− , _aLandingPagePath :: !(Maybe Text)

2713− }

2714− deriving (Eq, Show, Data, Typeable, Generic)

2715−

2716−

2717−-- | Creates a value of 'Activity' with the minimum fields required to make a request.

2718−--

2719−-- Use one of the following lenses to modify other fields as desired:

2720−--

2721−-- * 'aEvent'

2722−--

2723−-- * 'aHostname'

2724−--

2725−-- * 'aActivityType'

2726−--

2727−-- * 'aMedium'

2728−--

2729−-- * 'aPageview'

2730−--

2731−-- * 'aCampaign'

2732−--

2733−-- * 'aGoals'

2734−--

2735−-- * 'aChannelGrouping'

2736−--

2737−-- * 'aAppview'

2738−--

2739−-- * 'aSource'

2740−--

2741−-- * 'aActivityTime'

2742−--

2743−-- * 'aEcommerce'

2744−--

2745−-- * 'aCustomDimension'

2746−--

2747−-- * 'aKeyword'

2748−--

2749−-- * 'aLandingPagePath'

2750−activity

2751− :: Activity

2752−activity =

2753− Activity'

2754− { _aEvent = Nothing

2755− , _aHostname = Nothing

2756− , _aActivityType = Nothing

2757− , _aMedium = Nothing

2758− , _aPageview = Nothing

2759− , _aCampaign = Nothing

2760− , _aGoals = Nothing

2761− , _aChannelGrouping = Nothing

2762− , _aAppview = Nothing

2763− , _aSource = Nothing

2764− , _aActivityTime = Nothing

2765− , _aEcommerce = Nothing

2766− , _aCustomDimension = Nothing

2767− , _aKeyword = Nothing

2768− , _aLandingPagePath = Nothing

2769− }

2770−

2771−

2772−-- | This field contains all the details pertaining to an event and will be

2773−-- set if \`activity_type\` equals \`EVENT\`.

2774−aEvent :: Lens' Activity (Maybe EventData)

2775−aEvent = lens _aEvent (\ s a -> s{_aEvent = a})

2776−

2777−-- | The hostname from which the tracking request was made.

2778−aHostname :: Lens' Activity (Maybe Text)

2779−aHostname

2780− = lens _aHostname (\ s a -> s{_aHostname = a})

2781−

2782−-- | Type of this activity.

2783−aActivityType :: Lens' Activity (Maybe ActivityActivityType)

2784−aActivityType

2785− = lens _aActivityType

2786− (\ s a -> s{_aActivityType = a})

2787−

2788−-- | The type of referrals. For manual campaign tracking, it is the value of

2789−-- the utm_medium campaign tracking parameter. For AdWords autotagging, it

2790−-- is cpc. If users came from a search engine detected by Google Analytics,

2791−-- it is organic. If the referrer is not a search engine, it is referral.

2792−-- If users came directly to the property and document.referrer is empty,

2793−-- its value is (none).

2794−aMedium :: Lens' Activity (Maybe Text)

2795−aMedium = lens _aMedium (\ s a -> s{_aMedium = a})

2796−

2797−-- | This will be set if \`activity_type\` equals \`PAGEVIEW\`. This field

2798−-- contains all the details about the visitor and the page that was

2799−-- visited.

2800−aPageview :: Lens' Activity (Maybe PageviewData)

2801−aPageview

2802− = lens _aPageview (\ s a -> s{_aPageview = a})

2803−

2804−-- | For manual campaign tracking, it is the value of the utm_campaign

2805−-- campaign tracking parameter. For AdWords autotagging, it is the name(s)

2806−-- of the online ad campaign(s) you use for the property. If you use

2807−-- neither, its value is (not set).

2808−aCampaign :: Lens' Activity (Maybe Text)

2809−aCampaign

2810− = lens _aCampaign (\ s a -> s{_aCampaign = a})

2811−

2812−-- | This field contains a list of all the goals that were reached in this

2813−-- activity when \`activity_type\` equals \`GOAL\`.

2814−aGoals :: Lens' Activity (Maybe GoalSetData)

2815−aGoals = lens _aGoals (\ s a -> s{_aGoals = a})

2816−

2817−-- | The Channel Group associated with an end user\'s session for this View

2818−-- (defined by the View\'s Channel Groupings).

2819−aChannelGrouping :: Lens' Activity (Maybe Text)

2820−aChannelGrouping

2821− = lens _aChannelGrouping

2822− (\ s a -> s{_aChannelGrouping = a})

2823−

2824−-- | This will be set if \`activity_type\` equals \`SCREEN_VIEW\`.

2825−aAppview :: Lens' Activity (Maybe ScreenviewData)

2826−aAppview = lens _aAppview (\ s a -> s{_aAppview = a})

2827−

2828−-- | The source of referrals. For manual campaign tracking, it is the value

2829−-- of the utm_source campaign tracking parameter. For AdWords autotagging,

2830−-- it is google. If you use neither, it is the domain of the source (e.g.,

2831−-- document.referrer) referring the users. It may also contain a port

2832−-- address. If users arrived without a referrer, its value is (direct).

2833−aSource :: Lens' Activity (Maybe Text)

2834−aSource = lens _aSource (\ s a -> s{_aSource = a})

2835−

2836−-- | Timestamp of the activity.

2837−aActivityTime :: Lens' Activity (Maybe UTCTime)

2838−aActivityTime

2839− = lens _aActivityTime

2840− (\ s a -> s{_aActivityTime = a})

2841− . mapping _DateTime

2842−

2843−-- | This will be set if \`activity_type\` equals \`ECOMMERCE\`.

2844−aEcommerce :: Lens' Activity (Maybe EcommerceData)

2845−aEcommerce

2846− = lens _aEcommerce (\ s a -> s{_aEcommerce = a})

2847−

2848−-- | A list of all custom dimensions associated with this activity.

2849−aCustomDimension :: Lens' Activity [CustomDimension]

2850−aCustomDimension

2851− = lens _aCustomDimension

2852− (\ s a -> s{_aCustomDimension = a})

2853− . _Default

2854− . _Coerce

2855−

2856−-- | For manual campaign tracking, it is the value of the utm_term campaign

2857−-- tracking parameter. For AdWords traffic, it contains the best matching

2858−-- targeting criteria. For the display network, where multiple targeting

2859−-- criteria could have caused the ad to show up, it returns the best

2860−-- matching targeting criteria as selected by Ads. This could be

2861−-- display_keyword, site placement, boomuserlist, user_interest, age, or

2862−-- gender. Otherwise its value is (not set).

2863−aKeyword :: Lens' Activity (Maybe Text)

2864−aKeyword = lens _aKeyword (\ s a -> s{_aKeyword = a})

2865−

2866−-- | The first page in users\' sessions, or the landing page.

2867−aLandingPagePath :: Lens' Activity (Maybe Text)

2868−aLandingPagePath

2869− = lens _aLandingPagePath

2870− (\ s a -> s{_aLandingPagePath = a})

2871−

2872−instance FromJSON Activity where

2873− parseJSON

2874− = withObject "Activity"

2875− (\ o ->

2876− Activity' <$>

2877− (o .:? "event") <*> (o .:? "hostname") <*>

2878− (o .:? "activityType")

2879− <*> (o .:? "medium")

2880− <*> (o .:? "pageview")

2881− <*> (o .:? "campaign")

2882− <*> (o .:? "goals")

2883− <*> (o .:? "channelGrouping")

2884− <*> (o .:? "appview")

2885− <*> (o .:? "source")

2886− <*> (o .:? "activityTime")

2887− <*> (o .:? "ecommerce")

2888− <*> (o .:? "customDimension" .!= mempty)

2889− <*> (o .:? "keyword")

2890− <*> (o .:? "landingPagePath"))

2891−

2892−instance ToJSON Activity where

2893− toJSON Activity'{..}

2894− = object

2895− (catMaybes

2896− [("event" .=) <$> _aEvent,

2897− ("hostname" .=) <$> _aHostname,

2898− ("activityType" .=) <$> _aActivityType,

2899− ("medium" .=) <$> _aMedium,

2900− ("pageview" .=) <$> _aPageview,

2901− ("campaign" .=) <$> _aCampaign,

2902− ("goals" .=) <$> _aGoals,

2903− ("channelGrouping" .=) <$> _aChannelGrouping,

2904− ("appview" .=) <$> _aAppview,

2905− ("source" .=) <$> _aSource,

2906− ("activityTime" .=) <$> _aActivityTime,

2907− ("ecommerce" .=) <$> _aEcommerce,

2908− ("customDimension" .=) <$> _aCustomDimension,

2909− ("keyword" .=) <$> _aKeyword,

2910− ("landingPagePath" .=) <$> _aLandingPagePath])

2911−

29122041-- | Defines a cohort. A cohort is a group of users who share a common

29132042-- characteristic. For example, all users with the same acquisition date

29142043-- belong to the same cohort.

@@ -2977,83 +2106,6 @@ instance ToJSON Cohort where

29772106 [("dateRange" .=) <$> _cDateRange,

29782107 ("name" .=) <$> _cName, ("type" .=) <$> _cType])

29792108

2980−-- | E-commerce details associated with the user activity.

2981−--

2982−-- /See:/ 'ecommerceData' smart constructor.

2983−data EcommerceData =

2984− EcommerceData'

2985− { _edEcommerceType :: !(Maybe EcommerceDataEcommerceType)

2986− , _edTransaction :: !(Maybe TransactionData)

2987− , _edProducts :: !(Maybe [ProductData])

2988− , _edActionType :: !(Maybe EcommerceDataActionType)

2989− }

2990− deriving (Eq, Show, Data, Typeable, Generic)

2991−

2992−

2993−-- | Creates a value of 'EcommerceData' with the minimum fields required to make a request.

2994−--

2995−-- Use one of the following lenses to modify other fields as desired:

2996−--

2997−-- * 'edEcommerceType'

2998−--

2999−-- * 'edTransaction'

3000−--

3001−-- * 'edProducts'

3002−--

3003−-- * 'edActionType'

3004−ecommerceData

3005− :: EcommerceData

3006−ecommerceData =

3007− EcommerceData'

3008− { _edEcommerceType = Nothing

3009− , _edTransaction = Nothing

3010− , _edProducts = Nothing

3011− , _edActionType = Nothing

3012− }

3013−

3014−

3015−-- | The type of this e-commerce activity.

3016−edEcommerceType :: Lens' EcommerceData (Maybe EcommerceDataEcommerceType)

3017−edEcommerceType

3018− = lens _edEcommerceType

3019− (\ s a -> s{_edEcommerceType = a})

3020−

3021−-- | Transaction details of this e-commerce action.

3022−edTransaction :: Lens' EcommerceData (Maybe TransactionData)

3023−edTransaction

3024− = lens _edTransaction

3025− (\ s a -> s{_edTransaction = a})

3026−

3027−-- | Details of the products in this transaction.

3028−edProducts :: Lens' EcommerceData [ProductData]

3029−edProducts

3030− = lens _edProducts (\ s a -> s{_edProducts = a}) .

3031− _Default

3032− . _Coerce

3033−

3034−-- | Action associated with this e-commerce action.

3035−edActionType :: Lens' EcommerceData (Maybe EcommerceDataActionType)

3036−edActionType

3037− = lens _edActionType (\ s a -> s{_edActionType = a})

3038−

3039−instance FromJSON EcommerceData where

3040− parseJSON

3041− = withObject "EcommerceData"

3042− (\ o ->

3043− EcommerceData' <$>

3044− (o .:? "ecommerceType") <*> (o .:? "transaction") <*>

3045− (o .:? "products" .!= mempty)

3046− <*> (o .:? "actionType"))

3047−

3048−instance ToJSON EcommerceData where

3049− toJSON EcommerceData'{..}

3050− = object

3051− (catMaybes

3052− [("ecommerceType" .=) <$> _edEcommerceType,

3053− ("transaction" .=) <$> _edTransaction,

3054− ("products" .=) <$> _edProducts,

3055− ("actionType" .=) <$> _edActionType])

3056−

30572109-- | Dimension filter specifies the filtering options on a dimension.

30582110--

30592111-- /See:/ 'dimensionFilter' smart constructor.

@@ -3217,54 +2269,6 @@ instance ToJSON GetReportsResponse where

32172269 _grrResourceQuotasRemaining,

32182270 ("queryCost" .=) <$> _grrQueryCost])

32192271

3220−-- | Custom dimension.

3221−--

3222−-- /See:/ 'customDimension' smart constructor.

3223−data CustomDimension =

3224− CustomDimension'

3225− { _cdValue :: !(Maybe Text)

3226− , _cdIndex :: !(Maybe (Textual Int32))

3227− }

3228− deriving (Eq, Show, Data, Typeable, Generic)

3229−

3230−

3231−-- | Creates a value of 'CustomDimension' with the minimum fields required to make a request.

3232−--

3233−-- Use one of the following lenses to modify other fields as desired:

3234−--

3235−-- * 'cdValue'

3236−--

3237−-- * 'cdIndex'

3238−customDimension

3239− :: CustomDimension

3240−customDimension = CustomDimension' {_cdValue = Nothing, _cdIndex = Nothing}

3241−

3242−

3243−-- | Value of the custom dimension. Default value (i.e. empty string)

3244−-- indicates clearing sesion\/visitor scope custom dimension value.

3245−cdValue :: Lens' CustomDimension (Maybe Text)

3246−cdValue = lens _cdValue (\ s a -> s{_cdValue = a})

3247−

3248−-- | Slot number of custom dimension.

3249−cdIndex :: Lens' CustomDimension (Maybe Int32)

3250−cdIndex

3251− = lens _cdIndex (\ s a -> s{_cdIndex = a}) .

3252− mapping _Coerce

3253−

3254−instance FromJSON CustomDimension where

3255− parseJSON

3256− = withObject "CustomDimension"

3257− (\ o ->

3258− CustomDimension' <$>

3259− (o .:? "value") <*> (o .:? "index"))

3260−

3261−instance ToJSON CustomDimension where

3262− toJSON CustomDimension'{..}

3263− = object

3264− (catMaybes

3265− [("value" .=) <$> _cdValue,

3266− ("index" .=) <$> _cdIndex])

3267−

32682272-- | The segment definition, if the report needs to be segmented. A Segment

32692273-- is a subset of the Analytics data. For example, of the entire set of

32702274-- users, one Segment might be users from a particular country or city.

@@ -3316,85 +2320,6 @@ instance ToJSON Segment where

33162320 [("dynamicSegment" .=) <$> _sDynamicSegment,

33172321 ("segmentId" .=) <$> _sSegmentId])

33182322

3319−-- | Details of the products in an e-commerce transaction.

3320−--

3321−-- /See:/ 'productData' smart constructor.

3322−data ProductData =

3323− ProductData'

3324− { _pdProductName :: !(Maybe Text)

3325− , _pdProductSKU :: !(Maybe Text)

3326− , _pdItemRevenue :: !(Maybe (Textual Double))

3327− , _pdProductQuantity :: !(Maybe (Textual Int64))

3328− }

3329− deriving (Eq, Show, Data, Typeable, Generic)

3330−

3331−

3332−-- | Creates a value of 'ProductData' with the minimum fields required to make a request.

3333−--

3334−-- Use one of the following lenses to modify other fields as desired:

3335−--

3336−-- * 'pdProductName'

3337−--

3338−-- * 'pdProductSKU'

3339−--

3340−-- * 'pdItemRevenue'

3341−--

3342−-- * 'pdProductQuantity'

3343−productData

3344− :: ProductData

3345−productData =

3346− ProductData'

3347− { _pdProductName = Nothing

3348− , _pdProductSKU = Nothing

3349− , _pdItemRevenue = Nothing

3350− , _pdProductQuantity = Nothing

3351− }

3352−

3353−

3354−-- | The product name, supplied by the e-commerce tracking application, for

3355−-- the purchased items.

3356−pdProductName :: Lens' ProductData (Maybe Text)

3357−pdProductName

3358− = lens _pdProductName

3359− (\ s a -> s{_pdProductName = a})

3360−

3361−-- | Unique code that represents the product.

3362−pdProductSKU :: Lens' ProductData (Maybe Text)

3363−pdProductSKU

3364− = lens _pdProductSKU (\ s a -> s{_pdProductSKU = a})

3365−

3366−-- | The total revenue from purchased product items.

3367−pdItemRevenue :: Lens' ProductData (Maybe Double)

3368−pdItemRevenue

3369− = lens _pdItemRevenue

3370− (\ s a -> s{_pdItemRevenue = a})

3371− . mapping _Coerce

3372−

3373−-- | Total number of this product units in the transaction.

3374−pdProductQuantity :: Lens' ProductData (Maybe Int64)

3375−pdProductQuantity

3376− = lens _pdProductQuantity

3377− (\ s a -> s{_pdProductQuantity = a})

3378− . mapping _Coerce

3379−

3380−instance FromJSON ProductData where

3381− parseJSON

3382− = withObject "ProductData"

3383− (\ o ->

3384− ProductData' <$>

3385− (o .:? "productName") <*> (o .:? "productSku") <*>

3386− (o .:? "itemRevenue")

3387− <*> (o .:? "productQuantity"))

3388−

3389−instance ToJSON ProductData where

3390− toJSON ProductData'{..}

3391− = object

3392− (catMaybes

3393− [("productName" .=) <$> _pdProductName,

3394− ("productSku" .=) <$> _pdProductSKU,

3395− ("itemRevenue" .=) <$> _pdItemRevenue,

3396− ("productQuantity" .=) <$> _pdProductQuantity])

3397−

33982323-- | The resource quota tokens remaining for the property after the request

33992324-- is completed.

34002325--

@@ -3722,165 +2647,3 @@ instance ToJSON ColumnHeader where

37222647 (catMaybes

37232648 [("metricHeader" .=) <$> _chMetricHeader,

37242649 ("dimensions" .=) <$> _chDimensions])

3725−

3726−-- | The response from \`userActivity:get\` call.

3727−--

3728−-- /See:/ 'searchUserActivityResponse' smart constructor.

3729−data SearchUserActivityResponse =

3730− SearchUserActivityResponse'

3731− { _suarNextPageToken :: !(Maybe Text)

3732− , _suarSampleRate :: !(Maybe (Textual Double))

3733− , _suarSessions :: !(Maybe [UserActivitySession])

3734− , _suarTotalRows :: !(Maybe (Textual Int32))

3735− }

3736− deriving (Eq, Show, Data, Typeable, Generic)

3737−

3738−

3739−-- | Creates a value of 'SearchUserActivityResponse' with the minimum fields required to make a request.

3740−--

3741−-- Use one of the following lenses to modify other fields as desired:

3742−--

3743−-- * 'suarNextPageToken'

3744−--

3745−-- * 'suarSampleRate'

3746−--

3747−-- * 'suarSessions'

3748−--

3749−-- * 'suarTotalRows'

3750−searchUserActivityResponse

3751− :: SearchUserActivityResponse

3752−searchUserActivityResponse =

3753− SearchUserActivityResponse'

3754− { _suarNextPageToken = Nothing

3755− , _suarSampleRate = Nothing

3756− , _suarSessions = Nothing

3757− , _suarTotalRows = Nothing

3758− }

3759−

3760−

3761−-- | This token should be passed to

3762−-- [SearchUserActivityRequest](#SearchUserActivityRequest) to retrieve the

3763−-- next page.

3764−suarNextPageToken :: Lens' SearchUserActivityResponse (Maybe Text)

3765−suarNextPageToken

3766− = lens _suarNextPageToken

3767− (\ s a -> s{_suarNextPageToken = a})

3768−

3769−-- | This field represents the [sampling

3770−-- rate](https:\/\/support.google.com\/analytics\/answer\/2637192) for the

3771−-- given request and is a number between 0.0 to 1.0. See [developer

3772−-- guide](\/analytics\/devguides\/reporting\/core\/v4\/basics#sampling) for

3773−-- details.

3774−suarSampleRate :: Lens' SearchUserActivityResponse (Maybe Double)

3775−suarSampleRate

3776− = lens _suarSampleRate

3777− (\ s a -> s{_suarSampleRate = a})

3778− . mapping _Coerce

3779−

3780−-- | Each record represents a session (device details, duration, etc).

3781−suarSessions :: Lens' SearchUserActivityResponse [UserActivitySession]

3782−suarSessions

3783− = lens _suarSessions (\ s a -> s{_suarSessions = a})

3784− . _Default

3785− . _Coerce

3786−

3787−-- | Total rows returned by this query (across different pages).

3788−suarTotalRows :: Lens' SearchUserActivityResponse (Maybe Int32)

3789−suarTotalRows

3790− = lens _suarTotalRows

3791− (\ s a -> s{_suarTotalRows = a})

3792− . mapping _Coerce

3793−

3794−instance FromJSON SearchUserActivityResponse where

3795− parseJSON

3796− = withObject "SearchUserActivityResponse"

3797− (\ o ->

3798− SearchUserActivityResponse' <$>

3799− (o .:? "nextPageToken") <*> (o .:? "sampleRate") <*>

3800− (o .:? "sessions" .!= mempty)

3801− <*> (o .:? "totalRows"))

3802−

3803−instance ToJSON SearchUserActivityResponse where

3804− toJSON SearchUserActivityResponse'{..}

3805− = object

3806− (catMaybes

3807− [("nextPageToken" .=) <$> _suarNextPageToken,

3808− ("sampleRate" .=) <$> _suarSampleRate,

3809− ("sessions" .=) <$> _suarSessions,

3810− ("totalRows" .=) <$> _suarTotalRows])

3811−

3812−--

3813−-- /See:/ 'screenviewData' smart constructor.

3814−data ScreenviewData =

3815− ScreenviewData'

3816− { _sdMobileDeviceModel :: !(Maybe Text)

3817− , _sdMobileDeviceBranding :: !(Maybe Text)

3818− , _sdAppName :: !(Maybe Text)

3819− , _sdScreenName :: !(Maybe Text)

3820− }

3821− deriving (Eq, Show, Data, Typeable, Generic)

3822−

3823−

3824−-- | Creates a value of 'ScreenviewData' with the minimum fields required to make a request.

3825−--

3826−-- Use one of the following lenses to modify other fields as desired:

3827−--

3828−-- * 'sdMobileDeviceModel'

3829−--

3830−-- * 'sdMobileDeviceBranding'

3831−--

3832−-- * 'sdAppName'

3833−--

3834−-- * 'sdScreenName'

3835−screenviewData

3836− :: ScreenviewData

3837−screenviewData =

3838− ScreenviewData'

3839− { _sdMobileDeviceModel = Nothing

3840− , _sdMobileDeviceBranding = Nothing

3841− , _sdAppName = Nothing

3842− , _sdScreenName = Nothing

3843− }

3844−

3845−

3846−-- | Mobile device model. Eg: \"Pixel\", \"iPhone\" etc.

3847−sdMobileDeviceModel :: Lens' ScreenviewData (Maybe Text)

3848−sdMobileDeviceModel

3849− = lens _sdMobileDeviceModel

3850− (\ s a -> s{_sdMobileDeviceModel = a})

3851−

3852−-- | Mobile manufacturer or branded name. Eg: \"Google\", \"Apple\" etc.

3853−sdMobileDeviceBranding :: Lens' ScreenviewData (Maybe Text)

3854−sdMobileDeviceBranding

3855− = lens _sdMobileDeviceBranding

3856− (\ s a -> s{_sdMobileDeviceBranding = a})

3857−

3858−-- | The application name.

3859−sdAppName :: Lens' ScreenviewData (Maybe Text)

3860−sdAppName

3861− = lens _sdAppName (\ s a -> s{_sdAppName = a})

3862−

3863−-- | The name of the screen.

3864−sdScreenName :: Lens' ScreenviewData (Maybe Text)

3865−sdScreenName

3866− = lens _sdScreenName (\ s a -> s{_sdScreenName = a})

3867−

3868−instance FromJSON ScreenviewData where

3869− parseJSON

3870− = withObject "ScreenviewData"

3871− (\ o ->

3872− ScreenviewData' <$>

3873− (o .:? "mobileDeviceModel") <*>

3874− (o .:? "mobileDeviceBranding")

3875− <*> (o .:? "appName")

3876− <*> (o .:? "screenName"))

3877−

3878−instance ToJSON ScreenviewData where

3879− toJSON ScreenviewData'{..}

3880− = object

3881− (catMaybes

3882− [("mobileDeviceModel" .=) <$> _sdMobileDeviceModel,

3883− ("mobileDeviceBranding" .=) <$>

3884− _sdMobileDeviceBranding,

3885− ("appName" .=) <$> _sdAppName,

3886− ("screenName" .=) <$> _sdScreenName])

gogol-analyticsreporting/gen/Network/Google/AnalyticsReporting/Types/Sum.hs+15−201

@@ -190,70 +190,6 @@ instance FromJSON OrderByOrderType where

190190instance ToJSON OrderByOrderType where

191191 toJSON = toJSONText

192192

193−-- | Action associated with this e-commerce action.

194−data EcommerceDataActionType

195− = Unknown

196− -- ^ @UNKNOWN@

197− -- Action type is not known.

198− | Click

199− -- ^ @CLICK@

200− -- Click through of product lists.

201− | DetailsView

202− -- ^ @DETAILS_VIEW@

203− -- Product detail views.

204− | AddToCart

205− -- ^ @ADD_TO_CART@

206− -- Add product(s) to cart.

207− | RemoveFromCart

208− -- ^ @REMOVE_FROM_CART@

209− -- Remove product(s) from cart.

210− | Checkout

211− -- ^ @CHECKOUT@

212− -- Check out.

213− | Payment

214− -- ^ @PAYMENT@

215− -- Completed purchase.

216− | Refund

217− -- ^ @REFUND@

218− -- Refund of purchase.

219− | CheckoutOption

220− -- ^ @CHECKOUT_OPTION@

221− -- Checkout options.

222− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

223−

224−instance Hashable EcommerceDataActionType

225−

226−instance FromHttpApiData EcommerceDataActionType where

227− parseQueryParam = \case

228− "UNKNOWN" -> Right Unknown

229− "CLICK" -> Right Click

230− "DETAILS_VIEW" -> Right DetailsView

231− "ADD_TO_CART" -> Right AddToCart

232− "REMOVE_FROM_CART" -> Right RemoveFromCart

233− "CHECKOUT" -> Right Checkout

234− "PAYMENT" -> Right Payment

235− "REFUND" -> Right Refund

236− "CHECKOUT_OPTION" -> Right CheckoutOption

237− x -> Left ("Unable to parse EcommerceDataActionType from: " <> x)

238−

239−instance ToHttpApiData EcommerceDataActionType where

240− toQueryParam = \case

241− Unknown -> "UNKNOWN"

242− Click -> "CLICK"

243− DetailsView -> "DETAILS_VIEW"

244− AddToCart -> "ADD_TO_CART"

245− RemoveFromCart -> "REMOVE_FROM_CART"

246− Checkout -> "CHECKOUT"

247− Payment -> "PAYMENT"

248− Refund -> "REFUND"

249− CheckoutOption -> "CHECKOUT_OPTION"

250−

251−instance FromJSON EcommerceDataActionType where

252− parseJSON = parseJSONText "EcommerceDataActionType"

253−

254−instance ToJSON EcommerceDataActionType where

255− toJSON = toJSONText

256−

257193-- | The sorting order for the field.

258194data OrderBySortOrder

259195 = SortOrderUnspecified

@@ -501,21 +437,21 @@ instance ToJSON SegmentSequenceStepMatchType where

501437-- scope as defined in the data model. The primary scope is defined by if

502438-- the segment is selecting users or sessions.

503439data SegmentMetricFilterScope

504− = SMFSUnspecifiedScope

440+ = UnspecifiedScope

505441 -- ^ @UNSPECIFIED_SCOPE@

506442 -- If the scope is unspecified, it defaults to the condition scope,

507443 -- \`USER\` or \`SESSION\` depending on if the segment is trying to choose

508444 -- users or sessions.

509− | SMFSProduct

445+ | Product

510446 -- ^ @PRODUCT@

511447 -- Product scope.

512− | SMFSHit

448+ | Hit

513449 -- ^ @HIT@

514450 -- Hit scope.

515− | SMFSSession

451+ | Session

516452 -- ^ @SESSION@

517453 -- Session scope.

518− | SMFSUser

454+ | User

519455 -- ^ @USER@

520456 -- User scope.

521457 deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

@@ -524,20 +460,20 @@ instance Hashable SegmentMetricFilterScope

524460

525461instance FromHttpApiData SegmentMetricFilterScope where

526462 parseQueryParam = \case

527− "UNSPECIFIED_SCOPE" -> Right SMFSUnspecifiedScope

528− "PRODUCT" -> Right SMFSProduct

529− "HIT" -> Right SMFSHit

530− "SESSION" -> Right SMFSSession

531− "USER" -> Right SMFSUser

463+ "UNSPECIFIED_SCOPE" -> Right UnspecifiedScope

464+ "PRODUCT" -> Right Product

465+ "HIT" -> Right Hit

466+ "SESSION" -> Right Session

467+ "USER" -> Right User

532468 x -> Left ("Unable to parse SegmentMetricFilterScope from: " <> x)

533469

534470instance ToHttpApiData SegmentMetricFilterScope where

535471 toQueryParam = \case

536− SMFSUnspecifiedScope -> "UNSPECIFIED_SCOPE"

537− SMFSProduct -> "PRODUCT"

538− SMFSHit -> "HIT"

539− SMFSSession -> "SESSION"

540− SMFSUser -> "USER"

472+ UnspecifiedScope -> "UNSPECIFIED_SCOPE"

473+ Product -> "PRODUCT"

474+ Hit -> "HIT"

475+ Session -> "SESSION"

476+ User -> "USER"

541477

542478instance FromJSON SegmentMetricFilterScope where

543479 parseJSON = parseJSONText "SegmentMetricFilterScope"

@@ -545,40 +481,6 @@ instance FromJSON SegmentMetricFilterScope where

545481instance ToJSON SegmentMetricFilterScope where

546482 toJSON = toJSONText

547483

548−-- | The type of this e-commerce activity.

549−data EcommerceDataEcommerceType

550− = EcommerceTypeUnspecified

551− -- ^ @ECOMMERCE_TYPE_UNSPECIFIED@

552− -- Used when the e-commerce activity type is unspecified.

553− | Classic

554− -- ^ @CLASSIC@

555− -- Used when activity has classic (non-enhanced) e-commerce information.

556− | Enhanced

557− -- ^ @ENHANCED@

558− -- Used when activity has enhanced e-commerce information.

559− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

560−

561−instance Hashable EcommerceDataEcommerceType

562−

563−instance FromHttpApiData EcommerceDataEcommerceType where

564− parseQueryParam = \case

565− "ECOMMERCE_TYPE_UNSPECIFIED" -> Right EcommerceTypeUnspecified

566− "CLASSIC" -> Right Classic

567− "ENHANCED" -> Right Enhanced

568− x -> Left ("Unable to parse EcommerceDataEcommerceType from: " <> x)

569−

570−instance ToHttpApiData EcommerceDataEcommerceType where

571− toQueryParam = \case

572− EcommerceTypeUnspecified -> "ECOMMERCE_TYPE_UNSPECIFIED"

573− Classic -> "CLASSIC"

574− Enhanced -> "ENHANCED"

575−

576−instance FromJSON EcommerceDataEcommerceType where

577− parseJSON = parseJSONText "EcommerceDataEcommerceType"

578−

579−instance ToJSON EcommerceDataEcommerceType where

580− toJSON = toJSONText

581−

582484-- | How to match the dimension to the expression. The default is REGEXP.

583485data DimensionFilterOperator

584486 = DFOOperatorUnspecified

@@ -661,57 +563,6 @@ instance FromJSON DimensionFilterOperator where

661563instance ToJSON DimensionFilterOperator where

662564 toJSON = toJSONText

663565

664−-- | Type of this activity.

665−data ActivityActivityType

666− = ActivityTypeUnspecified

667− -- ^ @ACTIVITY_TYPE_UNSPECIFIED@

668− -- ActivityType will never have this value in the response. Using this type

669− -- in the request will result in an error.

670− | Pageview

671− -- ^ @PAGEVIEW@

672− -- Used when the activity resulted out of a visitor viewing a page.

673− | Screenview

674− -- ^ @SCREENVIEW@

675− -- Used when the activity resulted out of a visitor using an application on

676− -- a mobile device.

677− | Goal

678− -- ^ @GOAL@

679− -- Used to denote that a goal type activity.

680− | Ecommerce

681− -- ^ @ECOMMERCE@

682− -- An e-commerce transaction was performed by the visitor on the page.

683− | Event

684− -- ^ @EVENT@

685− -- Used when the activity is an event.

686− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

687−

688−instance Hashable ActivityActivityType

689−

690−instance FromHttpApiData ActivityActivityType where

691− parseQueryParam = \case

692− "ACTIVITY_TYPE_UNSPECIFIED" -> Right ActivityTypeUnspecified

693− "PAGEVIEW" -> Right Pageview

694− "SCREENVIEW" -> Right Screenview

695− "GOAL" -> Right Goal

696− "ECOMMERCE" -> Right Ecommerce

697− "EVENT" -> Right Event

698− x -> Left ("Unable to parse ActivityActivityType from: " <> x)

699−

700−instance ToHttpApiData ActivityActivityType where

701− toQueryParam = \case

702− ActivityTypeUnspecified -> "ACTIVITY_TYPE_UNSPECIFIED"

703− Pageview -> "PAGEVIEW"

704− Screenview -> "SCREENVIEW"

705− Goal -> "GOAL"

706− Ecommerce -> "ECOMMERCE"

707− Event -> "EVENT"

708−

709−instance FromJSON ActivityActivityType where

710− parseJSON = parseJSONText "ActivityActivityType"

711−

712−instance ToJSON ActivityActivityType where

713− toJSON = toJSONText

714−

715566-- | Specifies how the metric expression should be formatted, for example

716567-- \`INTEGER\`.

717568data MetricFormattingType

@@ -878,40 +729,3 @@ instance FromJSON MetricFilterClauseOperator where

878729

879730instance ToJSON MetricFilterClauseOperator where

880731 toJSON = toJSONText

881−

882−-- | Type of the user in the request. The field \`userId\` is associated with

883−-- this type.

884−data UserType

885− = UserIdTypeUnspecified

886− -- ^ @USER_ID_TYPE_UNSPECIFIED@

887− -- When the User Id Type is not specified, the default type used will be

888− -- CLIENT_ID.

889− | UserIdTypeUserId

890− -- ^ @USER_ID_TYPE_USER_ID@

891− -- A single user, like a signed-in user account, that may interact with

892− -- content across one or more devices and \/ or browser instances.

893− | UserIdTypeClientId

894− -- ^ @USER_ID_TYPE_CLIENT_ID@

895− -- Analytics assigned client_id.

896− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

897−

898−instance Hashable UserType

899−

900−instance FromHttpApiData UserType where

901− parseQueryParam = \case

902− "USER_ID_TYPE_UNSPECIFIED" -> Right UserIdTypeUnspecified

903− "USER_ID_TYPE_USER_ID" -> Right UserIdTypeUserId

904− "USER_ID_TYPE_CLIENT_ID" -> Right UserIdTypeClientId

905− x -> Left ("Unable to parse UserType from: " <> x)

906−

907−instance ToHttpApiData UserType where

908− toQueryParam = \case

909− UserIdTypeUnspecified -> "USER_ID_TYPE_UNSPECIFIED"

910− UserIdTypeUserId -> "USER_ID_TYPE_USER_ID"

911− UserIdTypeClientId -> "USER_ID_TYPE_CLIENT_ID"

912−

913−instance FromJSON UserType where

914− parseJSON = parseJSONText "UserType"

915−

916−instance ToJSON UserType where

917− toJSON = toJSONText

gogol-analyticsreporting/gen/Network/Google/Resource/AnalyticsReporting/UserActivity/Search.hsdeleted−153

@@ -1,153 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AnalyticsReporting.UserActivity.Search

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Returns User Activity data.

24−--

25−-- /See:/ <https://developers.google.com/analytics/devguides/reporting/core/v4/ Analytics Reporting API Reference> for @analyticsreporting.userActivity.search@.

26−module Network.Google.Resource.AnalyticsReporting.UserActivity.Search

27− (

28− -- * REST Resource

29− UserActivitySearchResource

30−

31− -- * Creating a Request

32− , userActivitySearch

33− , UserActivitySearch

34−

35− -- * Request Lenses

36− , uasXgafv

37− , uasUploadProtocol

38− , uasAccessToken

39− , uasUploadType

40− , uasPayload

41− , uasCallback

42− ) where

43−

44−import Network.Google.AnalyticsReporting.Types

45−import Network.Google.Prelude

46−

47−-- | A resource alias for @analyticsreporting.userActivity.search@ method which the

48−-- 'UserActivitySearch' request conforms to.

49−type UserActivitySearchResource =

50− "v4" :>

51− "userActivity:search" :>

52− QueryParam "$.xgafv" Xgafv :>

53− QueryParam "upload_protocol" Text :>

54− QueryParam "access_token" Text :>

55− QueryParam "uploadType" Text :>

56− QueryParam "callback" Text :>

57− QueryParam "alt" AltJSON :>

58− ReqBody '[JSON] SearchUserActivityRequest :>

59− Post '[JSON] SearchUserActivityResponse

60−

61−-- | Returns User Activity data.

62−--

63−-- /See:/ 'userActivitySearch' smart constructor.

64−data UserActivitySearch =

65− UserActivitySearch'

66− { _uasXgafv :: !(Maybe Xgafv)

67− , _uasUploadProtocol :: !(Maybe Text)

68− , _uasAccessToken :: !(Maybe Text)

69− , _uasUploadType :: !(Maybe Text)

70− , _uasPayload :: !SearchUserActivityRequest

71− , _uasCallback :: !(Maybe Text)

72− }

73− deriving (Eq, Show, Data, Typeable, Generic)

74−

75−

76−-- | Creates a value of 'UserActivitySearch' with the minimum fields required to make a request.

77−--

78−-- Use one of the following lenses to modify other fields as desired:

79−--

80−-- * 'uasXgafv'

81−--

82−-- * 'uasUploadProtocol'

83−--

84−-- * 'uasAccessToken'

85−--

86−-- * 'uasUploadType'

87−--

88−-- * 'uasPayload'

89−--

90−-- * 'uasCallback'

91−userActivitySearch

92− :: SearchUserActivityRequest -- ^ 'uasPayload'

93− -> UserActivitySearch

94−userActivitySearch pUasPayload_ =

95− UserActivitySearch'

96− { _uasXgafv = Nothing

97− , _uasUploadProtocol = Nothing

98− , _uasAccessToken = Nothing

99− , _uasUploadType = Nothing

100− , _uasPayload = pUasPayload_

101− , _uasCallback = Nothing

102− }

103−

104−

105−-- | V1 error format.

106−uasXgafv :: Lens' UserActivitySearch (Maybe Xgafv)

107−uasXgafv = lens _uasXgafv (\ s a -> s{_uasXgafv = a})

108−

109−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

110−uasUploadProtocol :: Lens' UserActivitySearch (Maybe Text)

111−uasUploadProtocol

112− = lens _uasUploadProtocol

113− (\ s a -> s{_uasUploadProtocol = a})

114−

115−-- | OAuth access token.

116−uasAccessToken :: Lens' UserActivitySearch (Maybe Text)

117−uasAccessToken

118− = lens _uasAccessToken

119− (\ s a -> s{_uasAccessToken = a})

120−

121−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

122−uasUploadType :: Lens' UserActivitySearch (Maybe Text)

123−uasUploadType

124− = lens _uasUploadType

125− (\ s a -> s{_uasUploadType = a})

126−

127−-- | Multipart request metadata.

128−uasPayload :: Lens' UserActivitySearch SearchUserActivityRequest

129−uasPayload

130− = lens _uasPayload (\ s a -> s{_uasPayload = a})

131−

132−-- | JSONP

133−uasCallback :: Lens' UserActivitySearch (Maybe Text)

134−uasCallback

135− = lens _uasCallback (\ s a -> s{_uasCallback = a})

136−

137−instance GoogleRequest UserActivitySearch where

138− type Rs UserActivitySearch =

139− SearchUserActivityResponse

140− type Scopes UserActivitySearch =

141− '["https://www.googleapis.com/auth/analytics",

142− "https://www.googleapis.com/auth/analytics.readonly"]

143− requestClient UserActivitySearch'{..}

144− = go _uasXgafv _uasUploadProtocol _uasAccessToken

145− _uasUploadType

146− _uasCallback

147− (Just AltJSON)

148− _uasPayload

149− analyticsReportingService

150− where go

151− = buildClient

152− (Proxy :: Proxy UserActivitySearchResource)

153− mempty

gogol-analyticsreporting/gogol-analyticsreporting.cabal−1

@@ -36,7 +36,6 @@ library

3636 Network.Google.AnalyticsReporting

3737 , Network.Google.AnalyticsReporting.Types

3838 , Network.Google.Resource.AnalyticsReporting.Reports.BatchGet

39− , Network.Google.Resource.AnalyticsReporting.UserActivity.Search

4039

4140 other-modules:

4241 Network.Google.AnalyticsReporting.Types.Product

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise.hs+11−1

@@ -83,6 +83,9 @@ module Network.Google.AndroidEnterprise

8383 -- ** androidenterprise.enterprises.setAccount

8484 , module Network.Google.Resource.AndroidEnterprise.Enterprises.SetAccount

8585

86+ -- ** androidenterprise.enterprises.setAndroidDevicePolicyConfig

87+ , module Network.Google.Resource.AndroidEnterprise.Enterprises.SetAndroidDevicePolicyConfig

88+

8689 -- ** androidenterprise.enterprises.setStoreLayout

8790 , module Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

8891

@@ -504,7 +507,6 @@ module Network.Google.AndroidEnterprise

504507 , ProductPolicy

505508 , productPolicy

506509 , ppTracks

507− , ppManagedConfiguration

508510 , ppTrackIds

509511 , ppAutoInstallPolicy

510512 , ppProductId

@@ -563,6 +565,12 @@ module Network.Google.AndroidEnterprise

563565 , gllrGroupLicense

564566 , gllrKind

565567

568+ -- ** AndroidDevicePolicyConfig

569+ , AndroidDevicePolicyConfig

570+ , androidDevicePolicyConfig

571+ , adpcState

572+ , adpcKind

573+

566574 -- ** ProductSet

567575 , ProductSet

568576 , productSet

@@ -901,6 +909,7 @@ import Network.Google.Resource.AndroidEnterprise.Enterprises.List

901909import Network.Google.Resource.AndroidEnterprise.Enterprises.PullNotificationSet

902910import Network.Google.Resource.AndroidEnterprise.Enterprises.SendTestPushNotification

903911import Network.Google.Resource.AndroidEnterprise.Enterprises.SetAccount

912+import Network.Google.Resource.AndroidEnterprise.Enterprises.SetAndroidDevicePolicyConfig

904913import Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

905914import Network.Google.Resource.AndroidEnterprise.Enterprises.Unenroll

906915import Network.Google.Resource.AndroidEnterprise.Entitlements.Delete

@@ -1014,6 +1023,7 @@ type AndroidEnterpriseAPI =

10141023 :<|> EnterprisesListResource

10151024 :<|> EnterprisesUnenrollResource

10161025 :<|> EnterprisesGetStoreLayoutResource

1026+ :<|> EnterprisesSetAndroidDevicePolicyConfigResource

10171027 :<|> EnterprisesSetAccountResource

10181028 :<|> EnterprisesEnrollResource

10191029 :<|> EnterprisesGetResource

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types.hs+6−1

@@ -240,7 +240,6 @@ module Network.Google.AndroidEnterprise.Types

240240 , ProductPolicy

241241 , productPolicy

242242 , ppTracks

243− , ppManagedConfiguration

244243 , ppTrackIds

245244 , ppAutoInstallPolicy

246245 , ppProductId

@@ -299,6 +298,12 @@ module Network.Google.AndroidEnterprise.Types

299298 , gllrGroupLicense

300299 , gllrKind

301300

301+ -- * AndroidDevicePolicyConfig

302+ , AndroidDevicePolicyConfig

303+ , androidDevicePolicyConfig

304+ , adpcState

305+ , adpcKind

306+

302307 -- * ProductSet

303308 , ProductSet

304309 , productSet

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Product.hs+63−36

@@ -2196,11 +2196,10 @@ instance ToJSON AppRestrictionsSchemaRestriction

21962196-- /See:/ 'productPolicy' smart constructor.

21972197data ProductPolicy =

21982198 ProductPolicy'

2199− { _ppTracks :: !(Maybe [Text])

2200− , _ppManagedConfiguration :: !(Maybe ManagedConfiguration)

2201− , _ppTrackIds :: !(Maybe [Text])

2202− , _ppAutoInstallPolicy :: !(Maybe AutoInstallPolicy)

2203− , _ppProductId :: !(Maybe Text)

2199+ { _ppTracks :: !(Maybe [Text])

2200+ , _ppTrackIds :: !(Maybe [Text])

2201+ , _ppAutoInstallPolicy :: !(Maybe AutoInstallPolicy)

2202+ , _ppProductId :: !(Maybe Text)

22042203 }

22052204 deriving (Eq, Show, Data, Typeable, Generic)

22062205

@@ -2211,8 +2210,6 @@ data ProductPolicy =

22112210--

22122211-- * 'ppTracks'

22132212--

2214−-- * 'ppManagedConfiguration'

2215−--

22162213-- * 'ppTrackIds'

22172214--

22182215-- * 'ppAutoInstallPolicy'

@@ -2223,7 +2220,6 @@ productPolicy

22232220productPolicy =

22242221 ProductPolicy'

22252222 { _ppTracks = Nothing

2226− , _ppManagedConfiguration = Nothing

22272223 , _ppTrackIds = Nothing

22282224 , _ppAutoInstallPolicy = Nothing

22292225 , _ppProductId = Nothing

@@ -2237,12 +2233,6 @@ ppTracks

22372233 _Default

22382234 . _Coerce

22392235

2240−-- | The managed configuration for the product.

2241−ppManagedConfiguration :: Lens' ProductPolicy (Maybe ManagedConfiguration)

2242−ppManagedConfiguration

2243− = lens _ppManagedConfiguration

2244− (\ s a -> s{_ppManagedConfiguration = a})

2245−

22462236-- | Grants the device visibility to the specified product release track(s),

22472237-- identified by trackIds. The list of release tracks of a product can be

22482238-- obtained by calling Products.Get.

@@ -2269,8 +2259,7 @@ instance FromJSON ProductPolicy where

22692259 (\ o ->

22702260 ProductPolicy' <$>

22712261 (o .:? "tracks" .!= mempty) <*>

2272− (o .:? "managedConfiguration")

2273− <*> (o .:? "trackIds" .!= mempty)

2262+ (o .:? "trackIds" .!= mempty)

22742263 <*> (o .:? "autoInstallPolicy")

22752264 <*> (o .:? "productId"))

22762265

@@ -2279,8 +2268,6 @@ instance ToJSON ProductPolicy where

22792268 = object

22802269 (catMaybes

22812270 [("tracks" .=) <$> _ppTracks,

2282− ("managedConfiguration" .=) <$>

2283− _ppManagedConfiguration,

22842271 ("trackIds" .=) <$> _ppTrackIds,

22852272 ("autoInstallPolicy" .=) <$> _ppAutoInstallPolicy,

22862273 ("productId" .=) <$> _ppProductId])

@@ -2750,6 +2737,59 @@ instance ToJSON GroupLicensesListResponse where

27502737 [("groupLicense" .=) <$> _gllrGroupLicense,

27512738 Just ("kind" .= _gllrKind)])

27522739

2740+-- | Deprecated and unused.

2741+--

2742+-- /See:/ 'androidDevicePolicyConfig' smart constructor.

2743+data AndroidDevicePolicyConfig =

2744+ AndroidDevicePolicyConfig'

2745+ { _adpcState :: !(Maybe Text)

2746+ , _adpcKind :: !Text

2747+ }

2748+ deriving (Eq, Show, Data, Typeable, Generic)

2749+

2750+

2751+-- | Creates a value of 'AndroidDevicePolicyConfig' with the minimum fields required to make a request.

2752+--

2753+-- Use one of the following lenses to modify other fields as desired:

2754+--

2755+-- * 'adpcState'

2756+--

2757+-- * 'adpcKind'

2758+androidDevicePolicyConfig

2759+ :: AndroidDevicePolicyConfig

2760+androidDevicePolicyConfig =

2761+ AndroidDevicePolicyConfig'

2762+ { _adpcState = Nothing

2763+ , _adpcKind = "androidenterprise#androidDevicePolicyConfig"

2764+ }

2765+

2766+

2767+-- | Deprecated and unused.

2768+adpcState :: Lens' AndroidDevicePolicyConfig (Maybe Text)

2769+adpcState

2770+ = lens _adpcState (\ s a -> s{_adpcState = a})

2771+

2772+-- | Identifies what kind of resource this is. Value: the fixed string

2773+-- \"androidenterprise#androidDevicePolicyConfig\".

2774+adpcKind :: Lens' AndroidDevicePolicyConfig Text

2775+adpcKind = lens _adpcKind (\ s a -> s{_adpcKind = a})

2776+

2777+instance FromJSON AndroidDevicePolicyConfig where

2778+ parseJSON

2779+ = withObject "AndroidDevicePolicyConfig"

2780+ (\ o ->

2781+ AndroidDevicePolicyConfig' <$>

2782+ (o .:? "state") <*>

2783+ (o .:? "kind" .!=

2784+ "androidenterprise#androidDevicePolicyConfig"))

2785+

2786+instance ToJSON AndroidDevicePolicyConfig where

2787+ toJSON AndroidDevicePolicyConfig'{..}

2788+ = object

2789+ (catMaybes

2790+ [("state" .=) <$> _adpcState,

2791+ Just ("kind" .= _adpcKind)])

2792+

27532793-- | A set of products.

27542794--

27552795-- /See:/ 'productSet' smart constructor.

@@ -5805,10 +5845,7 @@ instance ToJSON ProductsListResponse where

58055845 Just ("kind" .= _plrKind),

58065846 ("product" .=) <$> _plrProduct])

58075847

5808−-- | A WebApps resource represents a web app created for an enterprise. Web

5809−-- apps are published to managed Google Play and can be distributed like

5810−-- other Android apps. On a user\'s device, a web app opens its specified

5811−-- URL.

5848+-- | WebApp resource info.

58125849--

58135850-- /See:/ 'webApp' smart constructor.

58145851data WebApp =

@@ -5855,9 +5892,7 @@ webApp =

58555892 }

58565893

58575894

5858−-- | The ID of the application. A string of the form \"app:\" where the

5859−-- package name always starts with the prefix

5860−-- \"com.google.enterprise.webapp.\" followed by a random id.

5895+-- | The ID of the application.

58615896waWebAppId :: Lens' WebApp (Maybe Text)

58625897waWebAppId

58635898 = lens _waWebAppId (\ s a -> s{_waWebAppId = a})

@@ -5884,15 +5919,7 @@ waStartURL :: Lens' WebApp (Maybe Text)

58845919waStartURL

58855920 = lens _waStartURL (\ s a -> s{_waStartURL = a})

58865921

5887−-- | The display mode of the web app. Possible values include: -

5888−-- \"minimalUi\", the device\'s status bar, navigation bar, the app\'s URL,

5889−-- and a refresh button are visible when the app is open. For HTTP URLs,

5890−-- you can only select this option. - \"standalone\", the device\'s status

5891−-- bar and navigation bar are visible when the app is open. -

5892−-- \"fullScreen\", the app opens in full screen mode, hiding the device\'s

5893−-- status and navigation bars. All browser UI elements, page URL, system

5894−-- status bar and back button are not visible, and the web app takes up the

5895−-- entirety of the available display area.

5922+-- | The display mode of the web app.

58965923waDisplayMode :: Lens' WebApp (Maybe Text)

58975924waDisplayMode

58985925 = lens _waDisplayMode

@@ -5904,8 +5931,8 @@ waIsPublished

59045931 = lens _waIsPublished

59055932 (\ s a -> s{_waIsPublished = a})

59065933

5907−-- | The title of the web app as displayed to the user (e.g., amongst a list

5908−-- of other applications, or as a label for an icon).

5934+-- | The title of the web application as displayed to the user (e.g., amongst

5935+-- a list of other applications, or as a label for an icon).

59095936waTitle :: Lens' WebApp (Maybe Text)

59105937waTitle = lens _waTitle (\ s a -> s{_waTitle = a})

59115938

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/SetAndroidDevicePolicyConfig.hsnew file+114

@@ -0,0 +1,114 @@

1+{-# LANGUAGE DataKinds #-}

2+{-# LANGUAGE DeriveDataTypeable #-}

3+{-# LANGUAGE DeriveGeneric #-}

4+{-# LANGUAGE FlexibleInstances #-}

5+{-# LANGUAGE NoImplicitPrelude #-}

6+{-# LANGUAGE OverloadedStrings #-}

7+{-# LANGUAGE RecordWildCards #-}

8+{-# LANGUAGE TypeFamilies #-}

9+{-# LANGUAGE TypeOperators #-}

10+

11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14+

15+-- |

16+-- Module : Network.Google.Resource.AndroidEnterprise.Enterprises.SetAndroidDevicePolicyConfig

17+-- Copyright : (c) 2015-2016 Brendan Hay

18+-- License : Mozilla Public License, v. 2.0.

19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20+-- Stability : auto-generated

21+-- Portability : non-portable (GHC extensions)

22+--

23+-- Deprecated and unused.

24+--

25+-- /See:/ <https://developers.google.com/android/work/play/emm-api Google Play EMM API Reference> for @androidenterprise.enterprises.setAndroidDevicePolicyConfig@.

26+module Network.Google.Resource.AndroidEnterprise.Enterprises.SetAndroidDevicePolicyConfig

27+ (

28+ -- * REST Resource

29+ EnterprisesSetAndroidDevicePolicyConfigResource

30+

31+ -- * Creating a Request

32+ , enterprisesSetAndroidDevicePolicyConfig

33+ , EnterprisesSetAndroidDevicePolicyConfig

34+

35+ -- * Request Lenses

36+ , esadpcEnterpriseId

37+ , esadpcPayload

38+ ) where

39+

40+import Network.Google.AndroidEnterprise.Types

41+import Network.Google.Prelude

42+

43+-- | A resource alias for @androidenterprise.enterprises.setAndroidDevicePolicyConfig@ method which the

44+-- 'EnterprisesSetAndroidDevicePolicyConfig' request conforms to.

45+type EnterprisesSetAndroidDevicePolicyConfigResource

46+ =

47+ "androidenterprise" :>

48+ "v1" :>

49+ "enterprises" :>

50+ Capture "enterpriseId" Text :>

51+ "androidDevicePolicyConfig" :>

52+ QueryParam "alt" AltJSON :>

53+ ReqBody '[JSON] AndroidDevicePolicyConfig :>

54+ Put '[JSON] AndroidDevicePolicyConfig

55+

56+-- | Deprecated and unused.

57+--

58+-- /See:/ 'enterprisesSetAndroidDevicePolicyConfig' smart constructor.

59+data EnterprisesSetAndroidDevicePolicyConfig =

60+ EnterprisesSetAndroidDevicePolicyConfig'

61+ { _esadpcEnterpriseId :: !Text

62+ , _esadpcPayload :: !AndroidDevicePolicyConfig

63+ }

64+ deriving (Eq, Show, Data, Typeable, Generic)

65+

66+

67+-- | Creates a value of 'EnterprisesSetAndroidDevicePolicyConfig' with the minimum fields required to make a request.

68+--

69+-- Use one of the following lenses to modify other fields as desired:

70+--

71+-- * 'esadpcEnterpriseId'

72+--

73+-- * 'esadpcPayload'

74+enterprisesSetAndroidDevicePolicyConfig

75+ :: Text -- ^ 'esadpcEnterpriseId'

76+ -> AndroidDevicePolicyConfig -- ^ 'esadpcPayload'

77+ -> EnterprisesSetAndroidDevicePolicyConfig

78+enterprisesSetAndroidDevicePolicyConfig pEsadpcEnterpriseId_ pEsadpcPayload_ =

79+ EnterprisesSetAndroidDevicePolicyConfig'

80+ { _esadpcEnterpriseId = pEsadpcEnterpriseId_

81+ , _esadpcPayload = pEsadpcPayload_

82+ }

83+

84+

85+-- | The ID of the enterprise.

86+esadpcEnterpriseId :: Lens' EnterprisesSetAndroidDevicePolicyConfig Text

87+esadpcEnterpriseId

88+ = lens _esadpcEnterpriseId

89+ (\ s a -> s{_esadpcEnterpriseId = a})

90+

91+-- | Multipart request metadata.

92+esadpcPayload :: Lens' EnterprisesSetAndroidDevicePolicyConfig AndroidDevicePolicyConfig

93+esadpcPayload

94+ = lens _esadpcPayload

95+ (\ s a -> s{_esadpcPayload = a})

96+

97+instance GoogleRequest

98+ EnterprisesSetAndroidDevicePolicyConfig

99+ where

100+ type Rs EnterprisesSetAndroidDevicePolicyConfig =

101+ AndroidDevicePolicyConfig

102+ type Scopes EnterprisesSetAndroidDevicePolicyConfig =

103+ '["https://www.googleapis.com/auth/androidenterprise"]

104+ requestClient

105+ EnterprisesSetAndroidDevicePolicyConfig'{..}

106+ = go _esadpcEnterpriseId (Just AltJSON)

107+ _esadpcPayload

108+ androidEnterpriseService

109+ where go

110+ = buildClient

111+ (Proxy ::

112+ Proxy

113+ EnterprisesSetAndroidDevicePolicyConfigResource)

114+ mempty

gogol-android-enterprise/gogol-android-enterprise.cabal+1

@@ -53,6 +53,7 @@ library

5353 , Network.Google.Resource.AndroidEnterprise.Enterprises.PullNotificationSet

5454 , Network.Google.Resource.AndroidEnterprise.Enterprises.SendTestPushNotification

5555 , Network.Google.Resource.AndroidEnterprise.Enterprises.SetAccount

56+ , Network.Google.Resource.AndroidEnterprise.Enterprises.SetAndroidDevicePolicyConfig

5657 , Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

5758 , Network.Google.Resource.AndroidEnterprise.Enterprises.Unenroll

5859 , Network.Google.Resource.AndroidEnterprise.Entitlements.Delete

gogol-android-publisher/gen/Network/Google/AndroidPublisher.hs−7

@@ -410,18 +410,11 @@ module Network.Google.AndroidPublisher

410410 , trStatus

411411 , trReleaseNotes

412412 , trUserFraction

413− , trCountryTargeting

414413 , trName

415414

416415 -- ** EditsImagesListImageType

417416 , EditsImagesListImageType (..)

418417

419− -- ** CountryTargeting

420− , CountryTargeting

421− , countryTargeting

422− , ctIncludeRestOfWorld

423− , ctCountries

424−

425418 -- ** Bundle

426419 , Bundle

427420 , bundle

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs−7

@@ -245,18 +245,11 @@ module Network.Google.AndroidPublisher.Types

245245 , trStatus

246246 , trReleaseNotes

247247 , trUserFraction

248− , trCountryTargeting

249248 , trName

250249

251250 -- * EditsImagesListImageType

252251 , EditsImagesListImageType (..)

253252

254− -- * CountryTargeting

255− , CountryTargeting

256− , countryTargeting

257− , ctIncludeRestOfWorld

258− , ctCountries

259−

260253 -- * Bundle

261254 , Bundle

262255 , bundle

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+5−65

@@ -2088,12 +2088,11 @@ instance ToJSON ExternallyHostedAPK where

20882088-- /See:/ 'trackRelease' smart constructor.

20892089data TrackRelease =

20902090 TrackRelease'

2091− { _trVersionCodes :: !(Maybe [Textual Int64])

2092− , _trStatus :: !(Maybe Text)

2093− , _trReleaseNotes :: !(Maybe [LocalizedText])

2094− , _trUserFraction :: !(Maybe (Textual Double))

2095− , _trCountryTargeting :: !(Maybe CountryTargeting)

2096− , _trName :: !(Maybe Text)

2091+ { _trVersionCodes :: !(Maybe [Textual Int64])

2092+ , _trStatus :: !(Maybe Text)

2093+ , _trReleaseNotes :: !(Maybe [LocalizedText])

2094+ , _trUserFraction :: !(Maybe (Textual Double))

2095+ , _trName :: !(Maybe Text)

20972096 }

20982097 deriving (Eq, Show, Data, Typeable, Generic)

20992098

@@ -2110,8 +2109,6 @@ data TrackRelease =

21102109--

21112110-- * 'trUserFraction'

21122111--

2113−-- * 'trCountryTargeting'

2114−--

21152112-- * 'trName'

21162113trackRelease

21172114 :: TrackRelease

@@ -2121,7 +2118,6 @@ trackRelease =

21212118 , _trStatus = Nothing

21222119 , _trReleaseNotes = Nothing

21232120 , _trUserFraction = Nothing

2124− , _trCountryTargeting = Nothing

21252121 , _trName = Nothing

21262122 }

21272123

@@ -2157,11 +2153,6 @@ trUserFraction

21572153 (\ s a -> s{_trUserFraction = a})

21582154 . mapping _Coerce

21592155

2160−trCountryTargeting :: Lens' TrackRelease (Maybe CountryTargeting)

2161−trCountryTargeting

2162− = lens _trCountryTargeting

2163− (\ s a -> s{_trCountryTargeting = a})

2164−

21652156-- | The release name, used to identify this release in the Play Console UI.

21662157-- Not required to be unique. This is optional, if not set it will be

21672158-- generated from the version_name in the APKs.

@@ -2177,7 +2168,6 @@ instance FromJSON TrackRelease where

21772168 (o .:? "status")

21782169 <*> (o .:? "releaseNotes" .!= mempty)

21792170 <*> (o .:? "userFraction")

2180− <*> (o .:? "countryTargeting")

21812171 <*> (o .:? "name"))

21822172

21832173instance ToJSON TrackRelease where

@@ -2188,58 +2178,8 @@ instance ToJSON TrackRelease where

21882178 ("status" .=) <$> _trStatus,

21892179 ("releaseNotes" .=) <$> _trReleaseNotes,

21902180 ("userFraction" .=) <$> _trUserFraction,

2191− ("countryTargeting" .=) <$> _trCountryTargeting,

21922181 ("name" .=) <$> _trName])

21932182

2194−--

2195−-- /See:/ 'countryTargeting' smart constructor.

2196−data CountryTargeting =

2197− CountryTargeting'

2198− { _ctIncludeRestOfWorld :: !(Maybe Bool)

2199− , _ctCountries :: !(Maybe [Text])

2200− }

2201− deriving (Eq, Show, Data, Typeable, Generic)

2202−

2203−

2204−-- | Creates a value of 'CountryTargeting' with the minimum fields required to make a request.

2205−--

2206−-- Use one of the following lenses to modify other fields as desired:

2207−--

2208−-- * 'ctIncludeRestOfWorld'

2209−--

2210−-- * 'ctCountries'

2211−countryTargeting

2212− :: CountryTargeting

2213−countryTargeting =

2214− CountryTargeting' {_ctIncludeRestOfWorld = Nothing, _ctCountries = Nothing}

2215−

2216−

2217−ctIncludeRestOfWorld :: Lens' CountryTargeting (Maybe Bool)

2218−ctIncludeRestOfWorld

2219− = lens _ctIncludeRestOfWorld

2220− (\ s a -> s{_ctIncludeRestOfWorld = a})

2221−

2222−ctCountries :: Lens' CountryTargeting [Text]

2223−ctCountries

2224− = lens _ctCountries (\ s a -> s{_ctCountries = a}) .

2225− _Default

2226− . _Coerce

2227−

2228−instance FromJSON CountryTargeting where

2229− parseJSON

2230− = withObject "CountryTargeting"

2231− (\ o ->

2232− CountryTargeting' <$>

2233− (o .:? "includeRestOfWorld") <*>

2234− (o .:? "countries" .!= mempty))

2235−

2236−instance ToJSON CountryTargeting where

2237− toJSON CountryTargeting'{..}

2238− = object

2239− (catMaybes

2240− [("includeRestOfWorld" .=) <$> _ctIncludeRestOfWorld,

2241− ("countries" .=) <$> _ctCountries])

2242−

22432183--

22442184-- /See:/ 'bundle' smart constructor.

22452185data Bundle =

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Get.hs+2−1

@@ -85,7 +85,8 @@ editsTestersGet pEtgTrack_ pEtgPackageName_ pEtgEditId_ =

8585 }

8686

8787

88−-- | The track to read or modify.

88+-- | The track to read or modify. Acceptable values are: \"alpha\", \"beta\",

89+-- \"production\", \"rollout\" or \"internal\".

8990etgTrack :: Lens' EditsTestersGet Text

9091etgTrack = lens _etgTrack (\ s a -> s{_etgTrack = a})

9192

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Patch.hs+2−1

@@ -92,7 +92,8 @@ editsTestersPatch pEtpTrack_ pEtpPackageName_ pEtpPayload_ pEtpEditId_ =

9292 }

9393

9494

95−-- | The track to read or modify.

95+-- | The track to read or modify. Acceptable values are: \"alpha\", \"beta\",

96+-- \"production\", \"rollout\" or \"internal\".

9697etpTrack :: Lens' EditsTestersPatch Text

9798etpTrack = lens _etpTrack (\ s a -> s{_etpTrack = a})

9899

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Update.hs+2−1

@@ -92,7 +92,8 @@ editsTestersUpdate pEtutTrack_ pEtutPackageName_ pEtutPayload_ pEtutEditId_ =

9292 }

9393

9494

95−-- | The track to read or modify.

95+-- | The track to read or modify. Acceptable values are: \"alpha\", \"beta\",

96+-- \"production\", \"rollout\" or \"internal\".

9697etutTrack :: Lens' EditsTestersUpdate Text

9798etutTrack

9899 = lens _etutTrack (\ s a -> s{_etutTrack = a})

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Patch.hs+8−4

@@ -20,8 +20,10 @@

2020-- Stability : auto-generated

2121-- Portability : non-portable (GHC extensions)

2222--

23−-- Updates the track configuration for the specified track type. This

24−-- method supports patch semantics.

23+-- Updates the track configuration for the specified track type. When

24+-- halted, the rollout track cannot be updated without adding new APKs, and

25+-- adding new APKs will cause it to resume. This method supports patch

26+-- semantics.

2527--

2628-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.patch@.

2729module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Patch

@@ -57,8 +59,10 @@ type EditsTracksPatchResource =

5759 QueryParam "alt" AltJSON :>

5860 ReqBody '[JSON] Track :> Patch '[JSON] Track

5961

60−-- | Updates the track configuration for the specified track type. This

61−-- method supports patch semantics.

62+-- | Updates the track configuration for the specified track type. When

63+-- halted, the rollout track cannot be updated without adding new APKs, and

64+-- adding new APKs will cause it to resume. This method supports patch

65+-- semantics.

6266--

6367-- /See:/ 'editsTracksPatch' smart constructor.

6468data EditsTracksPatch =

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Update.hs+6−2

@@ -20,7 +20,9 @@

2020-- Stability : auto-generated

2121-- Portability : non-portable (GHC extensions)

2222--

23−-- Updates the track configuration for the specified track type.

23+-- Updates the track configuration for the specified track type. When

24+-- halted, the rollout track cannot be updated without adding new APKs, and

25+-- adding new APKs will cause it to resume.

2426--

2527-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.update@.

2628module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Update

@@ -56,7 +58,9 @@ type EditsTracksUpdateResource =

5658 QueryParam "alt" AltJSON :>

5759 ReqBody '[JSON] Track :> Put '[JSON] Track

5860

59−-- | Updates the track configuration for the specified track type.

61+-- | Updates the track configuration for the specified track type. When

62+-- halted, the rollout track cannot be updated without adding new APKs, and

63+-- adding new APKs will cause it to resume.

6064--

6165-- /See:/ 'editsTracksUpdate' smart constructor.

6266data EditsTracksUpdate =

gogol-androiddeviceprovisioning/gen/Network/Google/AndroidDeviceProvisioning.hs−6

@@ -164,8 +164,6 @@ module Network.Google.AndroidDeviceProvisioning

164164 , partnerUnclaim

165165 , puDeviceIdentifier

166166 , puSectionType

167− , puVacationModeExpireTime

168− , puVacationModeDays

169167 , puDeviceId

170168

171169 -- ** Dpc

@@ -314,8 +312,6 @@ module Network.Google.AndroidDeviceProvisioning

314312 , DeviceClaim

315313 , deviceClaim

316314 , dcSectionType

317− , dcVacationModeExpireTime

318− , dcVacationModeStartTime

319315 , dcOwnerCompanyId

320316 , dcResellerId

321317

@@ -349,8 +345,6 @@ module Network.Google.AndroidDeviceProvisioning

349345 , unclaimDeviceRequest

350346 , udrDeviceIdentifier

351347 , udrSectionType

352− , udrVacationModeExpireTime

353− , udrVacationModeDays

354348 , udrDeviceId

355349

356350 -- ** DevicesLongRunningOperationResponse

gogol-androiddeviceprovisioning/gen/Network/Google/AndroidDeviceProvisioning/Types.hs−6

@@ -76,8 +76,6 @@ module Network.Google.AndroidDeviceProvisioning.Types

7676 , partnerUnclaim

7777 , puDeviceIdentifier

7878 , puSectionType

79− , puVacationModeExpireTime

80− , puVacationModeDays

8179 , puDeviceId

8280

8381 -- * Dpc

@@ -226,8 +224,6 @@ module Network.Google.AndroidDeviceProvisioning.Types

226224 , DeviceClaim

227225 , deviceClaim

228226 , dcSectionType

229− , dcVacationModeExpireTime

230− , dcVacationModeStartTime

231227 , dcOwnerCompanyId

232228 , dcResellerId

233229

@@ -261,8 +257,6 @@ module Network.Google.AndroidDeviceProvisioning.Types

261257 , unclaimDeviceRequest

262258 , udrDeviceIdentifier

263259 , udrSectionType

264− , udrVacationModeExpireTime

265− , udrVacationModeDays

266260 , udrDeviceId

267261

268262 -- * DevicesLongRunningOperationResponse

gogol-androiddeviceprovisioning/gen/Network/Google/AndroidDeviceProvisioning/Types/Product.hs+10−97

@@ -472,11 +472,9 @@ instance ToJSON DeviceMetadataEntries where

472472-- /See:/ 'partnerUnclaim' smart constructor.

473473data PartnerUnclaim =

474474 PartnerUnclaim'

475− { _puDeviceIdentifier :: !(Maybe DeviceIdentifier)

476− , _puSectionType :: !(Maybe PartnerUnclaimSectionType)

477− , _puVacationModeExpireTime :: !(Maybe DateTime')

478− , _puVacationModeDays :: !(Maybe (Textual Int32))

479− , _puDeviceId :: !(Maybe (Textual Int64))

475+ { _puDeviceIdentifier :: !(Maybe DeviceIdentifier)

476+ , _puSectionType :: !(Maybe PartnerUnclaimSectionType)

477+ , _puDeviceId :: !(Maybe (Textual Int64))

480478 }

481479 deriving (Eq, Show, Data, Typeable, Generic)

482480

@@ -489,10 +487,6 @@ data PartnerUnclaim =

489487--

490488-- * 'puSectionType'

491489--

492−-- * 'puVacationModeExpireTime'

493−--

494−-- * 'puVacationModeDays'

495−--

496490-- * 'puDeviceId'

497491partnerUnclaim

498492 :: PartnerUnclaim

@@ -500,8 +494,6 @@ partnerUnclaim =

500494 PartnerUnclaim'

501495 { _puDeviceIdentifier = Nothing

502496 , _puSectionType = Nothing

503− , _puVacationModeExpireTime = Nothing

504− , _puVacationModeDays = Nothing

505497 , _puDeviceId = Nothing

506498 }

507499

@@ -518,21 +510,6 @@ puSectionType

518510 = lens _puSectionType

519511 (\ s a -> s{_puSectionType = a})

520512

521−-- | The expiration time of the vacation unlock.

522−puVacationModeExpireTime :: Lens' PartnerUnclaim (Maybe UTCTime)

523−puVacationModeExpireTime

524− = lens _puVacationModeExpireTime

525− (\ s a -> s{_puVacationModeExpireTime = a})

526− . mapping _DateTime

527−

528−-- | The duration of the vacation unlock starting from when the request is

529−-- processed. (1 day is treated as 24 hours)

530−puVacationModeDays :: Lens' PartnerUnclaim (Maybe Int32)

531−puVacationModeDays

532− = lens _puVacationModeDays

533− (\ s a -> s{_puVacationModeDays = a})

534− . mapping _Coerce

535−

536513-- | Device ID of the device.

537514puDeviceId :: Lens' PartnerUnclaim (Maybe Int64)

538515puDeviceId

@@ -545,8 +522,6 @@ instance FromJSON PartnerUnclaim where

545522 (\ o ->

546523 PartnerUnclaim' <$>

547524 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

548− <*> (o .:? "vacationModeExpireTime")

549− <*> (o .:? "vacationModeDays")

550525 <*> (o .:? "deviceId"))

551526

552527instance ToJSON PartnerUnclaim where

@@ -555,9 +530,6 @@ instance ToJSON PartnerUnclaim where

555530 (catMaybes

556531 [("deviceIdentifier" .=) <$> _puDeviceIdentifier,

557532 ("sectionType" .=) <$> _puSectionType,

558− ("vacationModeExpireTime" .=) <$>

559− _puVacationModeExpireTime,

560− ("vacationModeDays" .=) <$> _puVacationModeDays,

561533 ("deviceId" .=) <$> _puDeviceId])

562534

563535-- | An EMM\'s DPC ([device policy

@@ -1788,11 +1760,9 @@ instance ToJSON CustomerListCustomersResponse where

17881760-- /See:/ 'deviceClaim' smart constructor.

17891761data DeviceClaim =

17901762 DeviceClaim'

1791− { _dcSectionType :: !(Maybe DeviceClaimSectionType)

1792− , _dcVacationModeExpireTime :: !(Maybe DateTime')

1793− , _dcVacationModeStartTime :: !(Maybe DateTime')

1794− , _dcOwnerCompanyId :: !(Maybe (Textual Int64))

1795− , _dcResellerId :: !(Maybe (Textual Int64))

1763+ { _dcSectionType :: !(Maybe DeviceClaimSectionType)

1764+ , _dcOwnerCompanyId :: !(Maybe (Textual Int64))

1765+ , _dcResellerId :: !(Maybe (Textual Int64))

17961766 }

17971767 deriving (Eq, Show, Data, Typeable, Generic)

17981768

@@ -1803,10 +1773,6 @@ data DeviceClaim =

18031773--

18041774-- * 'dcSectionType'

18051775--

1806−-- * 'dcVacationModeExpireTime'

1807−--

1808−-- * 'dcVacationModeStartTime'

1809−--

18101776-- * 'dcOwnerCompanyId'

18111777--

18121778-- * 'dcResellerId'

@@ -1815,8 +1781,6 @@ deviceClaim

18151781deviceClaim =

18161782 DeviceClaim'

18171783 { _dcSectionType = Nothing

1818− , _dcVacationModeExpireTime = Nothing

1819− , _dcVacationModeStartTime = Nothing

18201784 , _dcOwnerCompanyId = Nothing

18211785 , _dcResellerId = Nothing

18221786 }

@@ -1828,22 +1792,6 @@ dcSectionType

18281792 = lens _dcSectionType

18291793 (\ s a -> s{_dcSectionType = a})

18301794

1831−-- | The timestamp when the device will exit ‘vacation mode’. This value is

1832−-- present iff the device is in \'vacation mode\'.

1833−dcVacationModeExpireTime :: Lens' DeviceClaim (Maybe UTCTime)

1834−dcVacationModeExpireTime

1835− = lens _dcVacationModeExpireTime

1836− (\ s a -> s{_dcVacationModeExpireTime = a})

1837− . mapping _DateTime

1838−

1839−-- | The timestamp when the device was put into ‘vacation mode’. This value

1840−-- is present iff the device is in \'vacation mode\'.

1841−dcVacationModeStartTime :: Lens' DeviceClaim (Maybe UTCTime)

1842−dcVacationModeStartTime

1843− = lens _dcVacationModeStartTime

1844− (\ s a -> s{_dcVacationModeStartTime = a})

1845− . mapping _DateTime

1846−

18471795-- | The ID of the Customer that purchased the device.

18481796dcOwnerCompanyId :: Lens' DeviceClaim (Maybe Int64)

18491797dcOwnerCompanyId

@@ -1862,10 +1810,7 @@ instance FromJSON DeviceClaim where

18621810 = withObject "DeviceClaim"

18631811 (\ o ->

18641812 DeviceClaim' <$>

1865− (o .:? "sectionType") <*>

1866− (o .:? "vacationModeExpireTime")

1867− <*> (o .:? "vacationModeStartTime")

1868− <*> (o .:? "ownerCompanyId")

1813+ (o .:? "sectionType") <*> (o .:? "ownerCompanyId")

18691814 <*> (o .:? "resellerId"))

18701815

18711816instance ToJSON DeviceClaim where

@@ -1873,10 +1818,6 @@ instance ToJSON DeviceClaim where

18731818 = object

18741819 (catMaybes

18751820 [("sectionType" .=) <$> _dcSectionType,

1876− ("vacationModeExpireTime" .=) <$>

1877− _dcVacationModeExpireTime,

1878− ("vacationModeStartTime" .=) <$>

1879− _dcVacationModeStartTime,

18801821 ("ownerCompanyId" .=) <$> _dcOwnerCompanyId,

18811822 ("resellerId" .=) <$> _dcResellerId])

18821823

@@ -2113,11 +2054,9 @@ instance ToJSON FindDevicesByDeviceIdentifierResponse

21132054-- /See:/ 'unclaimDeviceRequest' smart constructor.

21142055data UnclaimDeviceRequest =

21152056 UnclaimDeviceRequest'

2116− { _udrDeviceIdentifier :: !(Maybe DeviceIdentifier)

2117− , _udrSectionType :: !(Maybe UnclaimDeviceRequestSectionType)

2118− , _udrVacationModeExpireTime :: !(Maybe DateTime')

2119− , _udrVacationModeDays :: !(Maybe (Textual Int32))

2120− , _udrDeviceId :: !(Maybe (Textual Int64))

2057+ { _udrDeviceIdentifier :: !(Maybe DeviceIdentifier)

2058+ , _udrSectionType :: !(Maybe UnclaimDeviceRequestSectionType)

2059+ , _udrDeviceId :: !(Maybe (Textual Int64))

21212060 }

21222061 deriving (Eq, Show, Data, Typeable, Generic)

21232062

@@ -2130,10 +2069,6 @@ data UnclaimDeviceRequest =

21302069--

21312070-- * 'udrSectionType'

21322071--

2133−-- * 'udrVacationModeExpireTime'

2134−--

2135−-- * 'udrVacationModeDays'

2136−--

21372072-- * 'udrDeviceId'

21382073unclaimDeviceRequest

21392074 :: UnclaimDeviceRequest

@@ -2141,8 +2076,6 @@ unclaimDeviceRequest =

21412076 UnclaimDeviceRequest'

21422077 { _udrDeviceIdentifier = Nothing

21432078 , _udrSectionType = Nothing

2144− , _udrVacationModeExpireTime = Nothing

2145− , _udrVacationModeDays = Nothing

21462079 , _udrDeviceId = Nothing

21472080 }

21482081

@@ -2159,21 +2092,6 @@ udrSectionType

21592092 = lens _udrSectionType

21602093 (\ s a -> s{_udrSectionType = a})

21612094

2162−-- | The expiration time of the vacation unlock.

2163−udrVacationModeExpireTime :: Lens' UnclaimDeviceRequest (Maybe UTCTime)

2164−udrVacationModeExpireTime

2165− = lens _udrVacationModeExpireTime

2166− (\ s a -> s{_udrVacationModeExpireTime = a})

2167− . mapping _DateTime

2168−

2169−-- | The duration of the vacation unlock starting from when the request is

2170−-- processed. (1 day is treated as 24 hours)

2171−udrVacationModeDays :: Lens' UnclaimDeviceRequest (Maybe Int32)

2172−udrVacationModeDays

2173− = lens _udrVacationModeDays

2174− (\ s a -> s{_udrVacationModeDays = a})

2175− . mapping _Coerce

2176−

21772095-- | The device ID returned by \`ClaimDevice\`.

21782096udrDeviceId :: Lens' UnclaimDeviceRequest (Maybe Int64)

21792097udrDeviceId

@@ -2186,8 +2104,6 @@ instance FromJSON UnclaimDeviceRequest where

21862104 (\ o ->

21872105 UnclaimDeviceRequest' <$>

21882106 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

2189− <*> (o .:? "vacationModeExpireTime")

2190− <*> (o .:? "vacationModeDays")

21912107 <*> (o .:? "deviceId"))

21922108

21932109instance ToJSON UnclaimDeviceRequest where

@@ -2196,9 +2112,6 @@ instance ToJSON UnclaimDeviceRequest where

21962112 (catMaybes

21972113 [("deviceIdentifier" .=) <$> _udrDeviceIdentifier,

21982114 ("sectionType" .=) <$> _udrSectionType,

2199− ("vacationModeExpireTime" .=) <$>

2200− _udrVacationModeExpireTime,

2201− ("vacationModeDays" .=) <$> _udrVacationModeDays,

22022115 ("deviceId" .=) <$> _udrDeviceId])

22032116

22042117-- | Tracks the status of a long-running operation to claim, unclaim, or

gogol-androidmanagement/gen/Network/Google/AndroidManagement.hs−69

@@ -87,21 +87,6 @@ module Network.Google.AndroidManagement

8787 -- ** androidmanagement.enterprises.policies.patch

8888 , module Network.Google.Resource.AndroidManagement.Enterprises.Policies.Patch

8989

90− -- ** androidmanagement.enterprises.webApps.create

91− , module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Create

92−

93− -- ** androidmanagement.enterprises.webApps.delete

94− , module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Delete

95−

96− -- ** androidmanagement.enterprises.webApps.get

97− , module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Get

98−

99− -- ** androidmanagement.enterprises.webApps.list

100− , module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.List

101−

102− -- ** androidmanagement.enterprises.webApps.patch

103− , module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Patch

104−

10590 -- ** androidmanagement.enterprises.webTokens.create

10691 , module Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

10792

@@ -339,9 +324,6 @@ module Network.Google.AndroidManagement

339324 , devEnrollmentTime

340325 , devDisplays

341326

342− -- ** WebAppDisplayMode

343− , WebAppDisplayMode (..)

344−

345327 -- ** ApplicationReportApplicationSource

346328 , ApplicationReportApplicationSource (..)

347329

@@ -404,7 +386,6 @@ module Network.Google.AndroidManagement

404386 , arVersionName

405387 , arPackageName

406388 , arPackageSha256Hash

407− , arKeyedAppStates

408389 , arApplicationSource

409390 , arEvents

410391 , arDisplayName

@@ -445,7 +426,6 @@ module Network.Google.AndroidManagement

445426 , srsMemoryInfoEnabled

446427 , srsNetworkInfoEnabled

447428 , srsDeviceSettingsEnabled

448− , srsApplicationReportingSettings

449429

450430 -- ** CommandType

451431 , CommandType (..)

@@ -453,11 +433,6 @@ module Network.Google.AndroidManagement

453433 -- ** ApplicationPolicyDefaultPermissionPolicy

454434 , ApplicationPolicyDefaultPermissionPolicy (..)

455435

456− -- ** WebAppIcon

457− , WebAppIcon

458− , webAppIcon

459− , waiImageData

460−

461436 -- ** Xgafv

462437 , Xgafv (..)

463438

@@ -642,16 +617,6 @@ module Network.Google.AndroidManagement

642617 , ncdcNonComplianceReason

643618 , ncdcSettingName

644619

645− -- ** KeyedAppState

646− , KeyedAppState

647− , keyedAppState

648− , kasData

649− , kasSeverity

650− , kasKey

651− , kasMessage

652− , kasLastUpdateTime

653− , kasCreateTime

654−

655620 -- ** OperationMetadata

656621 , OperationMetadata

657622 , operationMetadata

@@ -665,9 +630,6 @@ module Network.Google.AndroidManagement

665630 , wtName

666631 , wtPermissions

667632

668− -- ** KeyedAppStateSeverity

669− , KeyedAppStateSeverity (..)

670−

671633 -- ** ComplianceRule

672634 , ComplianceRule

673635 , complianceRule

@@ -676,12 +638,6 @@ module Network.Google.AndroidManagement

676638 , crPackageNamesToDisable

677639 , crNonComplianceDetailCondition

678640

679− -- ** ListWebAppsResponse

680− , ListWebAppsResponse

681− , listWebAppsResponse

682− , lwarNextPageToken

683− , lwarWebApps

684−

685641 -- ** PasswordRequirements

686642 , PasswordRequirements

687643 , passwordRequirements

@@ -751,11 +707,6 @@ module Network.Google.AndroidManagement

751707 , siAndroidBuildNumber

752708 , siAndroidVersion

753709

754− -- ** ApplicationReportingSettings

755− , ApplicationReportingSettings

756− , applicationReportingSettings

757− , arsIncludeRemovedApps

758−

759710 -- ** MemoryEventEventType

760711 , MemoryEventEventType (..)

761712

@@ -773,16 +724,6 @@ module Network.Google.AndroidManagement

773724 , saTitle

774725 , saDescription

775726

776− -- ** WebApp

777− , WebApp

778− , webApp

779− , waVersionCode

780− , waIcons

781− , waStartURL

782− , waDisplayMode

783− , waName

784− , waTitle

785−

786727 -- ** PasswordRequirementsPasswordQuality

787728 , PasswordRequirementsPasswordQuality (..)

788729 ) where

@@ -808,11 +749,6 @@ import Network.Google.Resource.AndroidManagement.Enterprises.Policies.

808749import Network.Google.Resource.AndroidManagement.Enterprises.Policies.Get

809750import Network.Google.Resource.AndroidManagement.Enterprises.Policies.List

810751import Network.Google.Resource.AndroidManagement.Enterprises.Policies.Patch

811−import Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Create

812−import Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Delete

813−import Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Get

814−import Network.Google.Resource.AndroidManagement.Enterprises.WebApps.List

815−import Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Patch

816752import Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

817753import Network.Google.Resource.AndroidManagement.SignupURLs.Create

818754

@@ -824,11 +760,6 @@ TODO

824760type AndroidManagementAPI =

825761 EnterprisesEnrollmentTokensCreateResource :<|>

826762 EnterprisesEnrollmentTokensDeleteResource

827− :<|> EnterprisesWebAppsListResource

828− :<|> EnterprisesWebAppsPatchResource

829− :<|> EnterprisesWebAppsGetResource

830− :<|> EnterprisesWebAppsCreateResource

831− :<|> EnterprisesWebAppsDeleteResource

832763 :<|> EnterprisesWebTokensCreateResource

833764 :<|> EnterprisesDevicesOperationsListResource

834765 :<|> EnterprisesDevicesOperationsGetResource

gogol-androidmanagement/gen/Network/Google/AndroidManagement/Types.hs−44

@@ -251,9 +251,6 @@ module Network.Google.AndroidManagement.Types

251251 , devEnrollmentTime

252252 , devDisplays

253253

254− -- * WebAppDisplayMode

255− , WebAppDisplayMode (..)

256−

257254 -- * ApplicationReportApplicationSource

258255 , ApplicationReportApplicationSource (..)

259256

@@ -316,7 +313,6 @@ module Network.Google.AndroidManagement.Types

316313 , arVersionName

317314 , arPackageName

318315 , arPackageSha256Hash

319− , arKeyedAppStates

320316 , arApplicationSource

321317 , arEvents

322318 , arDisplayName

@@ -357,7 +353,6 @@ module Network.Google.AndroidManagement.Types

357353 , srsMemoryInfoEnabled

358354 , srsNetworkInfoEnabled

359355 , srsDeviceSettingsEnabled

360− , srsApplicationReportingSettings

361356

362357 -- * CommandType

363358 , CommandType (..)

@@ -365,11 +360,6 @@ module Network.Google.AndroidManagement.Types

365360 -- * ApplicationPolicyDefaultPermissionPolicy

366361 , ApplicationPolicyDefaultPermissionPolicy (..)

367362

368− -- * WebAppIcon

369− , WebAppIcon

370− , webAppIcon

371− , waiImageData

372−

373363 -- * Xgafv

374364 , Xgafv (..)

375365

@@ -554,16 +544,6 @@ module Network.Google.AndroidManagement.Types

554544 , ncdcNonComplianceReason

555545 , ncdcSettingName

556546

557− -- * KeyedAppState

558− , KeyedAppState

559− , keyedAppState

560− , kasData

561− , kasSeverity

562− , kasKey

563− , kasMessage

564− , kasLastUpdateTime

565− , kasCreateTime

566−

567547 -- * OperationMetadata

568548 , OperationMetadata

569549 , operationMetadata

@@ -577,9 +557,6 @@ module Network.Google.AndroidManagement.Types

577557 , wtName

578558 , wtPermissions

579559

580− -- * KeyedAppStateSeverity

581− , KeyedAppStateSeverity (..)

582−

583560 -- * ComplianceRule

584561 , ComplianceRule

585562 , complianceRule

@@ -588,12 +565,6 @@ module Network.Google.AndroidManagement.Types

588565 , crPackageNamesToDisable

589566 , crNonComplianceDetailCondition

590567

591− -- * ListWebAppsResponse

592− , ListWebAppsResponse

593− , listWebAppsResponse

594− , lwarNextPageToken

595− , lwarWebApps

596−

597568 -- * PasswordRequirements

598569 , PasswordRequirements

599570 , passwordRequirements

@@ -663,11 +634,6 @@ module Network.Google.AndroidManagement.Types

663634 , siAndroidBuildNumber

664635 , siAndroidVersion

665636

666− -- * ApplicationReportingSettings

667− , ApplicationReportingSettings

668− , applicationReportingSettings

669− , arsIncludeRemovedApps

670−

671637 -- * MemoryEventEventType

672638 , MemoryEventEventType (..)

673639

@@ -685,16 +651,6 @@ module Network.Google.AndroidManagement.Types

685651 , saTitle

686652 , saDescription

687653

688− -- * WebApp

689− , WebApp

690− , webApp

691− , waVersionCode

692− , waIcons

693− , waStartURL

694− , waDisplayMode

695− , waName

696− , waTitle

697−

698654 -- * PasswordRequirementsPasswordQuality

699655 , PasswordRequirementsPasswordQuality (..)

700656 ) where

gogol-androidmanagement/gen/Network/Google/AndroidManagement/Types/Product.hs+2−371

@@ -2511,7 +2511,6 @@ data ApplicationReport =

25112511 , _arVersionName :: !(Maybe Text)

25122512 , _arPackageName :: !(Maybe Text)

25132513 , _arPackageSha256Hash :: !(Maybe Text)

2514− , _arKeyedAppStates :: !(Maybe [KeyedAppState])

25152514 , _arApplicationSource :: !(Maybe ApplicationReportApplicationSource)

25162515 , _arEvents :: !(Maybe [ApplicationEvent])

25172516 , _arDisplayName :: !(Maybe Text)

@@ -2536,8 +2535,6 @@ data ApplicationReport =

25362535--

25372536-- * 'arPackageSha256Hash'

25382537--

2539−-- * 'arKeyedAppStates'

2540−--

25412538-- * 'arApplicationSource'

25422539--

25432540-- * 'arEvents'

@@ -2555,7 +2552,6 @@ applicationReport =

25552552 , _arVersionName = Nothing

25562553 , _arPackageName = Nothing

25572554 , _arPackageSha256Hash = Nothing

2558− , _arKeyedAppStates = Nothing

25592555 , _arApplicationSource = Nothing

25602556 , _arEvents = Nothing

25612557 , _arDisplayName = Nothing

@@ -2606,14 +2602,6 @@ arPackageSha256Hash

26062602 = lens _arPackageSha256Hash

26072603 (\ s a -> s{_arPackageSha256Hash = a})

26082604

2609−-- | List of keyed app states reported by the app.

2610−arKeyedAppStates :: Lens' ApplicationReport [KeyedAppState]

2611−arKeyedAppStates

2612− = lens _arKeyedAppStates

2613− (\ s a -> s{_arKeyedAppStates = a})

2614− . _Default

2615− . _Coerce

2616−

26172605-- | The source of the package.

26182606arApplicationSource :: Lens' ApplicationReport (Maybe ApplicationReportApplicationSource)

26192607arApplicationSource

@@ -2650,7 +2638,6 @@ instance FromJSON ApplicationReport where

26502638 <*> (o .:? "versionName")

26512639 <*> (o .:? "packageName")

26522640 <*> (o .:? "packageSha256Hash")

2653− <*> (o .:? "keyedAppStates" .!= mempty)

26542641 <*> (o .:? "applicationSource")

26552642 <*> (o .:? "events" .!= mempty)

26562643 <*> (o .:? "displayName")

@@ -2667,7 +2654,6 @@ instance ToJSON ApplicationReport where

26672654 ("versionName" .=) <$> _arVersionName,

26682655 ("packageName" .=) <$> _arPackageName,

26692656 ("packageSha256Hash" .=) <$> _arPackageSha256Hash,

2670− ("keyedAppStates" .=) <$> _arKeyedAppStates,

26712657 ("applicationSource" .=) <$> _arApplicationSource,

26722658 ("events" .=) <$> _arEvents,

26732659 ("displayName" .=) <$> _arDisplayName,

@@ -2904,7 +2890,6 @@ data StatusReportingSettings =

29042890 , _srsMemoryInfoEnabled :: !(Maybe Bool)

29052891 , _srsNetworkInfoEnabled :: !(Maybe Bool)

29062892 , _srsDeviceSettingsEnabled :: !(Maybe Bool)

2907− , _srsApplicationReportingSettings :: !(Maybe ApplicationReportingSettings)

29082893 }

29092894 deriving (Eq, Show, Data, Typeable, Generic)

29102895

@@ -2928,8 +2913,6 @@ data StatusReportingSettings =

29282913-- * 'srsNetworkInfoEnabled'

29292914--

29302915-- * 'srsDeviceSettingsEnabled'

2931−--

2932−-- * 'srsApplicationReportingSettings'

29332916statusReportingSettings

29342917 :: StatusReportingSettings

29352918statusReportingSettings =

@@ -2942,7 +2925,6 @@ statusReportingSettings =

29422925 , _srsMemoryInfoEnabled = Nothing

29432926 , _srsNetworkInfoEnabled = Nothing

29442927 , _srsDeviceSettingsEnabled = Nothing

2945− , _srsApplicationReportingSettings = Nothing

29462928 }

29472929

29482930

@@ -2994,13 +2976,6 @@ srsDeviceSettingsEnabled

29942976 = lens _srsDeviceSettingsEnabled

29952977 (\ s a -> s{_srsDeviceSettingsEnabled = a})

29962978

2997−-- | Application reporting settings. Only applicable if

2998−-- application_reports_enabled is true.

2999−srsApplicationReportingSettings :: Lens' StatusReportingSettings (Maybe ApplicationReportingSettings)

3000−srsApplicationReportingSettings

3001− = lens _srsApplicationReportingSettings

3002− (\ s a -> s{_srsApplicationReportingSettings = a})

3003−

30042979instance FromJSON StatusReportingSettings where

30052980 parseJSON

30062981 = withObject "StatusReportingSettings"

@@ -3013,8 +2988,7 @@ instance FromJSON StatusReportingSettings where

30132988 <*> (o .:? "applicationReportsEnabled")

30142989 <*> (o .:? "memoryInfoEnabled")

30152990 <*> (o .:? "networkInfoEnabled")

3016− <*> (o .:? "deviceSettingsEnabled")

3017− <*> (o .:? "applicationReportingSettings"))

2991+ <*> (o .:? "deviceSettingsEnabled"))

30182992

30192993instance ToJSON StatusReportingSettings where

30202994 toJSON StatusReportingSettings'{..}

@@ -3032,50 +3006,7 @@ instance ToJSON StatusReportingSettings where

30323006 ("memoryInfoEnabled" .=) <$> _srsMemoryInfoEnabled,

30333007 ("networkInfoEnabled" .=) <$> _srsNetworkInfoEnabled,

30343008 ("deviceSettingsEnabled" .=) <$>

3035− _srsDeviceSettingsEnabled,

3036− ("applicationReportingSettings" .=) <$>

3037− _srsApplicationReportingSettings])

3038−

3039−-- | An icon for a web app. Supported formats are: png, jpg and webp.

3040−--

3041−-- /See:/ 'webAppIcon' smart constructor.

3042−newtype WebAppIcon =

3043− WebAppIcon'

3044− { _waiImageData :: Maybe Text

3045− }

3046− deriving (Eq, Show, Data, Typeable, Generic)

3047−

3048−

3049−-- | Creates a value of 'WebAppIcon' with the minimum fields required to make a request.

3050−--

3051−-- Use one of the following lenses to modify other fields as desired:

3052−--

3053−-- * 'waiImageData'

3054−webAppIcon

3055− :: WebAppIcon

3056−webAppIcon = WebAppIcon' {_waiImageData = Nothing}

3057−

3058−

3059−-- | The actual bytes of the image in a base64url encoded string (c.f.

3060−-- RFC4648, section 5 \"Base 64 Encoding with URL and Filename Safe

3061−-- Alphabet\").

3062−--

3063−-- - The image type can be png or jpg.

3064−-- - The image should ideally be square.

3065−-- - The image should ideally have a size of 512x512.

3066−waiImageData :: Lens' WebAppIcon (Maybe Text)

3067−waiImageData

3068− = lens _waiImageData (\ s a -> s{_waiImageData = a})

3069−

3070−instance FromJSON WebAppIcon where

3071− parseJSON

3072− = withObject "WebAppIcon"

3073− (\ o -> WebAppIcon' <$> (o .:? "imageData"))

3074−

3075−instance ToJSON WebAppIcon where

3076− toJSON WebAppIcon'{..}

3077− = object

3078− (catMaybes [("imageData" .=) <$> _waiImageData])

3009+ _srsDeviceSettingsEnabled])

30793010

30803011-- | Policy for an individual app.

30813012--

@@ -5035,109 +4966,6 @@ instance ToJSON NonComplianceDetailCondition where

50354966 _ncdcNonComplianceReason,

50364967 ("settingName" .=) <$> _ncdcSettingName])

50374968

5038−-- | Keyed app state reported by the app.

5039−--

5040−-- /See:/ 'keyedAppState' smart constructor.

5041−data KeyedAppState =

5042− KeyedAppState'

5043− { _kasData :: !(Maybe Text)

5044− , _kasSeverity :: !(Maybe KeyedAppStateSeverity)

5045− , _kasKey :: !(Maybe Text)

5046− , _kasMessage :: !(Maybe Text)

5047− , _kasLastUpdateTime :: !(Maybe DateTime')

5048− , _kasCreateTime :: !(Maybe DateTime')

5049− }

5050− deriving (Eq, Show, Data, Typeable, Generic)

5051−

5052−

5053−-- | Creates a value of 'KeyedAppState' with the minimum fields required to make a request.

5054−--

5055−-- Use one of the following lenses to modify other fields as desired:

5056−--

5057−-- * 'kasData'

5058−--

5059−-- * 'kasSeverity'

5060−--

5061−-- * 'kasKey'

5062−--

5063−-- * 'kasMessage'

5064−--

5065−-- * 'kasLastUpdateTime'

5066−--

5067−-- * 'kasCreateTime'

5068−keyedAppState

5069− :: KeyedAppState

5070−keyedAppState =

5071− KeyedAppState'

5072− { _kasData = Nothing

5073− , _kasSeverity = Nothing

5074− , _kasKey = Nothing

5075− , _kasMessage = Nothing

5076− , _kasLastUpdateTime = Nothing

5077− , _kasCreateTime = Nothing

5078− }

5079−

5080−

5081−-- | Optionally, a machine-readable value to be read by the EMM. For example,

5082−-- setting values that the admin can choose to query against in the EMM

5083−-- console (e.g. “notify me if the battery_warning data \< 10”).

5084−kasData :: Lens' KeyedAppState (Maybe Text)

5085−kasData = lens _kasData (\ s a -> s{_kasData = a})

5086−

5087−-- | The severity of the app state.

5088−kasSeverity :: Lens' KeyedAppState (Maybe KeyedAppStateSeverity)

5089−kasSeverity

5090− = lens _kasSeverity (\ s a -> s{_kasSeverity = a})

5091−

5092−-- | The key for the app state. Acts as a point of reference for what the app

5093−-- is providing state for. For example, when providing managed

5094−-- configuration feedback, this key could be the managed configuration key.

5095−kasKey :: Lens' KeyedAppState (Maybe Text)

5096−kasKey = lens _kasKey (\ s a -> s{_kasKey = a})

5097−

5098−-- | Optionally, a free-form message string to explain the app state. If the

5099−-- state was triggered by a particular value (e.g. a managed configuration

5100−-- value), it should be included in the message.

5101−kasMessage :: Lens' KeyedAppState (Maybe Text)

5102−kasMessage

5103− = lens _kasMessage (\ s a -> s{_kasMessage = a})

5104−

5105−-- | The time the app state was most recently updated.

5106−kasLastUpdateTime :: Lens' KeyedAppState (Maybe UTCTime)

5107−kasLastUpdateTime

5108− = lens _kasLastUpdateTime

5109− (\ s a -> s{_kasLastUpdateTime = a})

5110− . mapping _DateTime

5111−

5112−-- | The creation time of the app state on the device.

5113−kasCreateTime :: Lens' KeyedAppState (Maybe UTCTime)

5114−kasCreateTime

5115− = lens _kasCreateTime

5116− (\ s a -> s{_kasCreateTime = a})

5117− . mapping _DateTime

5118−

5119−instance FromJSON KeyedAppState where

5120− parseJSON

5121− = withObject "KeyedAppState"

5122− (\ o ->

5123− KeyedAppState' <$>

5124− (o .:? "data") <*> (o .:? "severity") <*>

5125− (o .:? "key")

5126− <*> (o .:? "message")

5127− <*> (o .:? "lastUpdateTime")

5128− <*> (o .:? "createTime"))

5129−

5130−instance ToJSON KeyedAppState where

5131− toJSON KeyedAppState'{..}

5132− = object

5133− (catMaybes

5134− [("data" .=) <$> _kasData,

5135− ("severity" .=) <$> _kasSeverity,

5136− ("key" .=) <$> _kasKey,

5137− ("message" .=) <$> _kasMessage,

5138− ("lastUpdateTime" .=) <$> _kasLastUpdateTime,

5139− ("createTime" .=) <$> _kasCreateTime])

5140−

51414969-- | Service-specific metadata associated with the operation. It typically

51424970-- contains progress information and common metadata such as create time.

51434971-- Some services might not provide such metadata. Any method that returns a

@@ -5349,58 +5177,6 @@ instance ToJSON ComplianceRule where

53495177 ("nonComplianceDetailCondition" .=) <$>

53505178 _crNonComplianceDetailCondition])

53515179

5352−-- | Response to a request to list web apps for a given enterprise.

5353−--

5354−-- /See:/ 'listWebAppsResponse' smart constructor.

5355−data ListWebAppsResponse =

5356− ListWebAppsResponse'

5357− { _lwarNextPageToken :: !(Maybe Text)

5358− , _lwarWebApps :: !(Maybe [WebApp])

5359− }

5360− deriving (Eq, Show, Data, Typeable, Generic)

5361−

5362−

5363−-- | Creates a value of 'ListWebAppsResponse' with the minimum fields required to make a request.

5364−--

5365−-- Use one of the following lenses to modify other fields as desired:

5366−--

5367−-- * 'lwarNextPageToken'

5368−--

5369−-- * 'lwarWebApps'

5370−listWebAppsResponse

5371− :: ListWebAppsResponse

5372−listWebAppsResponse =

5373− ListWebAppsResponse' {_lwarNextPageToken = Nothing, _lwarWebApps = Nothing}

5374−

5375−

5376−-- | If there are more results, a token to retrieve next page of results.

5377−lwarNextPageToken :: Lens' ListWebAppsResponse (Maybe Text)

5378−lwarNextPageToken

5379− = lens _lwarNextPageToken

5380− (\ s a -> s{_lwarNextPageToken = a})

5381−

5382−-- | The list of web apps.

5383−lwarWebApps :: Lens' ListWebAppsResponse [WebApp]

5384−lwarWebApps

5385− = lens _lwarWebApps (\ s a -> s{_lwarWebApps = a}) .

5386− _Default

5387− . _Coerce

5388−

5389−instance FromJSON ListWebAppsResponse where

5390− parseJSON

5391− = withObject "ListWebAppsResponse"

5392− (\ o ->

5393− ListWebAppsResponse' <$>

5394− (o .:? "nextPageToken") <*>

5395− (o .:? "webApps" .!= mempty))

5396−

5397−instance ToJSON ListWebAppsResponse where

5398− toJSON ListWebAppsResponse'{..}

5399− = object

5400− (catMaybes

5401− [("nextPageToken" .=) <$> _lwarNextPageToken,

5402− ("webApps" .=) <$> _lwarWebApps])

5403−

54045180-- | Requirements for the password used to unlock a device.

54055181--

54065182-- /See:/ 'passwordRequirements' smart constructor.

@@ -6080,47 +5856,6 @@ instance ToJSON SoftwareInfo where

60805856 ("androidBuildNumber" .=) <$> _siAndroidBuildNumber,

60815857 ("androidVersion" .=) <$> _siAndroidVersion])

60825858

6083−-- | Settings controlling the behavior of application reports.

6084−--

6085−-- /See:/ 'applicationReportingSettings' smart constructor.

6086−newtype ApplicationReportingSettings =

6087− ApplicationReportingSettings'

6088− { _arsIncludeRemovedApps :: Maybe Bool

6089− }

6090− deriving (Eq, Show, Data, Typeable, Generic)

6091−

6092−

6093−-- | Creates a value of 'ApplicationReportingSettings' with the minimum fields required to make a request.

6094−--

6095−-- Use one of the following lenses to modify other fields as desired:

6096−--

6097−-- * 'arsIncludeRemovedApps'

6098−applicationReportingSettings

6099− :: ApplicationReportingSettings

6100−applicationReportingSettings =

6101− ApplicationReportingSettings' {_arsIncludeRemovedApps = Nothing}

6102−

6103−

6104−-- | Whether removed apps are included in application reports.

6105−arsIncludeRemovedApps :: Lens' ApplicationReportingSettings (Maybe Bool)

6106−arsIncludeRemovedApps

6107− = lens _arsIncludeRemovedApps

6108− (\ s a -> s{_arsIncludeRemovedApps = a})

6109−

6110−instance FromJSON ApplicationReportingSettings where

6111− parseJSON

6112− = withObject "ApplicationReportingSettings"

6113− (\ o ->

6114− ApplicationReportingSettings' <$>

6115− (o .:? "includeRemovedApps"))

6116−

6117−instance ToJSON ApplicationReportingSettings where

6118− toJSON ApplicationReportingSettings'{..}

6119− = object

6120− (catMaybes

6121− [("includeRemovedApps" .=) <$>

6122− _arsIncludeRemovedApps])

6123−

61245859-- | A permission required by the app.

61255860--

61265861-- /See:/ 'applicationPermission' smart constructor.

@@ -6240,107 +5975,3 @@ instance ToJSON SetupAction where

62405975 [("launchApp" .=) <$> _saLaunchApp,

62415976 ("title" .=) <$> _saTitle,

62425977 ("description" .=) <$> _saDescription])

6243−

6244−-- | A web app.

6245−--

6246−-- /See:/ 'webApp' smart constructor.

6247−data WebApp =

6248− WebApp'

6249− { _waVersionCode :: !(Maybe (Textual Int64))

6250− , _waIcons :: !(Maybe [WebAppIcon])

6251− , _waStartURL :: !(Maybe Text)

6252− , _waDisplayMode :: !(Maybe WebAppDisplayMode)

6253− , _waName :: !(Maybe Text)

6254− , _waTitle :: !(Maybe Text)

6255− }

6256− deriving (Eq, Show, Data, Typeable, Generic)

6257−

6258−

6259−-- | Creates a value of 'WebApp' with the minimum fields required to make a request.

6260−--

6261−-- Use one of the following lenses to modify other fields as desired:

6262−--

6263−-- * 'waVersionCode'

6264−--

6265−-- * 'waIcons'

6266−--

6267−-- * 'waStartURL'

6268−--

6269−-- * 'waDisplayMode'

6270−--

6271−-- * 'waName'

6272−--

6273−-- * 'waTitle'

6274−webApp

6275− :: WebApp

6276−webApp =

6277− WebApp'

6278− { _waVersionCode = Nothing

6279− , _waIcons = Nothing

6280− , _waStartURL = Nothing

6281− , _waDisplayMode = Nothing

6282− , _waName = Nothing

6283− , _waTitle = Nothing

6284− }

6285−

6286−

6287−-- | The current version of the app.

6288−--

6289−-- Note that the version can automatically increase during the lifetime of

6290−-- the web app, while Google does internal housekeeping to keep the web app

6291−-- up-to-date.

6292−waVersionCode :: Lens' WebApp (Maybe Int64)

6293−waVersionCode

6294− = lens _waVersionCode

6295− (\ s a -> s{_waVersionCode = a})

6296− . mapping _Coerce

6297−

6298−-- | A list of icons for the web app. Must have at least one element.

6299−waIcons :: Lens' WebApp [WebAppIcon]

6300−waIcons

6301− = lens _waIcons (\ s a -> s{_waIcons = a}) . _Default

6302− . _Coerce

6303−

6304−-- | The start URL, i.e. the URL that should load when the user opens the

6305−-- application.

6306−waStartURL :: Lens' WebApp (Maybe Text)

6307−waStartURL

6308− = lens _waStartURL (\ s a -> s{_waStartURL = a})

6309−

6310−-- | The display mode of the web app.

6311−waDisplayMode :: Lens' WebApp (Maybe WebAppDisplayMode)

6312−waDisplayMode

6313− = lens _waDisplayMode

6314− (\ s a -> s{_waDisplayMode = a})

6315−

6316−-- | The name of the web app, which is generated by the server during

6317−-- creation in the form

6318−-- enterprises\/{enterpriseId}\/webApps\/{packageName}.

6319−waName :: Lens' WebApp (Maybe Text)

6320−waName = lens _waName (\ s a -> s{_waName = a})

6321−

6322−-- | The title of the web app as displayed to the user (e.g., amongst a list

6323−-- of other applications, or as a label for an icon).

6324−waTitle :: Lens' WebApp (Maybe Text)

6325−waTitle = lens _waTitle (\ s a -> s{_waTitle = a})

6326−

6327−instance FromJSON WebApp where

6328− parseJSON

6329− = withObject "WebApp"

6330− (\ o ->

6331− WebApp' <$>

6332− (o .:? "versionCode") <*> (o .:? "icons" .!= mempty)

6333− <*> (o .:? "startUrl")

6334− <*> (o .:? "displayMode")

6335− <*> (o .:? "name")

6336− <*> (o .:? "title"))

6337−

6338−instance ToJSON WebApp where

6339− toJSON WebApp'{..}

6340− = object

6341− (catMaybes

6342− [("versionCode" .=) <$> _waVersionCode,

6343− ("icons" .=) <$> _waIcons,

6344− ("startUrl" .=) <$> _waStartURL,

6345− ("displayMode" .=) <$> _waDisplayMode,

6346− ("name" .=) <$> _waName, ("title" .=) <$> _waTitle])

gogol-androidmanagement/gen/Network/Google/AndroidManagement/Types/Sum.hs−80

@@ -380,51 +380,6 @@ instance FromJSON DeviceManagementMode where

380380instance ToJSON DeviceManagementMode where

381381 toJSON = toJSONText

382382

383−-- | The display mode of the web app.

384−data WebAppDisplayMode

385− = DisplayModeUnspecified

386− -- ^ @DISPLAY_MODE_UNSPECIFIED@

387− -- Not used.

388− | MinimalUi

389− -- ^ @MINIMAL_UI@

390− -- Opens the web app with a minimal set of browser UI elements for

391− -- controlling navigation and viewing the page URL.

392− | Standalone

393− -- ^ @STANDALONE@

394− -- Opens the web app to look and feel like a standalone native application.

395− -- The browser UI elements and page URL are not visible, however the system

396− -- status bar and back button are visible.

397− | FullScreen

398− -- ^ @FULL_SCREEN@

399− -- Opens the web app in full screen without any visible controls. The

400− -- browser UI elements, page URL, system status bar and back button are not

401− -- visible, and the web app takes up the entirety of the available display

402− -- area.

403− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

404−

405−instance Hashable WebAppDisplayMode

406−

407−instance FromHttpApiData WebAppDisplayMode where

408− parseQueryParam = \case

409− "DISPLAY_MODE_UNSPECIFIED" -> Right DisplayModeUnspecified

410− "MINIMAL_UI" -> Right MinimalUi

411− "STANDALONE" -> Right Standalone

412− "FULL_SCREEN" -> Right FullScreen

413− x -> Left ("Unable to parse WebAppDisplayMode from: " <> x)

414−

415−instance ToHttpApiData WebAppDisplayMode where

416− toQueryParam = \case

417− DisplayModeUnspecified -> "DISPLAY_MODE_UNSPECIFIED"

418− MinimalUi -> "MINIMAL_UI"

419− Standalone -> "STANDALONE"

420− FullScreen -> "FULL_SCREEN"

421−

422−instance FromJSON WebAppDisplayMode where

423− parseJSON = parseJSONText "WebAppDisplayMode"

424−

425−instance ToJSON WebAppDisplayMode where

426− toJSON = toJSONText

427−

428383-- | The source of the package.

429384data ApplicationReportApplicationSource

430385 = ApplicationSourceUnspecified

@@ -1214,41 +1169,6 @@ instance FromJSON PolicyDefaultPermissionPolicy where

12141169instance ToJSON PolicyDefaultPermissionPolicy where

12151170 toJSON = toJSONText

12161171

1217−-- | The severity of the app state.

1218−data KeyedAppStateSeverity

1219− = SeverityUnspecified

1220− -- ^ @SEVERITY_UNSPECIFIED@

1221− -- Unspecified severity level.

1222− | Info

1223− -- ^ @INFO@

1224− -- Information severity level.

1225− | Error'

1226− -- ^ @ERROR@

1227− -- Error severity level. This should only be set for genuine error

1228− -- conditions that a management organization needs to take action to fix.

1229− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

1230−

1231−instance Hashable KeyedAppStateSeverity

1232−

1233−instance FromHttpApiData KeyedAppStateSeverity where

1234− parseQueryParam = \case

1235− "SEVERITY_UNSPECIFIED" -> Right SeverityUnspecified

1236− "INFO" -> Right Info

1237− "ERROR" -> Right Error'

1238− x -> Left ("Unable to parse KeyedAppStateSeverity from: " <> x)

1239−

1240−instance ToHttpApiData KeyedAppStateSeverity where

1241− toQueryParam = \case

1242− SeverityUnspecified -> "SEVERITY_UNSPECIFIED"

1243− Info -> "INFO"

1244− Error' -> "ERROR"

1245−

1246−instance FromJSON KeyedAppStateSeverity where

1247− parseJSON = parseJSONText "KeyedAppStateSeverity"

1248−

1249−instance ToJSON KeyedAppStateSeverity where

1250− toJSON = toJSONText

1251−

12521172-- | Application state.

12531173data ApplicationReportState

12541174 = ARSInstalled

gogol-androidmanagement/gen/Network/Google/Resource/AndroidManagement/Enterprises/WebApps/Create.hsdeleted−164

@@ -1,164 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Create

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Creates a web app.

24−--

25−-- /See:/ <https://developers.google.com/android/management Android Management API Reference> for @androidmanagement.enterprises.webApps.create@.

26−module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Create

27− (

28− -- * REST Resource

29− EnterprisesWebAppsCreateResource

30−

31− -- * Creating a Request

32− , enterprisesWebAppsCreate

33− , EnterprisesWebAppsCreate

34−

35− -- * Request Lenses

36− , ewacParent

37− , ewacXgafv

38− , ewacUploadProtocol

39− , ewacAccessToken

40− , ewacUploadType

41− , ewacPayload

42− , ewacCallback

43− ) where

44−

45−import Network.Google.AndroidManagement.Types

46−import Network.Google.Prelude

47−

48−-- | A resource alias for @androidmanagement.enterprises.webApps.create@ method which the

49−-- 'EnterprisesWebAppsCreate' request conforms to.

50−type EnterprisesWebAppsCreateResource =

51− "v1" :>

52− Capture "parent" Text :>

53− "webApps" :>

54− QueryParam "$.xgafv" Xgafv :>

55− QueryParam "upload_protocol" Text :>

56− QueryParam "access_token" Text :>

57− QueryParam "uploadType" Text :>

58− QueryParam "callback" Text :>

59− QueryParam "alt" AltJSON :>

60− ReqBody '[JSON] WebApp :> Post '[JSON] WebApp

61−

62−-- | Creates a web app.

63−--

64−-- /See:/ 'enterprisesWebAppsCreate' smart constructor.

65−data EnterprisesWebAppsCreate =

66− EnterprisesWebAppsCreate'

67− { _ewacParent :: !Text

68− , _ewacXgafv :: !(Maybe Xgafv)

69− , _ewacUploadProtocol :: !(Maybe Text)

70− , _ewacAccessToken :: !(Maybe Text)

71− , _ewacUploadType :: !(Maybe Text)

72− , _ewacPayload :: !WebApp

73− , _ewacCallback :: !(Maybe Text)

74− }

75− deriving (Eq, Show, Data, Typeable, Generic)

76−

77−

78−-- | Creates a value of 'EnterprisesWebAppsCreate' with the minimum fields required to make a request.

79−--

80−-- Use one of the following lenses to modify other fields as desired:

81−--

82−-- * 'ewacParent'

83−--

84−-- * 'ewacXgafv'

85−--

86−-- * 'ewacUploadProtocol'

87−--

88−-- * 'ewacAccessToken'

89−--

90−-- * 'ewacUploadType'

91−--

92−-- * 'ewacPayload'

93−--

94−-- * 'ewacCallback'

95−enterprisesWebAppsCreate

96− :: Text -- ^ 'ewacParent'

97− -> WebApp -- ^ 'ewacPayload'

98− -> EnterprisesWebAppsCreate

99−enterprisesWebAppsCreate pEwacParent_ pEwacPayload_ =

100− EnterprisesWebAppsCreate'

101− { _ewacParent = pEwacParent_

102− , _ewacXgafv = Nothing

103− , _ewacUploadProtocol = Nothing

104− , _ewacAccessToken = Nothing

105− , _ewacUploadType = Nothing

106− , _ewacPayload = pEwacPayload_

107− , _ewacCallback = Nothing

108− }

109−

110−

111−-- | The name of the enterprise in the form enterprises\/{enterpriseId}.

112−ewacParent :: Lens' EnterprisesWebAppsCreate Text

113−ewacParent

114− = lens _ewacParent (\ s a -> s{_ewacParent = a})

115−

116−-- | V1 error format.

117−ewacXgafv :: Lens' EnterprisesWebAppsCreate (Maybe Xgafv)

118−ewacXgafv

119− = lens _ewacXgafv (\ s a -> s{_ewacXgafv = a})

120−

121−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

122−ewacUploadProtocol :: Lens' EnterprisesWebAppsCreate (Maybe Text)

123−ewacUploadProtocol

124− = lens _ewacUploadProtocol

125− (\ s a -> s{_ewacUploadProtocol = a})

126−

127−-- | OAuth access token.

128−ewacAccessToken :: Lens' EnterprisesWebAppsCreate (Maybe Text)

129−ewacAccessToken

130− = lens _ewacAccessToken

131− (\ s a -> s{_ewacAccessToken = a})

132−

133−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

134−ewacUploadType :: Lens' EnterprisesWebAppsCreate (Maybe Text)

135−ewacUploadType

136− = lens _ewacUploadType

137− (\ s a -> s{_ewacUploadType = a})

138−

139−-- | Multipart request metadata.

140−ewacPayload :: Lens' EnterprisesWebAppsCreate WebApp

141−ewacPayload

142− = lens _ewacPayload (\ s a -> s{_ewacPayload = a})

143−

144−-- | JSONP

145−ewacCallback :: Lens' EnterprisesWebAppsCreate (Maybe Text)

146−ewacCallback

147− = lens _ewacCallback (\ s a -> s{_ewacCallback = a})

148−

149−instance GoogleRequest EnterprisesWebAppsCreate where

150− type Rs EnterprisesWebAppsCreate = WebApp

151− type Scopes EnterprisesWebAppsCreate =

152− '["https://www.googleapis.com/auth/androidmanagement"]

153− requestClient EnterprisesWebAppsCreate'{..}

154− = go _ewacParent _ewacXgafv _ewacUploadProtocol

155− _ewacAccessToken

156− _ewacUploadType

157− _ewacCallback

158− (Just AltJSON)

159− _ewacPayload

160− androidManagementService

161− where go

162− = buildClient

163− (Proxy :: Proxy EnterprisesWebAppsCreateResource)

164− mempty

gogol-androidmanagement/gen/Network/Google/Resource/AndroidManagement/Enterprises/WebApps/Delete.hsdeleted−150

@@ -1,150 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Delete

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Deletes a web app.

24−--

25−-- /See:/ <https://developers.google.com/android/management Android Management API Reference> for @androidmanagement.enterprises.webApps.delete@.

26−module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Delete

27− (

28− -- * REST Resource

29− EnterprisesWebAppsDeleteResource

30−

31− -- * Creating a Request

32− , enterprisesWebAppsDelete

33− , EnterprisesWebAppsDelete

34−

35− -- * Request Lenses

36− , ewadXgafv

37− , ewadUploadProtocol

38− , ewadAccessToken

39− , ewadUploadType

40− , ewadName

41− , ewadCallback

42− ) where

43−

44−import Network.Google.AndroidManagement.Types

45−import Network.Google.Prelude

46−

47−-- | A resource alias for @androidmanagement.enterprises.webApps.delete@ method which the

48−-- 'EnterprisesWebAppsDelete' request conforms to.

49−type EnterprisesWebAppsDeleteResource =

50− "v1" :>

51− Capture "name" Text :>

52− QueryParam "$.xgafv" Xgafv :>

53− QueryParam "upload_protocol" Text :>

54− QueryParam "access_token" Text :>

55− QueryParam "uploadType" Text :>

56− QueryParam "callback" Text :>

57− QueryParam "alt" AltJSON :> Delete '[JSON] Empty

58−

59−-- | Deletes a web app.

60−--

61−-- /See:/ 'enterprisesWebAppsDelete' smart constructor.

62−data EnterprisesWebAppsDelete =

63− EnterprisesWebAppsDelete'

64− { _ewadXgafv :: !(Maybe Xgafv)

65− , _ewadUploadProtocol :: !(Maybe Text)

66− , _ewadAccessToken :: !(Maybe Text)

67− , _ewadUploadType :: !(Maybe Text)

68− , _ewadName :: !Text

69− , _ewadCallback :: !(Maybe Text)

70− }

71− deriving (Eq, Show, Data, Typeable, Generic)

72−

73−

74−-- | Creates a value of 'EnterprisesWebAppsDelete' with the minimum fields required to make a request.

75−--

76−-- Use one of the following lenses to modify other fields as desired:

77−--

78−-- * 'ewadXgafv'

79−--

80−-- * 'ewadUploadProtocol'

81−--

82−-- * 'ewadAccessToken'

83−--

84−-- * 'ewadUploadType'

85−--

86−-- * 'ewadName'

87−--

88−-- * 'ewadCallback'

89−enterprisesWebAppsDelete

90− :: Text -- ^ 'ewadName'

91− -> EnterprisesWebAppsDelete

92−enterprisesWebAppsDelete pEwadName_ =

93− EnterprisesWebAppsDelete'

94− { _ewadXgafv = Nothing

95− , _ewadUploadProtocol = Nothing

96− , _ewadAccessToken = Nothing

97− , _ewadUploadType = Nothing

98− , _ewadName = pEwadName_

99− , _ewadCallback = Nothing

100− }

101−

102−

103−-- | V1 error format.

104−ewadXgafv :: Lens' EnterprisesWebAppsDelete (Maybe Xgafv)

105−ewadXgafv

106− = lens _ewadXgafv (\ s a -> s{_ewadXgafv = a})

107−

108−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

109−ewadUploadProtocol :: Lens' EnterprisesWebAppsDelete (Maybe Text)

110−ewadUploadProtocol

111− = lens _ewadUploadProtocol

112− (\ s a -> s{_ewadUploadProtocol = a})

113−

114−-- | OAuth access token.

115−ewadAccessToken :: Lens' EnterprisesWebAppsDelete (Maybe Text)

116−ewadAccessToken

117− = lens _ewadAccessToken

118− (\ s a -> s{_ewadAccessToken = a})

119−

120−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

121−ewadUploadType :: Lens' EnterprisesWebAppsDelete (Maybe Text)

122−ewadUploadType

123− = lens _ewadUploadType

124− (\ s a -> s{_ewadUploadType = a})

125−

126−-- | The name of the web app in the form

127−-- enterprises\/{enterpriseId}\/webApps\/{packageName}.

128−ewadName :: Lens' EnterprisesWebAppsDelete Text

129−ewadName = lens _ewadName (\ s a -> s{_ewadName = a})

130−

131−-- | JSONP

132−ewadCallback :: Lens' EnterprisesWebAppsDelete (Maybe Text)

133−ewadCallback

134− = lens _ewadCallback (\ s a -> s{_ewadCallback = a})

135−

136−instance GoogleRequest EnterprisesWebAppsDelete where

137− type Rs EnterprisesWebAppsDelete = Empty

138− type Scopes EnterprisesWebAppsDelete =

139− '["https://www.googleapis.com/auth/androidmanagement"]

140− requestClient EnterprisesWebAppsDelete'{..}

141− = go _ewadName _ewadXgafv _ewadUploadProtocol

142− _ewadAccessToken

143− _ewadUploadType

144− _ewadCallback

145− (Just AltJSON)

146− androidManagementService

147− where go

148− = buildClient

149− (Proxy :: Proxy EnterprisesWebAppsDeleteResource)

150− mempty

gogol-androidmanagement/gen/Network/Google/Resource/AndroidManagement/Enterprises/WebApps/Get.hsdeleted−150

@@ -1,150 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Get

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Gets a web app.

24−--

25−-- /See:/ <https://developers.google.com/android/management Android Management API Reference> for @androidmanagement.enterprises.webApps.get@.

26−module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Get

27− (

28− -- * REST Resource

29− EnterprisesWebAppsGetResource

30−

31− -- * Creating a Request

32− , enterprisesWebAppsGet

33− , EnterprisesWebAppsGet

34−

35− -- * Request Lenses

36− , ewagXgafv

37− , ewagUploadProtocol

38− , ewagAccessToken

39− , ewagUploadType

40− , ewagName

41− , ewagCallback

42− ) where

43−

44−import Network.Google.AndroidManagement.Types

45−import Network.Google.Prelude

46−

47−-- | A resource alias for @androidmanagement.enterprises.webApps.get@ method which the

48−-- 'EnterprisesWebAppsGet' request conforms to.

49−type EnterprisesWebAppsGetResource =

50− "v1" :>

51− Capture "name" Text :>

52− QueryParam "$.xgafv" Xgafv :>

53− QueryParam "upload_protocol" Text :>

54− QueryParam "access_token" Text :>

55− QueryParam "uploadType" Text :>

56− QueryParam "callback" Text :>

57− QueryParam "alt" AltJSON :> Get '[JSON] WebApp

58−

59−-- | Gets a web app.

60−--

61−-- /See:/ 'enterprisesWebAppsGet' smart constructor.

62−data EnterprisesWebAppsGet =

63− EnterprisesWebAppsGet'

64− { _ewagXgafv :: !(Maybe Xgafv)

65− , _ewagUploadProtocol :: !(Maybe Text)

66− , _ewagAccessToken :: !(Maybe Text)

67− , _ewagUploadType :: !(Maybe Text)

68− , _ewagName :: !Text

69− , _ewagCallback :: !(Maybe Text)

70− }

71− deriving (Eq, Show, Data, Typeable, Generic)

72−

73−

74−-- | Creates a value of 'EnterprisesWebAppsGet' with the minimum fields required to make a request.

75−--

76−-- Use one of the following lenses to modify other fields as desired:

77−--

78−-- * 'ewagXgafv'

79−--

80−-- * 'ewagUploadProtocol'

81−--

82−-- * 'ewagAccessToken'

83−--

84−-- * 'ewagUploadType'

85−--

86−-- * 'ewagName'

87−--

88−-- * 'ewagCallback'

89−enterprisesWebAppsGet

90− :: Text -- ^ 'ewagName'

91− -> EnterprisesWebAppsGet

92−enterprisesWebAppsGet pEwagName_ =

93− EnterprisesWebAppsGet'

94− { _ewagXgafv = Nothing

95− , _ewagUploadProtocol = Nothing

96− , _ewagAccessToken = Nothing

97− , _ewagUploadType = Nothing

98− , _ewagName = pEwagName_

99− , _ewagCallback = Nothing

100− }

101−

102−

103−-- | V1 error format.

104−ewagXgafv :: Lens' EnterprisesWebAppsGet (Maybe Xgafv)

105−ewagXgafv

106− = lens _ewagXgafv (\ s a -> s{_ewagXgafv = a})

107−

108−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

109−ewagUploadProtocol :: Lens' EnterprisesWebAppsGet (Maybe Text)

110−ewagUploadProtocol

111− = lens _ewagUploadProtocol

112− (\ s a -> s{_ewagUploadProtocol = a})

113−

114−-- | OAuth access token.

115−ewagAccessToken :: Lens' EnterprisesWebAppsGet (Maybe Text)

116−ewagAccessToken

117− = lens _ewagAccessToken

118− (\ s a -> s{_ewagAccessToken = a})

119−

120−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

121−ewagUploadType :: Lens' EnterprisesWebAppsGet (Maybe Text)

122−ewagUploadType

123− = lens _ewagUploadType

124− (\ s a -> s{_ewagUploadType = a})

125−

126−-- | The name of the web app in the form

127−-- enterprises\/{enterpriseId}\/webApp\/{packageName}.

128−ewagName :: Lens' EnterprisesWebAppsGet Text

129−ewagName = lens _ewagName (\ s a -> s{_ewagName = a})

130−

131−-- | JSONP

132−ewagCallback :: Lens' EnterprisesWebAppsGet (Maybe Text)

133−ewagCallback

134− = lens _ewagCallback (\ s a -> s{_ewagCallback = a})

135−

136−instance GoogleRequest EnterprisesWebAppsGet where

137− type Rs EnterprisesWebAppsGet = WebApp

138− type Scopes EnterprisesWebAppsGet =

139− '["https://www.googleapis.com/auth/androidmanagement"]

140− requestClient EnterprisesWebAppsGet'{..}

141− = go _ewagName _ewagXgafv _ewagUploadProtocol

142− _ewagAccessToken

143− _ewagUploadType

144− _ewagCallback

145− (Just AltJSON)

146− androidManagementService

147− where go

148− = buildClient

149− (Proxy :: Proxy EnterprisesWebAppsGetResource)

150− mempty

gogol-androidmanagement/gen/Network/Google/Resource/AndroidManagement/Enterprises/WebApps/List.hsdeleted−179

@@ -1,179 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AndroidManagement.Enterprises.WebApps.List

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Lists web apps for a given enterprise.

24−--

25−-- /See:/ <https://developers.google.com/android/management Android Management API Reference> for @androidmanagement.enterprises.webApps.list@.

26−module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.List

27− (

28− -- * REST Resource

29− EnterprisesWebAppsListResource

30−

31− -- * Creating a Request

32− , enterprisesWebAppsList

33− , EnterprisesWebAppsList

34−

35− -- * Request Lenses

36− , ewalParent

37− , ewalXgafv

38− , ewalUploadProtocol

39− , ewalAccessToken

40− , ewalUploadType

41− , ewalPageToken

42− , ewalPageSize

43− , ewalCallback

44− ) where

45−

46−import Network.Google.AndroidManagement.Types

47−import Network.Google.Prelude

48−

49−-- | A resource alias for @androidmanagement.enterprises.webApps.list@ method which the

50−-- 'EnterprisesWebAppsList' request conforms to.

51−type EnterprisesWebAppsListResource =

52− "v1" :>

53− Capture "parent" Text :>

54− "webApps" :>

55− QueryParam "$.xgafv" Xgafv :>

56− QueryParam "upload_protocol" Text :>

57− QueryParam "access_token" Text :>

58− QueryParam "uploadType" Text :>

59− QueryParam "pageToken" Text :>

60− QueryParam "pageSize" (Textual Int32) :>

61− QueryParam "callback" Text :>

62− QueryParam "alt" AltJSON :>

63− Get '[JSON] ListWebAppsResponse

64−

65−-- | Lists web apps for a given enterprise.

66−--

67−-- /See:/ 'enterprisesWebAppsList' smart constructor.

68−data EnterprisesWebAppsList =

69− EnterprisesWebAppsList'

70− { _ewalParent :: !Text

71− , _ewalXgafv :: !(Maybe Xgafv)

72− , _ewalUploadProtocol :: !(Maybe Text)

73− , _ewalAccessToken :: !(Maybe Text)

74− , _ewalUploadType :: !(Maybe Text)

75− , _ewalPageToken :: !(Maybe Text)

76− , _ewalPageSize :: !(Maybe (Textual Int32))

77− , _ewalCallback :: !(Maybe Text)

78− }

79− deriving (Eq, Show, Data, Typeable, Generic)

80−

81−

82−-- | Creates a value of 'EnterprisesWebAppsList' with the minimum fields required to make a request.

83−--

84−-- Use one of the following lenses to modify other fields as desired:

85−--

86−-- * 'ewalParent'

87−--

88−-- * 'ewalXgafv'

89−--

90−-- * 'ewalUploadProtocol'

91−--

92−-- * 'ewalAccessToken'

93−--

94−-- * 'ewalUploadType'

95−--

96−-- * 'ewalPageToken'

97−--

98−-- * 'ewalPageSize'

99−--

100−-- * 'ewalCallback'

101−enterprisesWebAppsList

102− :: Text -- ^ 'ewalParent'

103− -> EnterprisesWebAppsList

104−enterprisesWebAppsList pEwalParent_ =

105− EnterprisesWebAppsList'

106− { _ewalParent = pEwalParent_

107− , _ewalXgafv = Nothing

108− , _ewalUploadProtocol = Nothing

109− , _ewalAccessToken = Nothing

110− , _ewalUploadType = Nothing

111− , _ewalPageToken = Nothing

112− , _ewalPageSize = Nothing

113− , _ewalCallback = Nothing

114− }

115−

116−

117−-- | The name of the enterprise in the form enterprises\/{enterpriseId}.

118−ewalParent :: Lens' EnterprisesWebAppsList Text

119−ewalParent

120− = lens _ewalParent (\ s a -> s{_ewalParent = a})

121−

122−-- | V1 error format.

123−ewalXgafv :: Lens' EnterprisesWebAppsList (Maybe Xgafv)

124−ewalXgafv

125− = lens _ewalXgafv (\ s a -> s{_ewalXgafv = a})

126−

127−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

128−ewalUploadProtocol :: Lens' EnterprisesWebAppsList (Maybe Text)

129−ewalUploadProtocol

130− = lens _ewalUploadProtocol

131− (\ s a -> s{_ewalUploadProtocol = a})

132−

133−-- | OAuth access token.

134−ewalAccessToken :: Lens' EnterprisesWebAppsList (Maybe Text)

135−ewalAccessToken

136− = lens _ewalAccessToken

137− (\ s a -> s{_ewalAccessToken = a})

138−

139−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

140−ewalUploadType :: Lens' EnterprisesWebAppsList (Maybe Text)

141−ewalUploadType

142− = lens _ewalUploadType

143− (\ s a -> s{_ewalUploadType = a})

144−

145−-- | A token identifying a page of results returned by the server.

146−ewalPageToken :: Lens' EnterprisesWebAppsList (Maybe Text)

147−ewalPageToken

148− = lens _ewalPageToken

149− (\ s a -> s{_ewalPageToken = a})

150−

151−-- | The requested page size. The actual page size may be fixed to a min or

152−-- max value.

153−ewalPageSize :: Lens' EnterprisesWebAppsList (Maybe Int32)

154−ewalPageSize

155− = lens _ewalPageSize (\ s a -> s{_ewalPageSize = a})

156− . mapping _Coerce

157−

158−-- | JSONP

159−ewalCallback :: Lens' EnterprisesWebAppsList (Maybe Text)

160−ewalCallback

161− = lens _ewalCallback (\ s a -> s{_ewalCallback = a})

162−

163−instance GoogleRequest EnterprisesWebAppsList where

164− type Rs EnterprisesWebAppsList = ListWebAppsResponse

165− type Scopes EnterprisesWebAppsList =

166− '["https://www.googleapis.com/auth/androidmanagement"]

167− requestClient EnterprisesWebAppsList'{..}

168− = go _ewalParent _ewalXgafv _ewalUploadProtocol

169− _ewalAccessToken

170− _ewalUploadType

171− _ewalPageToken

172− _ewalPageSize

173− _ewalCallback

174− (Just AltJSON)

175− androidManagementService

176− where go

177− = buildClient

178− (Proxy :: Proxy EnterprisesWebAppsListResource)

179− mempty

gogol-androidmanagement/gen/Network/Google/Resource/AndroidManagement/Enterprises/WebApps/Patch.hsdeleted−177

@@ -1,177 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Patch

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Updates a web app.

24−--

25−-- /See:/ <https://developers.google.com/android/management Android Management API Reference> for @androidmanagement.enterprises.webApps.patch@.

26−module Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Patch

27− (

28− -- * REST Resource

29− EnterprisesWebAppsPatchResource

30−

31− -- * Creating a Request

32− , enterprisesWebAppsPatch

33− , EnterprisesWebAppsPatch

34−

35− -- * Request Lenses

36− , ewapXgafv

37− , ewapUploadProtocol

38− , ewapUpdateMask

39− , ewapAccessToken

40− , ewapUploadType

41− , ewapPayload

42− , ewapName

43− , ewapCallback

44− ) where

45−

46−import Network.Google.AndroidManagement.Types

47−import Network.Google.Prelude

48−

49−-- | A resource alias for @androidmanagement.enterprises.webApps.patch@ method which the

50−-- 'EnterprisesWebAppsPatch' request conforms to.

51−type EnterprisesWebAppsPatchResource =

52− "v1" :>

53− Capture "name" Text :>

54− QueryParam "$.xgafv" Xgafv :>

55− QueryParam "upload_protocol" Text :>

56− QueryParam "updateMask" GFieldMask :>

57− QueryParam "access_token" Text :>

58− QueryParam "uploadType" Text :>

59− QueryParam "callback" Text :>

60− QueryParam "alt" AltJSON :>

61− ReqBody '[JSON] WebApp :> Patch '[JSON] WebApp

62−

63−-- | Updates a web app.

64−--

65−-- /See:/ 'enterprisesWebAppsPatch' smart constructor.

66−data EnterprisesWebAppsPatch =

67− EnterprisesWebAppsPatch'

68− { _ewapXgafv :: !(Maybe Xgafv)

69− , _ewapUploadProtocol :: !(Maybe Text)

70− , _ewapUpdateMask :: !(Maybe GFieldMask)

71− , _ewapAccessToken :: !(Maybe Text)

72− , _ewapUploadType :: !(Maybe Text)

73− , _ewapPayload :: !WebApp

74− , _ewapName :: !Text

75− , _ewapCallback :: !(Maybe Text)

76− }

77− deriving (Eq, Show, Data, Typeable, Generic)

78−

79−

80−-- | Creates a value of 'EnterprisesWebAppsPatch' with the minimum fields required to make a request.

81−--

82−-- Use one of the following lenses to modify other fields as desired:

83−--

84−-- * 'ewapXgafv'

85−--

86−-- * 'ewapUploadProtocol'

87−--

88−-- * 'ewapUpdateMask'

89−--

90−-- * 'ewapAccessToken'

91−--

92−-- * 'ewapUploadType'

93−--

94−-- * 'ewapPayload'

95−--

96−-- * 'ewapName'

97−--

98−-- * 'ewapCallback'

99−enterprisesWebAppsPatch

100− :: WebApp -- ^ 'ewapPayload'

101− -> Text -- ^ 'ewapName'

102− -> EnterprisesWebAppsPatch

103−enterprisesWebAppsPatch pEwapPayload_ pEwapName_ =

104− EnterprisesWebAppsPatch'

105− { _ewapXgafv = Nothing

106− , _ewapUploadProtocol = Nothing

107− , _ewapUpdateMask = Nothing

108− , _ewapAccessToken = Nothing

109− , _ewapUploadType = Nothing

110− , _ewapPayload = pEwapPayload_

111− , _ewapName = pEwapName_

112− , _ewapCallback = Nothing

113− }

114−

115−

116−-- | V1 error format.

117−ewapXgafv :: Lens' EnterprisesWebAppsPatch (Maybe Xgafv)

118−ewapXgafv

119− = lens _ewapXgafv (\ s a -> s{_ewapXgafv = a})

120−

121−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

122−ewapUploadProtocol :: Lens' EnterprisesWebAppsPatch (Maybe Text)

123−ewapUploadProtocol

124− = lens _ewapUploadProtocol

125− (\ s a -> s{_ewapUploadProtocol = a})

126−

127−-- | The field mask indicating the fields to update. If not set, all

128−-- modifiable fields will be modified.

129−ewapUpdateMask :: Lens' EnterprisesWebAppsPatch (Maybe GFieldMask)

130−ewapUpdateMask

131− = lens _ewapUpdateMask

132− (\ s a -> s{_ewapUpdateMask = a})

133−

134−-- | OAuth access token.

135−ewapAccessToken :: Lens' EnterprisesWebAppsPatch (Maybe Text)

136−ewapAccessToken

137− = lens _ewapAccessToken

138− (\ s a -> s{_ewapAccessToken = a})

139−

140−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

141−ewapUploadType :: Lens' EnterprisesWebAppsPatch (Maybe Text)

142−ewapUploadType

143− = lens _ewapUploadType

144− (\ s a -> s{_ewapUploadType = a})

145−

146−-- | Multipart request metadata.

147−ewapPayload :: Lens' EnterprisesWebAppsPatch WebApp

148−ewapPayload

149− = lens _ewapPayload (\ s a -> s{_ewapPayload = a})

150−

151−-- | The name of the web app in the form

152−-- enterprises\/{enterpriseId}\/webApps\/{packageName}.

153−ewapName :: Lens' EnterprisesWebAppsPatch Text

154−ewapName = lens _ewapName (\ s a -> s{_ewapName = a})

155−

156−-- | JSONP

157−ewapCallback :: Lens' EnterprisesWebAppsPatch (Maybe Text)

158−ewapCallback

159− = lens _ewapCallback (\ s a -> s{_ewapCallback = a})

160−

161−instance GoogleRequest EnterprisesWebAppsPatch where

162− type Rs EnterprisesWebAppsPatch = WebApp

163− type Scopes EnterprisesWebAppsPatch =

164− '["https://www.googleapis.com/auth/androidmanagement"]

165− requestClient EnterprisesWebAppsPatch'{..}

166− = go _ewapName _ewapXgafv _ewapUploadProtocol

167− _ewapUpdateMask

168− _ewapAccessToken

169− _ewapUploadType

170− _ewapCallback

171− (Just AltJSON)

172− _ewapPayload

173− androidManagementService

174− where go

175− = buildClient

176− (Proxy :: Proxy EnterprisesWebAppsPatchResource)

177− mempty

gogol-androidmanagement/gogol-androidmanagement.cabal−5

@@ -55,11 +55,6 @@ library

5555 , Network.Google.Resource.AndroidManagement.Enterprises.Policies.Get

5656 , Network.Google.Resource.AndroidManagement.Enterprises.Policies.List

5757 , Network.Google.Resource.AndroidManagement.Enterprises.Policies.Patch

58− , Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Create

59− , Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Delete

60− , Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Get

61− , Network.Google.Resource.AndroidManagement.Enterprises.WebApps.List

62− , Network.Google.Resource.AndroidManagement.Enterprises.WebApps.Patch

6358 , Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

6459 , Network.Google.Resource.AndroidManagement.SignupURLs.Create

6560

gogol-appengine/gen/Network/Google/AppEngine.hs+20−8

@@ -171,6 +171,11 @@ module Network.Google.AppEngine

171171 , sCode

172172 , sMessage

173173

174+ -- ** OperationSchema

175+ , OperationSchema

176+ , operationSchema

177+ , osAddtional

178+

174179 -- ** LocationSchema

175180 , LocationSchema

176181 , locationSchema

@@ -268,11 +273,6 @@ module Network.Google.AppEngine

268273 , acExpireTime

269274 , acVisibleDomainMAppings

270275

271− -- ** VPCAccessConnector

272− , VPCAccessConnector

273− , vpcAccessConnector

274− , vacName

275−

276276 -- ** APIConfigHandler

277277 , APIConfigHandler

278278 , apiConfigHandler

@@ -432,6 +432,15 @@ module Network.Google.AppEngine

432432 , asMaxPendingLatency

433433 , asStandardSchedulerSettings

434434

435+ -- ** OperationMetadataV1Beta5

436+ , OperationMetadataV1Beta5

437+ , operationMetadataV1Beta5

438+ , oInsertTime

439+ , oUser

440+ , oMethod

441+ , oEndTime

442+ , oTarget

443+

435444 -- ** Volume

436445 , Volume

437446 , volume

@@ -504,7 +513,6 @@ module Network.Google.AppEngine

504513 -- ** FeatureSettings

505514 , FeatureSettings

506515 , featureSettings

507− , fsUseContainerOptimizedOS

508516 , fsSplitHealthChecks

509517

510518 -- ** CertificateRawData

@@ -593,7 +601,6 @@ module Network.Google.AppEngine

593601 , verInstanceClass

594602 , verRuntimeChannel

595603 , verRuntimeMainExecutablePath

596− , verVPCAccessConnector

597604 , verHealthCheck

598605 , verEndpointsAPIService

599606 , verEnv

@@ -689,7 +696,12 @@ module Network.Google.AppEngine

689696 -- ** OperationMetadata

690697 , OperationMetadata

691698 , operationMetadata

692− , omAddtional

699+ , omInsertTime

700+ , omUser

701+ , omMethod

702+ , omEndTime

703+ , omOperationType

704+ , omTarget

693705

694706 -- ** URLMapAuthFailAction

695707 , URLMapAuthFailAction (..)

gogol-appengine/gen/Network/Google/AppEngine/Types.hs+20−8

@@ -48,6 +48,11 @@ module Network.Google.AppEngine.Types

4848 , sCode

4949 , sMessage

5050

51+ -- * OperationSchema

52+ , OperationSchema

53+ , operationSchema

54+ , osAddtional

55+

5156 -- * LocationSchema

5257 , LocationSchema

5358 , locationSchema

@@ -145,11 +150,6 @@ module Network.Google.AppEngine.Types

145150 , acExpireTime

146151 , acVisibleDomainMAppings

147152

148− -- * VPCAccessConnector

149− , VPCAccessConnector

150− , vpcAccessConnector

151− , vacName

152−

153153 -- * APIConfigHandler

154154 , APIConfigHandler

155155 , apiConfigHandler

@@ -309,6 +309,15 @@ module Network.Google.AppEngine.Types

309309 , asMaxPendingLatency

310310 , asStandardSchedulerSettings

311311

312+ -- * OperationMetadataV1Beta5

313+ , OperationMetadataV1Beta5

314+ , operationMetadataV1Beta5

315+ , oInsertTime

316+ , oUser

317+ , oMethod

318+ , oEndTime

319+ , oTarget

320+

312321 -- * Volume

313322 , Volume

314323 , volume

@@ -381,7 +390,6 @@ module Network.Google.AppEngine.Types

381390 -- * FeatureSettings

382391 , FeatureSettings

383392 , featureSettings

384− , fsUseContainerOptimizedOS

385393 , fsSplitHealthChecks

386394

387395 -- * CertificateRawData

@@ -470,7 +478,6 @@ module Network.Google.AppEngine.Types

470478 , verInstanceClass

471479 , verRuntimeChannel

472480 , verRuntimeMainExecutablePath

473− , verVPCAccessConnector

474481 , verHealthCheck

475482 , verEndpointsAPIService

476483 , verEnv

@@ -566,7 +573,12 @@ module Network.Google.AppEngine.Types

566573 -- * OperationMetadata

567574 , OperationMetadata

568575 , operationMetadata

569− , omAddtional

576+ , omInsertTime

577+ , omUser

578+ , omMethod

579+ , omEndTime

580+ , omOperationType

581+ , omTarget

570582

571583 -- * URLMapAuthFailAction

572584 , URLMapAuthFailAction (..)

gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+207−89

@@ -202,6 +202,45 @@ instance ToJSON Status where

202202 ("code" .=) <$> _sCode,

203203 ("message" .=) <$> _sMessage])

204204

205+-- | Service-specific metadata associated with the operation. It typically

206+-- contains progress information and common metadata such as create time.

207+-- Some services might not provide such metadata. Any method that returns a

208+-- long-running operation should document the metadata type, if any.

209+--

210+-- /See:/ 'operationSchema' smart constructor.

211+newtype OperationSchema =

212+ OperationSchema'

213+ { _osAddtional :: HashMap Text JSONValue

214+ }

215+ deriving (Eq, Show, Data, Typeable, Generic)

216+

217+

218+-- | Creates a value of 'OperationSchema' with the minimum fields required to make a request.

219+--

220+-- Use one of the following lenses to modify other fields as desired:

221+--

222+-- * 'osAddtional'

223+operationSchema

224+ :: HashMap Text JSONValue -- ^ 'osAddtional'

225+ -> OperationSchema

226+operationSchema pOsAddtional_ =

227+ OperationSchema' {_osAddtional = _Coerce # pOsAddtional_}

228+

229+

230+-- | Properties of the object. Contains field \'type with type URL.

231+osAddtional :: Lens' OperationSchema (HashMap Text JSONValue)

232+osAddtional

233+ = lens _osAddtional (\ s a -> s{_osAddtional = a}) .

234+ _Coerce

235+

236+instance FromJSON OperationSchema where

237+ parseJSON

238+ = withObject "OperationSchema"

239+ (\ o -> OperationSchema' <$> (parseJSONObject o))

240+

241+instance ToJSON OperationSchema where

242+ toJSON = toJSON . _osAddtional

243+

205244-- | Service-specific metadata. For example the available capacity at the

206245-- given location.

207246--

@@ -1145,40 +1184,6 @@ instance ToJSON AuthorizedCertificate where

11451184 ("visibleDomainMappings" .=) <$>

11461185 _acVisibleDomainMAppings])

11471186

1148−-- | VPC access connector specification.

1149−--

1150−-- /See:/ 'vpcAccessConnector' smart constructor.

1151−newtype VPCAccessConnector =

1152− VPCAccessConnector'

1153− { _vacName :: Maybe Text

1154− }

1155− deriving (Eq, Show, Data, Typeable, Generic)

1156−

1157−

1158−-- | Creates a value of 'VPCAccessConnector' with the minimum fields required to make a request.

1159−--

1160−-- Use one of the following lenses to modify other fields as desired:

1161−--

1162−-- * 'vacName'

1163−vpcAccessConnector

1164− :: VPCAccessConnector

1165−vpcAccessConnector = VPCAccessConnector' {_vacName = Nothing}

1166−

1167−

1168−-- | Full Serverless VPC Access Connector name e.g.

1169−-- \/projects\/my-project\/locations\/us-central1\/connectors\/c1.

1170−vacName :: Lens' VPCAccessConnector (Maybe Text)

1171−vacName = lens _vacName (\ s a -> s{_vacName = a})

1172−

1173−instance FromJSON VPCAccessConnector where

1174− parseJSON

1175− = withObject "VPCAccessConnector"

1176− (\ o -> VPCAccessConnector' <$> (o .:? "name"))

1177−

1178−instance ToJSON VPCAccessConnector where

1179− toJSON VPCAccessConnector'{..}

1180− = object (catMaybes [("name" .=) <$> _vacName])

1181−

11821187-- | Google Cloud Endpoints

11831188-- (https:\/\/cloud.google.com\/appengine\/docs\/python\/endpoints\/)

11841189-- configuration for API handlers.

@@ -1787,7 +1792,7 @@ data Operation =

17871792 , _oError :: !(Maybe Status)

17881793 , _oResponse :: !(Maybe OperationResponse)

17891794 , _oName :: !(Maybe Text)

1790− , _oMetadata :: !(Maybe OperationMetadata)

1795+ , _oMetadata :: !(Maybe OperationSchema)

17911796 }

17921797 deriving (Eq, Show, Data, Typeable, Generic)

17931798

@@ -1848,7 +1853,7 @@ oName = lens _oName (\ s a -> s{_oName = a})

18481853-- contains progress information and common metadata such as create time.

18491854-- Some services might not provide such metadata. Any method that returns a

18501855-- long-running operation should document the metadata type, if any.

1851−oMetadata :: Lens' Operation (Maybe OperationMetadata)

1856+oMetadata :: Lens' Operation (Maybe OperationSchema)

18521857oMetadata

18531858 = lens _oMetadata (\ s a -> s{_oMetadata = a})

18541859

@@ -2645,6 +2650,90 @@ instance ToJSON AutomaticScaling where

26452650 ("standardSchedulerSettings" .=) <$>

26462651 _asStandardSchedulerSettings])

26472652

2653+-- | Metadata for the given google.longrunning.Operation.

2654+--

2655+-- /See:/ 'operationMetadataV1Beta5' smart constructor.

2656+data OperationMetadataV1Beta5 =

2657+ OperationMetadataV1Beta5'

2658+ { _oInsertTime :: !(Maybe DateTime')

2659+ , _oUser :: !(Maybe Text)

2660+ , _oMethod :: !(Maybe Text)

2661+ , _oEndTime :: !(Maybe DateTime')

2662+ , _oTarget :: !(Maybe Text)

2663+ }

2664+ deriving (Eq, Show, Data, Typeable, Generic)

2665+

2666+

2667+-- | Creates a value of 'OperationMetadataV1Beta5' with the minimum fields required to make a request.

2668+--

2669+-- Use one of the following lenses to modify other fields as desired:

2670+--

2671+-- * 'oInsertTime'

2672+--

2673+-- * 'oUser'

2674+--

2675+-- * 'oMethod'

2676+--

2677+-- * 'oEndTime'

2678+--

2679+-- * 'oTarget'

2680+operationMetadataV1Beta5

2681+ :: OperationMetadataV1Beta5

2682+operationMetadataV1Beta5 =

2683+ OperationMetadataV1Beta5'

2684+ { _oInsertTime = Nothing

2685+ , _oUser = Nothing

2686+ , _oMethod = Nothing

2687+ , _oEndTime = Nothing

2688+ , _oTarget = Nothing

2689+ }

2690+

2691+

2692+-- | Timestamp that this operation was created.\'OutputOnly

2693+oInsertTime :: Lens' OperationMetadataV1Beta5 (Maybe UTCTime)

2694+oInsertTime

2695+ = lens _oInsertTime (\ s a -> s{_oInsertTime = a}) .

2696+ mapping _DateTime

2697+

2698+-- | User who requested this operation.\'OutputOnly

2699+oUser :: Lens' OperationMetadataV1Beta5 (Maybe Text)

2700+oUser = lens _oUser (\ s a -> s{_oUser = a})

2701+

2702+-- | API method name that initiated this operation. Example:

2703+-- google.appengine.v1beta5.Version.CreateVersion.\'OutputOnly

2704+oMethod :: Lens' OperationMetadataV1Beta5 (Maybe Text)

2705+oMethod = lens _oMethod (\ s a -> s{_oMethod = a})

2706+

2707+-- | Timestamp that this operation completed.\'OutputOnly

2708+oEndTime :: Lens' OperationMetadataV1Beta5 (Maybe UTCTime)

2709+oEndTime

2710+ = lens _oEndTime (\ s a -> s{_oEndTime = a}) .

2711+ mapping _DateTime

2712+

2713+-- | Name of the resource that this operation is acting on. Example:

2714+-- apps\/myapp\/services\/default.\'OutputOnly

2715+oTarget :: Lens' OperationMetadataV1Beta5 (Maybe Text)

2716+oTarget = lens _oTarget (\ s a -> s{_oTarget = a})

2717+

2718+instance FromJSON OperationMetadataV1Beta5 where

2719+ parseJSON

2720+ = withObject "OperationMetadataV1Beta5"

2721+ (\ o ->

2722+ OperationMetadataV1Beta5' <$>

2723+ (o .:? "insertTime") <*> (o .:? "user") <*>

2724+ (o .:? "method")

2725+ <*> (o .:? "endTime")

2726+ <*> (o .:? "target"))

2727+

2728+instance ToJSON OperationMetadataV1Beta5 where

2729+ toJSON OperationMetadataV1Beta5'{..}

2730+ = object

2731+ (catMaybes

2732+ [("insertTime" .=) <$> _oInsertTime,

2733+ ("user" .=) <$> _oUser, ("method" .=) <$> _oMethod,

2734+ ("endTime" .=) <$> _oEndTime,

2735+ ("target" .=) <$> _oTarget])

2736+

26482737-- | Volumes mounted within the app container. Only applicable in the App

26492738-- Engine flexible environment.

26502739--

@@ -3255,10 +3344,9 @@ instance ToJSON Resources where

32553344-- define behaviors that are user configurable.

32563345--

32573346-- /See:/ 'featureSettings' smart constructor.

3258−data FeatureSettings =

3347+newtype FeatureSettings =

32593348 FeatureSettings'

3260− { _fsUseContainerOptimizedOS :: !(Maybe Bool)

3261− , _fsSplitHealthChecks :: !(Maybe Bool)

3349+ { _fsSplitHealthChecks :: Maybe Bool

32623350 }

32633351 deriving (Eq, Show, Data, Typeable, Generic)

32643352

@@ -3267,23 +3355,11 @@ data FeatureSettings =

32673355--

32683356-- Use one of the following lenses to modify other fields as desired:

32693357--

3270−-- * 'fsUseContainerOptimizedOS'

3271−--

32723358-- * 'fsSplitHealthChecks'

32733359featureSettings

32743360 :: FeatureSettings

3275−featureSettings =

3276− FeatureSettings'

3277− {_fsUseContainerOptimizedOS = Nothing, _fsSplitHealthChecks = Nothing}

3278−

3361+featureSettings = FeatureSettings' {_fsSplitHealthChecks = Nothing}

32793362

3280−-- | If true, use Container-Optimized OS

3281−-- (https:\/\/cloud.google.com\/container-optimized-os\/) base image for

3282−-- VMs, rather than a base Debian image.

3283−fsUseContainerOptimizedOS :: Lens' FeatureSettings (Maybe Bool)

3284−fsUseContainerOptimizedOS

3285− = lens _fsUseContainerOptimizedOS

3286− (\ s a -> s{_fsUseContainerOptimizedOS = a})

32873363

32883364-- | Boolean value indicating if split health checks should be used instead

32893365-- of the legacy health checks. At an app.yaml level, this means defaulting

@@ -3299,17 +3375,13 @@ instance FromJSON FeatureSettings where

32993375 parseJSON

33003376 = withObject "FeatureSettings"

33013377 (\ o ->

3302− FeatureSettings' <$>

3303− (o .:? "useContainerOptimizedOs") <*>

3304− (o .:? "splitHealthChecks"))

3378+ FeatureSettings' <$> (o .:? "splitHealthChecks"))

33053379

33063380instance ToJSON FeatureSettings where

33073381 toJSON FeatureSettings'{..}

33083382 = object

33093383 (catMaybes

3310− [("useContainerOptimizedOs" .=) <$>

3311− _fsUseContainerOptimizedOS,

3312− ("splitHealthChecks" .=) <$> _fsSplitHealthChecks])

3384+ [("splitHealthChecks" .=) <$> _fsSplitHealthChecks])

33133385

33143386-- | An SSL certificate obtained from a certificate authority.

33153387--

@@ -3961,7 +4033,6 @@ data Version =

39614033 , _verInstanceClass :: !(Maybe Text)

39624034 , _verRuntimeChannel :: !(Maybe Text)

39634035 , _verRuntimeMainExecutablePath :: !(Maybe Text)

3964− , _verVPCAccessConnector :: !(Maybe VPCAccessConnector)

39654036 , _verHealthCheck :: !(Maybe HealthCheck)

39664037 , _verEndpointsAPIService :: !(Maybe EndpointsAPIService)

39674038 , _verEnv :: !(Maybe Text)

@@ -4011,8 +4082,6 @@ data Version =

40114082--

40124083-- * 'verRuntimeMainExecutablePath'

40134084--

4014−-- * 'verVPCAccessConnector'

4015−--

40164085-- * 'verHealthCheck'

40174086--

40184087-- * 'verEndpointsAPIService'

@@ -4083,7 +4152,6 @@ version =

40834152 , _verInstanceClass = Nothing

40844153 , _verRuntimeChannel = Nothing

40854154 , _verRuntimeMainExecutablePath = Nothing

4086− , _verVPCAccessConnector = Nothing

40874155 , _verHealthCheck = Nothing

40884156 , _verEndpointsAPIService = Nothing

40894157 , _verEnv = Nothing

@@ -4153,12 +4221,6 @@ verRuntimeMainExecutablePath

41534221 = lens _verRuntimeMainExecutablePath

41544222 (\ s a -> s{_verRuntimeMainExecutablePath = a})

41554223

4156−-- | Enables VPC connectivity for standard apps.

4157−verVPCAccessConnector :: Lens' Version (Maybe VPCAccessConnector)

4158−verVPCAccessConnector

4159− = lens _verVPCAccessConnector

4160− (\ s a -> s{_verVPCAccessConnector = a})

4161−

41624224-- | Configures health checking for instances. Unhealthy instances are

41634225-- stopped and replaced with new instances. Only applicable in the App

41644226-- Engine flexible environment.Only returned in GET requests if view=FULL

@@ -4181,7 +4243,7 @@ verEnv :: Lens' Version (Maybe Text)

41814243verEnv = lens _verEnv (\ s a -> s{_verEnv = a})

41824244

41834245-- | The Google Compute Engine zones that are supported by this version in

4184−-- the App Engine flexible environment. Deprecated.

4246+-- the App Engine flexible environment.

41854247verZones :: Lens' Version [Text]

41864248verZones

41874249 = lens _verZones (\ s a -> s{_verZones = a}) .

@@ -4393,7 +4455,6 @@ instance FromJSON Version where

43934455 (o .:? "instanceClass")

43944456 <*> (o .:? "runtimeChannel")

43954457 <*> (o .:? "runtimeMainExecutablePath")

4396− <*> (o .:? "vpcAccessConnector")

43974458 <*> (o .:? "healthCheck")

43984459 <*> (o .:? "endpointsApiService")

43994460 <*> (o .:? "env")

@@ -4436,7 +4497,6 @@ instance ToJSON Version where

44364497 ("runtimeChannel" .=) <$> _verRuntimeChannel,

44374498 ("runtimeMainExecutablePath" .=) <$>

44384499 _verRuntimeMainExecutablePath,

4439− ("vpcAccessConnector" .=) <$> _verVPCAccessConnector,

44404500 ("healthCheck" .=) <$> _verHealthCheck,

44414501 ("endpointsApiService" .=) <$>

44424502 _verEndpointsAPIService,

@@ -4978,15 +5038,17 @@ instance ToJSON LocationMetadata where

49785038 ("flexibleEnvironmentAvailable" .=) <$>

49795039 _lmFlexibleEnvironmentAvailable])

49805040

4981−-- | Service-specific metadata associated with the operation. It typically

4982−-- contains progress information and common metadata such as create time.

4983−-- Some services might not provide such metadata. Any method that returns a

4984−-- long-running operation should document the metadata type, if any.

5041+-- | Metadata for the given google.longrunning.Operation.

49855042--

49865043-- /See:/ 'operationMetadata' smart constructor.

4987−newtype OperationMetadata =

5044+data OperationMetadata =

49885045 OperationMetadata'

4989− { _omAddtional :: HashMap Text JSONValue

5046+ { _omInsertTime :: !(Maybe DateTime')

5047+ , _omUser :: !(Maybe Text)

5048+ , _omMethod :: !(Maybe Text)

5049+ , _omEndTime :: !(Maybe DateTime')

5050+ , _omOperationType :: !(Maybe Text)

5051+ , _omTarget :: !(Maybe Text)

49905052 }

49915053 deriving (Eq, Show, Data, Typeable, Generic)

49925054

@@ -4995,27 +5057,83 @@ newtype OperationMetadata =

49955057--

49965058-- Use one of the following lenses to modify other fields as desired:

49975059--

4998−-- * 'omAddtional'

5060+-- * 'omInsertTime'

5061+--

5062+-- * 'omUser'

5063+--

5064+-- * 'omMethod'

5065+--

5066+-- * 'omEndTime'

5067+--

5068+-- * 'omOperationType'

5069+--

5070+-- * 'omTarget'

49995071operationMetadata

5000− :: HashMap Text JSONValue -- ^ 'omAddtional'

5001− -> OperationMetadata

5002−operationMetadata pOmAddtional_ =

5003− OperationMetadata' {_omAddtional = _Coerce # pOmAddtional_}

5072+ :: OperationMetadata

5073+operationMetadata =

5074+ OperationMetadata'

5075+ { _omInsertTime = Nothing

5076+ , _omUser = Nothing

5077+ , _omMethod = Nothing

5078+ , _omEndTime = Nothing

5079+ , _omOperationType = Nothing

5080+ , _omTarget = Nothing

5081+ }

50045082

50055083

5006−-- | Properties of the object. Contains field \'type with type URL.

5007−omAddtional :: Lens' OperationMetadata (HashMap Text JSONValue)

5008−omAddtional

5009− = lens _omAddtional (\ s a -> s{_omAddtional = a}) .

5010− _Coerce

5084+-- | Timestamp that this operation was created.\'OutputOnly

5085+omInsertTime :: Lens' OperationMetadata (Maybe UTCTime)

5086+omInsertTime

5087+ = lens _omInsertTime (\ s a -> s{_omInsertTime = a})

5088+ . mapping _DateTime

5089+

5090+-- | User who requested this operation.\'OutputOnly

5091+omUser :: Lens' OperationMetadata (Maybe Text)

5092+omUser = lens _omUser (\ s a -> s{_omUser = a})

5093+

5094+-- | API method that initiated this operation. Example:

5095+-- google.appengine.v1beta4.Version.CreateVersion.\'OutputOnly

5096+omMethod :: Lens' OperationMetadata (Maybe Text)

5097+omMethod = lens _omMethod (\ s a -> s{_omMethod = a})

5098+

5099+-- | Timestamp that this operation completed.\'OutputOnly

5100+omEndTime :: Lens' OperationMetadata (Maybe UTCTime)

5101+omEndTime

5102+ = lens _omEndTime (\ s a -> s{_omEndTime = a}) .

5103+ mapping _DateTime

5104+

5105+-- | Type of this operation. Deprecated, use method field instead. Example:

5106+-- \"create_version\".\'OutputOnly

5107+omOperationType :: Lens' OperationMetadata (Maybe Text)

5108+omOperationType

5109+ = lens _omOperationType

5110+ (\ s a -> s{_omOperationType = a})

5111+

5112+-- | Name of the resource that this operation is acting on. Example:

5113+-- apps\/myapp\/modules\/default.\'OutputOnly

5114+omTarget :: Lens' OperationMetadata (Maybe Text)

5115+omTarget = lens _omTarget (\ s a -> s{_omTarget = a})

50115116

50125117instance FromJSON OperationMetadata where

50135118 parseJSON

50145119 = withObject "OperationMetadata"

5015− (\ o -> OperationMetadata' <$> (parseJSONObject o))

5120+ (\ o ->

5121+ OperationMetadata' <$>

5122+ (o .:? "insertTime") <*> (o .:? "user") <*>

5123+ (o .:? "method")

5124+ <*> (o .:? "endTime")

5125+ <*> (o .:? "operationType")

5126+ <*> (o .:? "target"))

50165127

50175128instance ToJSON OperationMetadata where

5018− toJSON = toJSON . _omAddtional

5129+ toJSON OperationMetadata'{..}

5130+ = object

5131+ (catMaybes

5132+ [("insertTime" .=) <$> _omInsertTime,

5133+ ("user" .=) <$> _omUser, ("method" .=) <$> _omMethod,

5134+ ("endTime" .=) <$> _omEndTime,

5135+ ("operationType" .=) <$> _omOperationType,

5136+ ("target" .=) <$> _omTarget])

50195137

50205138-- | Response message for Instances.ListInstances.

50215139--

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Repair.hs−12

@@ -24,12 +24,6 @@

2424-- application, for example a Cloud Storage bucket or App Engine service

2525-- account. Use this method if you receive an error message about a missing

2626-- feature, for example, Error retrieving the App Engine service account.

27−-- If you have deleted your App Engine service account, this will not be

28−-- able to recreate it. Instead, you should attempt to use the IAM undelete

29−-- API if possible at

30−-- https:\/\/cloud.google.com\/iam\/reference\/rest\/v1\/projects.serviceAccounts\/undelete?apix_params=%7B\"name\"%3A\"projects%2F-%2FserviceAccounts%2Funique_id\"%2C\"resource\"%3A%7B%7D%7D

31−-- . If the deletion was recent, the numeric ID can be found in the Cloud

32−-- Console Activity Log.

3327--

3428-- /See:/ <https://cloud.google.com/appengine/docs/admin-api/ App Engine Admin API Reference> for @appengine.apps.repair@.

3529module Network.Google.Resource.AppEngine.Apps.Repair

@@ -73,12 +67,6 @@ type AppsRepairResource =

7367-- application, for example a Cloud Storage bucket or App Engine service

7468-- account. Use this method if you receive an error message about a missing

7569-- feature, for example, Error retrieving the App Engine service account.

76−-- If you have deleted your App Engine service account, this will not be

77−-- able to recreate it. Instead, you should attempt to use the IAM undelete

78−-- API if possible at

79−-- https:\/\/cloud.google.com\/iam\/reference\/rest\/v1\/projects.serviceAccounts\/undelete?apix_params=%7B\"name\"%3A\"projects%2F-%2FserviceAccounts%2Funique_id\"%2C\"resource\"%3A%7B%7D%7D

80−-- . If the deletion was recent, the numeric ID can be found in the Cloud

81−-- Console Activity Log.

8270--

8371-- /See:/ 'appsRepair' smart constructor.

8472data AppsRepair =

gogol-apps-activity/gen/Network/Google/Resource/AppsActivity/Activities/List.hs+4−5

@@ -21,7 +21,7 @@

2121-- Portability : non-portable (GHC extensions)

2222--

2323-- Returns a list of activities visible to the current logged in user.

24−-- Visible activities are determined by the visibility settings of the

24+-- Visible activities are determined by the visiblity settings of the

2525-- object that was acted on, e.g. Drive files a user can see. An activity

2626-- is a record of past events. Multiple events may be merged if they are

2727-- similar. A request is scoped to activities from a given Google service

@@ -69,7 +69,7 @@ type ActivitiesListResource =

6969 Get '[JSON] ListActivitiesResponse

7070

7171-- | Returns a list of activities visible to the current logged in user.

72−-- Visible activities are determined by the visibility settings of the

72+-- Visible activities are determined by the visiblity settings of the

7373-- object that was acted on, e.g. Drive files a user can see. An activity

7474-- is a record of past events. Multiple events may be merged if they are

7575-- similar. A request is scoped to activities from a given Google service

@@ -140,9 +140,8 @@ alGroupingStrategy

140140 = lens _alGroupingStrategy

141141 (\ s a -> s{_alGroupingStrategy = a})

142142

143−-- | The ID used for ACL checks (does not filter the resulting event list by

144−-- the assigned value). Use the special value me to indicate the currently

145−-- authenticated user.

143+-- | Indicates the user to return activity for. Use the special value me to

144+-- indicate the currently authenticated user.

146145alUserId :: Lens' ActivitiesList Text

147146alUserId = lens _alUserId (\ s a -> s{_alUserId = a})

148147

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/List.hs+11−11

@@ -205,12 +205,11 @@ elCalendarId :: Lens' EventsList Text

205205elCalendarId

206206 = lens _elCalendarId (\ s a -> s{_elCalendarId = a})

207207

208−-- | Lower bound (inclusive) for an event\'s start time to filter by.

209−-- Optional. The default is not to filter by start time. Must be an RFC3339

210−-- timestamp with mandatory time zone offset, for example,

211−-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

212−-- provided but are ignored. If timeMax is set, timeMin must be smaller

213−-- than timeMax.

208+-- | Lower bound (inclusive) for an event\'s end time to filter by. Optional.

209+-- The default is not to filter by end time. Must be an RFC3339 timestamp

210+-- with mandatory time zone offset, e.g., 2011-06-03T10:00:00-07:00,

211+-- 2011-06-03T10:00:00Z. Milliseconds may be provided but will be ignored.

212+-- If timeMax is set, timeMin must be smaller than timeMax.

214213elTimeMin :: Lens' EventsList (Maybe UTCTime)

215214elTimeMin

216215 = lens _elTimeMin (\ s a -> s{_elTimeMin = a}) .

@@ -330,11 +329,12 @@ elAlwaysIncludeEmail

330329 = lens _elAlwaysIncludeEmail

331330 (\ s a -> s{_elAlwaysIncludeEmail = a})

332331

333−-- | Upper bound (exclusive) for an event\'s end time to filter by. Optional.

334−-- The default is not to filter by end time. Must be an RFC3339 timestamp

335−-- with mandatory time zone offset, for example, 2011-06-03T10:00:00-07:00,

336−-- 2011-06-03T10:00:00Z. Milliseconds may be provided but are ignored. If

337−-- timeMin is set, timeMax must be greater than timeMin.

332+-- | Upper bound (exclusive) for an event\'s start time to filter by.

333+-- Optional. The default is not to filter by start time. Must be an RFC3339

334+-- timestamp with mandatory time zone offset, e.g.,

335+-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

336+-- provided but will be ignored. If timeMin is set, timeMax must be greater

337+-- than timeMin.

338338elTimeMax :: Lens' EventsList (Maybe UTCTime)

339339elTimeMax

340340 = lens _elTimeMax (\ s a -> s{_elTimeMax = a}) .

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/Watch.hs+11−11

@@ -215,12 +215,11 @@ ewCalendarId :: Lens' EventsWatch Text

215215ewCalendarId

216216 = lens _ewCalendarId (\ s a -> s{_ewCalendarId = a})

217217

218−-- | Lower bound (inclusive) for an event\'s start time to filter by.

219−-- Optional. The default is not to filter by start time. Must be an RFC3339

220−-- timestamp with mandatory time zone offset, for example,

221−-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

222−-- provided but are ignored. If timeMax is set, timeMin must be smaller

223−-- than timeMax.

218+-- | Lower bound (inclusive) for an event\'s end time to filter by. Optional.

219+-- The default is not to filter by end time. Must be an RFC3339 timestamp

220+-- with mandatory time zone offset, e.g., 2011-06-03T10:00:00-07:00,

221+-- 2011-06-03T10:00:00Z. Milliseconds may be provided but will be ignored.

222+-- If timeMax is set, timeMin must be smaller than timeMax.

224223ewTimeMin :: Lens' EventsWatch (Maybe UTCTime)

225224ewTimeMin

226225 = lens _ewTimeMin (\ s a -> s{_ewTimeMin = a}) .

@@ -345,11 +344,12 @@ ewAlwaysIncludeEmail

345344 = lens _ewAlwaysIncludeEmail

346345 (\ s a -> s{_ewAlwaysIncludeEmail = a})

347346

348−-- | Upper bound (exclusive) for an event\'s end time to filter by. Optional.

349−-- The default is not to filter by end time. Must be an RFC3339 timestamp

350−-- with mandatory time zone offset, for example, 2011-06-03T10:00:00-07:00,

351−-- 2011-06-03T10:00:00Z. Milliseconds may be provided but are ignored. If

352−-- timeMin is set, timeMax must be greater than timeMin.

347+-- | Upper bound (exclusive) for an event\'s start time to filter by.

348+-- Optional. The default is not to filter by start time. Must be an RFC3339

349+-- timestamp with mandatory time zone offset, e.g.,

350+-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

351+-- provided but will be ignored. If timeMin is set, timeMax must be greater

352+-- than timeMin.

353353ewTimeMax :: Lens' EventsWatch (Maybe UTCTime)

354354ewTimeMax

355355 = lens _ewTimeMax (\ s a -> s{_ewTimeMax = a}) .

gogol-apps-reseller/gen/Network/Google/AppsReseller/Types/Product.hs+49−41

@@ -407,11 +407,9 @@ cCustomerDomain

407407 = lens _cCustomerDomain

408408 (\ s a -> s{_cCustomerDomain = a})

409409

410−-- | Customer contact phone number. Must start with \"+\" followed by the

411−-- country code. The rest of the number can be contiguous numbers or

412−-- respect the phone local format conventions, but it must be a real phone

413−-- number and not, for example, \"123\". This field is silently ignored if

414−-- invalid.

410+-- | Customer contact phone number. This can be continuous numbers, with

411+-- spaces, etc. But it must be a real phone number and not, for example,

412+-- \"123\". See phone local format conventions.

415413cPhoneNumber :: Lens' Customer (Maybe Text)

416414cPhoneNumber

417415 = lens _cPhoneNumber (\ s a -> s{_cPhoneNumber = a})

@@ -510,9 +508,8 @@ cprDealCode

510508-- | The planName property is required. This is the name of the

511509-- subscription\'s payment plan. For more information about the Google

512510-- payment plans, see API concepts. Possible values are: -

513−-- ANNUAL_MONTHLY_PAY - The annual commitment plan with monthly payments

514−-- Caution: ANNUAL_MONTHLY_PAY is returned as ANNUAL in all API responses.

515−-- - ANNUAL_YEARLY_PAY - The annual commitment plan with yearly payments -

511+-- ANNUAL_MONTHLY_PAY - The annual commitment plan with monthly payments -

512+-- ANNUAL_YEARLY_PAY - The annual commitment plan with yearly payments -

516513-- FLEXIBLE - The flexible plan - TRIAL - The 30-day free trial plan

517514cprPlanName :: Lens' ChangePlanRequest (Maybe Text)

518515cprPlanName

@@ -554,8 +551,7 @@ instance ToJSON ChangePlanRequest where

554551 ("seats" .=) <$> _cprSeats])

555552

556553-- | In this version of the API, annual commitment plan\'s interval is one

557−-- year. Note: When billingMethod value is OFFLINE, the subscription

558−-- property object plan.commitmentInterval is omitted in all API responses.

554+-- year.

559555--

560556-- /See:/ 'subscriptionPlanCommitmentInterval' smart constructor.

561557data SubscriptionPlanCommitmentInterval =

@@ -646,8 +642,7 @@ subscriptionPlan =

646642

647643

648644-- | In this version of the API, annual commitment plan\'s interval is one

649−-- year. Note: When billingMethod value is OFFLINE, the subscription

650−-- property object plan.commitmentInterval is omitted in all API responses.

645+-- year.

651646spCommitmentInterval :: Lens' SubscriptionPlan (Maybe SubscriptionPlanCommitmentInterval)

652647spCommitmentInterval

653648 = lens _spCommitmentInterval

@@ -664,16 +659,14 @@ spIsCommitmentPlan

664659-- | The planName property is required. This is the name of the

665660-- subscription\'s plan. For more information about the Google payment

666661-- plans, see the API concepts. Possible values are: - ANNUAL_MONTHLY_PAY —

667−-- The annual commitment plan with monthly payments. Caution:

668−-- ANNUAL_MONTHLY_PAY is returned as ANNUAL in all API responses. -

669−-- ANNUAL_YEARLY_PAY — The annual commitment plan with yearly payments -

670−-- FLEXIBLE — The flexible plan - TRIAL — The 30-day free trial plan. A

671−-- subscription in trial will be suspended after the 30th free day if no

672−-- payment plan is assigned. Calling changePlan will assign a payment plan

673−-- to a trial but will not activate the plan. A trial will automatically

674−-- begin its assigned payment plan after its 30th free day or immediately

675−-- after calling startPaidService. - FREE — The free plan is exclusive to

676−-- the Cloud Identity SKU and does not incur any billing.

662+-- The annual commitment plan with monthly payments - ANNUAL_YEARLY_PAY —

663+-- The annual commitment plan with yearly payments - FLEXIBLE — The

664+-- flexible plan - TRIAL — The 30-day free trial plan. A subscription in

665+-- trial will be suspended after the 30th free day if no payment plan is

666+-- assigned. Calling changePlan will assign a payment plan to a trial but

667+-- will not activate the plan. A trial will automatically begin its

668+-- assigned payment plan after its 30th free day or immediately after

669+-- calling startPaidService.

677670spPlanName :: Lens' SubscriptionPlan (Maybe Text)

678671spPlanName

679672 = lens _spPlanName (\ s a -> s{_spPlanName = a})

@@ -798,43 +791,58 @@ seats =

798791 }

799792

800793

801−-- | This is a required property and is exclusive to subscriptions with

802−-- ANNUAL_MONTHLY_PAY and ANNUAL_YEARLY_PAY plans. This property sets the

803−-- maximum number of licenses assignable to users on a subscription. The

804−-- reseller can add more licenses, but once set, the numberOfSeats cannot

805−-- be reduced until renewal. The reseller is invoiced based on the

806−-- numberOfSeats value regardless of how many of these user licenses are

807−-- assigned. Note: G Suite subscriptions automatically assign a license to

808−-- every user.

794+-- | The numberOfSeats property holds the customer\'s number of user

795+-- licenses. How a user\'s licenses are managed depends on the

796+-- subscription\'s plan: - annual commitment plan (with monthly or yearly

797+-- pay) — For this plan, a reseller is invoiced on the number of user

798+-- licenses in the numberOfSeats property. This is the maximum number of

799+-- user licenses that a reseller\'s customer can create. The reseller can

800+-- add more licenses, but once set, the numberOfSeats can not be reduced

801+-- until renewal. The reseller is invoiced based on the numberOfSeats value

802+-- regardless of how many of these user licenses are provisioned users. -

803+-- flexible plan — For this plan, a reseller is invoiced on the actual

804+-- number of users which is capped by the maximumNumberOfSeats. The

805+-- numberOfSeats property is not used in the request or response for

806+-- flexible plan customers. - 30-day free trial plan — The numberOfSeats

807+-- property is not used in the request or response for an account in a

808+-- 30-day trial.

809809seaNumberOfSeats :: Lens' Seats (Maybe Int32)

810810seaNumberOfSeats

811811 = lens _seaNumberOfSeats

812812 (\ s a -> s{_seaNumberOfSeats = a})

813813 . mapping _Coerce

814814

815−-- | This is a required property and is exclusive to subscriptions with

816−-- FLEXIBLE or TRIAL plans. This property sets the maximum number of

817−-- licensed users allowed on a subscription. This quantity can be increased

818−-- up to the maximum limit defined in the reseller\'s contract. The minimum

819−-- quantity is the current number of users in the customer account. Note: G

820−-- Suite subscriptions automatically assign a license to every user.

815+-- | The maximumNumberOfSeats property is the maximum number of licenses that

816+-- the customer can purchase. This property applies to plans other than the

817+-- annual commitment plan. How a user\'s licenses are managed depends on

818+-- the subscription\'s payment plan: - annual commitment plan (with monthly

819+-- or yearly payments) — For this plan, a reseller is invoiced on the

820+-- number of user licenses in the numberOfSeats property. The

821+-- maximumNumberOfSeats property is a read-only property in the API\'s

822+-- response. - flexible plan — For this plan, a reseller is invoiced on the

823+-- actual number of users which is capped by the maximumNumberOfSeats. This

824+-- is the maximum number of user licenses a customer has for user license

825+-- provisioning. This quantity can be increased up to the maximum limit

826+-- defined in the reseller\'s contract. And the minimum quantity is the

827+-- current number of users in the customer account. - 30-day free trial

828+-- plan — A subscription in a 30-day free trial is restricted to maximum 10

829+-- seats.

821830seaMaximumNumberOfSeats :: Lens' Seats (Maybe Int32)

822831seaMaximumNumberOfSeats

823832 = lens _seaMaximumNumberOfSeats

824833 (\ s a -> s{_seaMaximumNumberOfSeats = a})

825834 . mapping _Coerce

826835

827−-- | Read-only field containing the current number of users that are assigned

828−-- a license for the product defined in skuId. This field\'s value is

829−-- equivalent to the numerical count of users returned by the Enterprise

830−-- License Manager API method: listForProductAndSku

836+-- | Read-only field containing the current number of licensed seats for

837+-- FLEXIBLE Google-Apps subscriptions and secondary subscriptions such as

838+-- Google-Vault and Drive-storage.

831839seaLicensedNumberOfSeats :: Lens' Seats (Maybe Int32)

832840seaLicensedNumberOfSeats

833841 = lens _seaLicensedNumberOfSeats

834842 (\ s a -> s{_seaLicensedNumberOfSeats = a})

835843 . mapping _Coerce

836844

837−-- | Identifies the resource as a subscription seat setting. Value:

845+-- | Identifies the resource as a subscription change plan request. Value:

838846-- subscriptions#seats

839847seaKind :: Lens' Seats Text

840848seaKind = lens _seaKind (\ s a -> s{_seaKind = a})

gogol-apps-reseller/gen/Network/Google/AppsReseller/Types/Sum.hs+26

@@ -25,6 +25,28 @@ data SubscriptionsDeleteDeletionType

2525 -- ^ @cancel@

2626 -- Cancels the subscription immediately. This does not apply to a G Suite

2727 -- subscription.

28+ | Downgrade

29+ -- ^ @downgrade@

30+ -- Downgrades a G Suite subscription to a Google Apps Free edition

31+ -- subscription only if the customer was initially subscribed to a Google

32+ -- Apps Free edition (also known as the Standard edition). Once downgraded,

33+ -- the customer no longer has access to the previous G Suite subscription

34+ -- and is no longer managed by the reseller. A G Suite subscription\'s

35+ -- downgrade cannot be invoked if an active or suspended Google Drive or

36+ -- Google Vault subscription is present. The Google Drive or Google Vault

37+ -- subscription must be cancelled before the G Suite subscription\'s

38+ -- downgrade is invoked. The downgrade deletionType does not apply to other

39+ -- products or G Suite SKUs.

40+ | Suspend

41+ -- ^ @suspend@

42+ -- (DEPRECATED) The G Suite account is suspended for four days and then

43+ -- cancelled. Once suspended, an administrator has access to the suspended

44+ -- account, but the account users can not access their services. A

45+ -- suspension can be lifted, using the reseller tools. A G Suite

46+ -- subscription\'s suspension can not be invoked if an active or suspended

47+ -- Google Drive or Google Vault subscription is present. The Google Drive

48+ -- or Google Vault subscription must be cancelled before the G Suite

49+ -- subscription\'s suspension is invoked.

2850 | TransferToDirect

2951 -- ^ @transfer_to_direct@

3052 -- Transfers a subscription directly to Google.  The customer is

@@ -39,12 +61,16 @@ instance Hashable SubscriptionsDeleteDeletionType

3961instance FromHttpApiData SubscriptionsDeleteDeletionType where

4062 parseQueryParam = \case

4163 "cancel" -> Right Cancel

64+ "downgrade" -> Right Downgrade

65+ "suspend" -> Right Suspend

4266 "transfer_to_direct" -> Right TransferToDirect

4367 x -> Left ("Unable to parse SubscriptionsDeleteDeletionType from: " <> x)

4468

4569instance ToHttpApiData SubscriptionsDeleteDeletionType where

4670 toQueryParam = \case

4771 Cancel -> "cancel"

72+ Downgrade -> "downgrade"

73+ Suspend -> "suspend"

4874 TransferToDirect -> "transfer_to_direct"

4975

5076instance FromJSON SubscriptionsDeleteDeletionType where

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Delete.hs+2−2

@@ -20,7 +20,7 @@

2020-- Stability : auto-generated

2121-- Portability : non-portable (GHC extensions)

2222--

23−-- Cancel or transfer a subscription to direct.

23+-- Cancel, suspend or transfer a subscription to direct.

2424--

2525-- /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.delete@.

2626module Network.Google.Resource.Reseller.Subscriptions.Delete

@@ -55,7 +55,7 @@ type SubscriptionsDeleteResource =

5555 SubscriptionsDeleteDeletionType

5656 :> QueryParam "alt" AltJSON :> Delete '[JSON] ()

5757

58−-- | Cancel or transfer a subscription to direct.

58+-- | Cancel, suspend or transfer a subscription to direct.

5959--

6060-- /See:/ 'subscriptionsDelete' smart constructor.

6161data SubscriptionsDelete =

gogol-apps-tasks/gen/Network/Google/AppsTasks.hs+1−1

@@ -13,7 +13,7 @@

1313-- Stability : auto-generated

1414-- Portability : non-portable (GHC extensions)

1515--

16−-- Manages your tasks and task lists.

16+-- Lets you manage your tasks and task lists.

1717--

1818-- /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference>

1919module Network.Google.AppsTasks

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/List.hs+1−1

@@ -82,7 +82,7 @@ tllPageToken

8282 = lens _tllPageToken (\ s a -> s{_tllPageToken = a})

8383

8484-- | Maximum number of task lists returned on one page. Optional. The default

85−-- is 20 (max allowed: 100).

85+-- is 100.

8686tllMaxResults :: Lens' TaskListsList (Maybe Int64)

8787tllMaxResults

8888 = lens _tllMaxResults

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/List.hs+1−1

@@ -195,7 +195,7 @@ tlPageToken

195195 = lens _tlPageToken (\ s a -> s{_tlPageToken = a})

196196

197197-- | Maximum number of task lists returned on one page. Optional. The default

198−-- is 20 (max allowed: 100).

198+-- is 100.

199199tlMaxResults :: Lens' TasksList (Maybe Int64)

200200tlMaxResults

201201 = lens _tlMaxResults (\ s a -> s{_tlMaxResults = a})

gogol-apps-tasks/gogol-apps-tasks.cabal+1−1

@@ -14,7 +14,7 @@ cabal-version: >= 1.10

1414extra-source-files: README.md src/.gitkeep

1515

1616description:

17− Manages your tasks and task lists.

17+ Lets you manage your tasks and task lists.

1818 .

1919 /Warning:/ This is an experimental prototype/preview release which is still

2020 under exploratory development and not intended for public use, caveat emptor!

gogol-bigquery/gen/Network/Google/BigQuery.hs+30−47

@@ -214,7 +214,6 @@ module Network.Google.BigQuery

214214 , jsCreationTime

215215 , jsStartTime

216216 , jsCompletionRatio

217− , jsNumChildJobs

218217 , jsTotalSlotMs

219218 , jsLoad

220219 , jsTotalBytesProcessed

@@ -223,7 +222,6 @@ module Network.Google.BigQuery

223222 , jsQuery

224223 , jsExtract

225224 , jsReservationUsage

226− , jsParentJobId

227225

228226 -- ** JobConfigurationLabels

229227 , JobConfigurationLabels

@@ -302,13 +300,6 @@ module Network.Google.BigQuery

302300 , mdmoLabels

303301 , mdmoLossType

304302

305− -- ** RoutineReference

306− , RoutineReference

307− , routineReference

308− , rrDataSetId

309− , rrProjectId

310− , rrRoutineId

311−

312303 -- ** RangePartitioning

313304 , RangePartitioning

314305 , rangePartitioning

@@ -368,19 +359,6 @@ module Network.Google.BigQuery

368359 -- ** JobsListProjection

369360 , JobsListProjection (..)

370361

371− -- ** BqmlTrainingRunTrainingOptions

372− , BqmlTrainingRunTrainingOptions

373− , bqmlTrainingRunTrainingOptions

374− , btrtoLineSearchInitLearnRate

375− , btrtoMinRelProgress

376− , btrtoL1Reg

377− , btrtoLearnRate

378− , btrtoLearnRateStrategy

379− , btrtoMaxIteration

380− , btrtoEarlyStop

381− , btrtoL2Reg

382− , btrtoWarmStart

383−

384362 -- ** QueryParameter

385363 , QueryParameter

386364 , queryParameter

@@ -388,10 +366,18 @@ module Network.Google.BigQuery

388366 , qpParameterType

389367 , qpName

390368

369+ -- ** IterationResult

370+ , IterationResult

371+ , iterationResult

372+ , irDurationMs

373+ , irLearnRate

374+ , irEvalLoss

375+ , irTrainingLoss

376+ , irIndex

377+

391378 -- ** JobStatistics4

392379 , JobStatistics4

393380 , jobStatistics4

394− , jsInputBytes

395381 , jsDestinationURIFileCounts

396382

397383 -- ** ProjectReference

@@ -432,6 +418,19 @@ module Network.Google.BigQuery

432418 , eqsEndMs

433419 , eqsWaitMsMax

434420

421+ -- ** TrainingRunTrainingOptions

422+ , TrainingRunTrainingOptions

423+ , trainingRunTrainingOptions

424+ , trtoLineSearchInitLearnRate

425+ , trtoMinRelProgress

426+ , trtoL1Reg

427+ , trtoLearnRate

428+ , trtoLearnRateStrategy

429+ , trtoMaxIteration

430+ , trtoEarlyStop

431+ , trtoL2Reg

432+ , trtoWarmStart

433+

435434 -- ** BigQueryModelTraining

436435 , BigQueryModelTraining

437436 , bigQueryModelTraining

@@ -508,15 +507,6 @@ module Network.Google.BigQuery

508507 , plpiId

509508 , plpiNumericId

510509

511− -- ** BqmlIterationResult

512− , BqmlIterationResult

513− , bqmlIterationResult

514− , birDurationMs

515− , birLearnRate

516− , birEvalLoss

517− , birTrainingLoss

518− , birIndex

519−

520510 -- ** BigtableColumn

521511 , BigtableColumn

522512 , bigtableColumn

@@ -722,7 +712,6 @@ module Network.Google.BigQuery

722712 , jModelTrainingExpectedTotalIteration

723713 , jModelTraining

724714 , jTotalSlotMs

725− , jDdlTargetRoutine

726715 , jDdlTargetTable

727716 , jEstimatedBytesProcessed

728717 , jModelTrainingCurrentIteration

@@ -763,7 +752,6 @@ module Network.Google.BigQuery

763752 , DestinationTableProperties

764753 , destinationTableProperties

765754 , dtpFriendlyName

766− , dtpLabels

767755 , dtpDescription

768756

769757 -- ** DataSetAccessItem

@@ -777,14 +765,6 @@ module Network.Google.BigQuery

777765 , dsaiView

778766 , dsaiUserByEmail

779767

780− -- ** BqmlTrainingRun

781− , BqmlTrainingRun

782− , bqmlTrainingRun

783− , btrState

784− , btrStartTime

785− , btrIterationResults

786− , btrTrainingOptions

787−

788768 -- ** TableDataInsertAllResponse

789769 , TableDataInsertAllResponse

790770 , tableDataInsertAllResponse

@@ -848,11 +828,6 @@ module Network.Google.BigQuery

848828 , coEncoding

849829 , coFieldDelimiter

850830

851− -- ** DestinationTablePropertiesLabels

852− , DestinationTablePropertiesLabels

853− , destinationTablePropertiesLabels

854− , dtplAddtional

855−

856831 -- ** JobStatistics3

857832 , JobStatistics3

858833 , jobStatistics3

@@ -882,6 +857,14 @@ module Network.Google.BigQuery

882857 , dataSetListDataSetsItemLabels

883858 , dsldsilAddtional

884859

860+ -- ** TrainingRun

861+ , TrainingRun

862+ , trainingRun

863+ , trState

864+ , trStartTime

865+ , trIterationResults

866+ , trTrainingOptions

867+

885868 -- ** TableListTablesItemView

886869 , TableListTablesItemView

887870 , tableListTablesItemView

gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+30−47

@@ -139,7 +139,6 @@ module Network.Google.BigQuery.Types

139139 , jsCreationTime

140140 , jsStartTime

141141 , jsCompletionRatio

142− , jsNumChildJobs

143142 , jsTotalSlotMs

144143 , jsLoad

145144 , jsTotalBytesProcessed

@@ -148,7 +147,6 @@ module Network.Google.BigQuery.Types

148147 , jsQuery

149148 , jsExtract

150149 , jsReservationUsage

151− , jsParentJobId

152150

153151 -- * JobConfigurationLabels

154152 , JobConfigurationLabels

@@ -227,13 +225,6 @@ module Network.Google.BigQuery.Types

227225 , mdmoLabels

228226 , mdmoLossType

229227

230− -- * RoutineReference

231− , RoutineReference

232− , routineReference

233− , rrDataSetId

234− , rrProjectId

235− , rrRoutineId

236−

237228 -- * RangePartitioning

238229 , RangePartitioning

239230 , rangePartitioning

@@ -293,19 +284,6 @@ module Network.Google.BigQuery.Types

293284 -- * JobsListProjection

294285 , JobsListProjection (..)

295286

296− -- * BqmlTrainingRunTrainingOptions

297− , BqmlTrainingRunTrainingOptions

298− , bqmlTrainingRunTrainingOptions

299− , btrtoLineSearchInitLearnRate

300− , btrtoMinRelProgress

301− , btrtoL1Reg

302− , btrtoLearnRate

303− , btrtoLearnRateStrategy

304− , btrtoMaxIteration

305− , btrtoEarlyStop

306− , btrtoL2Reg

307− , btrtoWarmStart

308−

309287 -- * QueryParameter

310288 , QueryParameter

311289 , queryParameter

@@ -313,10 +291,18 @@ module Network.Google.BigQuery.Types

313291 , qpParameterType

314292 , qpName

315293

294+ -- * IterationResult

295+ , IterationResult

296+ , iterationResult

297+ , irDurationMs

298+ , irLearnRate

299+ , irEvalLoss

300+ , irTrainingLoss

301+ , irIndex

302+

316303 -- * JobStatistics4

317304 , JobStatistics4

318305 , jobStatistics4

319− , jsInputBytes

320306 , jsDestinationURIFileCounts

321307

322308 -- * ProjectReference

@@ -357,6 +343,19 @@ module Network.Google.BigQuery.Types

357343 , eqsEndMs

358344 , eqsWaitMsMax

359345

346+ -- * TrainingRunTrainingOptions

347+ , TrainingRunTrainingOptions

348+ , trainingRunTrainingOptions

349+ , trtoLineSearchInitLearnRate

350+ , trtoMinRelProgress

351+ , trtoL1Reg

352+ , trtoLearnRate

353+ , trtoLearnRateStrategy

354+ , trtoMaxIteration

355+ , trtoEarlyStop

356+ , trtoL2Reg

357+ , trtoWarmStart

358+

360359 -- * BigQueryModelTraining

361360 , BigQueryModelTraining

362361 , bigQueryModelTraining

@@ -433,15 +432,6 @@ module Network.Google.BigQuery.Types

433432 , plpiId

434433 , plpiNumericId

435434

436− -- * BqmlIterationResult

437− , BqmlIterationResult

438− , bqmlIterationResult

439− , birDurationMs

440− , birLearnRate

441− , birEvalLoss

442− , birTrainingLoss

443− , birIndex

444−

445435 -- * BigtableColumn

446436 , BigtableColumn

447437 , bigtableColumn

@@ -647,7 +637,6 @@ module Network.Google.BigQuery.Types

647637 , jModelTrainingExpectedTotalIteration

648638 , jModelTraining

649639 , jTotalSlotMs

650− , jDdlTargetRoutine

651640 , jDdlTargetTable

652641 , jEstimatedBytesProcessed

653642 , jModelTrainingCurrentIteration

@@ -688,7 +677,6 @@ module Network.Google.BigQuery.Types

688677 , DestinationTableProperties

689678 , destinationTableProperties

690679 , dtpFriendlyName

691− , dtpLabels

692680 , dtpDescription

693681

694682 -- * DataSetAccessItem

@@ -702,14 +690,6 @@ module Network.Google.BigQuery.Types

702690 , dsaiView

703691 , dsaiUserByEmail

704692

705− -- * BqmlTrainingRun

706− , BqmlTrainingRun

707− , bqmlTrainingRun

708− , btrState

709− , btrStartTime

710− , btrIterationResults

711− , btrTrainingOptions

712−

713693 -- * TableDataInsertAllResponse

714694 , TableDataInsertAllResponse

715695 , tableDataInsertAllResponse

@@ -773,11 +753,6 @@ module Network.Google.BigQuery.Types

773753 , coEncoding

774754 , coFieldDelimiter

775755

776− -- * DestinationTablePropertiesLabels

777− , DestinationTablePropertiesLabels

778− , destinationTablePropertiesLabels

779− , dtplAddtional

780−

781756 -- * JobStatistics3

782757 , JobStatistics3

783758 , jobStatistics3

@@ -807,6 +782,14 @@ module Network.Google.BigQuery.Types

807782 , dataSetListDataSetsItemLabels

808783 , dsldsilAddtional

809784

785+ -- * TrainingRun

786+ , TrainingRun

787+ , trainingRun

788+ , trState

789+ , trStartTime

790+ , trIterationResults

791+ , trTrainingOptions

792+

810793 -- * TableListTablesItemView

811794 , TableListTablesItemView

812795 , tableListTablesItemView

gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+338−519

@@ -1053,7 +1053,6 @@ data JobStatistics =

10531053 { _jsCreationTime :: !(Maybe (Textual Int64))

10541054 , _jsStartTime :: !(Maybe (Textual Int64))

10551055 , _jsCompletionRatio :: !(Maybe (Textual Double))

1056− , _jsNumChildJobs :: !(Maybe (Textual Int64))

10571056 , _jsTotalSlotMs :: !(Maybe (Textual Int64))

10581057 , _jsLoad :: !(Maybe JobStatistics3)

10591058 , _jsTotalBytesProcessed :: !(Maybe (Textual Int64))

@@ -1062,7 +1061,6 @@ data JobStatistics =

10621061 , _jsQuery :: !(Maybe JobStatistics2)

10631062 , _jsExtract :: !(Maybe JobStatistics4)

10641063 , _jsReservationUsage :: !(Maybe [JobStatisticsReservationUsageItem])

1065− , _jsParentJobId :: !(Maybe Text)

10661064 }

10671065 deriving (Eq, Show, Data, Typeable, Generic)

10681066

@@ -1077,8 +1075,6 @@ data JobStatistics =

10771075--

10781076-- * 'jsCompletionRatio'

10791077--

1080−-- * 'jsNumChildJobs'

1081−--

10821078-- * 'jsTotalSlotMs'

10831079--

10841080-- * 'jsLoad'

@@ -1094,8 +1090,6 @@ data JobStatistics =

10941090-- * 'jsExtract'

10951091--

10961092-- * 'jsReservationUsage'

1097−--

1098−-- * 'jsParentJobId'

10991093jobStatistics

11001094 :: JobStatistics

11011095jobStatistics =

@@ -1103,7 +1097,6 @@ jobStatistics =

11031097 { _jsCreationTime = Nothing

11041098 , _jsStartTime = Nothing

11051099 , _jsCompletionRatio = Nothing

1106− , _jsNumChildJobs = Nothing

11071100 , _jsTotalSlotMs = Nothing

11081101 , _jsLoad = Nothing

11091102 , _jsTotalBytesProcessed = Nothing

@@ -1112,7 +1105,6 @@ jobStatistics =

11121105 , _jsQuery = Nothing

11131106 , _jsExtract = Nothing

11141107 , _jsReservationUsage = Nothing

1115− , _jsParentJobId = Nothing

11161108 }

11171109

11181110

@@ -1140,13 +1132,6 @@ jsCompletionRatio

11401132 (\ s a -> s{_jsCompletionRatio = a})

11411133 . mapping _Coerce

11421134

1143−-- | [Output-only] Number of child jobs executed.

1144−jsNumChildJobs :: Lens' JobStatistics (Maybe Int64)

1145−jsNumChildJobs

1146− = lens _jsNumChildJobs

1147− (\ s a -> s{_jsNumChildJobs = a})

1148− . mapping _Coerce

1149−

11501135-- | [Output-only] Slot-milliseconds for the job.

11511136jsTotalSlotMs :: Lens' JobStatistics (Maybe Int64)

11521137jsTotalSlotMs

@@ -1198,12 +1183,6 @@ jsReservationUsage

11981183 . _Default

11991184 . _Coerce

12001185

1201−-- | [Output-only] If this is a child job, the id of the parent.

1202−jsParentJobId :: Lens' JobStatistics (Maybe Text)

1203−jsParentJobId

1204− = lens _jsParentJobId

1205− (\ s a -> s{_jsParentJobId = a})

1206−

12071186instance FromJSON JobStatistics where

12081187 parseJSON

12091188 = withObject "JobStatistics"

@@ -1211,7 +1190,6 @@ instance FromJSON JobStatistics where

12111190 JobStatistics' <$>

12121191 (o .:? "creationTime") <*> (o .:? "startTime") <*>

12131192 (o .:? "completionRatio")

1214− <*> (o .:? "numChildJobs")

12151193 <*> (o .:? "totalSlotMs")

12161194 <*> (o .:? "load")

12171195 <*> (o .:? "totalBytesProcessed")

@@ -1219,8 +1197,7 @@ instance FromJSON JobStatistics where

12191197 <*> (o .:? "endTime")

12201198 <*> (o .:? "query")

12211199 <*> (o .:? "extract")

1222− <*> (o .:? "reservationUsage" .!= mempty)

1223− <*> (o .:? "parentJobId"))

1200+ <*> (o .:? "reservationUsage" .!= mempty))

12241201

12251202instance ToJSON JobStatistics where

12261203 toJSON JobStatistics'{..}

@@ -1229,7 +1206,6 @@ instance ToJSON JobStatistics where

12291206 [("creationTime" .=) <$> _jsCreationTime,

12301207 ("startTime" .=) <$> _jsStartTime,

12311208 ("completionRatio" .=) <$> _jsCompletionRatio,

1232− ("numChildJobs" .=) <$> _jsNumChildJobs,

12331209 ("totalSlotMs" .=) <$> _jsTotalSlotMs,

12341210 ("load" .=) <$> _jsLoad,

12351211 ("totalBytesProcessed" .=) <$>

@@ -1238,8 +1214,7 @@ instance ToJSON JobStatistics where

12381214 ("endTime" .=) <$> _jsEndTime,

12391215 ("query" .=) <$> _jsQuery,

12401216 ("extract" .=) <$> _jsExtract,

1241− ("reservationUsage" .=) <$> _jsReservationUsage,

1242− ("parentJobId" .=) <$> _jsParentJobId])

1217+ ("reservationUsage" .=) <$> _jsReservationUsage])

12431218

12441219-- | The labels associated with this job. You can use these to organize and

12451220-- group your jobs. Label keys and values can be no longer than 63

@@ -2067,66 +2042,6 @@ instance ToJSON ModelDefinitionModelOptions where

20672042 ("labels" .=) <$> _mdmoLabels,

20682043 ("lossType" .=) <$> _mdmoLossType])

20692044

2070−--

2071−-- /See:/ 'routineReference' smart constructor.

2072−data RoutineReference =

2073− RoutineReference'

2074− { _rrDataSetId :: !(Maybe Text)

2075− , _rrProjectId :: !(Maybe Text)

2076− , _rrRoutineId :: !(Maybe Text)

2077− }

2078− deriving (Eq, Show, Data, Typeable, Generic)

2079−

2080−

2081−-- | Creates a value of 'RoutineReference' with the minimum fields required to make a request.

2082−--

2083−-- Use one of the following lenses to modify other fields as desired:

2084−--

2085−-- * 'rrDataSetId'

2086−--

2087−-- * 'rrProjectId'

2088−--

2089−-- * 'rrRoutineId'

2090−routineReference

2091− :: RoutineReference

2092−routineReference =

2093− RoutineReference'

2094− {_rrDataSetId = Nothing, _rrProjectId = Nothing, _rrRoutineId = Nothing}

2095−

2096−

2097−-- | [Required] The ID of the dataset containing this routine.

2098−rrDataSetId :: Lens' RoutineReference (Maybe Text)

2099−rrDataSetId

2100− = lens _rrDataSetId (\ s a -> s{_rrDataSetId = a})

2101−

2102−-- | [Required] The ID of the project containing this routine.

2103−rrProjectId :: Lens' RoutineReference (Maybe Text)

2104−rrProjectId

2105− = lens _rrProjectId (\ s a -> s{_rrProjectId = a})

2106−

2107−-- | [Required] The ID of the routine. The ID must contain only letters (a-z,

2108−-- A-Z), numbers (0-9), or underscores (_). The maximum length is 256

2109−-- characters.

2110−rrRoutineId :: Lens' RoutineReference (Maybe Text)

2111−rrRoutineId

2112− = lens _rrRoutineId (\ s a -> s{_rrRoutineId = a})

2113−

2114−instance FromJSON RoutineReference where

2115− parseJSON

2116− = withObject "RoutineReference"

2117− (\ o ->

2118− RoutineReference' <$>

2119− (o .:? "datasetId") <*> (o .:? "projectId") <*>

2120− (o .:? "routineId"))

2121−

2122−instance ToJSON RoutineReference where

2123− toJSON RoutineReference'{..}

2124− = object

2125− (catMaybes

2126− [("datasetId" .=) <$> _rrDataSetId,

2127− ("projectId" .=) <$> _rrProjectId,

2128− ("routineId" .=) <$> _rrRoutineId])

2129−

21302045--

21312046-- /See:/ 'rangePartitioning' smart constructor.

21322047data RangePartitioning =

@@ -2742,146 +2657,6 @@ instance ToJSON QueryRequest where

27422657 ("maxResults" .=) <$> _qrMaxResults,

27432658 ("defaultDataset" .=) <$> _qrDefaultDataSet])

27442659

2745−-- | [Output-only, Beta] Training options used by this training run. These

2746−-- options are mutable for subsequent training runs. Default values are

2747−-- explicitly stored for options not specified in the input query of the

2748−-- first training run. For subsequent training runs, any option not

2749−-- explicitly specified in the input query will be copied from the previous

2750−-- training run.

2751−--

2752−-- /See:/ 'bqmlTrainingRunTrainingOptions' smart constructor.

2753−data BqmlTrainingRunTrainingOptions =

2754− BqmlTrainingRunTrainingOptions'

2755− { _btrtoLineSearchInitLearnRate :: !(Maybe (Textual Double))

2756− , _btrtoMinRelProgress :: !(Maybe (Textual Double))

2757− , _btrtoL1Reg :: !(Maybe (Textual Double))

2758− , _btrtoLearnRate :: !(Maybe (Textual Double))

2759− , _btrtoLearnRateStrategy :: !(Maybe Text)

2760− , _btrtoMaxIteration :: !(Maybe (Textual Int64))

2761− , _btrtoEarlyStop :: !(Maybe Bool)

2762− , _btrtoL2Reg :: !(Maybe (Textual Double))

2763− , _btrtoWarmStart :: !(Maybe Bool)

2764− }

2765− deriving (Eq, Show, Data, Typeable, Generic)

2766−

2767−

2768−-- | Creates a value of 'BqmlTrainingRunTrainingOptions' with the minimum fields required to make a request.

2769−--

2770−-- Use one of the following lenses to modify other fields as desired:

2771−--

2772−-- * 'btrtoLineSearchInitLearnRate'

2773−--

2774−-- * 'btrtoMinRelProgress'

2775−--

2776−-- * 'btrtoL1Reg'

2777−--

2778−-- * 'btrtoLearnRate'

2779−--

2780−-- * 'btrtoLearnRateStrategy'

2781−--

2782−-- * 'btrtoMaxIteration'

2783−--

2784−-- * 'btrtoEarlyStop'

2785−--

2786−-- * 'btrtoL2Reg'

2787−--

2788−-- * 'btrtoWarmStart'

2789−bqmlTrainingRunTrainingOptions

2790− :: BqmlTrainingRunTrainingOptions

2791−bqmlTrainingRunTrainingOptions =

2792− BqmlTrainingRunTrainingOptions'

2793− { _btrtoLineSearchInitLearnRate = Nothing

2794− , _btrtoMinRelProgress = Nothing

2795− , _btrtoL1Reg = Nothing

2796− , _btrtoLearnRate = Nothing

2797− , _btrtoLearnRateStrategy = Nothing

2798− , _btrtoMaxIteration = Nothing

2799− , _btrtoEarlyStop = Nothing

2800− , _btrtoL2Reg = Nothing

2801− , _btrtoWarmStart = Nothing

2802− }

2803−

2804−

2805−btrtoLineSearchInitLearnRate :: Lens' BqmlTrainingRunTrainingOptions (Maybe Double)

2806−btrtoLineSearchInitLearnRate

2807− = lens _btrtoLineSearchInitLearnRate

2808− (\ s a -> s{_btrtoLineSearchInitLearnRate = a})

2809− . mapping _Coerce

2810−

2811−btrtoMinRelProgress :: Lens' BqmlTrainingRunTrainingOptions (Maybe Double)

2812−btrtoMinRelProgress

2813− = lens _btrtoMinRelProgress

2814− (\ s a -> s{_btrtoMinRelProgress = a})

2815− . mapping _Coerce

2816−

2817−btrtoL1Reg :: Lens' BqmlTrainingRunTrainingOptions (Maybe Double)

2818−btrtoL1Reg

2819− = lens _btrtoL1Reg (\ s a -> s{_btrtoL1Reg = a}) .

2820− mapping _Coerce

2821−

2822−btrtoLearnRate :: Lens' BqmlTrainingRunTrainingOptions (Maybe Double)

2823−btrtoLearnRate

2824− = lens _btrtoLearnRate

2825− (\ s a -> s{_btrtoLearnRate = a})

2826− . mapping _Coerce

2827−

2828−btrtoLearnRateStrategy :: Lens' BqmlTrainingRunTrainingOptions (Maybe Text)

2829−btrtoLearnRateStrategy

2830− = lens _btrtoLearnRateStrategy

2831− (\ s a -> s{_btrtoLearnRateStrategy = a})

2832−

2833−btrtoMaxIteration :: Lens' BqmlTrainingRunTrainingOptions (Maybe Int64)

2834−btrtoMaxIteration

2835− = lens _btrtoMaxIteration

2836− (\ s a -> s{_btrtoMaxIteration = a})

2837− . mapping _Coerce

2838−

2839−btrtoEarlyStop :: Lens' BqmlTrainingRunTrainingOptions (Maybe Bool)

2840−btrtoEarlyStop

2841− = lens _btrtoEarlyStop

2842− (\ s a -> s{_btrtoEarlyStop = a})

2843−

2844−btrtoL2Reg :: Lens' BqmlTrainingRunTrainingOptions (Maybe Double)

2845−btrtoL2Reg

2846− = lens _btrtoL2Reg (\ s a -> s{_btrtoL2Reg = a}) .

2847− mapping _Coerce

2848−

2849−btrtoWarmStart :: Lens' BqmlTrainingRunTrainingOptions (Maybe Bool)

2850−btrtoWarmStart

2851− = lens _btrtoWarmStart

2852− (\ s a -> s{_btrtoWarmStart = a})

2853−

2854−instance FromJSON BqmlTrainingRunTrainingOptions

2855− where

2856− parseJSON

2857− = withObject "BqmlTrainingRunTrainingOptions"

2858− (\ o ->

2859− BqmlTrainingRunTrainingOptions' <$>

2860− (o .:? "lineSearchInitLearnRate") <*>

2861− (o .:? "minRelProgress")

2862− <*> (o .:? "l1Reg")

2863− <*> (o .:? "learnRate")

2864− <*> (o .:? "learnRateStrategy")

2865− <*> (o .:? "maxIteration")

2866− <*> (o .:? "earlyStop")

2867− <*> (o .:? "l2Reg")

2868− <*> (o .:? "warmStart"))

2869−

2870−instance ToJSON BqmlTrainingRunTrainingOptions where

2871− toJSON BqmlTrainingRunTrainingOptions'{..}

2872− = object

2873− (catMaybes

2874− [("lineSearchInitLearnRate" .=) <$>

2875− _btrtoLineSearchInitLearnRate,

2876− ("minRelProgress" .=) <$> _btrtoMinRelProgress,

2877− ("l1Reg" .=) <$> _btrtoL1Reg,

2878− ("learnRate" .=) <$> _btrtoLearnRate,

2879− ("learnRateStrategy" .=) <$> _btrtoLearnRateStrategy,

2880− ("maxIteration" .=) <$> _btrtoMaxIteration,

2881− ("earlyStop" .=) <$> _btrtoEarlyStop,

2882− ("l2Reg" .=) <$> _btrtoL2Reg,

2883− ("warmStart" .=) <$> _btrtoWarmStart])

2884−

28852660--

28862661-- /See:/ 'queryParameter' smart constructor.

28872662data QueryParameter =

@@ -2942,12 +2717,109 @@ instance ToJSON QueryParameter where

29422717 ("parameterType" .=) <$> _qpParameterType,

29432718 ("name" .=) <$> _qpName])

29442719

2720+--

2721+-- /See:/ 'iterationResult' smart constructor.

2722+data IterationResult =

2723+ IterationResult'

2724+ { _irDurationMs :: !(Maybe (Textual Int64))

2725+ , _irLearnRate :: !(Maybe (Textual Double))

2726+ , _irEvalLoss :: !(Maybe (Textual Double))

2727+ , _irTrainingLoss :: !(Maybe (Textual Double))

2728+ , _irIndex :: !(Maybe (Textual Int32))

2729+ }

2730+ deriving (Eq, Show, Data, Typeable, Generic)

2731+

2732+

2733+-- | Creates a value of 'IterationResult' with the minimum fields required to make a request.

2734+--

2735+-- Use one of the following lenses to modify other fields as desired:

2736+--

2737+-- * 'irDurationMs'

2738+--

2739+-- * 'irLearnRate'

2740+--

2741+-- * 'irEvalLoss'

2742+--

2743+-- * 'irTrainingLoss'

2744+--

2745+-- * 'irIndex'

2746+iterationResult

2747+ :: IterationResult

2748+iterationResult =

2749+ IterationResult'

2750+ { _irDurationMs = Nothing

2751+ , _irLearnRate = Nothing

2752+ , _irEvalLoss = Nothing

2753+ , _irTrainingLoss = Nothing

2754+ , _irIndex = Nothing

2755+ }

2756+

2757+

2758+-- | [Output-only, Beta] Time taken to run the training iteration in

2759+-- milliseconds.

2760+irDurationMs :: Lens' IterationResult (Maybe Int64)

2761+irDurationMs

2762+ = lens _irDurationMs (\ s a -> s{_irDurationMs = a})

2763+ . mapping _Coerce

2764+

2765+-- | [Output-only, Beta] Learning rate used for this iteration, it varies for

2766+-- different training iterations if learn_rate_strategy option is not

2767+-- constant.

2768+irLearnRate :: Lens' IterationResult (Maybe Double)

2769+irLearnRate

2770+ = lens _irLearnRate (\ s a -> s{_irLearnRate = a}) .

2771+ mapping _Coerce

2772+

2773+-- | [Output-only, Beta] Eval loss computed on the eval data at the end of

2774+-- the iteration. The eval loss is used for early stopping to avoid

2775+-- overfitting. No eval loss if eval_split_method option is specified as

2776+-- no_split or auto_split with input data size less than 500 rows.

2777+irEvalLoss :: Lens' IterationResult (Maybe Double)

2778+irEvalLoss

2779+ = lens _irEvalLoss (\ s a -> s{_irEvalLoss = a}) .

2780+ mapping _Coerce

2781+

2782+-- | [Output-only, Beta] Training loss computed on the training data at the

2783+-- end of the iteration. The training loss function is defined by model

2784+-- type.

2785+irTrainingLoss :: Lens' IterationResult (Maybe Double)

2786+irTrainingLoss

2787+ = lens _irTrainingLoss

2788+ (\ s a -> s{_irTrainingLoss = a})

2789+ . mapping _Coerce

2790+

2791+-- | [Output-only, Beta] Index of the ML training iteration, starting from

2792+-- zero for each training run.

2793+irIndex :: Lens' IterationResult (Maybe Int32)

2794+irIndex

2795+ = lens _irIndex (\ s a -> s{_irIndex = a}) .

2796+ mapping _Coerce

2797+

2798+instance FromJSON IterationResult where

2799+ parseJSON

2800+ = withObject "IterationResult"

2801+ (\ o ->

2802+ IterationResult' <$>

2803+ (o .:? "durationMs") <*> (o .:? "learnRate") <*>

2804+ (o .:? "evalLoss")

2805+ <*> (o .:? "trainingLoss")

2806+ <*> (o .:? "index"))

2807+

2808+instance ToJSON IterationResult where

2809+ toJSON IterationResult'{..}

2810+ = object

2811+ (catMaybes

2812+ [("durationMs" .=) <$> _irDurationMs,

2813+ ("learnRate" .=) <$> _irLearnRate,

2814+ ("evalLoss" .=) <$> _irEvalLoss,

2815+ ("trainingLoss" .=) <$> _irTrainingLoss,

2816+ ("index" .=) <$> _irIndex])

2817+

29452818--

29462819-- /See:/ 'jobStatistics4' smart constructor.

2947−data JobStatistics4 =

2820+newtype JobStatistics4 =

29482821 JobStatistics4'

2949− { _jsInputBytes :: !(Maybe (Textual Int64))

2950− , _jsDestinationURIFileCounts :: !(Maybe [Textual Int64])

2822+ { _jsDestinationURIFileCounts :: Maybe [Textual Int64]

29512823 }

29522824 deriving (Eq, Show, Data, Typeable, Generic)

29532825

@@ -2956,22 +2828,11 @@ data JobStatistics4 =

29562828--

29572829-- Use one of the following lenses to modify other fields as desired:

29582830--

2959−-- * 'jsInputBytes'

2960−--

29612831-- * 'jsDestinationURIFileCounts'

29622832jobStatistics4

29632833 :: JobStatistics4

2964−jobStatistics4 =

2965− JobStatistics4'

2966− {_jsInputBytes = Nothing, _jsDestinationURIFileCounts = Nothing}

2967−

2834+jobStatistics4 = JobStatistics4' {_jsDestinationURIFileCounts = Nothing}

29682835

2969−-- | [Output-only] Number of user bytes extracted into the result. This is

2970−-- the byte count as computed by BigQuery for billing purposes.

2971−jsInputBytes :: Lens' JobStatistics4 (Maybe Int64)

2972−jsInputBytes

2973− = lens _jsInputBytes (\ s a -> s{_jsInputBytes = a})

2974− . mapping _Coerce

29752836

29762837-- | [Output-only] Number of files per destination URI or URI pattern

29772838-- specified in the extract configuration. These values will be in the same

@@ -2988,15 +2849,13 @@ instance FromJSON JobStatistics4 where

29882849 = withObject "JobStatistics4"

29892850 (\ o ->

29902851 JobStatistics4' <$>

2991− (o .:? "inputBytes") <*>

2992− (o .:? "destinationUriFileCounts" .!= mempty))

2852+ (o .:? "destinationUriFileCounts" .!= mempty))

29932853

29942854instance ToJSON JobStatistics4 where

29952855 toJSON JobStatistics4'{..}

29962856 = object

29972857 (catMaybes

2998− [("inputBytes" .=) <$> _jsInputBytes,

2999− ("destinationUriFileCounts" .=) <$>

2858+ [("destinationUriFileCounts" .=) <$>

30002859 _jsDestinationURIFileCounts])

30012860

30022861--

@@ -3431,6 +3290,145 @@ instance ToJSON ExplainQueryStage where

34313290 ("endMs" .=) <$> _eqsEndMs,

34323291 ("waitMsMax" .=) <$> _eqsWaitMsMax])

34333292

3293+-- | [Output-only, Beta] Training options used by this training run. These

3294+-- options are mutable for subsequent training runs. Default values are

3295+-- explicitly stored for options not specified in the input query of the

3296+-- first training run. For subsequent training runs, any option not

3297+-- explicitly specified in the input query will be copied from the previous

3298+-- training run.

3299+--

3300+-- /See:/ 'trainingRunTrainingOptions' smart constructor.

3301+data TrainingRunTrainingOptions =

3302+ TrainingRunTrainingOptions'

3303+ { _trtoLineSearchInitLearnRate :: !(Maybe (Textual Double))

3304+ , _trtoMinRelProgress :: !(Maybe (Textual Double))

3305+ , _trtoL1Reg :: !(Maybe (Textual Double))

3306+ , _trtoLearnRate :: !(Maybe (Textual Double))

3307+ , _trtoLearnRateStrategy :: !(Maybe Text)

3308+ , _trtoMaxIteration :: !(Maybe (Textual Int64))

3309+ , _trtoEarlyStop :: !(Maybe Bool)

3310+ , _trtoL2Reg :: !(Maybe (Textual Double))

3311+ , _trtoWarmStart :: !(Maybe Bool)

3312+ }

3313+ deriving (Eq, Show, Data, Typeable, Generic)

3314+

3315+

3316+-- | Creates a value of 'TrainingRunTrainingOptions' with the minimum fields required to make a request.

3317+--

3318+-- Use one of the following lenses to modify other fields as desired:

3319+--

3320+-- * 'trtoLineSearchInitLearnRate'

3321+--

3322+-- * 'trtoMinRelProgress'

3323+--

3324+-- * 'trtoL1Reg'

3325+--

3326+-- * 'trtoLearnRate'

3327+--

3328+-- * 'trtoLearnRateStrategy'

3329+--

3330+-- * 'trtoMaxIteration'

3331+--

3332+-- * 'trtoEarlyStop'

3333+--

3334+-- * 'trtoL2Reg'

3335+--

3336+-- * 'trtoWarmStart'

3337+trainingRunTrainingOptions

3338+ :: TrainingRunTrainingOptions

3339+trainingRunTrainingOptions =

3340+ TrainingRunTrainingOptions'

3341+ { _trtoLineSearchInitLearnRate = Nothing

3342+ , _trtoMinRelProgress = Nothing

3343+ , _trtoL1Reg = Nothing

3344+ , _trtoLearnRate = Nothing

3345+ , _trtoLearnRateStrategy = Nothing

3346+ , _trtoMaxIteration = Nothing

3347+ , _trtoEarlyStop = Nothing

3348+ , _trtoL2Reg = Nothing

3349+ , _trtoWarmStart = Nothing

3350+ }

3351+

3352+

3353+trtoLineSearchInitLearnRate :: Lens' TrainingRunTrainingOptions (Maybe Double)

3354+trtoLineSearchInitLearnRate

3355+ = lens _trtoLineSearchInitLearnRate

3356+ (\ s a -> s{_trtoLineSearchInitLearnRate = a})

3357+ . mapping _Coerce

3358+

3359+trtoMinRelProgress :: Lens' TrainingRunTrainingOptions (Maybe Double)

3360+trtoMinRelProgress

3361+ = lens _trtoMinRelProgress

3362+ (\ s a -> s{_trtoMinRelProgress = a})

3363+ . mapping _Coerce

3364+

3365+trtoL1Reg :: Lens' TrainingRunTrainingOptions (Maybe Double)

3366+trtoL1Reg

3367+ = lens _trtoL1Reg (\ s a -> s{_trtoL1Reg = a}) .

3368+ mapping _Coerce

3369+

3370+trtoLearnRate :: Lens' TrainingRunTrainingOptions (Maybe Double)

3371+trtoLearnRate

3372+ = lens _trtoLearnRate

3373+ (\ s a -> s{_trtoLearnRate = a})

3374+ . mapping _Coerce

3375+

3376+trtoLearnRateStrategy :: Lens' TrainingRunTrainingOptions (Maybe Text)

3377+trtoLearnRateStrategy

3378+ = lens _trtoLearnRateStrategy

3379+ (\ s a -> s{_trtoLearnRateStrategy = a})

3380+

3381+trtoMaxIteration :: Lens' TrainingRunTrainingOptions (Maybe Int64)

3382+trtoMaxIteration

3383+ = lens _trtoMaxIteration

3384+ (\ s a -> s{_trtoMaxIteration = a})

3385+ . mapping _Coerce

3386+

3387+trtoEarlyStop :: Lens' TrainingRunTrainingOptions (Maybe Bool)

3388+trtoEarlyStop

3389+ = lens _trtoEarlyStop

3390+ (\ s a -> s{_trtoEarlyStop = a})

3391+

3392+trtoL2Reg :: Lens' TrainingRunTrainingOptions (Maybe Double)

3393+trtoL2Reg

3394+ = lens _trtoL2Reg (\ s a -> s{_trtoL2Reg = a}) .

3395+ mapping _Coerce

3396+

3397+trtoWarmStart :: Lens' TrainingRunTrainingOptions (Maybe Bool)

3398+trtoWarmStart

3399+ = lens _trtoWarmStart

3400+ (\ s a -> s{_trtoWarmStart = a})

3401+

3402+instance FromJSON TrainingRunTrainingOptions where

3403+ parseJSON

3404+ = withObject "TrainingRunTrainingOptions"

3405+ (\ o ->

3406+ TrainingRunTrainingOptions' <$>

3407+ (o .:? "lineSearchInitLearnRate") <*>

3408+ (o .:? "minRelProgress")

3409+ <*> (o .:? "l1Reg")

3410+ <*> (o .:? "learnRate")

3411+ <*> (o .:? "learnRateStrategy")

3412+ <*> (o .:? "maxIteration")

3413+ <*> (o .:? "earlyStop")

3414+ <*> (o .:? "l2Reg")

3415+ <*> (o .:? "warmStart"))

3416+

3417+instance ToJSON TrainingRunTrainingOptions where

3418+ toJSON TrainingRunTrainingOptions'{..}

3419+ = object

3420+ (catMaybes

3421+ [("lineSearchInitLearnRate" .=) <$>

3422+ _trtoLineSearchInitLearnRate,

3423+ ("minRelProgress" .=) <$> _trtoMinRelProgress,

3424+ ("l1Reg" .=) <$> _trtoL1Reg,

3425+ ("learnRate" .=) <$> _trtoLearnRate,

3426+ ("learnRateStrategy" .=) <$> _trtoLearnRateStrategy,

3427+ ("maxIteration" .=) <$> _trtoMaxIteration,

3428+ ("earlyStop" .=) <$> _trtoEarlyStop,

3429+ ("l2Reg" .=) <$> _trtoL2Reg,

3430+ ("warmStart" .=) <$> _trtoWarmStart])

3431+

34343432--

34353433-- /See:/ 'bigQueryModelTraining' smart constructor.

34363434data BigQueryModelTraining =

@@ -4281,105 +4279,6 @@ instance ToJSON ProjectListProjectsItem where

42814279 ("id" .=) <$> _plpiId,

42824280 ("numericId" .=) <$> _plpiNumericId])

42834281

4284−--

4285−-- /See:/ 'bqmlIterationResult' smart constructor.

4286−data BqmlIterationResult =

4287− BqmlIterationResult'

4288− { _birDurationMs :: !(Maybe (Textual Int64))

4289− , _birLearnRate :: !(Maybe (Textual Double))

4290− , _birEvalLoss :: !(Maybe (Textual Double))

4291− , _birTrainingLoss :: !(Maybe (Textual Double))

4292− , _birIndex :: !(Maybe (Textual Int32))

4293− }

4294− deriving (Eq, Show, Data, Typeable, Generic)

4295−

4296−

4297−-- | Creates a value of 'BqmlIterationResult' with the minimum fields required to make a request.

4298−--

4299−-- Use one of the following lenses to modify other fields as desired:

4300−--

4301−-- * 'birDurationMs'

4302−--

4303−-- * 'birLearnRate'

4304−--

4305−-- * 'birEvalLoss'

4306−--

4307−-- * 'birTrainingLoss'

4308−--

4309−-- * 'birIndex'

4310−bqmlIterationResult

4311− :: BqmlIterationResult

4312−bqmlIterationResult =

4313− BqmlIterationResult'

4314− { _birDurationMs = Nothing

4315− , _birLearnRate = Nothing

4316− , _birEvalLoss = Nothing

4317− , _birTrainingLoss = Nothing

4318− , _birIndex = Nothing

4319− }

4320−

4321−

4322−-- | [Output-only, Beta] Time taken to run the training iteration in

4323−-- milliseconds.

4324−birDurationMs :: Lens' BqmlIterationResult (Maybe Int64)

4325−birDurationMs

4326− = lens _birDurationMs

4327− (\ s a -> s{_birDurationMs = a})

4328− . mapping _Coerce

4329−

4330−-- | [Output-only, Beta] Learning rate used for this iteration, it varies for

4331−-- different training iterations if learn_rate_strategy option is not

4332−-- constant.

4333−birLearnRate :: Lens' BqmlIterationResult (Maybe Double)

4334−birLearnRate

4335− = lens _birLearnRate (\ s a -> s{_birLearnRate = a})

4336− . mapping _Coerce

4337−

4338−-- | [Output-only, Beta] Eval loss computed on the eval data at the end of

4339−-- the iteration. The eval loss is used for early stopping to avoid

4340−-- overfitting. No eval loss if eval_split_method option is specified as

4341−-- no_split or auto_split with input data size less than 500 rows.

4342−birEvalLoss :: Lens' BqmlIterationResult (Maybe Double)

4343−birEvalLoss

4344− = lens _birEvalLoss (\ s a -> s{_birEvalLoss = a}) .

4345− mapping _Coerce

4346−

4347−-- | [Output-only, Beta] Training loss computed on the training data at the

4348−-- end of the iteration. The training loss function is defined by model

4349−-- type.

4350−birTrainingLoss :: Lens' BqmlIterationResult (Maybe Double)

4351−birTrainingLoss

4352− = lens _birTrainingLoss

4353− (\ s a -> s{_birTrainingLoss = a})

4354− . mapping _Coerce

4355−

4356−-- | [Output-only, Beta] Index of the ML training iteration, starting from

4357−-- zero for each training run.

4358−birIndex :: Lens' BqmlIterationResult (Maybe Int32)

4359−birIndex

4360− = lens _birIndex (\ s a -> s{_birIndex = a}) .

4361− mapping _Coerce

4362−

4363−instance FromJSON BqmlIterationResult where

4364− parseJSON

4365− = withObject "BqmlIterationResult"

4366− (\ o ->

4367− BqmlIterationResult' <$>

4368− (o .:? "durationMs") <*> (o .:? "learnRate") <*>

4369− (o .:? "evalLoss")

4370− <*> (o .:? "trainingLoss")

4371− <*> (o .:? "index"))

4372−

4373−instance ToJSON BqmlIterationResult where

4374− toJSON BqmlIterationResult'{..}

4375− = object

4376− (catMaybes

4377− [("durationMs" .=) <$> _birDurationMs,

4378− ("learnRate" .=) <$> _birLearnRate,

4379− ("evalLoss" .=) <$> _birEvalLoss,

4380− ("trainingLoss" .=) <$> _birTrainingLoss,

4381− ("index" .=) <$> _birIndex])

4382−

43834282--

43844283-- /See:/ 'bigtableColumn' smart constructor.

43854284data BigtableColumn =

@@ -5368,7 +5267,7 @@ instance ToJSON JobConfigurationExtract where

53685267data ModelDefinition =

53695268 ModelDefinition'

53705269 { _mdModelOptions :: !(Maybe ModelDefinitionModelOptions)

5371− , _mdTrainingRuns :: !(Maybe [BqmlTrainingRun])

5270+ , _mdTrainingRuns :: !(Maybe [TrainingRun])

53725271 }

53735272 deriving (Eq, Show, Data, Typeable, Generic)

53745273

@@ -5398,7 +5297,7 @@ mdModelOptions

53985297-- run comprises of multiple iterations and there may be multiple training

53995298-- runs for the model if warm start is used or if a user decides to

54005299-- continue a previously cancelled query.

5401−mdTrainingRuns :: Lens' ModelDefinition [BqmlTrainingRun]

5300+mdTrainingRuns :: Lens' ModelDefinition [TrainingRun]

54025301mdTrainingRuns

54035302 = lens _mdTrainingRuns

54045303 (\ s a -> s{_mdTrainingRuns = a})

@@ -6363,7 +6262,6 @@ data JobStatistics2 =

63636262 { _jModelTrainingExpectedTotalIteration :: !(Maybe (Textual Int64))

63646263 , _jModelTraining :: !(Maybe BigQueryModelTraining)

63656264 , _jTotalSlotMs :: !(Maybe (Textual Int64))

6366− , _jDdlTargetRoutine :: !(Maybe RoutineReference)

63676265 , _jDdlTargetTable :: !(Maybe TableReference)

63686266 , _jEstimatedBytesProcessed :: !(Maybe (Textual Int64))

63696267 , _jModelTrainingCurrentIteration :: !(Maybe (Textual Int32))

@@ -6396,8 +6294,6 @@ data JobStatistics2 =

63966294--

63976295-- * 'jTotalSlotMs'

63986296--

6399−-- * 'jDdlTargetRoutine'

6400−--

64016297-- * 'jDdlTargetTable'

64026298--

64036299-- * 'jEstimatedBytesProcessed'

@@ -6440,7 +6336,6 @@ jobStatistics2 =

64406336 { _jModelTrainingExpectedTotalIteration = Nothing

64416337 , _jModelTraining = Nothing

64426338 , _jTotalSlotMs = Nothing

6443− , _jDdlTargetRoutine = Nothing

64446339 , _jDdlTargetTable = Nothing

64456340 , _jEstimatedBytesProcessed = Nothing

64466341 , _jModelTrainingCurrentIteration = Nothing

@@ -6482,13 +6377,6 @@ jTotalSlotMs

64826377 = lens _jTotalSlotMs (\ s a -> s{_jTotalSlotMs = a})

64836378 . mapping _Coerce

64846379

6485−-- | The DDL target routine. Present only for CREATE\/DROP

6486−-- FUNCTION\/PROCEDURE queries.

6487−jDdlTargetRoutine :: Lens' JobStatistics2 (Maybe RoutineReference)

6488−jDdlTargetRoutine

6489− = lens _jDdlTargetRoutine

6490− (\ s a -> s{_jDdlTargetRoutine = a})

6491−

64926380-- | The DDL target table. Present only for CREATE\/DROP TABLE\/VIEW queries.

64936381jDdlTargetTable :: Lens' JobStatistics2 (Maybe TableReference)

64946382jDdlTargetTable

@@ -6531,7 +6419,7 @@ jBillingTier

65316419-- this field specifies the accuracy of the estimate. Possible values can

65326420-- be: UNKNOWN: accuracy of the estimate is unknown. PRECISE: estimate is

65336421-- precise. LOWER_BOUND: estimate is lower bound of what the query would

6534−-- cost. UPPER_BOUND: estimate is upper bound of what the query would cost.

6422+-- cost. UPPER_BOUND: estiamte is upper bound of what the query would cost.

65356423jTotalBytesProcessedAccuracy :: Lens' JobStatistics2 (Maybe Text)

65366424jTotalBytesProcessedAccuracy

65376425 = lens _jTotalBytesProcessedAccuracy

@@ -6569,9 +6457,7 @@ jReferencedTables

65696457-- \"CREATE_TABLE_AS_SELECT\": CREATE [OR REPLACE] TABLE ... AS SELECT ...

65706458-- . \"DROP_TABLE\": DROP TABLE query. \"CREATE_VIEW\": CREATE [OR REPLACE]

65716459-- VIEW ... AS SELECT ... . \"DROP_VIEW\": DROP VIEW query.

6572−-- \"CREATE_FUNCTION\": CREATE FUNCTION query. \"DROP_FUNCTION\" : DROP

6573−-- FUNCTION query. \"ALTER_TABLE\": ALTER TABLE query. \"ALTER_VIEW\":

6574−-- ALTER VIEW query.

6460+-- \"ALTER_TABLE\": ALTER TABLE query. \"ALTER_VIEW\": ALTER VIEW query.

65756461jStatementType :: Lens' JobStatistics2 (Maybe Text)

65766462jStatementType

65776463 = lens _jStatementType

@@ -6648,7 +6534,6 @@ instance FromJSON JobStatistics2 where

66486534 (o .:? "modelTrainingExpectedTotalIteration") <*>

66496535 (o .:? "modelTraining")

66506536 <*> (o .:? "totalSlotMs")

6651− <*> (o .:? "ddlTargetRoutine")

66526537 <*> (o .:? "ddlTargetTable")

66536538 <*> (o .:? "estimatedBytesProcessed")

66546539 <*> (o .:? "modelTrainingCurrentIteration")

@@ -6676,7 +6561,6 @@ instance ToJSON JobStatistics2 where

66766561 _jModelTrainingExpectedTotalIteration,

66776562 ("modelTraining" .=) <$> _jModelTraining,

66786563 ("totalSlotMs" .=) <$> _jTotalSlotMs,

6679− ("ddlTargetRoutine" .=) <$> _jDdlTargetRoutine,

66806564 ("ddlTargetTable" .=) <$> _jDdlTargetTable,

66816565 ("estimatedBytesProcessed" .=) <$>

66826566 _jEstimatedBytesProcessed,

@@ -6851,7 +6735,6 @@ instance ToJSON TableLabels where

68516735data DestinationTableProperties =

68526736 DestinationTableProperties'

68536737 { _dtpFriendlyName :: !(Maybe Text)

6854− , _dtpLabels :: !(Maybe DestinationTablePropertiesLabels)

68556738 , _dtpDescription :: !(Maybe Text)

68566739 }

68576740 deriving (Eq, Show, Data, Typeable, Generic)

@@ -6863,17 +6746,12 @@ data DestinationTableProperties =

68636746--

68646747-- * 'dtpFriendlyName'

68656748--

6866−-- * 'dtpLabels'

6867−--

68686749-- * 'dtpDescription'

68696750destinationTableProperties

68706751 :: DestinationTableProperties

68716752destinationTableProperties =

68726753 DestinationTableProperties'

6873− { _dtpFriendlyName = Nothing

6874− , _dtpLabels = Nothing

6875− , _dtpDescription = Nothing

6876− }

6754+ {_dtpFriendlyName = Nothing, _dtpDescription = Nothing}

68776755

68786756

68796757-- | [Optional] The friendly name for the destination table. This will only

@@ -6885,15 +6763,6 @@ dtpFriendlyName

68856763 = lens _dtpFriendlyName

68866764 (\ s a -> s{_dtpFriendlyName = a})

68876765

6888−-- | [Optional] The labels associated with this table. You can use these to

6889−-- organize and group your tables. This will only be used if the

6890−-- destination table is newly created. If the table already exists and

6891−-- labels are different than the current labels are provided, the job will

6892−-- fail.

6893−dtpLabels :: Lens' DestinationTableProperties (Maybe DestinationTablePropertiesLabels)

6894−dtpLabels

6895− = lens _dtpLabels (\ s a -> s{_dtpLabels = a})

6896−

68976766-- | [Optional] The description for the destination table. This will only be

68986767-- used if the destination table is newly created. If the table already

68996768-- exists and a value different than the current description is provided,

@@ -6908,15 +6777,13 @@ instance FromJSON DestinationTableProperties where

69086777 = withObject "DestinationTableProperties"

69096778 (\ o ->

69106779 DestinationTableProperties' <$>

6911− (o .:? "friendlyName") <*> (o .:? "labels") <*>

6912− (o .:? "description"))

6780+ (o .:? "friendlyName") <*> (o .:? "description"))

69136781

69146782instance ToJSON DestinationTableProperties where

69156783 toJSON DestinationTableProperties'{..}

69166784 = object

69176785 (catMaybes

69186786 [("friendlyName" .=) <$> _dtpFriendlyName,

6919− ("labels" .=) <$> _dtpLabels,

69206787 ("description" .=) <$> _dtpDescription])

69216788

69226789--

@@ -6989,13 +6856,9 @@ dsaiSpecialGroup

69896856 = lens _dsaiSpecialGroup

69906857 (\ s a -> s{_dsaiSpecialGroup = a})

69916858

6992−-- | [Required] An IAM role ID that should be granted to the user, group, or

6993−-- domain specified in this access entry. The following legacy mappings

6994−-- will be applied: OWNER roles\/bigquery.dataOwner WRITER

6995−-- roles\/bigquery.dataEditor READER roles\/bigquery.dataViewer This field

6996−-- will accept any of the above formats, but will return only the legacy

6997−-- format. For example, if you set this field to

6998−-- \"roles\/bigquery.dataOwner\", it will be returned back as \"OWNER\".

6859+-- | [Required] Describes the rights granted to the user specified by the

6860+-- other member of the access object. The following string values are

6861+-- supported: READER, WRITER, OWNER.

69996862dsaiRole :: Lens' DataSetAccessItem (Maybe Text)

70006863dsaiRole = lens _dsaiRole (\ s a -> s{_dsaiRole = a})

70016864

@@ -7046,91 +6909,6 @@ instance ToJSON DataSetAccessItem where

70466909 ("view" .=) <$> _dsaiView,

70476910 ("userByEmail" .=) <$> _dsaiUserByEmail])

70486911

7049−--

7050−-- /See:/ 'bqmlTrainingRun' smart constructor.

7051−data BqmlTrainingRun =

7052− BqmlTrainingRun'

7053− { _btrState :: !(Maybe Text)

7054− , _btrStartTime :: !(Maybe DateTime')

7055− , _btrIterationResults :: !(Maybe [BqmlIterationResult])

7056− , _btrTrainingOptions :: !(Maybe BqmlTrainingRunTrainingOptions)

7057− }

7058− deriving (Eq, Show, Data, Typeable, Generic)

7059−

7060−

7061−-- | Creates a value of 'BqmlTrainingRun' with the minimum fields required to make a request.

7062−--

7063−-- Use one of the following lenses to modify other fields as desired:

7064−--

7065−-- * 'btrState'

7066−--

7067−-- * 'btrStartTime'

7068−--

7069−-- * 'btrIterationResults'

7070−--

7071−-- * 'btrTrainingOptions'

7072−bqmlTrainingRun

7073− :: BqmlTrainingRun

7074−bqmlTrainingRun =

7075− BqmlTrainingRun'

7076− { _btrState = Nothing

7077− , _btrStartTime = Nothing

7078− , _btrIterationResults = Nothing

7079− , _btrTrainingOptions = Nothing

7080− }

7081−

7082−

7083−-- | [Output-only, Beta] Different state applicable for a training run. IN

7084−-- PROGRESS: Training run is in progress. FAILED: Training run ended due to

7085−-- a non-retryable failure. SUCCEEDED: Training run successfully completed.

7086−-- CANCELLED: Training run cancelled by the user.

7087−btrState :: Lens' BqmlTrainingRun (Maybe Text)

7088−btrState = lens _btrState (\ s a -> s{_btrState = a})

7089−

7090−-- | [Output-only, Beta] Training run start time in milliseconds since the

7091−-- epoch.

7092−btrStartTime :: Lens' BqmlTrainingRun (Maybe UTCTime)

7093−btrStartTime

7094− = lens _btrStartTime (\ s a -> s{_btrStartTime = a})

7095− . mapping _DateTime

7096−

7097−-- | [Output-only, Beta] List of each iteration results.

7098−btrIterationResults :: Lens' BqmlTrainingRun [BqmlIterationResult]

7099−btrIterationResults

7100− = lens _btrIterationResults

7101− (\ s a -> s{_btrIterationResults = a})

7102− . _Default

7103− . _Coerce

7104−

7105−-- | [Output-only, Beta] Training options used by this training run. These

7106−-- options are mutable for subsequent training runs. Default values are

7107−-- explicitly stored for options not specified in the input query of the

7108−-- first training run. For subsequent training runs, any option not

7109−-- explicitly specified in the input query will be copied from the previous

7110−-- training run.

7111−btrTrainingOptions :: Lens' BqmlTrainingRun (Maybe BqmlTrainingRunTrainingOptions)

7112−btrTrainingOptions

7113− = lens _btrTrainingOptions

7114− (\ s a -> s{_btrTrainingOptions = a})

7115−

7116−instance FromJSON BqmlTrainingRun where

7117− parseJSON

7118− = withObject "BqmlTrainingRun"

7119− (\ o ->

7120− BqmlTrainingRun' <$>

7121− (o .:? "state") <*> (o .:? "startTime") <*>

7122− (o .:? "iterationResults" .!= mempty)

7123− <*> (o .:? "trainingOptions"))

7124−

7125−instance ToJSON BqmlTrainingRun where

7126− toJSON BqmlTrainingRun'{..}

7127− = object

7128− (catMaybes

7129− [("state" .=) <$> _btrState,

7130− ("startTime" .=) <$> _btrStartTime,

7131− ("iterationResults" .=) <$> _btrIterationResults,

7132− ("trainingOptions" .=) <$> _btrTrainingOptions])

7133−

71346912--

71356913-- /See:/ 'tableDataInsertAllResponse' smart constructor.

71366914data TableDataInsertAllResponse =

@@ -7828,50 +7606,6 @@ instance ToJSON CSVOptions where

78287606 ("encoding" .=) <$> _coEncoding,

78297607 ("fieldDelimiter" .=) <$> _coFieldDelimiter])

78307608

7831−-- | [Optional] The labels associated with this table. You can use these to

7832−-- organize and group your tables. This will only be used if the

7833−-- destination table is newly created. If the table already exists and

7834−-- labels are different than the current labels are provided, the job will

7835−-- fail.

7836−--

7837−-- /See:/ 'destinationTablePropertiesLabels' smart constructor.

7838−newtype DestinationTablePropertiesLabels =

7839− DestinationTablePropertiesLabels'

7840− { _dtplAddtional :: HashMap Text Text

7841− }

7842− deriving (Eq, Show, Data, Typeable, Generic)

7843−

7844−

7845−-- | Creates a value of 'DestinationTablePropertiesLabels' with the minimum fields required to make a request.

7846−--

7847−-- Use one of the following lenses to modify other fields as desired:

7848−--

7849−-- * 'dtplAddtional'

7850−destinationTablePropertiesLabels

7851− :: HashMap Text Text -- ^ 'dtplAddtional'

7852− -> DestinationTablePropertiesLabels

7853−destinationTablePropertiesLabels pDtplAddtional_ =

7854− DestinationTablePropertiesLabels' {_dtplAddtional = _Coerce # pDtplAddtional_}

7855−

7856−

7857−dtplAddtional :: Lens' DestinationTablePropertiesLabels (HashMap Text Text)

7858−dtplAddtional

7859− = lens _dtplAddtional

7860− (\ s a -> s{_dtplAddtional = a})

7861− . _Coerce

7862−

7863−instance FromJSON DestinationTablePropertiesLabels

7864− where

7865− parseJSON

7866− = withObject "DestinationTablePropertiesLabels"

7867− (\ o ->

7868− DestinationTablePropertiesLabels' <$>

7869− (parseJSONObject o))

7870−

7871−instance ToJSON DestinationTablePropertiesLabels

7872− where

7873− toJSON = toJSON . _dtplAddtional

7874−

78757609--

78767610-- /See:/ 'jobStatistics3' smart constructor.

78777611data JobStatistics3 =

@@ -8179,6 +7913,91 @@ instance FromJSON DataSetListDataSetsItemLabels where

81797913instance ToJSON DataSetListDataSetsItemLabels where

81807914 toJSON = toJSON . _dsldsilAddtional

81817915

7916+--

7917+-- /See:/ 'trainingRun' smart constructor.

7918+data TrainingRun =

7919+ TrainingRun'

7920+ { _trState :: !(Maybe Text)

7921+ , _trStartTime :: !(Maybe DateTime')

7922+ , _trIterationResults :: !(Maybe [IterationResult])

7923+ , _trTrainingOptions :: !(Maybe TrainingRunTrainingOptions)

7924+ }

7925+ deriving (Eq, Show, Data, Typeable, Generic)

7926+

7927+

7928+-- | Creates a value of 'TrainingRun' with the minimum fields required to make a request.

7929+--

7930+-- Use one of the following lenses to modify other fields as desired:

7931+--

7932+-- * 'trState'

7933+--

7934+-- * 'trStartTime'

7935+--

7936+-- * 'trIterationResults'

7937+--

7938+-- * 'trTrainingOptions'

7939+trainingRun

7940+ :: TrainingRun

7941+trainingRun =

7942+ TrainingRun'

7943+ { _trState = Nothing

7944+ , _trStartTime = Nothing

7945+ , _trIterationResults = Nothing

7946+ , _trTrainingOptions = Nothing

7947+ }

7948+

7949+

7950+-- | [Output-only, Beta] Different state applicable for a training run. IN

7951+-- PROGRESS: Training run is in progress. FAILED: Training run ended due to

7952+-- a non-retryable failure. SUCCEEDED: Training run successfully completed.

7953+-- CANCELLED: Training run cancelled by the user.

7954+trState :: Lens' TrainingRun (Maybe Text)

7955+trState = lens _trState (\ s a -> s{_trState = a})

7956+

7957+-- | [Output-only, Beta] Training run start time in milliseconds since the

7958+-- epoch.

7959+trStartTime :: Lens' TrainingRun (Maybe UTCTime)

7960+trStartTime

7961+ = lens _trStartTime (\ s a -> s{_trStartTime = a}) .

7962+ mapping _DateTime

7963+

7964+-- | [Output-only, Beta] List of each iteration results.

7965+trIterationResults :: Lens' TrainingRun [IterationResult]

7966+trIterationResults

7967+ = lens _trIterationResults

7968+ (\ s a -> s{_trIterationResults = a})

7969+ . _Default

7970+ . _Coerce

7971+

7972+-- | [Output-only, Beta] Training options used by this training run. These

7973+-- options are mutable for subsequent training runs. Default values are

7974+-- explicitly stored for options not specified in the input query of the

7975+-- first training run. For subsequent training runs, any option not

7976+-- explicitly specified in the input query will be copied from the previous

7977+-- training run.

7978+trTrainingOptions :: Lens' TrainingRun (Maybe TrainingRunTrainingOptions)

7979+trTrainingOptions

7980+ = lens _trTrainingOptions

7981+ (\ s a -> s{_trTrainingOptions = a})

7982+

7983+instance FromJSON TrainingRun where

7984+ parseJSON

7985+ = withObject "TrainingRun"

7986+ (\ o ->

7987+ TrainingRun' <$>

7988+ (o .:? "state") <*> (o .:? "startTime") <*>

7989+ (o .:? "iterationResults" .!= mempty)

7990+ <*> (o .:? "trainingOptions"))

7991+

7992+instance ToJSON TrainingRun where

7993+ toJSON TrainingRun'{..}

7994+ = object

7995+ (catMaybes

7996+ [("state" .=) <$> _trState,

7997+ ("startTime" .=) <$> _trStartTime,

7998+ ("iterationResults" .=) <$> _trIterationResults,

7999+ ("trainingOptions" .=) <$> _trTrainingOptions])

8000+

81828001-- | Additional details for a view.

81838002--

81848003-- /See:/ 'tableListTablesItemView' smart constructor.

gogol-bigquerydatatransfer/gen/Network/Google/BigQueryDataTransfer.hs+15−43

@@ -13,8 +13,8 @@

1313-- Stability : auto-generated

1414-- Portability : non-portable (GHC extensions)

1515--

16−-- Schedule queries or transfer external data from SaaS applications to

17−-- Google BigQuery on a regular basis.

16+-- Transfers data from partner SaaS applications to Google BigQuery on a

17+-- scheduled, managed basis.

1818--

1919-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference>

2020module Network.Google.BigQueryDataTransfer

@@ -86,9 +86,6 @@ module Network.Google.BigQueryDataTransfer

8686 -- ** bigquerydatatransfer.projects.locations.transferConfigs.scheduleRuns

8787 , module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

8888

89− -- ** bigquerydatatransfer.projects.locations.transferConfigs.startManualRuns

90− , module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns

91−

9289 -- ** bigquerydatatransfer.projects.transferConfigs.create

9390 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

9491

@@ -119,9 +116,6 @@ module Network.Google.BigQueryDataTransfer

119116 -- ** bigquerydatatransfer.projects.transferConfigs.scheduleRuns

120117 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

121118

122− -- ** bigquerydatatransfer.projects.transferConfigs.startManualRuns

123− , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

124−

125119 -- * Types

126120

127121 -- ** DataSourceParameterType

@@ -140,28 +134,22 @@ module Network.Google.BigQueryDataTransfer

140134 , llrNextPageToken

141135 , llrLocations

142136

143− -- ** TimeRange

144− , TimeRange

145− , timeRange

146− , trStartTime

147− , trEndTime

148−

149137 -- ** TransferRun

150138 , TransferRun

151139 , transferRun

152− , tRunTime

153− , tErrorStatus

154− , tState

155− , tSchedule

156− , tStartTime

157− , tScheduleTime

158− , tDataSourceId

159− , tParams

160− , tUserId

161− , tUpdateTime

162− , tName

163− , tEndTime

164− , tDestinationDataSetId

140+ , trRunTime

141+ , trErrorStatus

142+ , trState

143+ , trSchedule

144+ , trStartTime

145+ , trScheduleTime

146+ , trDataSourceId

147+ , trParams

148+ , trUserId

149+ , trUpdateTime

150+ , trName

151+ , trEndTime

152+ , trDestinationDataSetId

165153

166154 -- ** CheckValidCredsRequest

167155 , CheckValidCredsRequest

@@ -258,12 +246,6 @@ module Network.Google.BigQueryDataTransfer

258246 , ldsrNextPageToken

259247 , ldsrDataSources

260248

261− -- ** StartManualTransferRunsRequest

262− , StartManualTransferRunsRequest

263− , startManualTransferRunsRequest

264− , smtrrRequestedRunTime

265− , smtrrRequestedTimeRange

266−

267249 -- ** Xgafv

268250 , Xgafv (..)

269251

@@ -310,11 +292,6 @@ module Network.Google.BigQueryDataTransfer

310292 , locationLabels

311293 , llAddtional

312294

313− -- ** StartManualTransferRunsResponse

314− , StartManualTransferRunsResponse

315− , startManualTransferRunsResponse

316− , smtrrRuns

317−

318295 -- ** LocationMetadata

319296 , LocationMetadata

320297 , locationMetadata

@@ -371,7 +348,6 @@ import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations

371348import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List

372349import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List

373350import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

374−import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns

375351import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

376352import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

377353import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

@@ -382,7 +358,6 @@ import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferC

382358import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

383359import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

384360import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

385−import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

386361

387362{- $resources

388363TODO

@@ -400,7 +375,6 @@ type BigQueryDataTransferAPI =

400375 :<|> ProjectsTransferConfigsRunsDeleteResource

401376 :<|> ProjectsTransferConfigsScheduleRunsResource

402377 :<|> ProjectsTransferConfigsListResource

403− :<|> ProjectsTransferConfigsStartManualRunsResource

404378 :<|> ProjectsTransferConfigsPatchResource

405379 :<|> ProjectsTransferConfigsGetResource

406380 :<|> ProjectsTransferConfigsCreateResource

@@ -418,8 +392,6 @@ type BigQueryDataTransferAPI =

418392 :<|>

419393 ProjectsLocationsTransferConfigsScheduleRunsResource

420394 :<|> ProjectsLocationsTransferConfigsListResource

421− :<|>

422− ProjectsLocationsTransferConfigsStartManualRunsResource

423395 :<|> ProjectsLocationsTransferConfigsPatchResource

424396 :<|> ProjectsLocationsTransferConfigsGetResource

425397 :<|> ProjectsLocationsTransferConfigsCreateResource

gogol-bigquerydatatransfer/gen/Network/Google/BigQueryDataTransfer/Types.hs+13−30

@@ -40,28 +40,22 @@ module Network.Google.BigQueryDataTransfer.Types

4040 , llrNextPageToken

4141 , llrLocations

4242

43− -- * TimeRange

44− , TimeRange

45− , timeRange

46− , trStartTime

47− , trEndTime

48−

4943 -- * TransferRun

5044 , TransferRun

5145 , transferRun

52− , tRunTime

53− , tErrorStatus

54− , tState

55− , tSchedule

56− , tStartTime

57− , tScheduleTime

58− , tDataSourceId

59− , tParams

60− , tUserId

61− , tUpdateTime

62− , tName

63− , tEndTime

64− , tDestinationDataSetId

46+ , trRunTime

47+ , trErrorStatus

48+ , trState

49+ , trSchedule

50+ , trStartTime

51+ , trScheduleTime

52+ , trDataSourceId

53+ , trParams

54+ , trUserId

55+ , trUpdateTime

56+ , trName

57+ , trEndTime

58+ , trDestinationDataSetId

6559

6660 -- * CheckValidCredsRequest

6761 , CheckValidCredsRequest

@@ -158,12 +152,6 @@ module Network.Google.BigQueryDataTransfer.Types

158152 , ldsrNextPageToken

159153 , ldsrDataSources

160154

161− -- * StartManualTransferRunsRequest

162− , StartManualTransferRunsRequest

163− , startManualTransferRunsRequest

164− , smtrrRequestedRunTime

165− , smtrrRequestedTimeRange

166−

167155 -- * Xgafv

168156 , Xgafv (..)

169157

@@ -210,11 +198,6 @@ module Network.Google.BigQueryDataTransfer.Types

210198 , locationLabels

211199 , llAddtional

212200

213− -- * StartManualTransferRunsResponse

214− , StartManualTransferRunsResponse

215− , startManualTransferRunsResponse

216− , smtrrRuns

217−

218201 -- * LocationMetadata

219202 , LocationMetadata

220203 , locationMetadata

gogol-bigquerydatatransfer/gen/Network/Google/BigQueryDataTransfer/Types/Product.hs+93−243

@@ -168,80 +168,24 @@ instance ToJSON ListLocationsResponse where

168168 [("nextPageToken" .=) <$> _llrNextPageToken,

169169 ("locations" .=) <$> _llrLocations])

170170

171−-- | A specification for a time range, this will request transfer runs with

172−-- run_time between start_time (inclusive) and end_time (exclusive).

173−--

174−-- /See:/ 'timeRange' smart constructor.

175−data TimeRange =

176− TimeRange'

177− { _trStartTime :: !(Maybe DateTime')

178− , _trEndTime :: !(Maybe DateTime')

179− }

180− deriving (Eq, Show, Data, Typeable, Generic)

181−

182−

183−-- | Creates a value of 'TimeRange' with the minimum fields required to make a request.

184−--

185−-- Use one of the following lenses to modify other fields as desired:

186−--

187−-- * 'trStartTime'

188−--

189−-- * 'trEndTime'

190−timeRange

191− :: TimeRange

192−timeRange = TimeRange' {_trStartTime = Nothing, _trEndTime = Nothing}

193−

194−

195−-- | Start time of the range of transfer runs. For example,

196−-- \`\"2017-05-25T00:00:00+00:00\"\`. The start_time must be strictly less

197−-- than the end_time. Creates transfer runs where run_time is in the range

198−-- betwen start_time (inclusive) and end_time (exlusive).

199−trStartTime :: Lens' TimeRange (Maybe UTCTime)

200−trStartTime

201− = lens _trStartTime (\ s a -> s{_trStartTime = a}) .

202− mapping _DateTime

203−

204−-- | End time of the range of transfer runs. For example,

205−-- \`\"2017-05-30T00:00:00+00:00\"\`. The end_time must not be in the

206−-- future. Creates transfer runs where run_time is in the range betwen

207−-- start_time (inclusive) and end_time (exlusive).

208−trEndTime :: Lens' TimeRange (Maybe UTCTime)

209−trEndTime

210− = lens _trEndTime (\ s a -> s{_trEndTime = a}) .

211− mapping _DateTime

212−

213−instance FromJSON TimeRange where

214− parseJSON

215− = withObject "TimeRange"

216− (\ o ->

217− TimeRange' <$>

218− (o .:? "startTime") <*> (o .:? "endTime"))

219−

220−instance ToJSON TimeRange where

221− toJSON TimeRange'{..}

222− = object

223− (catMaybes

224− [("startTime" .=) <$> _trStartTime,

225− ("endTime" .=) <$> _trEndTime])

226−

227171-- | Represents a data transfer run.

228172--

229173-- /See:/ 'transferRun' smart constructor.

230174data TransferRun =

231175 TransferRun'

232− { _tRunTime :: !(Maybe DateTime')

233− , _tErrorStatus :: !(Maybe Status)

234− , _tState :: !(Maybe TransferRunState)

235− , _tSchedule :: !(Maybe Text)

236− , _tStartTime :: !(Maybe DateTime')

237− , _tScheduleTime :: !(Maybe DateTime')

238− , _tDataSourceId :: !(Maybe Text)

239− , _tParams :: !(Maybe TransferRunParams)

240− , _tUserId :: !(Maybe (Textual Int64))

241− , _tUpdateTime :: !(Maybe DateTime')

242− , _tName :: !(Maybe Text)

243− , _tEndTime :: !(Maybe DateTime')

244− , _tDestinationDataSetId :: !(Maybe Text)

176+ { _trRunTime :: !(Maybe DateTime')

177+ , _trErrorStatus :: !(Maybe Status)

178+ , _trState :: !(Maybe TransferRunState)

179+ , _trSchedule :: !(Maybe Text)

180+ , _trStartTime :: !(Maybe DateTime')

181+ , _trScheduleTime :: !(Maybe DateTime')

182+ , _trDataSourceId :: !(Maybe Text)

183+ , _trParams :: !(Maybe TransferRunParams)

184+ , _trUserId :: !(Maybe (Textual Int64))

185+ , _trUpdateTime :: !(Maybe DateTime')

186+ , _trName :: !(Maybe Text)

187+ , _trEndTime :: !(Maybe DateTime')

188+ , _trDestinationDataSetId :: !(Maybe Text)

245189 }

246190 deriving (Eq, Show, Data, Typeable, Generic)

247191

@@ -250,130 +194,131 @@ data TransferRun =

250194--

251195-- Use one of the following lenses to modify other fields as desired:

252196--

253−-- * 'tRunTime'

197+-- * 'trRunTime'

254198--

255−-- * 'tErrorStatus'

199+-- * 'trErrorStatus'

256200--

257−-- * 'tState'

201+-- * 'trState'

258202--

259−-- * 'tSchedule'

203+-- * 'trSchedule'

260204--

261−-- * 'tStartTime'

205+-- * 'trStartTime'

262206--

263−-- * 'tScheduleTime'

207+-- * 'trScheduleTime'

264208--

265−-- * 'tDataSourceId'

209+-- * 'trDataSourceId'

266210--

267−-- * 'tParams'

211+-- * 'trParams'

268212--

269−-- * 'tUserId'

213+-- * 'trUserId'

270214--

271−-- * 'tUpdateTime'

215+-- * 'trUpdateTime'

272216--

273−-- * 'tName'

217+-- * 'trName'

274218--

275−-- * 'tEndTime'

219+-- * 'trEndTime'

276220--

277−-- * 'tDestinationDataSetId'

221+-- * 'trDestinationDataSetId'

278222transferRun

279223 :: TransferRun

280224transferRun =

281225 TransferRun'

282− { _tRunTime = Nothing

283− , _tErrorStatus = Nothing

284− , _tState = Nothing

285− , _tSchedule = Nothing

286− , _tStartTime = Nothing

287− , _tScheduleTime = Nothing

288− , _tDataSourceId = Nothing

289− , _tParams = Nothing

290− , _tUserId = Nothing

291− , _tUpdateTime = Nothing

292− , _tName = Nothing

293− , _tEndTime = Nothing

294− , _tDestinationDataSetId = Nothing

226+ { _trRunTime = Nothing

227+ , _trErrorStatus = Nothing

228+ , _trState = Nothing

229+ , _trSchedule = Nothing

230+ , _trStartTime = Nothing

231+ , _trScheduleTime = Nothing

232+ , _trDataSourceId = Nothing

233+ , _trParams = Nothing

234+ , _trUserId = Nothing

235+ , _trUpdateTime = Nothing

236+ , _trName = Nothing

237+ , _trEndTime = Nothing

238+ , _trDestinationDataSetId = Nothing

295239 }

296240

297241

298242-- | For batch transfer runs, specifies the date and time that data should be

299243-- ingested.

300−tRunTime :: Lens' TransferRun (Maybe UTCTime)

301−tRunTime

302− = lens _tRunTime (\ s a -> s{_tRunTime = a}) .

244+trRunTime :: Lens' TransferRun (Maybe UTCTime)

245+trRunTime

246+ = lens _trRunTime (\ s a -> s{_trRunTime = a}) .

303247 mapping _DateTime

304248

305249-- | Status of the transfer run.

306−tErrorStatus :: Lens' TransferRun (Maybe Status)

307−tErrorStatus

308− = lens _tErrorStatus (\ s a -> s{_tErrorStatus = a})

250+trErrorStatus :: Lens' TransferRun (Maybe Status)

251+trErrorStatus

252+ = lens _trErrorStatus

253+ (\ s a -> s{_trErrorStatus = a})

309254

310255-- | Data transfer run state. Ignored for input requests.

311−tState :: Lens' TransferRun (Maybe TransferRunState)

312−tState = lens _tState (\ s a -> s{_tState = a})

256+trState :: Lens' TransferRun (Maybe TransferRunState)

257+trState = lens _trState (\ s a -> s{_trState = a})

313258

314259-- | Output only. Describes the schedule of this transfer run if it was

315260-- created as part of a regular schedule. For batch transfer runs that are

316261-- scheduled manually, this is empty. NOTE: the system might choose to

317262-- delay the schedule depending on the current load, so \`schedule_time\`

318263-- doesn\'t always match this.

319−tSchedule :: Lens' TransferRun (Maybe Text)

320−tSchedule

321− = lens _tSchedule (\ s a -> s{_tSchedule = a})

264+trSchedule :: Lens' TransferRun (Maybe Text)

265+trSchedule

266+ = lens _trSchedule (\ s a -> s{_trSchedule = a})

322267

323268-- | Output only. Time when transfer run was started. Parameter ignored by

324269-- server for input requests.

325−tStartTime :: Lens' TransferRun (Maybe UTCTime)

326−tStartTime

327− = lens _tStartTime (\ s a -> s{_tStartTime = a}) .

270+trStartTime :: Lens' TransferRun (Maybe UTCTime)

271+trStartTime

272+ = lens _trStartTime (\ s a -> s{_trStartTime = a}) .

328273 mapping _DateTime

329274

330275-- | Minimum time after which a transfer run can be started.

331−tScheduleTime :: Lens' TransferRun (Maybe UTCTime)

332−tScheduleTime

333− = lens _tScheduleTime

334− (\ s a -> s{_tScheduleTime = a})

276+trScheduleTime :: Lens' TransferRun (Maybe UTCTime)

277+trScheduleTime

278+ = lens _trScheduleTime

279+ (\ s a -> s{_trScheduleTime = a})

335280 . mapping _DateTime

336281

337282-- | Output only. Data source id.

338−tDataSourceId :: Lens' TransferRun (Maybe Text)

339−tDataSourceId

340− = lens _tDataSourceId

341− (\ s a -> s{_tDataSourceId = a})

283+trDataSourceId :: Lens' TransferRun (Maybe Text)

284+trDataSourceId

285+ = lens _trDataSourceId

286+ (\ s a -> s{_trDataSourceId = a})

342287

343288-- | Output only. Data transfer specific parameters.

344−tParams :: Lens' TransferRun (Maybe TransferRunParams)

345−tParams = lens _tParams (\ s a -> s{_tParams = a})

289+trParams :: Lens' TransferRun (Maybe TransferRunParams)

290+trParams = lens _trParams (\ s a -> s{_trParams = a})

346291

347292-- | Deprecated. Unique ID of the user on whose behalf transfer is done.

348−tUserId :: Lens' TransferRun (Maybe Int64)

349−tUserId

350− = lens _tUserId (\ s a -> s{_tUserId = a}) .

293+trUserId :: Lens' TransferRun (Maybe Int64)

294+trUserId

295+ = lens _trUserId (\ s a -> s{_trUserId = a}) .

351296 mapping _Coerce

352297

353298-- | Output only. Last time the data transfer run state was updated.

354−tUpdateTime :: Lens' TransferRun (Maybe UTCTime)

355−tUpdateTime

356− = lens _tUpdateTime (\ s a -> s{_tUpdateTime = a}) .

357− mapping _DateTime

299+trUpdateTime :: Lens' TransferRun (Maybe UTCTime)

300+trUpdateTime

301+ = lens _trUpdateTime (\ s a -> s{_trUpdateTime = a})

302+ . mapping _DateTime

358303

359304-- | The resource name of the transfer run. Transfer run names have the form

360305-- \`projects\/{project_id}\/locations\/{location}\/transferConfigs\/{config_id}\/runs\/{run_id}\`.

361306-- The name is ignored when creating a transfer run.

362−tName :: Lens' TransferRun (Maybe Text)

363−tName = lens _tName (\ s a -> s{_tName = a})

307+trName :: Lens' TransferRun (Maybe Text)

308+trName = lens _trName (\ s a -> s{_trName = a})

364309

365310-- | Output only. Time when transfer run ended. Parameter ignored by server

366311-- for input requests.

367−tEndTime :: Lens' TransferRun (Maybe UTCTime)

368−tEndTime

369− = lens _tEndTime (\ s a -> s{_tEndTime = a}) .

312+trEndTime :: Lens' TransferRun (Maybe UTCTime)

313+trEndTime

314+ = lens _trEndTime (\ s a -> s{_trEndTime = a}) .

370315 mapping _DateTime

371316

372317-- | Output only. The BigQuery target dataset id.

373−tDestinationDataSetId :: Lens' TransferRun (Maybe Text)

374−tDestinationDataSetId

375− = lens _tDestinationDataSetId

376− (\ s a -> s{_tDestinationDataSetId = a})

318+trDestinationDataSetId :: Lens' TransferRun (Maybe Text)

319+trDestinationDataSetId

320+ = lens _trDestinationDataSetId

321+ (\ s a -> s{_trDestinationDataSetId = a})

377322

378323instance FromJSON TransferRun where

379324 parseJSON

@@ -397,19 +342,20 @@ instance ToJSON TransferRun where

397342 toJSON TransferRun'{..}

398343 = object

399344 (catMaybes

400− [("runTime" .=) <$> _tRunTime,

401− ("errorStatus" .=) <$> _tErrorStatus,

402− ("state" .=) <$> _tState,

403− ("schedule" .=) <$> _tSchedule,

404− ("startTime" .=) <$> _tStartTime,

405− ("scheduleTime" .=) <$> _tScheduleTime,

406− ("dataSourceId" .=) <$> _tDataSourceId,

407− ("params" .=) <$> _tParams,

408− ("userId" .=) <$> _tUserId,

409− ("updateTime" .=) <$> _tUpdateTime,

410− ("name" .=) <$> _tName, ("endTime" .=) <$> _tEndTime,

345+ [("runTime" .=) <$> _trRunTime,

346+ ("errorStatus" .=) <$> _trErrorStatus,

347+ ("state" .=) <$> _trState,

348+ ("schedule" .=) <$> _trSchedule,

349+ ("startTime" .=) <$> _trStartTime,

350+ ("scheduleTime" .=) <$> _trScheduleTime,

351+ ("dataSourceId" .=) <$> _trDataSourceId,

352+ ("params" .=) <$> _trParams,

353+ ("userId" .=) <$> _trUserId,

354+ ("updateTime" .=) <$> _trUpdateTime,

355+ ("name" .=) <$> _trName,

356+ ("endTime" .=) <$> _trEndTime,

411357 ("destinationDatasetId" .=) <$>

412− _tDestinationDataSetId])

358+ _trDestinationDataSetId])

413359

414360-- | A request to determine whether the user has valid credentials. This

415361-- method is used to limit the number of OAuth popups in the user

@@ -1190,62 +1136,6 @@ instance ToJSON ListDataSourcesResponse where

11901136 [("nextPageToken" .=) <$> _ldsrNextPageToken,

11911137 ("dataSources" .=) <$> _ldsrDataSources])

11921138

1193−-- | A request to start manual transfer runs.

1194−--

1195−-- /See:/ 'startManualTransferRunsRequest' smart constructor.

1196−data StartManualTransferRunsRequest =

1197− StartManualTransferRunsRequest'

1198− { _smtrrRequestedRunTime :: !(Maybe DateTime')

1199− , _smtrrRequestedTimeRange :: !(Maybe TimeRange)

1200− }

1201− deriving (Eq, Show, Data, Typeable, Generic)

1202−

1203−

1204−-- | Creates a value of 'StartManualTransferRunsRequest' with the minimum fields required to make a request.

1205−--

1206−-- Use one of the following lenses to modify other fields as desired:

1207−--

1208−-- * 'smtrrRequestedRunTime'

1209−--

1210−-- * 'smtrrRequestedTimeRange'

1211−startManualTransferRunsRequest

1212− :: StartManualTransferRunsRequest

1213−startManualTransferRunsRequest =

1214− StartManualTransferRunsRequest'

1215− {_smtrrRequestedRunTime = Nothing, _smtrrRequestedTimeRange = Nothing}

1216−

1217−

1218−-- | Specific run_time for a transfer run to be started. The

1219−-- requested_run_time must not be in the future.

1220−smtrrRequestedRunTime :: Lens' StartManualTransferRunsRequest (Maybe UTCTime)

1221−smtrrRequestedRunTime

1222− = lens _smtrrRequestedRunTime

1223− (\ s a -> s{_smtrrRequestedRunTime = a})

1224− . mapping _DateTime

1225−

1226−-- | Time range for the transfer runs that should be started.

1227−smtrrRequestedTimeRange :: Lens' StartManualTransferRunsRequest (Maybe TimeRange)

1228−smtrrRequestedTimeRange

1229− = lens _smtrrRequestedTimeRange

1230− (\ s a -> s{_smtrrRequestedTimeRange = a})

1231−

1232−instance FromJSON StartManualTransferRunsRequest

1233− where

1234− parseJSON

1235− = withObject "StartManualTransferRunsRequest"

1236− (\ o ->

1237− StartManualTransferRunsRequest' <$>

1238− (o .:? "requestedRunTime") <*>

1239− (o .:? "requestedTimeRange"))

1240−

1241−instance ToJSON StartManualTransferRunsRequest where

1242− toJSON StartManualTransferRunsRequest'{..}

1243− = object

1244− (catMaybes

1245− [("requestedRunTime" .=) <$> _smtrrRequestedRunTime,

1246− ("requestedTimeRange" .=) <$>

1247− _smtrrRequestedTimeRange])

1248−

12491139-- | Represents data source metadata. Metadata is sufficient to render UI and

12501140-- request proper OAuth tokens.

12511141--

@@ -1664,46 +1554,6 @@ instance FromJSON LocationLabels where

16641554instance ToJSON LocationLabels where

16651555 toJSON = toJSON . _llAddtional

16661556

1667−-- | A response to start manual transfer runs.

1668−--

1669−-- /See:/ 'startManualTransferRunsResponse' smart constructor.

1670−newtype StartManualTransferRunsResponse =

1671− StartManualTransferRunsResponse'

1672− { _smtrrRuns :: Maybe [TransferRun]

1673− }

1674− deriving (Eq, Show, Data, Typeable, Generic)

1675−

1676−

1677−-- | Creates a value of 'StartManualTransferRunsResponse' with the minimum fields required to make a request.

1678−--

1679−-- Use one of the following lenses to modify other fields as desired:

1680−--

1681−-- * 'smtrrRuns'

1682−startManualTransferRunsResponse

1683− :: StartManualTransferRunsResponse

1684−startManualTransferRunsResponse =

1685− StartManualTransferRunsResponse' {_smtrrRuns = Nothing}

1686−

1687−

1688−-- | The transfer runs that were created.

1689−smtrrRuns :: Lens' StartManualTransferRunsResponse [TransferRun]

1690−smtrrRuns

1691− = lens _smtrrRuns (\ s a -> s{_smtrrRuns = a}) .

1692− _Default

1693− . _Coerce

1694−

1695−instance FromJSON StartManualTransferRunsResponse

1696− where

1697− parseJSON

1698− = withObject "StartManualTransferRunsResponse"

1699− (\ o ->

1700− StartManualTransferRunsResponse' <$>

1701− (o .:? "runs" .!= mempty))

1702−

1703−instance ToJSON StartManualTransferRunsResponse where

1704− toJSON StartManualTransferRunsResponse'{..}

1705− = object (catMaybes [("runs" .=) <$> _smtrrRuns])

1706−

17071557-- | Service-specific metadata. For example the available capacity at the

17081558-- given location.

17091559--

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Create.hs+4−22

@@ -40,7 +40,6 @@ module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferC

4040 , pltccUploadType

4141 , pltccAuthorizationCode

4242 , pltccPayload

43− , pltccVersionInfo

4443 , pltccCallback

4544 ) where

4645

@@ -58,11 +57,10 @@ type ProjectsLocationsTransferConfigsCreateResource =

5857 QueryParam "access_token" Text :>

5958 QueryParam "uploadType" Text :>

6059 QueryParam "authorizationCode" Text :>

61− QueryParam "versionInfo" Text :>

62− QueryParam "callback" Text :>

63− QueryParam "alt" AltJSON :>

64− ReqBody '[JSON] TransferConfig :>

65− Post '[JSON] TransferConfig

60+ QueryParam "callback" Text :>

61+ QueryParam "alt" AltJSON :>

62+ ReqBody '[JSON] TransferConfig :>

63+ Post '[JSON] TransferConfig

6664

6765-- | Creates a new data transfer configuration.

6866--

@@ -76,7 +74,6 @@ data ProjectsLocationsTransferConfigsCreate =

7674 , _pltccUploadType :: !(Maybe Text)

7775 , _pltccAuthorizationCode :: !(Maybe Text)

7876 , _pltccPayload :: !TransferConfig

79− , _pltccVersionInfo :: !(Maybe Text)

8077 , _pltccCallback :: !(Maybe Text)

8178 }

8279 deriving (Eq, Show, Data, Typeable, Generic)

@@ -100,8 +97,6 @@ data ProjectsLocationsTransferConfigsCreate =

10097--

10198-- * 'pltccPayload'

10299--

103−-- * 'pltccVersionInfo'

104−--

105100-- * 'pltccCallback'

106101projectsLocationsTransferConfigsCreate

107102 :: Text -- ^ 'pltccParent'

@@ -116,7 +111,6 @@ projectsLocationsTransferConfigsCreate pPltccParent_ pPltccPayload_ =

116111 , _pltccUploadType = Nothing

117112 , _pltccAuthorizationCode = Nothing

118113 , _pltccPayload = pPltccPayload_

119− , _pltccVersionInfo = Nothing

120114 , _pltccCallback = Nothing

121115 }

122116

@@ -177,17 +171,6 @@ pltccPayload :: Lens' ProjectsLocationsTransferConfigsCreate TransferConfig

177171pltccPayload

178172 = lens _pltccPayload (\ s a -> s{_pltccPayload = a})

179173

180−-- | Optional version info. If users want to find a very recent access token,

181−-- that is, immediately after approving access, users have to set the

182−-- version_info claim in the token request. To obtain the version_info,

183−-- users must use the “none+gsession” response type. which be return a

184−-- version_info back in the authorization response which be be put in a JWT

185−-- claim in the token request.

186−pltccVersionInfo :: Lens' ProjectsLocationsTransferConfigsCreate (Maybe Text)

187−pltccVersionInfo

188− = lens _pltccVersionInfo

189− (\ s a -> s{_pltccVersionInfo = a})

190−

191174-- | JSONP

192175pltccCallback :: Lens' ProjectsLocationsTransferConfigsCreate (Maybe Text)

193176pltccCallback

@@ -207,7 +190,6 @@ instance GoogleRequest

207190 _pltccAccessToken

208191 _pltccUploadType

209192 _pltccAuthorizationCode

210− _pltccVersionInfo

211193 _pltccCallback

212194 (Just AltJSON)

213195 _pltccPayload

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Patch.hs+4−22

@@ -41,7 +41,6 @@ module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferC

4141 , pltcpUploadType

4242 , pltcpAuthorizationCode

4343 , pltcpPayload

44− , pltcpVersionInfo

4544 , pltcpName

4645 , pltcpCallback

4746 ) where

@@ -60,11 +59,10 @@ type ProjectsLocationsTransferConfigsPatchResource =

6059 QueryParam "access_token" Text :>

6160 QueryParam "uploadType" Text :>

6261 QueryParam "authorizationCode" Text :>

63− QueryParam "versionInfo" Text :>

64− QueryParam "callback" Text :>

65− QueryParam "alt" AltJSON :>

66− ReqBody '[JSON] TransferConfig :>

67− Patch '[JSON] TransferConfig

62+ QueryParam "callback" Text :>

63+ QueryParam "alt" AltJSON :>

64+ ReqBody '[JSON] TransferConfig :>

65+ Patch '[JSON] TransferConfig

6866

6967-- | Updates a data transfer configuration. All fields must be set, even if

7068-- they are not updated.

@@ -79,7 +77,6 @@ data ProjectsLocationsTransferConfigsPatch =

7977 , _pltcpUploadType :: !(Maybe Text)

8078 , _pltcpAuthorizationCode :: !(Maybe Text)

8179 , _pltcpPayload :: !TransferConfig

82− , _pltcpVersionInfo :: !(Maybe Text)

8380 , _pltcpName :: !Text

8481 , _pltcpCallback :: !(Maybe Text)

8582 }

@@ -104,8 +101,6 @@ data ProjectsLocationsTransferConfigsPatch =

104101--

105102-- * 'pltcpPayload'

106103--

107−-- * 'pltcpVersionInfo'

108−--

109104-- * 'pltcpName'

110105--

111106-- * 'pltcpCallback'

@@ -122,7 +117,6 @@ projectsLocationsTransferConfigsPatch pPltcpPayload_ pPltcpName_ =

122117 , _pltcpUploadType = Nothing

123118 , _pltcpAuthorizationCode = Nothing

124119 , _pltcpPayload = pPltcpPayload_

125− , _pltcpVersionInfo = Nothing

126120 , _pltcpName = pPltcpName_

127121 , _pltcpCallback = Nothing

128122 }

@@ -181,17 +175,6 @@ pltcpPayload :: Lens' ProjectsLocationsTransferConfigsPatch TransferConfig

181175pltcpPayload

182176 = lens _pltcpPayload (\ s a -> s{_pltcpPayload = a})

183177

184−-- | Optional version info. If users want to find a very recent access token,

185−-- that is, immediately after approving access, users have to set the

186−-- version_info claim in the token request. To obtain the version_info,

187−-- users must use the “none+gsession” response type. which be return a

188−-- version_info back in the authorization response which be be put in a JWT

189−-- claim in the token request.

190−pltcpVersionInfo :: Lens' ProjectsLocationsTransferConfigsPatch (Maybe Text)

191−pltcpVersionInfo

192− = lens _pltcpVersionInfo

193− (\ s a -> s{_pltcpVersionInfo = a})

194−

195178-- | The resource name of the transfer config. Transfer config names have the

196179-- form of

197180-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

@@ -223,7 +206,6 @@ instance GoogleRequest

223206 _pltcpAccessToken

224207 _pltcpUploadType

225208 _pltcpAuthorizationCode

226− _pltcpVersionInfo

227209 _pltcpCallback

228210 (Just AltJSON)

229211 _pltcpPayload

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/ScheduleRuns.hs+2−2

@@ -23,7 +23,7 @@

2323-- Creates transfer runs for a time range [start_time, end_time]. For each

2424-- date - or whatever granularity the data source supports - in the range,

2525-- one transfer run is created. Note that runs are created per UTC time in

26−-- the time range. DEPRECATED: use StartManualTransferRuns instead.

26+-- the time range.

2727--

2828-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.locations.transferConfigs.scheduleRuns@.

2929module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

@@ -66,7 +66,7 @@ type ProjectsLocationsTransferConfigsScheduleRunsResource

6666-- | Creates transfer runs for a time range [start_time, end_time]. For each

6767-- date - or whatever granularity the data source supports - in the range,

6868-- one transfer run is created. Note that runs are created per UTC time in

69−-- the time range. DEPRECATED: use StartManualTransferRuns instead.

69+-- the time range.

7070--

7171-- /See:/ 'projectsLocationsTransferConfigsScheduleRuns' smart constructor.

7272data ProjectsLocationsTransferConfigsScheduleRuns =

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/StartManualRuns.hsdeleted−186

@@ -1,186 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Start manual transfer runs to be executed now with schedule_time equal

24−-- to current time. The transfer runs can be created for a time range where

25−-- the run_time is between start_time (inclusive) and end_time (exclusive),

26−-- or for a specific run_time.

27−--

28−-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.locations.transferConfigs.startManualRuns@.

29−module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns

30− (

31− -- * REST Resource

32− ProjectsLocationsTransferConfigsStartManualRunsResource

33−

34− -- * Creating a Request

35− , projectsLocationsTransferConfigsStartManualRuns

36− , ProjectsLocationsTransferConfigsStartManualRuns

37−

38− -- * Request Lenses

39− , pltcsmrParent

40− , pltcsmrXgafv

41− , pltcsmrUploadProtocol

42− , pltcsmrAccessToken

43− , pltcsmrUploadType

44− , pltcsmrPayload

45− , pltcsmrCallback

46− ) where

47−

48−import Network.Google.BigQueryDataTransfer.Types

49−import Network.Google.Prelude

50−

51−-- | A resource alias for @bigquerydatatransfer.projects.locations.transferConfigs.startManualRuns@ method which the

52−-- 'ProjectsLocationsTransferConfigsStartManualRuns' request conforms to.

53−type ProjectsLocationsTransferConfigsStartManualRunsResource

54− =

55− "v1" :>

56− CaptureMode "parent" "startManualRuns" Text :>

57− QueryParam "$.xgafv" Xgafv :>

58− QueryParam "upload_protocol" Text :>

59− QueryParam "access_token" Text :>

60− QueryParam "uploadType" Text :>

61− QueryParam "callback" Text :>

62− QueryParam "alt" AltJSON :>

63− ReqBody '[JSON] StartManualTransferRunsRequest :>

64− Post '[JSON] StartManualTransferRunsResponse

65−

66−-- | Start manual transfer runs to be executed now with schedule_time equal

67−-- to current time. The transfer runs can be created for a time range where

68−-- the run_time is between start_time (inclusive) and end_time (exclusive),

69−-- or for a specific run_time.

70−--

71−-- /See:/ 'projectsLocationsTransferConfigsStartManualRuns' smart constructor.

72−data ProjectsLocationsTransferConfigsStartManualRuns =

73− ProjectsLocationsTransferConfigsStartManualRuns'

74− { _pltcsmrParent :: !Text

75− , _pltcsmrXgafv :: !(Maybe Xgafv)

76− , _pltcsmrUploadProtocol :: !(Maybe Text)

77− , _pltcsmrAccessToken :: !(Maybe Text)

78− , _pltcsmrUploadType :: !(Maybe Text)

79− , _pltcsmrPayload :: !StartManualTransferRunsRequest

80− , _pltcsmrCallback :: !(Maybe Text)

81− }

82− deriving (Eq, Show, Data, Typeable, Generic)

83−

84−

85−-- | Creates a value of 'ProjectsLocationsTransferConfigsStartManualRuns' with the minimum fields required to make a request.

86−--

87−-- Use one of the following lenses to modify other fields as desired:

88−--

89−-- * 'pltcsmrParent'

90−--

91−-- * 'pltcsmrXgafv'

92−--

93−-- * 'pltcsmrUploadProtocol'

94−--

95−-- * 'pltcsmrAccessToken'

96−--

97−-- * 'pltcsmrUploadType'

98−--

99−-- * 'pltcsmrPayload'

100−--

101−-- * 'pltcsmrCallback'

102−projectsLocationsTransferConfigsStartManualRuns

103− :: Text -- ^ 'pltcsmrParent'

104− -> StartManualTransferRunsRequest -- ^ 'pltcsmrPayload'

105− -> ProjectsLocationsTransferConfigsStartManualRuns

106−projectsLocationsTransferConfigsStartManualRuns pPltcsmrParent_ pPltcsmrPayload_ =

107− ProjectsLocationsTransferConfigsStartManualRuns'

108− { _pltcsmrParent = pPltcsmrParent_

109− , _pltcsmrXgafv = Nothing

110− , _pltcsmrUploadProtocol = Nothing

111− , _pltcsmrAccessToken = Nothing

112− , _pltcsmrUploadType = Nothing

113− , _pltcsmrPayload = pPltcsmrPayload_

114− , _pltcsmrCallback = Nothing

115− }

116−

117−

118−-- | Transfer configuration name in the form:

119−-- \`projects\/{project_id}\/transferConfigs\/{config_id}\`.

120−pltcsmrParent :: Lens' ProjectsLocationsTransferConfigsStartManualRuns Text

121−pltcsmrParent

122− = lens _pltcsmrParent

123− (\ s a -> s{_pltcsmrParent = a})

124−

125−-- | V1 error format.

126−pltcsmrXgafv :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Xgafv)

127−pltcsmrXgafv

128− = lens _pltcsmrXgafv (\ s a -> s{_pltcsmrXgafv = a})

129−

130−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

131−pltcsmrUploadProtocol :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Text)

132−pltcsmrUploadProtocol

133− = lens _pltcsmrUploadProtocol

134− (\ s a -> s{_pltcsmrUploadProtocol = a})

135−

136−-- | OAuth access token.

137−pltcsmrAccessToken :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Text)

138−pltcsmrAccessToken

139− = lens _pltcsmrAccessToken

140− (\ s a -> s{_pltcsmrAccessToken = a})

141−

142−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

143−pltcsmrUploadType :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Text)

144−pltcsmrUploadType

145− = lens _pltcsmrUploadType

146− (\ s a -> s{_pltcsmrUploadType = a})

147−

148−-- | Multipart request metadata.

149−pltcsmrPayload :: Lens' ProjectsLocationsTransferConfigsStartManualRuns StartManualTransferRunsRequest

150−pltcsmrPayload

151− = lens _pltcsmrPayload

152− (\ s a -> s{_pltcsmrPayload = a})

153−

154−-- | JSONP

155−pltcsmrCallback :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Text)

156−pltcsmrCallback

157− = lens _pltcsmrCallback

158− (\ s a -> s{_pltcsmrCallback = a})

159−

160−instance GoogleRequest

161− ProjectsLocationsTransferConfigsStartManualRuns

162− where

163− type Rs

164− ProjectsLocationsTransferConfigsStartManualRuns

165− = StartManualTransferRunsResponse

166− type Scopes

167− ProjectsLocationsTransferConfigsStartManualRuns

168− =

169− '["https://www.googleapis.com/auth/bigquery",

170− "https://www.googleapis.com/auth/cloud-platform"]

171− requestClient

172− ProjectsLocationsTransferConfigsStartManualRuns'{..}

173− = go _pltcsmrParent _pltcsmrXgafv

174− _pltcsmrUploadProtocol

175− _pltcsmrAccessToken

176− _pltcsmrUploadType

177− _pltcsmrCallback

178− (Just AltJSON)

179− _pltcsmrPayload

180− bigQueryDataTransferService

181− where go

182− = buildClient

183− (Proxy ::

184− Proxy

185− ProjectsLocationsTransferConfigsStartManualRunsResource)

186− mempty

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Create.hs+4−22

@@ -40,7 +40,6 @@ module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Cre

4040 , ptccUploadType

4141 , ptccAuthorizationCode

4242 , ptccPayload

43− , ptccVersionInfo

4443 , ptccCallback

4544 ) where

4645

@@ -58,11 +57,10 @@ type ProjectsTransferConfigsCreateResource =

5857 QueryParam "access_token" Text :>

5958 QueryParam "uploadType" Text :>

6059 QueryParam "authorizationCode" Text :>

61− QueryParam "versionInfo" Text :>

62− QueryParam "callback" Text :>

63− QueryParam "alt" AltJSON :>

64− ReqBody '[JSON] TransferConfig :>

65− Post '[JSON] TransferConfig

60+ QueryParam "callback" Text :>

61+ QueryParam "alt" AltJSON :>

62+ ReqBody '[JSON] TransferConfig :>

63+ Post '[JSON] TransferConfig

6664

6765-- | Creates a new data transfer configuration.

6866--

@@ -76,7 +74,6 @@ data ProjectsTransferConfigsCreate =

7674 , _ptccUploadType :: !(Maybe Text)

7775 , _ptccAuthorizationCode :: !(Maybe Text)

7876 , _ptccPayload :: !TransferConfig

79− , _ptccVersionInfo :: !(Maybe Text)

8077 , _ptccCallback :: !(Maybe Text)

8178 }

8279 deriving (Eq, Show, Data, Typeable, Generic)

@@ -100,8 +97,6 @@ data ProjectsTransferConfigsCreate =

10097--

10198-- * 'ptccPayload'

10299--

103−-- * 'ptccVersionInfo'

104−--

105100-- * 'ptccCallback'

106101projectsTransferConfigsCreate

107102 :: Text -- ^ 'ptccParent'

@@ -116,7 +111,6 @@ projectsTransferConfigsCreate pPtccParent_ pPtccPayload_ =

116111 , _ptccUploadType = Nothing

117112 , _ptccAuthorizationCode = Nothing

118113 , _ptccPayload = pPtccPayload_

119− , _ptccVersionInfo = Nothing

120114 , _ptccCallback = Nothing

121115 }

122116

@@ -177,17 +171,6 @@ ptccPayload :: Lens' ProjectsTransferConfigsCreate TransferConfig

177171ptccPayload

178172 = lens _ptccPayload (\ s a -> s{_ptccPayload = a})

179173

180−-- | Optional version info. If users want to find a very recent access token,

181−-- that is, immediately after approving access, users have to set the

182−-- version_info claim in the token request. To obtain the version_info,

183−-- users must use the “none+gsession” response type. which be return a

184−-- version_info back in the authorization response which be be put in a JWT

185−-- claim in the token request.

186−ptccVersionInfo :: Lens' ProjectsTransferConfigsCreate (Maybe Text)

187−ptccVersionInfo

188− = lens _ptccVersionInfo

189− (\ s a -> s{_ptccVersionInfo = a})

190−

191174-- | JSONP

192175ptccCallback :: Lens' ProjectsTransferConfigsCreate (Maybe Text)

193176ptccCallback

@@ -204,7 +187,6 @@ instance GoogleRequest ProjectsTransferConfigsCreate

204187 _ptccAccessToken

205188 _ptccUploadType

206189 _ptccAuthorizationCode

207− _ptccVersionInfo

208190 _ptccCallback

209191 (Just AltJSON)

210192 _ptccPayload

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Patch.hs+4−22

@@ -41,7 +41,6 @@ module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Pat

4141 , ptcpUploadType

4242 , ptcpAuthorizationCode

4343 , ptcpPayload

44− , ptcpVersionInfo

4544 , ptcpName

4645 , ptcpCallback

4746 ) where

@@ -60,11 +59,10 @@ type ProjectsTransferConfigsPatchResource =

6059 QueryParam "access_token" Text :>

6160 QueryParam "uploadType" Text :>

6261 QueryParam "authorizationCode" Text :>

63− QueryParam "versionInfo" Text :>

64− QueryParam "callback" Text :>

65− QueryParam "alt" AltJSON :>

66− ReqBody '[JSON] TransferConfig :>

67− Patch '[JSON] TransferConfig

62+ QueryParam "callback" Text :>

63+ QueryParam "alt" AltJSON :>

64+ ReqBody '[JSON] TransferConfig :>

65+ Patch '[JSON] TransferConfig

6866

6967-- | Updates a data transfer configuration. All fields must be set, even if

7068-- they are not updated.

@@ -79,7 +77,6 @@ data ProjectsTransferConfigsPatch =

7977 , _ptcpUploadType :: !(Maybe Text)

8078 , _ptcpAuthorizationCode :: !(Maybe Text)

8179 , _ptcpPayload :: !TransferConfig

82− , _ptcpVersionInfo :: !(Maybe Text)

8380 , _ptcpName :: !Text

8481 , _ptcpCallback :: !(Maybe Text)

8582 }

@@ -104,8 +101,6 @@ data ProjectsTransferConfigsPatch =

104101--

105102-- * 'ptcpPayload'

106103--

107−-- * 'ptcpVersionInfo'

108−--

109104-- * 'ptcpName'

110105--

111106-- * 'ptcpCallback'

@@ -122,7 +117,6 @@ projectsTransferConfigsPatch pPtcpPayload_ pPtcpName_ =

122117 , _ptcpUploadType = Nothing

123118 , _ptcpAuthorizationCode = Nothing

124119 , _ptcpPayload = pPtcpPayload_

125− , _ptcpVersionInfo = Nothing

126120 , _ptcpName = pPtcpName_

127121 , _ptcpCallback = Nothing

128122 }

@@ -181,17 +175,6 @@ ptcpPayload :: Lens' ProjectsTransferConfigsPatch TransferConfig

181175ptcpPayload

182176 = lens _ptcpPayload (\ s a -> s{_ptcpPayload = a})

183177

184−-- | Optional version info. If users want to find a very recent access token,

185−-- that is, immediately after approving access, users have to set the

186−-- version_info claim in the token request. To obtain the version_info,

187−-- users must use the “none+gsession” response type. which be return a

188−-- version_info back in the authorization response which be be put in a JWT

189−-- claim in the token request.

190−ptcpVersionInfo :: Lens' ProjectsTransferConfigsPatch (Maybe Text)

191−ptcpVersionInfo

192− = lens _ptcpVersionInfo

193− (\ s a -> s{_ptcpVersionInfo = a})

194−

195178-- | The resource name of the transfer config. Transfer config names have the

196179-- form of

197180-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

@@ -218,7 +201,6 @@ instance GoogleRequest ProjectsTransferConfigsPatch

218201 _ptcpAccessToken

219202 _ptcpUploadType

220203 _ptcpAuthorizationCode

221− _ptcpVersionInfo

222204 _ptcpCallback

223205 (Just AltJSON)

224206 _ptcpPayload

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/ScheduleRuns.hs+2−2

@@ -23,7 +23,7 @@

2323-- Creates transfer runs for a time range [start_time, end_time]. For each

2424-- date - or whatever granularity the data source supports - in the range,

2525-- one transfer run is created. Note that runs are created per UTC time in

26−-- the time range. DEPRECATED: use StartManualTransferRuns instead.

26+-- the time range.

2727--

2828-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.transferConfigs.scheduleRuns@.

2929module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

@@ -65,7 +65,7 @@ type ProjectsTransferConfigsScheduleRunsResource =

6565-- | Creates transfer runs for a time range [start_time, end_time]. For each

6666-- date - or whatever granularity the data source supports - in the range,

6767-- one transfer run is created. Note that runs are created per UTC time in

68−-- the time range. DEPRECATED: use StartManualTransferRuns instead.

68+-- the time range.

6969--

7070-- /See:/ 'projectsTransferConfigsScheduleRuns' smart constructor.

7171data ProjectsTransferConfigsScheduleRuns =

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/StartManualRuns.hsdeleted−179

@@ -1,179 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Start manual transfer runs to be executed now with schedule_time equal

24−-- to current time. The transfer runs can be created for a time range where

25−-- the run_time is between start_time (inclusive) and end_time (exclusive),

26−-- or for a specific run_time.

27−--

28−-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.transferConfigs.startManualRuns@.

29−module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

30− (

31− -- * REST Resource

32− ProjectsTransferConfigsStartManualRunsResource

33−

34− -- * Creating a Request

35− , projectsTransferConfigsStartManualRuns

36− , ProjectsTransferConfigsStartManualRuns

37−

38− -- * Request Lenses

39− , ptcsmrParent

40− , ptcsmrXgafv

41− , ptcsmrUploadProtocol

42− , ptcsmrAccessToken

43− , ptcsmrUploadType

44− , ptcsmrPayload

45− , ptcsmrCallback

46− ) where

47−

48−import Network.Google.BigQueryDataTransfer.Types

49−import Network.Google.Prelude

50−

51−-- | A resource alias for @bigquerydatatransfer.projects.transferConfigs.startManualRuns@ method which the

52−-- 'ProjectsTransferConfigsStartManualRuns' request conforms to.

53−type ProjectsTransferConfigsStartManualRunsResource =

54− "v1" :>

55− CaptureMode "parent" "startManualRuns" Text :>

56− QueryParam "$.xgafv" Xgafv :>

57− QueryParam "upload_protocol" Text :>

58− QueryParam "access_token" Text :>

59− QueryParam "uploadType" Text :>

60− QueryParam "callback" Text :>

61− QueryParam "alt" AltJSON :>

62− ReqBody '[JSON] StartManualTransferRunsRequest :>

63− Post '[JSON] StartManualTransferRunsResponse

64−

65−-- | Start manual transfer runs to be executed now with schedule_time equal

66−-- to current time. The transfer runs can be created for a time range where

67−-- the run_time is between start_time (inclusive) and end_time (exclusive),

68−-- or for a specific run_time.

69−--

70−-- /See:/ 'projectsTransferConfigsStartManualRuns' smart constructor.

71−data ProjectsTransferConfigsStartManualRuns =

72− ProjectsTransferConfigsStartManualRuns'

73− { _ptcsmrParent :: !Text

74− , _ptcsmrXgafv :: !(Maybe Xgafv)

75− , _ptcsmrUploadProtocol :: !(Maybe Text)

76− , _ptcsmrAccessToken :: !(Maybe Text)

77− , _ptcsmrUploadType :: !(Maybe Text)

78− , _ptcsmrPayload :: !StartManualTransferRunsRequest

79− , _ptcsmrCallback :: !(Maybe Text)

80− }

81− deriving (Eq, Show, Data, Typeable, Generic)

82−

83−

84−-- | Creates a value of 'ProjectsTransferConfigsStartManualRuns' with the minimum fields required to make a request.

85−--

86−-- Use one of the following lenses to modify other fields as desired:

87−--

88−-- * 'ptcsmrParent'

89−--

90−-- * 'ptcsmrXgafv'

91−--

92−-- * 'ptcsmrUploadProtocol'

93−--

94−-- * 'ptcsmrAccessToken'

95−--

96−-- * 'ptcsmrUploadType'

97−--

98−-- * 'ptcsmrPayload'

99−--

100−-- * 'ptcsmrCallback'

101−projectsTransferConfigsStartManualRuns

102− :: Text -- ^ 'ptcsmrParent'

103− -> StartManualTransferRunsRequest -- ^ 'ptcsmrPayload'

104− -> ProjectsTransferConfigsStartManualRuns

105−projectsTransferConfigsStartManualRuns pPtcsmrParent_ pPtcsmrPayload_ =

106− ProjectsTransferConfigsStartManualRuns'

107− { _ptcsmrParent = pPtcsmrParent_

108− , _ptcsmrXgafv = Nothing

109− , _ptcsmrUploadProtocol = Nothing

110− , _ptcsmrAccessToken = Nothing

111− , _ptcsmrUploadType = Nothing

112− , _ptcsmrPayload = pPtcsmrPayload_

113− , _ptcsmrCallback = Nothing

114− }

115−

116−

117−-- | Transfer configuration name in the form:

118−-- \`projects\/{project_id}\/transferConfigs\/{config_id}\`.

119−ptcsmrParent :: Lens' ProjectsTransferConfigsStartManualRuns Text

120−ptcsmrParent

121− = lens _ptcsmrParent (\ s a -> s{_ptcsmrParent = a})

122−

123−-- | V1 error format.

124−ptcsmrXgafv :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Xgafv)

125−ptcsmrXgafv

126− = lens _ptcsmrXgafv (\ s a -> s{_ptcsmrXgafv = a})

127−

128−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

129−ptcsmrUploadProtocol :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Text)

130−ptcsmrUploadProtocol

131− = lens _ptcsmrUploadProtocol

132− (\ s a -> s{_ptcsmrUploadProtocol = a})

133−

134−-- | OAuth access token.

135−ptcsmrAccessToken :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Text)

136−ptcsmrAccessToken

137− = lens _ptcsmrAccessToken

138− (\ s a -> s{_ptcsmrAccessToken = a})

139−

140−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

141−ptcsmrUploadType :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Text)

142−ptcsmrUploadType

143− = lens _ptcsmrUploadType

144− (\ s a -> s{_ptcsmrUploadType = a})

145−

146−-- | Multipart request metadata.

147−ptcsmrPayload :: Lens' ProjectsTransferConfigsStartManualRuns StartManualTransferRunsRequest

148−ptcsmrPayload

149− = lens _ptcsmrPayload

150− (\ s a -> s{_ptcsmrPayload = a})

151−

152−-- | JSONP

153−ptcsmrCallback :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Text)

154−ptcsmrCallback

155− = lens _ptcsmrCallback

156− (\ s a -> s{_ptcsmrCallback = a})

157−

158−instance GoogleRequest

159− ProjectsTransferConfigsStartManualRuns

160− where

161− type Rs ProjectsTransferConfigsStartManualRuns =

162− StartManualTransferRunsResponse

163− type Scopes ProjectsTransferConfigsStartManualRuns =

164− '["https://www.googleapis.com/auth/bigquery",

165− "https://www.googleapis.com/auth/cloud-platform"]

166− requestClient

167− ProjectsTransferConfigsStartManualRuns'{..}

168− = go _ptcsmrParent _ptcsmrXgafv _ptcsmrUploadProtocol

169− _ptcsmrAccessToken

170− _ptcsmrUploadType

171− _ptcsmrCallback

172− (Just AltJSON)

173− _ptcsmrPayload

174− bigQueryDataTransferService

175− where go

176− = buildClient

177− (Proxy ::

178− Proxy ProjectsTransferConfigsStartManualRunsResource)

179− mempty

gogol-bigquerydatatransfer/gogol-bigquerydatatransfer.cabal+2−4

@@ -14,8 +14,8 @@ cabal-version: >= 1.10

1414extra-source-files: README.md src/.gitkeep

1515

1616description:

17− Schedule queries or transfer external data from SaaS applications to

18− Google BigQuery on a regular basis.

17+ Transfers data from partner SaaS applications to Google BigQuery on a

18+ scheduled, managed basis.

1919 .

2020 /Warning:/ This is an experimental prototype/preview release which is still

2121 under exploratory development and not intended for public use, caveat emptor!

@@ -54,7 +54,6 @@ library

5454 , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List

5555 , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List

5656 , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

57− , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns

5857 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

5958 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

6059 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

@@ -65,7 +64,6 @@ library

6564 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

6665 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

6766 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

68− , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

6967

7068 other-modules:

7169 Network.Google.BigQueryDataTransfer.Types.Product

gogol-bigtableadmin/gen/Network/Google/BigtableAdmin.hs+1−17

@@ -13,7 +13,7 @@

1313-- Stability : auto-generated

1414-- Portability : non-portable (GHC extensions)

1515--

16−-- Administer your Cloud Bigtable tables and instances.

16+-- -- |

1717--

1818-- /See:/ <https://cloud.google.com/bigtable/ Cloud Bigtable Admin API Reference>

1919module Network.Google.BigtableAdmin

@@ -118,21 +118,12 @@ module Network.Google.BigtableAdmin

118118 -- ** bigtableadmin.projects.instances.tables.get

119119 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

120120

121− -- ** bigtableadmin.projects.instances.tables.getIamPolicy

122− , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GetIAMPolicy

123−

124121 -- ** bigtableadmin.projects.instances.tables.list

125122 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

126123

127124 -- ** bigtableadmin.projects.instances.tables.modifyColumnFamilies

128125 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

129126

130− -- ** bigtableadmin.projects.instances.tables.setIamPolicy

131− , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.SetIAMPolicy

132−

133− -- ** bigtableadmin.projects.instances.tables.testIamPermissions

134− , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.TestIAMPermissions

135−

136127 -- ** bigtableadmin.projects.instances.testIamPermissions

137128 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

138129

@@ -530,11 +521,8 @@ import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables

530521import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.DropRowRange

531522import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GenerateConsistencyToken

532523import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

533−import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GetIAMPolicy

534524import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

535525import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

536−import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.SetIAMPolicy

537−import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.TestIAMPermissions

538526import Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

539527import Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

540528

@@ -555,17 +543,13 @@ type BigtableAdminAPI =

555543 :<|> ProjectsInstancesAppProFilesDeleteResource

556544 :<|> ProjectsInstancesTablesDropRowRangeResource

557545 :<|> ProjectsInstancesTablesListResource

558− :<|> ProjectsInstancesTablesGetIAMPolicyResource

559546 :<|>

560547 ProjectsInstancesTablesGenerateConsistencyTokenResource

561548 :<|> ProjectsInstancesTablesGetResource

562549 :<|>

563550 ProjectsInstancesTablesModifyColumnFamiliesResource

564551 :<|> ProjectsInstancesTablesCreateResource

565− :<|> ProjectsInstancesTablesSetIAMPolicyResource

566552 :<|> ProjectsInstancesTablesCheckConsistencyResource

567− :<|>

568− ProjectsInstancesTablesTestIAMPermissionsResource

569553 :<|> ProjectsInstancesTablesDeleteResource

570554 :<|> ProjectsInstancesClustersListResource

571555 :<|> ProjectsInstancesClustersGetResource

gogol-bigtableadmin/gen/Network/Google/BigtableAdmin/Types/Product.hs+19−18

@@ -827,7 +827,7 @@ clusterState

827827clusterState = ClusterState' {_csReplicationState = Nothing}

828828

829829

830−-- | Output only. The state of replication for the table in this cluster.

830+-- | (\`OutputOnly\`) The state of replication for the table in this cluster.

831831csReplicationState :: Lens' ClusterState (Maybe ClusterStateReplicationState)

832832csReplicationState

833833 = lens _csReplicationState

@@ -1039,11 +1039,11 @@ instance ToJSON ListAppProFilesResponse where

10391039 ("failedLocations" .=) <$> _lapfrFailedLocations,

10401040 ("appProfiles" .=) <$> _lapfrAppProFiles])

10411041

1042−-- | Output only. Map from cluster ID to per-cluster table state. If it could

1043−-- not be determined whether or not the table has data in a particular

1044−-- cluster (for example, if its zone is unavailable), then there will be an

1045−-- entry for the cluster with UNKNOWN \`replication_status\`. Views:

1046−-- \`REPLICATION_VIEW\`, \`FULL\`

1042+-- | (\`OutputOnly\`) Map from cluster ID to per-cluster table state. If it

1043+-- could not be determined whether or not the table has data in a

1044+-- particular cluster (for example, if its zone is unavailable), then there

1045+-- will be an entry for the cluster with UNKNOWN \`replication_status\`.

1046+-- Views: \`REPLICATION_VIEW\`, \`FULL\`

10471047--

10481048-- /See:/ 'tableClusterStates' smart constructor.

10491049newtype TableClusterStates =

@@ -2842,22 +2842,22 @@ table =

28422842-- | (\`CreationOnly\`) The granularity (i.e. \`MILLIS\`) at which timestamps

28432843-- are stored in this table. Timestamps not matching the granularity will

28442844-- be rejected. If unspecified at creation time, the value will be set to

2845−-- \`MILLIS\`. Views: \`SCHEMA_VIEW\`, \`FULL\`.

2845+-- \`MILLIS\`. Views: \`SCHEMA_VIEW\`, \`FULL\`

28462846tGranularity :: Lens' Table (Maybe TableGranularity)

28472847tGranularity

28482848 = lens _tGranularity (\ s a -> s{_tGranularity = a})

28492849

2850−-- | Output only. The unique name of the table. Values are of the form

2850+-- | (\`OutputOnly\`) The unique name of the table. Values are of the form

28512851-- \`projects\/\/instances\/\/tables\/_a-zA-Z0-9*\`. Views: \`NAME_ONLY\`,

28522852-- \`SCHEMA_VIEW\`, \`REPLICATION_VIEW\`, \`FULL\`

28532853tName :: Lens' Table (Maybe Text)

28542854tName = lens _tName (\ s a -> s{_tName = a})

28552855

2856−-- | Output only. Map from cluster ID to per-cluster table state. If it could

2857−-- not be determined whether or not the table has data in a particular

2858−-- cluster (for example, if its zone is unavailable), then there will be an

2859−-- entry for the cluster with UNKNOWN \`replication_status\`. Views:

2860−-- \`REPLICATION_VIEW\`, \`FULL\`

2856+-- | (\`OutputOnly\`) Map from cluster ID to per-cluster table state. If it

2857+-- could not be determined whether or not the table has data in a

2858+-- particular cluster (for example, if its zone is unavailable), then there

2859+-- will be an entry for the cluster with UNKNOWN \`replication_status\`.

2860+-- Views: \`REPLICATION_VIEW\`, \`FULL\`

28612861tClusterStates :: Lens' Table (Maybe TableClusterStates)

28622862tClusterStates

28632863 = lens _tClusterStates

@@ -2969,8 +2969,8 @@ binding =

29692969-- that represents a service account. For example,

29702970-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

29712971-- email address that represents a Google group. For example,

2972−-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

2973−-- (primary) that represents all the users of that domain. For example,

2972+-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

2973+-- name that represents all the users of that domain. For example,

29742974-- \`google.com\` or \`example.com\`.

29752975bMembers :: Lens' Binding [Text]

29762976bMembers

@@ -2983,9 +2983,10 @@ bMembers

29832983bRole :: Lens' Binding (Maybe Text)

29842984bRole = lens _bRole (\ s a -> s{_bRole = a})

29852985

2986−-- | The condition that is associated with this binding. NOTE: An unsatisfied

2987−-- condition will not allow user access via current binding. Different

2988−-- bindings, including their conditions, are examined independently.

2986+-- | Unimplemented. The condition that is associated with this binding. NOTE:

2987+-- an unsatisfied condition will not allow user access via current binding.

2988+-- Different bindings, including their conditions, are examined

2989+-- independently.

29892990bCondition :: Lens' Binding (Maybe Expr)

29902991bCondition

29912992 = lens _bCondition (\ s a -> s{_bCondition = a})

gogol-bigtableadmin/gen/Network/Google/BigtableAdmin/Types/Sum.hs+2−2

@@ -53,7 +53,7 @@ instance FromJSON ClusterDefaultStorageType where

5353instance ToJSON ClusterDefaultStorageType where

5454 toJSON = toJSONText

5555

56−-- | Output only. The state of replication for the table in this cluster.

56+-- | (\`OutputOnly\`) The state of replication for the table in this cluster.

5757data ClusterStateReplicationState

5858 = StateNotKnown

5959 -- ^ @STATE_NOT_KNOWN@

@@ -260,7 +260,7 @@ instance ToJSON Xgafv where

260260-- | (\`CreationOnly\`) The granularity (i.e. \`MILLIS\`) at which timestamps

261261-- are stored in this table. Timestamps not matching the granularity will

262262-- be rejected. If unspecified at creation time, the value will be set to

263−-- \`MILLIS\`. Views: \`SCHEMA_VIEW\`, \`FULL\`.

263+-- \`MILLIS\`. Views: \`SCHEMA_VIEW\`, \`FULL\`

264264data TableGranularity

265265 = TimestampGranularityUnspecified

266266 -- ^ @TIMESTAMP_GRANULARITY_UNSPECIFIED@

gogol-bigtableadmin/gen/Network/Google/Resource/BigtableAdmin/Projects/Instances/Tables/GetIAMPolicy.hsdeleted−179

@@ -1,179 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GetIAMPolicy

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Gets the access control policy for an instance resource. Returns an

24−-- empty policy if an table exists but does not have a policy set.

25−--

26−-- /See:/ <https://cloud.google.com/bigtable/ Cloud Bigtable Admin API Reference> for @bigtableadmin.projects.instances.tables.getIamPolicy@.

27−module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GetIAMPolicy

28− (

29− -- * REST Resource

30− ProjectsInstancesTablesGetIAMPolicyResource

31−

32− -- * Creating a Request

33− , projectsInstancesTablesGetIAMPolicy

34− , ProjectsInstancesTablesGetIAMPolicy

35−

36− -- * Request Lenses

37− , pitgipXgafv

38− , pitgipUploadProtocol

39− , pitgipAccessToken

40− , pitgipUploadType

41− , pitgipPayload

42− , pitgipResource

43− , pitgipCallback

44− ) where

45−

46−import Network.Google.BigtableAdmin.Types

47−import Network.Google.Prelude

48−

49−-- | A resource alias for @bigtableadmin.projects.instances.tables.getIamPolicy@ method which the

50−-- 'ProjectsInstancesTablesGetIAMPolicy' request conforms to.

51−type ProjectsInstancesTablesGetIAMPolicyResource =

52− "v2" :>

53− CaptureMode "resource" "getIamPolicy" Text :>

54− QueryParam "$.xgafv" Xgafv :>

55− QueryParam "upload_protocol" Text :>

56− QueryParam "access_token" Text :>

57− QueryParam "uploadType" Text :>

58− QueryParam "callback" Text :>

59− QueryParam "alt" AltJSON :>

60− ReqBody '[JSON] GetIAMPolicyRequest :>

61− Post '[JSON] Policy

62−

63−-- | Gets the access control policy for an instance resource. Returns an

64−-- empty policy if an table exists but does not have a policy set.

65−--

66−-- /See:/ 'projectsInstancesTablesGetIAMPolicy' smart constructor.

67−data ProjectsInstancesTablesGetIAMPolicy =

68− ProjectsInstancesTablesGetIAMPolicy'

69− { _pitgipXgafv :: !(Maybe Xgafv)

70− , _pitgipUploadProtocol :: !(Maybe Text)

71− , _pitgipAccessToken :: !(Maybe Text)

72− , _pitgipUploadType :: !(Maybe Text)

73− , _pitgipPayload :: !GetIAMPolicyRequest

74− , _pitgipResource :: !Text

75− , _pitgipCallback :: !(Maybe Text)

76− }

77− deriving (Eq, Show, Data, Typeable, Generic)

78−

79−

80−-- | Creates a value of 'ProjectsInstancesTablesGetIAMPolicy' with the minimum fields required to make a request.

81−--

82−-- Use one of the following lenses to modify other fields as desired:

83−--

84−-- * 'pitgipXgafv'

85−--

86−-- * 'pitgipUploadProtocol'

87−--

88−-- * 'pitgipAccessToken'

89−--

90−-- * 'pitgipUploadType'

91−--

92−-- * 'pitgipPayload'

93−--

94−-- * 'pitgipResource'

95−--

96−-- * 'pitgipCallback'

97−projectsInstancesTablesGetIAMPolicy

98− :: GetIAMPolicyRequest -- ^ 'pitgipPayload'

99− -> Text -- ^ 'pitgipResource'

100− -> ProjectsInstancesTablesGetIAMPolicy

101−projectsInstancesTablesGetIAMPolicy pPitgipPayload_ pPitgipResource_ =

102− ProjectsInstancesTablesGetIAMPolicy'

103− { _pitgipXgafv = Nothing

104− , _pitgipUploadProtocol = Nothing

105− , _pitgipAccessToken = Nothing

106− , _pitgipUploadType = Nothing

107− , _pitgipPayload = pPitgipPayload_

108− , _pitgipResource = pPitgipResource_

109− , _pitgipCallback = Nothing

110− }

111−

112−

113−-- | V1 error format.

114−pitgipXgafv :: Lens' ProjectsInstancesTablesGetIAMPolicy (Maybe Xgafv)

115−pitgipXgafv

116− = lens _pitgipXgafv (\ s a -> s{_pitgipXgafv = a})

117−

118−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

119−pitgipUploadProtocol :: Lens' ProjectsInstancesTablesGetIAMPolicy (Maybe Text)

120−pitgipUploadProtocol

121− = lens _pitgipUploadProtocol

122− (\ s a -> s{_pitgipUploadProtocol = a})

123−

124−-- | OAuth access token.

125−pitgipAccessToken :: Lens' ProjectsInstancesTablesGetIAMPolicy (Maybe Text)

126−pitgipAccessToken

127− = lens _pitgipAccessToken

128− (\ s a -> s{_pitgipAccessToken = a})

129−

130−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

131−pitgipUploadType :: Lens' ProjectsInstancesTablesGetIAMPolicy (Maybe Text)

132−pitgipUploadType

133− = lens _pitgipUploadType

134− (\ s a -> s{_pitgipUploadType = a})

135−

136−-- | Multipart request metadata.

137−pitgipPayload :: Lens' ProjectsInstancesTablesGetIAMPolicy GetIAMPolicyRequest

138−pitgipPayload

139− = lens _pitgipPayload

140− (\ s a -> s{_pitgipPayload = a})

141−

142−-- | REQUIRED: The resource for which the policy is being requested. See the

143−-- operation documentation for the appropriate value for this field.

144−pitgipResource :: Lens' ProjectsInstancesTablesGetIAMPolicy Text

145−pitgipResource

146− = lens _pitgipResource

147− (\ s a -> s{_pitgipResource = a})

148−

149−-- | JSONP

150−pitgipCallback :: Lens' ProjectsInstancesTablesGetIAMPolicy (Maybe Text)

151−pitgipCallback

152− = lens _pitgipCallback

153− (\ s a -> s{_pitgipCallback = a})

154−

155−instance GoogleRequest

156− ProjectsInstancesTablesGetIAMPolicy

157− where

158− type Rs ProjectsInstancesTablesGetIAMPolicy = Policy

159− type Scopes ProjectsInstancesTablesGetIAMPolicy =

160− '["https://www.googleapis.com/auth/bigtable.admin",

161− "https://www.googleapis.com/auth/bigtable.admin.table",

162− "https://www.googleapis.com/auth/cloud-bigtable.admin",

163− "https://www.googleapis.com/auth/cloud-bigtable.admin.table",

164− "https://www.googleapis.com/auth/cloud-platform"]

165− requestClient

166− ProjectsInstancesTablesGetIAMPolicy'{..}

167− = go _pitgipResource _pitgipXgafv

168− _pitgipUploadProtocol

169− _pitgipAccessToken

170− _pitgipUploadType

171− _pitgipCallback

172− (Just AltJSON)

173− _pitgipPayload

174− bigtableAdminService

175− where go

176− = buildClient

177− (Proxy ::

178− Proxy ProjectsInstancesTablesGetIAMPolicyResource)

179− mempty

gogol-bigtableadmin/gen/Network/Google/Resource/BigtableAdmin/Projects/Instances/Tables/List.hs+1−7

@@ -160,13 +160,7 @@ pitlPageToken

160160 = lens _pitlPageToken

161161 (\ s a -> s{_pitlPageToken = a})

162162

163−-- | Maximum number of results per page. A page_size of zero lets the server

164−-- choose the number of items to return. A page_size which is strictly

165−-- positive will return at most that many items. A negative page_size will

166−-- cause an error. Following the first request, subsequent paginated calls

167−-- are not required to pass a page_size. If a page_size is set in

168−-- subsequent calls, it must match the page_size given in the first

169−-- request.

163+-- | Maximum number of results per page. CURRENTLY UNIMPLEMENTED AND IGNORED.

170164pitlPageSize :: Lens' ProjectsInstancesTablesList (Maybe Int32)

171165pitlPageSize

172166 = lens _pitlPageSize (\ s a -> s{_pitlPageSize = a})

gogol-bigtableadmin/gen/Network/Google/Resource/BigtableAdmin/Projects/Instances/Tables/SetIAMPolicy.hsdeleted−179

@@ -1,179 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.SetIAMPolicy

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Sets the access control policy on a table resource. Replaces any

24−-- existing policy.

25−--

26−-- /See:/ <https://cloud.google.com/bigtable/ Cloud Bigtable Admin API Reference> for @bigtableadmin.projects.instances.tables.setIamPolicy@.

27−module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.SetIAMPolicy

28− (

29− -- * REST Resource

30− ProjectsInstancesTablesSetIAMPolicyResource

31−

32− -- * Creating a Request

33− , projectsInstancesTablesSetIAMPolicy

34− , ProjectsInstancesTablesSetIAMPolicy

35−

36− -- * Request Lenses

37− , pitsipXgafv

38− , pitsipUploadProtocol

39− , pitsipAccessToken

40− , pitsipUploadType

41− , pitsipPayload

42− , pitsipResource

43− , pitsipCallback

44− ) where

45−

46−import Network.Google.BigtableAdmin.Types

47−import Network.Google.Prelude

48−

49−-- | A resource alias for @bigtableadmin.projects.instances.tables.setIamPolicy@ method which the

50−-- 'ProjectsInstancesTablesSetIAMPolicy' request conforms to.

51−type ProjectsInstancesTablesSetIAMPolicyResource =

52− "v2" :>

53− CaptureMode "resource" "setIamPolicy" Text :>

54− QueryParam "$.xgafv" Xgafv :>

55− QueryParam "upload_protocol" Text :>

56− QueryParam "access_token" Text :>

57− QueryParam "uploadType" Text :>

58− QueryParam "callback" Text :>

59− QueryParam "alt" AltJSON :>

60− ReqBody '[JSON] SetIAMPolicyRequest :>

61− Post '[JSON] Policy

62−

63−-- | Sets the access control policy on a table resource. Replaces any

64−-- existing policy.

65−--

66−-- /See:/ 'projectsInstancesTablesSetIAMPolicy' smart constructor.

67−data ProjectsInstancesTablesSetIAMPolicy =

68− ProjectsInstancesTablesSetIAMPolicy'

69− { _pitsipXgafv :: !(Maybe Xgafv)

70− , _pitsipUploadProtocol :: !(Maybe Text)

71− , _pitsipAccessToken :: !(Maybe Text)

72− , _pitsipUploadType :: !(Maybe Text)

73− , _pitsipPayload :: !SetIAMPolicyRequest

74− , _pitsipResource :: !Text

75− , _pitsipCallback :: !(Maybe Text)

76− }

77− deriving (Eq, Show, Data, Typeable, Generic)

78−

79−

80−-- | Creates a value of 'ProjectsInstancesTablesSetIAMPolicy' with the minimum fields required to make a request.

81−--

82−-- Use one of the following lenses to modify other fields as desired:

83−--

84−-- * 'pitsipXgafv'

85−--

86−-- * 'pitsipUploadProtocol'

87−--

88−-- * 'pitsipAccessToken'

89−--

90−-- * 'pitsipUploadType'

91−--

92−-- * 'pitsipPayload'

93−--

94−-- * 'pitsipResource'

95−--

96−-- * 'pitsipCallback'

97−projectsInstancesTablesSetIAMPolicy

98− :: SetIAMPolicyRequest -- ^ 'pitsipPayload'

99− -> Text -- ^ 'pitsipResource'

100− -> ProjectsInstancesTablesSetIAMPolicy

101−projectsInstancesTablesSetIAMPolicy pPitsipPayload_ pPitsipResource_ =

102− ProjectsInstancesTablesSetIAMPolicy'

103− { _pitsipXgafv = Nothing

104− , _pitsipUploadProtocol = Nothing

105− , _pitsipAccessToken = Nothing

106− , _pitsipUploadType = Nothing

107− , _pitsipPayload = pPitsipPayload_

108− , _pitsipResource = pPitsipResource_

109− , _pitsipCallback = Nothing

110− }

111−

112−

113−-- | V1 error format.

114−pitsipXgafv :: Lens' ProjectsInstancesTablesSetIAMPolicy (Maybe Xgafv)

115−pitsipXgafv

116− = lens _pitsipXgafv (\ s a -> s{_pitsipXgafv = a})

117−

118−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

119−pitsipUploadProtocol :: Lens' ProjectsInstancesTablesSetIAMPolicy (Maybe Text)

120−pitsipUploadProtocol

121− = lens _pitsipUploadProtocol

122− (\ s a -> s{_pitsipUploadProtocol = a})

123−

124−-- | OAuth access token.

125−pitsipAccessToken :: Lens' ProjectsInstancesTablesSetIAMPolicy (Maybe Text)

126−pitsipAccessToken

127− = lens _pitsipAccessToken

128− (\ s a -> s{_pitsipAccessToken = a})

129−

130−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

131−pitsipUploadType :: Lens' ProjectsInstancesTablesSetIAMPolicy (Maybe Text)

132−pitsipUploadType

133− = lens _pitsipUploadType

134− (\ s a -> s{_pitsipUploadType = a})

135−

136−-- | Multipart request metadata.

137−pitsipPayload :: Lens' ProjectsInstancesTablesSetIAMPolicy SetIAMPolicyRequest

138−pitsipPayload

139− = lens _pitsipPayload

140− (\ s a -> s{_pitsipPayload = a})

141−

142−-- | REQUIRED: The resource for which the policy is being specified. See the

143−-- operation documentation for the appropriate value for this field.

144−pitsipResource :: Lens' ProjectsInstancesTablesSetIAMPolicy Text

145−pitsipResource

146− = lens _pitsipResource

147− (\ s a -> s{_pitsipResource = a})

148−

149−-- | JSONP

150−pitsipCallback :: Lens' ProjectsInstancesTablesSetIAMPolicy (Maybe Text)

151−pitsipCallback

152− = lens _pitsipCallback

153− (\ s a -> s{_pitsipCallback = a})

154−

155−instance GoogleRequest

156− ProjectsInstancesTablesSetIAMPolicy

157− where

158− type Rs ProjectsInstancesTablesSetIAMPolicy = Policy

159− type Scopes ProjectsInstancesTablesSetIAMPolicy =

160− '["https://www.googleapis.com/auth/bigtable.admin",

161− "https://www.googleapis.com/auth/bigtable.admin.table",

162− "https://www.googleapis.com/auth/cloud-bigtable.admin",

163− "https://www.googleapis.com/auth/cloud-bigtable.admin.table",

164− "https://www.googleapis.com/auth/cloud-platform"]

165− requestClient

166− ProjectsInstancesTablesSetIAMPolicy'{..}

167− = go _pitsipResource _pitsipXgafv

168− _pitsipUploadProtocol

169− _pitsipAccessToken

170− _pitsipUploadType

171− _pitsipCallback

172− (Just AltJSON)

173− _pitsipPayload

174− bigtableAdminService

175− where go

176− = buildClient

177− (Proxy ::

178− Proxy ProjectsInstancesTablesSetIAMPolicyResource)

179− mempty

gogol-bigtableadmin/gen/Network/Google/Resource/BigtableAdmin/Projects/Instances/Tables/TestIAMPermissions.hsdeleted−182

@@ -1,182 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.TestIAMPermissions

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Returns permissions that the caller has on the specified table resource.

24−--

25−-- /See:/ <https://cloud.google.com/bigtable/ Cloud Bigtable Admin API Reference> for @bigtableadmin.projects.instances.tables.testIamPermissions@.

26−module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.TestIAMPermissions

27− (

28− -- * REST Resource

29− ProjectsInstancesTablesTestIAMPermissionsResource

30−

31− -- * Creating a Request

32− , projectsInstancesTablesTestIAMPermissions

33− , ProjectsInstancesTablesTestIAMPermissions

34−

35− -- * Request Lenses

36− , pittipXgafv

37− , pittipUploadProtocol

38− , pittipAccessToken

39− , pittipUploadType

40− , pittipPayload

41− , pittipResource

42− , pittipCallback

43− ) where

44−

45−import Network.Google.BigtableAdmin.Types

46−import Network.Google.Prelude

47−

48−-- | A resource alias for @bigtableadmin.projects.instances.tables.testIamPermissions@ method which the

49−-- 'ProjectsInstancesTablesTestIAMPermissions' request conforms to.

50−type ProjectsInstancesTablesTestIAMPermissionsResource

51− =

52− "v2" :>

53− CaptureMode "resource" "testIamPermissions" Text :>

54− QueryParam "$.xgafv" Xgafv :>

55− QueryParam "upload_protocol" Text :>

56− QueryParam "access_token" Text :>

57− QueryParam "uploadType" Text :>

58− QueryParam "callback" Text :>

59− QueryParam "alt" AltJSON :>

60− ReqBody '[JSON] TestIAMPermissionsRequest :>

61− Post '[JSON] TestIAMPermissionsResponse

62−

63−-- | Returns permissions that the caller has on the specified table resource.

64−--

65−-- /See:/ 'projectsInstancesTablesTestIAMPermissions' smart constructor.

66−data ProjectsInstancesTablesTestIAMPermissions =

67− ProjectsInstancesTablesTestIAMPermissions'

68− { _pittipXgafv :: !(Maybe Xgafv)

69− , _pittipUploadProtocol :: !(Maybe Text)

70− , _pittipAccessToken :: !(Maybe Text)

71− , _pittipUploadType :: !(Maybe Text)

72− , _pittipPayload :: !TestIAMPermissionsRequest

73− , _pittipResource :: !Text

74− , _pittipCallback :: !(Maybe Text)

75− }

76− deriving (Eq, Show, Data, Typeable, Generic)

77−

78−

79−-- | Creates a value of 'ProjectsInstancesTablesTestIAMPermissions' with the minimum fields required to make a request.

80−--

81−-- Use one of the following lenses to modify other fields as desired:

82−--

83−-- * 'pittipXgafv'

84−--

85−-- * 'pittipUploadProtocol'

86−--

87−-- * 'pittipAccessToken'

88−--

89−-- * 'pittipUploadType'

90−--

91−-- * 'pittipPayload'

92−--

93−-- * 'pittipResource'

94−--

95−-- * 'pittipCallback'

96−projectsInstancesTablesTestIAMPermissions

97− :: TestIAMPermissionsRequest -- ^ 'pittipPayload'

98− -> Text -- ^ 'pittipResource'

99− -> ProjectsInstancesTablesTestIAMPermissions

100−projectsInstancesTablesTestIAMPermissions pPittipPayload_ pPittipResource_ =

101− ProjectsInstancesTablesTestIAMPermissions'

102− { _pittipXgafv = Nothing

103− , _pittipUploadProtocol = Nothing

104− , _pittipAccessToken = Nothing

105− , _pittipUploadType = Nothing

106− , _pittipPayload = pPittipPayload_

107− , _pittipResource = pPittipResource_

108− , _pittipCallback = Nothing

109− }

110−

111−

112−-- | V1 error format.

113−pittipXgafv :: Lens' ProjectsInstancesTablesTestIAMPermissions (Maybe Xgafv)

114−pittipXgafv

115− = lens _pittipXgafv (\ s a -> s{_pittipXgafv = a})

116−

117−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

118−pittipUploadProtocol :: Lens' ProjectsInstancesTablesTestIAMPermissions (Maybe Text)

119−pittipUploadProtocol

120− = lens _pittipUploadProtocol

121− (\ s a -> s{_pittipUploadProtocol = a})

122−

123−-- | OAuth access token.

124−pittipAccessToken :: Lens' ProjectsInstancesTablesTestIAMPermissions (Maybe Text)

125−pittipAccessToken

126− = lens _pittipAccessToken

127− (\ s a -> s{_pittipAccessToken = a})

128−

129−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

130−pittipUploadType :: Lens' ProjectsInstancesTablesTestIAMPermissions (Maybe Text)

131−pittipUploadType

132− = lens _pittipUploadType

133− (\ s a -> s{_pittipUploadType = a})

134−

135−-- | Multipart request metadata.

136−pittipPayload :: Lens' ProjectsInstancesTablesTestIAMPermissions TestIAMPermissionsRequest

137−pittipPayload

138− = lens _pittipPayload

139− (\ s a -> s{_pittipPayload = a})

140−

141−-- | REQUIRED: The resource for which the policy detail is being requested.

142−-- See the operation documentation for the appropriate value for this

143−-- field.

144−pittipResource :: Lens' ProjectsInstancesTablesTestIAMPermissions Text

145−pittipResource

146− = lens _pittipResource

147− (\ s a -> s{_pittipResource = a})

148−

149−-- | JSONP

150−pittipCallback :: Lens' ProjectsInstancesTablesTestIAMPermissions (Maybe Text)

151−pittipCallback

152− = lens _pittipCallback

153− (\ s a -> s{_pittipCallback = a})

154−

155−instance GoogleRequest

156− ProjectsInstancesTablesTestIAMPermissions

157− where

158− type Rs ProjectsInstancesTablesTestIAMPermissions =

159− TestIAMPermissionsResponse

160− type Scopes ProjectsInstancesTablesTestIAMPermissions

161− =

162− '["https://www.googleapis.com/auth/bigtable.admin",

163− "https://www.googleapis.com/auth/bigtable.admin.table",

164− "https://www.googleapis.com/auth/cloud-bigtable.admin",

165− "https://www.googleapis.com/auth/cloud-bigtable.admin.table",

166− "https://www.googleapis.com/auth/cloud-platform"]

167− requestClient

168− ProjectsInstancesTablesTestIAMPermissions'{..}

169− = go _pittipResource _pittipXgafv

170− _pittipUploadProtocol

171− _pittipAccessToken

172− _pittipUploadType

173− _pittipCallback

174− (Just AltJSON)

175− _pittipPayload

176− bigtableAdminService

177− where go

178− = buildClient

179− (Proxy ::

180− Proxy

181− ProjectsInstancesTablesTestIAMPermissionsResource)

182− mempty

gogol-bigtableadmin/gogol-bigtableadmin.cabal+1−4

@@ -14,7 +14,7 @@ cabal-version: >= 1.10

1414extra-source-files: README.md src/.gitkeep

1515

1616description:

17− Administer your Cloud Bigtable tables and instances.

17+

1818 .

1919 /Warning:/ This is an experimental prototype/preview release which is still

2020 under exploratory development and not intended for public use, caveat emptor!

@@ -62,11 +62,8 @@ library

6262 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.DropRowRange

6363 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GenerateConsistencyToken

6464 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

65− , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GetIAMPolicy

6665 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

6766 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

68− , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.SetIAMPolicy

69− , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.TestIAMPermissions

7067 , Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

7168 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

7269

gogol-billing/gen/Network/Google/Billing/Types/Product.hs+6−5

@@ -1602,8 +1602,8 @@ binding =

16021602-- that represents a service account. For example,

16031603-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

16041604-- email address that represents a Google group. For example,

1605−-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

1606−-- (primary) that represents all the users of that domain. For example,

1605+-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

1606+-- name that represents all the users of that domain. For example,

16071607-- \`google.com\` or \`example.com\`.

16081608bMembers :: Lens' Binding [Text]

16091609bMembers

@@ -1616,9 +1616,10 @@ bMembers

16161616bRole :: Lens' Binding (Maybe Text)

16171617bRole = lens _bRole (\ s a -> s{_bRole = a})

16181618

1619−-- | The condition that is associated with this binding. NOTE: An unsatisfied

1620−-- condition will not allow user access via current binding. Different

1621−-- bindings, including their conditions, are examined independently.

1619+-- | Unimplemented. The condition that is associated with this binding. NOTE:

1620+-- an unsatisfied condition will not allow user access via current binding.

1621+-- Different bindings, including their conditions, are examined

1622+-- independently.

16221623bCondition :: Lens' Binding (Maybe Expr)

16231624bCondition

16241625 = lens _bCondition (\ s a -> s{_bCondition = a})

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization.hs−14

@@ -71,12 +71,6 @@ module Network.Google.BinaryAuthorization

7171

7272 -- * Types

7373

74− -- ** PkixPublicKey

75− , PkixPublicKey

76− , pkixPublicKey

77− , ppkPublicKeyPem

78− , ppkSignatureAlgorithm

79−

8074 -- ** Expr

8175 , Expr

8276 , expr

@@ -99,9 +93,6 @@ module Network.Google.BinaryAuthorization

9993 -- ** AdmissionRuleEnforcementMode

10094 , AdmissionRuleEnforcementMode (..)

10195

102− -- ** PolicyGlobalPolicyEvaluationMode

103− , PolicyGlobalPolicyEvaluationMode (..)

104−

10596 -- ** SetIAMPolicyRequest

10697 , SetIAMPolicyRequest

10798 , setIAMPolicyRequest

@@ -118,9 +109,6 @@ module Network.Google.BinaryAuthorization

118109 , admissionWhiteListPattern

119110 , awlpNamePattern

120111

121− -- ** PkixPublicKeySignatureAlgorithm

122− , PkixPublicKeySignatureAlgorithm (..)

123−

124112 -- ** AdmissionRule

125113 , AdmissionRule

126114 , admissionRule

@@ -149,7 +137,6 @@ module Network.Google.BinaryAuthorization

149137 -- ** AttestorPublicKey

150138 , AttestorPublicKey

151139 , attestorPublicKey

152− , apkPkixPublicKey

153140 , apkAsciiArmoredPgpPublicKey

154141 , apkId

155142 , apkComment

@@ -167,7 +154,6 @@ module Network.Google.BinaryAuthorization

167154 , pClusterAdmissionRules

168155 , pUpdateTime

169156 , pName

170− , pGlobalPolicyEvaluationMode

171157 , pDescription

172158

173159 -- ** PolicyClusterAdmissionRules

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization/Types.hs−14

@@ -22,12 +22,6 @@ module Network.Google.BinaryAuthorization.Types

2222 -- * OAuth Scopes

2323 , cloudPlatformScope

2424

25− -- * PkixPublicKey

26− , PkixPublicKey

27− , pkixPublicKey

28− , ppkPublicKeyPem

29− , ppkSignatureAlgorithm

30−

3125 -- * Expr

3226 , Expr

3327 , expr

@@ -50,9 +44,6 @@ module Network.Google.BinaryAuthorization.Types

5044 -- * AdmissionRuleEnforcementMode

5145 , AdmissionRuleEnforcementMode (..)

5246

53− -- * PolicyGlobalPolicyEvaluationMode

54− , PolicyGlobalPolicyEvaluationMode (..)

55−

5647 -- * SetIAMPolicyRequest

5748 , SetIAMPolicyRequest

5849 , setIAMPolicyRequest

@@ -69,9 +60,6 @@ module Network.Google.BinaryAuthorization.Types

6960 , admissionWhiteListPattern

7061 , awlpNamePattern

7162

72− -- * PkixPublicKeySignatureAlgorithm

73− , PkixPublicKeySignatureAlgorithm (..)

74−

7563 -- * AdmissionRule

7664 , AdmissionRule

7765 , admissionRule

@@ -100,7 +88,6 @@ module Network.Google.BinaryAuthorization.Types

10088 -- * AttestorPublicKey

10189 , AttestorPublicKey

10290 , attestorPublicKey

103− , apkPkixPublicKey

10491 , apkAsciiArmoredPgpPublicKey

10592 , apkId

10693 , apkComment

@@ -118,7 +105,6 @@ module Network.Google.BinaryAuthorization.Types

118105 , pClusterAdmissionRules

119106 , pUpdateTime

120107 , pName

121− , pGlobalPolicyEvaluationMode

122108 , pDescription

123109

124110 -- * PolicyClusterAdmissionRules

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization/Types/Product.hs+17−116

@@ -20,65 +20,6 @@ module Network.Google.BinaryAuthorization.Types.Product where

2020import Network.Google.BinaryAuthorization.Types.Sum

2121import Network.Google.Prelude

2222

23−-- | A public key in the PkixPublicKey format (see

24−-- https:\/\/tools.ietf.org\/html\/rfc5280#section-4.1.2.7 for details).

25−-- Public keys of this type are typically textually encoded using the PEM

26−-- format.

27−--

28−-- /See:/ 'pkixPublicKey' smart constructor.

29−data PkixPublicKey =

30− PkixPublicKey'

31− { _ppkPublicKeyPem :: !(Maybe Text)

32− , _ppkSignatureAlgorithm :: !(Maybe PkixPublicKeySignatureAlgorithm)

33− }

34− deriving (Eq, Show, Data, Typeable, Generic)

35−

36−

37−-- | Creates a value of 'PkixPublicKey' with the minimum fields required to make a request.

38−--

39−-- Use one of the following lenses to modify other fields as desired:

40−--

41−-- * 'ppkPublicKeyPem'

42−--

43−-- * 'ppkSignatureAlgorithm'

44−pkixPublicKey

45− :: PkixPublicKey

46−pkixPublicKey =

47− PkixPublicKey' {_ppkPublicKeyPem = Nothing, _ppkSignatureAlgorithm = Nothing}

48−

49−

50−-- | A PEM-encoded public key, as described in

51−-- https:\/\/tools.ietf.org\/html\/rfc7468#section-13

52−ppkPublicKeyPem :: Lens' PkixPublicKey (Maybe Text)

53−ppkPublicKeyPem

54− = lens _ppkPublicKeyPem

55− (\ s a -> s{_ppkPublicKeyPem = a})

56−

57−-- | The signature algorithm used to verify a message against a signature

58−-- using this key. These signature algorithm must match the structure and

59−-- any object identifiers encoded in \`public_key_pem\` (i.e. this

60−-- algorithm must match that of the public key).

61−ppkSignatureAlgorithm :: Lens' PkixPublicKey (Maybe PkixPublicKeySignatureAlgorithm)

62−ppkSignatureAlgorithm

63− = lens _ppkSignatureAlgorithm

64− (\ s a -> s{_ppkSignatureAlgorithm = a})

65−

66−instance FromJSON PkixPublicKey where

67− parseJSON

68− = withObject "PkixPublicKey"

69− (\ o ->

70− PkixPublicKey' <$>

71− (o .:? "publicKeyPem") <*>

72− (o .:? "signatureAlgorithm"))

73−

74−instance ToJSON PkixPublicKey where

75− toJSON PkixPublicKey'{..}

76− = object

77− (catMaybes

78− [("publicKeyPem" .=) <$> _ppkPublicKeyPem,

79− ("signatureAlgorithm" .=) <$>

80− _ppkSignatureAlgorithm])

81−

8223-- | Represents an expression text. Example: title: \"User account presence\"

8324-- description: \"Determines whether the request has a user account\"

8425-- expression: \"size(request.user) > 0\"

@@ -615,14 +556,13 @@ instance ToJSON IAMPolicy where

615556 ("version" .=) <$> _ipVersion,

616557 ("bindings" .=) <$> _ipBindings])

617558

618−-- | An attestor public key that will be used to verify attestations signed

559+-- | An attestator public key that will be used to verify attestations signed

619560-- by this attestor.

620561--

621562-- /See:/ 'attestorPublicKey' smart constructor.

622563data AttestorPublicKey =

623564 AttestorPublicKey'

624− { _apkPkixPublicKey :: !(Maybe PkixPublicKey)

625− , _apkAsciiArmoredPgpPublicKey :: !(Maybe Text)

565+ { _apkAsciiArmoredPgpPublicKey :: !(Maybe Text)

626566 , _apkId :: !(Maybe Text)

627567 , _apkComment :: !(Maybe Text)

628568 }

@@ -633,8 +573,6 @@ data AttestorPublicKey =

633573--

634574-- Use one of the following lenses to modify other fields as desired:

635575--

636−-- * 'apkPkixPublicKey'

637−--

638576-- * 'apkAsciiArmoredPgpPublicKey'

639577--

640578-- * 'apkId'

@@ -644,41 +582,23 @@ attestorPublicKey

644582 :: AttestorPublicKey

645583attestorPublicKey =

646584 AttestorPublicKey'

647− { _apkPkixPublicKey = Nothing

648− , _apkAsciiArmoredPgpPublicKey = Nothing

585+ { _apkAsciiArmoredPgpPublicKey = Nothing

649586 , _apkId = Nothing

650587 , _apkComment = Nothing

651588 }

652589

653590

654−-- | A raw PKIX SubjectPublicKeyInfo format public key. NOTE: \`id\` may be

655−-- explicitly provided by the caller when using this type of public key,

656−-- but it MUST be a valid RFC3986 URI. If \`id\` is left blank, a default

657−-- one will be computed based on the digest of the DER encoding of the

658−-- public key.

659−apkPkixPublicKey :: Lens' AttestorPublicKey (Maybe PkixPublicKey)

660−apkPkixPublicKey

661− = lens _apkPkixPublicKey

662− (\ s a -> s{_apkPkixPublicKey = a})

663−

664591-- | ASCII-armored representation of a PGP public key, as the entire output

665592-- by the command \`gpg --export --armor foo\'example.com\` (either LF or

666−-- CRLF line endings). When using this field, \`id\` should be left blank.

667−-- The BinAuthz API handlers will calculate the ID and fill it in

668−-- automatically. BinAuthz computes this ID as the OpenPGP RFC4880 V4

669−-- fingerprint, represented as upper-case hex. If \`id\` is provided by the

670−-- caller, it will be overwritten by the API-calculated ID.

593+-- CRLF line endings).

671594apkAsciiArmoredPgpPublicKey :: Lens' AttestorPublicKey (Maybe Text)

672595apkAsciiArmoredPgpPublicKey

673596 = lens _apkAsciiArmoredPgpPublicKey

674597 (\ s a -> s{_apkAsciiArmoredPgpPublicKey = a})

675598

676−-- | The ID of this public key. Signatures verified by BinAuthz must include

677−-- the ID of the public key that can be used to verify them, and that ID

678−-- must match the contents of this field exactly. Additional restrictions

679−-- on this field can be imposed based on which public key type is

680−-- encapsulated. See the documentation on \`public_key\` cases below for

681−-- details.

599+-- | Output only. This field will be overwritten with key ID information, for

600+-- example, an identifier extracted from a PGP public key. This field may

601+-- not be updated.

682602apkId :: Lens' AttestorPublicKey (Maybe Text)

683603apkId = lens _apkId (\ s a -> s{_apkId = a})

684604

@@ -692,17 +612,14 @@ instance FromJSON AttestorPublicKey where

692612 = withObject "AttestorPublicKey"

693613 (\ o ->

694614 AttestorPublicKey' <$>

695− (o .:? "pkixPublicKey") <*>

696− (o .:? "asciiArmoredPgpPublicKey")

697− <*> (o .:? "id")

615+ (o .:? "asciiArmoredPgpPublicKey") <*> (o .:? "id")

698616 <*> (o .:? "comment"))

699617

700618instance ToJSON AttestorPublicKey where

701619 toJSON AttestorPublicKey'{..}

702620 = object

703621 (catMaybes

704− [("pkixPublicKey" .=) <$> _apkPkixPublicKey,

705− ("asciiArmoredPgpPublicKey" .=) <$>

622+ [("asciiArmoredPgpPublicKey" .=) <$>

706623 _apkAsciiArmoredPgpPublicKey,

707624 ("id" .=) <$> _apkId,

708625 ("comment" .=) <$> _apkComment])

@@ -760,7 +677,6 @@ data Policy =

760677 , _pClusterAdmissionRules :: !(Maybe PolicyClusterAdmissionRules)

761678 , _pUpdateTime :: !(Maybe DateTime')

762679 , _pName :: !(Maybe Text)

763− , _pGlobalPolicyEvaluationMode :: !(Maybe PolicyGlobalPolicyEvaluationMode)

764680 , _pDescription :: !(Maybe Text)

765681 }

766682 deriving (Eq, Show, Data, Typeable, Generic)

@@ -780,8 +696,6 @@ data Policy =

780696--

781697-- * 'pName'

782698--

783−-- * 'pGlobalPolicyEvaluationMode'

784−--

785699-- * 'pDescription'

786700policy

787701 :: Policy

@@ -792,14 +706,12 @@ policy =

792706 , _pClusterAdmissionRules = Nothing

793707 , _pUpdateTime = Nothing

794708 , _pName = Nothing

795− , _pGlobalPolicyEvaluationMode = Nothing

796709 , _pDescription = Nothing

797710 }

798711

799712

800−-- | Required. Default admission rule for a cluster without a per-cluster,

801−-- per- kubernetes-service-account, or per-istio-service-identity admission

802−-- rule.

713+-- | Required. Default admission rule for a cluster without a per-cluster

714+-- admission rule.

803715pDefaultAdmissionRule :: Lens' Policy (Maybe AdmissionRule)

804716pDefaultAdmissionRule

805717 = lens _pDefaultAdmissionRule

@@ -838,15 +750,6 @@ pUpdateTime

838750pName :: Lens' Policy (Maybe Text)

839751pName = lens _pName (\ s a -> s{_pName = a})

840752

841−-- | Optional. Controls the evaluation of a Google-maintained global

842−-- admission policy for common system-level images. Images not covered by

843−-- the global policy will be subject to the project admission policy. This

844−-- setting has no effect when specified inside a global admission policy.

845−pGlobalPolicyEvaluationMode :: Lens' Policy (Maybe PolicyGlobalPolicyEvaluationMode)

846−pGlobalPolicyEvaluationMode

847− = lens _pGlobalPolicyEvaluationMode

848− (\ s a -> s{_pGlobalPolicyEvaluationMode = a})

849−

850753-- | Optional. A descriptive comment.

851754pDescription :: Lens' Policy (Maybe Text)

852755pDescription

@@ -862,7 +765,6 @@ instance FromJSON Policy where

862765 <*> (o .:? "clusterAdmissionRules")

863766 <*> (o .:? "updateTime")

864767 <*> (o .:? "name")

865− <*> (o .:? "globalPolicyEvaluationMode")

866768 <*> (o .:? "description"))

867769

868770instance ToJSON Policy where

@@ -877,8 +779,6 @@ instance ToJSON Policy where

877779 _pClusterAdmissionRules,

878780 ("updateTime" .=) <$> _pUpdateTime,

879781 ("name" .=) <$> _pName,

880− ("globalPolicyEvaluationMode" .=) <$>

881− _pGlobalPolicyEvaluationMode,

882782 ("description" .=) <$> _pDescription])

883783

884784-- | Optional. Per-cluster admission rules. Cluster spec format:

@@ -1040,8 +940,8 @@ binding =

1040940-- that represents a service account. For example,

1041941-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

1042942-- email address that represents a Google group. For example,

1043−-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

1044−-- (primary) that represents all the users of that domain. For example,

943+-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

944+-- name that represents all the users of that domain. For example,

1045945-- \`google.com\` or \`example.com\`.

1046946bMembers :: Lens' Binding [Text]

1047947bMembers

@@ -1054,9 +954,10 @@ bMembers

1054954bRole :: Lens' Binding (Maybe Text)

1055955bRole = lens _bRole (\ s a -> s{_bRole = a})

1056956

1057−-- | The condition that is associated with this binding. NOTE: An unsatisfied

1058−-- condition will not allow user access via current binding. Different

1059−-- bindings, including their conditions, are examined independently.

957+-- | Unimplemented. The condition that is associated with this binding. NOTE:

958+-- an unsatisfied condition will not allow user access via current binding.

959+-- Different bindings, including their conditions, are examined

960+-- independently.

1060961bCondition :: Lens' Binding (Maybe Expr)

1061962bCondition

1062963 = lens _bCondition (\ s a -> s{_bCondition = a})

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization/Types/Sum.hs+2−127

@@ -23,14 +23,10 @@ import Network.Google.Prelude hiding (Bytes)

2323data AdmissionRuleEnforcementMode

2424 = EnforcementModeUnspecified

2525 -- ^ @ENFORCEMENT_MODE_UNSPECIFIED@

26− -- Do not use.

26+ -- Mandatory.

2727 | EnforcedBlockAndAuditLog

2828 -- ^ @ENFORCED_BLOCK_AND_AUDIT_LOG@

2929 -- Enforce the admission rule by blocking the pod creation.

30− | DryrunAuditLogOnly

31− -- ^ @DRYRUN_AUDIT_LOG_ONLY@

32− -- Dryrun mode: Audit logging only. This will allow the pod creation as if

33− -- the admission request had specified break-glass.

3430 deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

3531

3632instance Hashable AdmissionRuleEnforcementMode

@@ -39,14 +35,12 @@ instance FromHttpApiData AdmissionRuleEnforcementMode where

3935 parseQueryParam = \case

4036 "ENFORCEMENT_MODE_UNSPECIFIED" -> Right EnforcementModeUnspecified

4137 "ENFORCED_BLOCK_AND_AUDIT_LOG" -> Right EnforcedBlockAndAuditLog

42− "DRYRUN_AUDIT_LOG_ONLY" -> Right DryrunAuditLogOnly

4338 x -> Left ("Unable to parse AdmissionRuleEnforcementMode from: " <> x)

4439

4540instance ToHttpApiData AdmissionRuleEnforcementMode where

4641 toQueryParam = \case

4742 EnforcementModeUnspecified -> "ENFORCEMENT_MODE_UNSPECIFIED"

4843 EnforcedBlockAndAuditLog -> "ENFORCED_BLOCK_AND_AUDIT_LOG"

49− DryrunAuditLogOnly -> "DRYRUN_AUDIT_LOG_ONLY"

5044

5145instance FromJSON AdmissionRuleEnforcementMode where

5246 parseJSON = parseJSONText "AdmissionRuleEnforcementMode"

@@ -54,130 +48,11 @@ instance FromJSON AdmissionRuleEnforcementMode where

5448instance ToJSON AdmissionRuleEnforcementMode where

5549 toJSON = toJSONText

5650

57−-- | Optional. Controls the evaluation of a Google-maintained global

58−-- admission policy for common system-level images. Images not covered by

59−-- the global policy will be subject to the project admission policy. This

60−-- setting has no effect when specified inside a global admission policy.

61−data PolicyGlobalPolicyEvaluationMode

62− = GlobalPolicyEvaluationModeUnspecified

63− -- ^ @GLOBAL_POLICY_EVALUATION_MODE_UNSPECIFIED@

64− -- Not specified: DISABLE is assumed.

65− | Enable

66− -- ^ @ENABLE@

67− -- Enables global policy evaluation.

68− | Disable

69− -- ^ @DISABLE@

70− -- Disables global policy evaluation.

71− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

72−

73−instance Hashable PolicyGlobalPolicyEvaluationMode

74−

75−instance FromHttpApiData PolicyGlobalPolicyEvaluationMode where

76− parseQueryParam = \case

77− "GLOBAL_POLICY_EVALUATION_MODE_UNSPECIFIED" -> Right GlobalPolicyEvaluationModeUnspecified

78− "ENABLE" -> Right Enable

79− "DISABLE" -> Right Disable

80− x -> Left ("Unable to parse PolicyGlobalPolicyEvaluationMode from: " <> x)

81−

82−instance ToHttpApiData PolicyGlobalPolicyEvaluationMode where

83− toQueryParam = \case

84− GlobalPolicyEvaluationModeUnspecified -> "GLOBAL_POLICY_EVALUATION_MODE_UNSPECIFIED"

85− Enable -> "ENABLE"

86− Disable -> "DISABLE"

87−

88−instance FromJSON PolicyGlobalPolicyEvaluationMode where

89− parseJSON = parseJSONText "PolicyGlobalPolicyEvaluationMode"

90−

91−instance ToJSON PolicyGlobalPolicyEvaluationMode where

92− toJSON = toJSONText

93−

94−-- | The signature algorithm used to verify a message against a signature

95−-- using this key. These signature algorithm must match the structure and

96−-- any object identifiers encoded in \`public_key_pem\` (i.e. this

97−-- algorithm must match that of the public key).

98−data PkixPublicKeySignatureAlgorithm

99− = SignatureAlgorithmUnspecified

100− -- ^ @SIGNATURE_ALGORITHM_UNSPECIFIED@

101− -- Not specified.

102− | RsaPss2048SHA256

103− -- ^ @RSA_PSS_2048_SHA256@

104− -- RSASSA-PSS 2048 bit key with a SHA256 digest.

105− | RsaPss3072SHA256

106− -- ^ @RSA_PSS_3072_SHA256@

107− -- RSASSA-PSS 3072 bit key with a SHA256 digest.

108− | RsaPss4096SHA256

109− -- ^ @RSA_PSS_4096_SHA256@

110− -- RSASSA-PSS 4096 bit key with a SHA256 digest.

111− | RsaPss4096SHA512

112− -- ^ @RSA_PSS_4096_SHA512@

113− -- RSASSA-PSS 4096 bit key with a SHA512 digest.

114− | RsaSignPKCS12048SHA256

115− -- ^ @RSA_SIGN_PKCS1_2048_SHA256@

116− -- RSASSA-PKCS1-v1_5 with a 2048 bit key and a SHA256 digest.

117− | RsaSignPKCS13072SHA256

118− -- ^ @RSA_SIGN_PKCS1_3072_SHA256@

119− -- RSASSA-PKCS1-v1_5 with a 3072 bit key and a SHA256 digest.

120− | RsaSignPKCS14096SHA256

121− -- ^ @RSA_SIGN_PKCS1_4096_SHA256@

122− -- RSASSA-PKCS1-v1_5 with a 4096 bit key and a SHA256 digest.

123− | RsaSignPKCS14096SHA512

124− -- ^ @RSA_SIGN_PKCS1_4096_SHA512@

125− -- RSASSA-PKCS1-v1_5 with a 4096 bit key and a SHA512 digest.

126− | EcdsaP256SHA256

127− -- ^ @ECDSA_P256_SHA256@

128− -- ECDSA on the NIST P-256 curve with a SHA256 digest.

129− | EcdsaP384SHA384

130− -- ^ @ECDSA_P384_SHA384@

131− -- ECDSA on the NIST P-384 curve with a SHA384 digest.

132− | EcdsaP521SHA512

133− -- ^ @ECDSA_P521_SHA512@

134− -- ECDSA on the NIST P-521 curve with a SHA512 digest.

135− deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)

136−

137−instance Hashable PkixPublicKeySignatureAlgorithm

138−

139−instance FromHttpApiData PkixPublicKeySignatureAlgorithm where

140− parseQueryParam = \case

141− "SIGNATURE_ALGORITHM_UNSPECIFIED" -> Right SignatureAlgorithmUnspecified

142− "RSA_PSS_2048_SHA256" -> Right RsaPss2048SHA256

143− "RSA_PSS_3072_SHA256" -> Right RsaPss3072SHA256

144− "RSA_PSS_4096_SHA256" -> Right RsaPss4096SHA256

145− "RSA_PSS_4096_SHA512" -> Right RsaPss4096SHA512

146− "RSA_SIGN_PKCS1_2048_SHA256" -> Right RsaSignPKCS12048SHA256

147− "RSA_SIGN_PKCS1_3072_SHA256" -> Right RsaSignPKCS13072SHA256

148− "RSA_SIGN_PKCS1_4096_SHA256" -> Right RsaSignPKCS14096SHA256

149− "RSA_SIGN_PKCS1_4096_SHA512" -> Right RsaSignPKCS14096SHA512

150− "ECDSA_P256_SHA256" -> Right EcdsaP256SHA256

151− "ECDSA_P384_SHA384" -> Right EcdsaP384SHA384

152− "ECDSA_P521_SHA512" -> Right EcdsaP521SHA512

153− x -> Left ("Unable to parse PkixPublicKeySignatureAlgorithm from: " <> x)

154−

155−instance ToHttpApiData PkixPublicKeySignatureAlgorithm where

156− toQueryParam = \case

157− SignatureAlgorithmUnspecified -> "SIGNATURE_ALGORITHM_UNSPECIFIED"

158− RsaPss2048SHA256 -> "RSA_PSS_2048_SHA256"

159− RsaPss3072SHA256 -> "RSA_PSS_3072_SHA256"

160− RsaPss4096SHA256 -> "RSA_PSS_4096_SHA256"

161− RsaPss4096SHA512 -> "RSA_PSS_4096_SHA512"

162− RsaSignPKCS12048SHA256 -> "RSA_SIGN_PKCS1_2048_SHA256"

163− RsaSignPKCS13072SHA256 -> "RSA_SIGN_PKCS1_3072_SHA256"

164− RsaSignPKCS14096SHA256 -> "RSA_SIGN_PKCS1_4096_SHA256"

165− RsaSignPKCS14096SHA512 -> "RSA_SIGN_PKCS1_4096_SHA512"

166− EcdsaP256SHA256 -> "ECDSA_P256_SHA256"

167− EcdsaP384SHA384 -> "ECDSA_P384_SHA384"

168− EcdsaP521SHA512 -> "ECDSA_P521_SHA512"

169−

170−instance FromJSON PkixPublicKeySignatureAlgorithm where

171− parseJSON = parseJSONText "PkixPublicKeySignatureAlgorithm"

172−

173−instance ToJSON PkixPublicKeySignatureAlgorithm where

174− toJSON = toJSONText

175−

17651-- | Required. How this admission rule will be evaluated.

17752data AdmissionRuleEvaluationMode

17853 = EvaluationModeUnspecified

17954 -- ^ @EVALUATION_MODE_UNSPECIFIED@

180− -- Do not use.

55+ -- Mandatory.

18156 | AlwaysAllow

18257 -- ^ @ALWAYS_ALLOW@

18358 -- This rule allows all all pod creations.

gogol-classroom/gen/Network/Google/Classroom.hs+5−47

@@ -26,7 +26,6 @@ module Network.Google.Classroom

2626 , classroomCoursesScope

2727 , classroomPushNotificationsScope

2828 , classroomCourseworkStudentsReadOnlyScope

29− , classroomTopicsReadOnlyScope

3029 , classroomProFileEmailsScope

3130 , classroomProFilePhotosScope

3231 , classroomCourseworkMeScope

@@ -37,7 +36,6 @@ module Network.Google.Classroom

3736 , classroomRostersScope

3837 , classroomCoursesReadOnlyScope

3938 , classroomCourseworkStudentsScope

40− , classroomTopicsScope

4139 , classroomAnnouncementsScope

4240 , classroomCourseworkMeReadOnlyScope

4341 , classroomStudentSubmissionsMeReadOnlyScope

@@ -153,21 +151,6 @@ module Network.Google.Classroom

153151 -- ** classroom.courses.teachers.list

154152 , module Network.Google.Resource.Classroom.Courses.Teachers.List

155153

156− -- ** classroom.courses.topics.create

157− , module Network.Google.Resource.Classroom.Courses.Topics.Create

158−

159− -- ** classroom.courses.topics.delete

160− , module Network.Google.Resource.Classroom.Courses.Topics.Delete

161−

162− -- ** classroom.courses.topics.get

163− , module Network.Google.Resource.Classroom.Courses.Topics.Get

164−

165− -- ** classroom.courses.topics.list

166− , module Network.Google.Resource.Classroom.Courses.Topics.List

167−

168− -- ** classroom.courses.topics.patch

169− , module Network.Google.Resource.Classroom.Courses.Topics.Patch

170−

171154 -- ** classroom.courses.update

172155 , module Network.Google.Resource.Classroom.Courses.Update

173156

@@ -239,7 +222,6 @@ module Network.Google.Classroom

239222 , cwDueTime

240223 , cwAssociatedWithDeveloper

241224 , cwUpdateTime

242− , cwTopicId

243225 , cwMultipleChoiceQuestion

244226 , cwId

245227 , cwSubmissionModificationMode

@@ -344,12 +326,6 @@ module Network.Google.Classroom

344326 , globalPermission

345327 , gpPermission

346328

347− -- ** ListTopicResponse

348− , ListTopicResponse

349− , listTopicResponse

350− , ltrNextPageToken

351− , ltrTopic

352−

353329 -- ** Link

354330 , Link

355331 , link

@@ -455,14 +431,6 @@ module Network.Google.Classroom

455431 , aYouTubeVideo

456432 , aForm

457433

458− -- ** Topic

459− , Topic

460− , topic

461− , tCourseId

462− , tUpdateTime

463− , tTopicId

464− , tName

465−

466434 -- ** Announcement

467435 , Announcement

468436 , announcement

@@ -524,9 +492,9 @@ module Network.Google.Classroom

524492 -- ** Teacher

525493 , Teacher

526494 , teacher

527− , teaCourseId

528− , teaProFile

529− , teaUserId

495+ , tCourseId

496+ , tProFile

497+ , tUserId

530498

531499 -- ** CourseMaterialSet

532500 , CourseMaterialSet

@@ -689,8 +657,8 @@ module Network.Google.Classroom

689657 -- ** ListTeachersResponse

690658 , ListTeachersResponse

691659 , listTeachersResponse

692− , lNextPageToken

693− , lTeachers

660+ , ltrNextPageToken

661+ , ltrTeachers

694662

695663 -- ** Student

696664 , Student

@@ -749,11 +717,6 @@ import Network.Google.Resource.Classroom.Courses.Teachers.Create

749717import Network.Google.Resource.Classroom.Courses.Teachers.Delete

750718import Network.Google.Resource.Classroom.Courses.Teachers.Get

751719import Network.Google.Resource.Classroom.Courses.Teachers.List

752−import Network.Google.Resource.Classroom.Courses.Topics.Create

753−import Network.Google.Resource.Classroom.Courses.Topics.Delete

754−import Network.Google.Resource.Classroom.Courses.Topics.Get

755−import Network.Google.Resource.Classroom.Courses.Topics.List

756−import Network.Google.Resource.Classroom.Courses.Topics.Patch

757720import Network.Google.Resource.Classroom.Courses.Update

758721import Network.Google.Resource.Classroom.Invitations.Accept

759722import Network.Google.Resource.Classroom.Invitations.Create

@@ -809,11 +772,6 @@ type ClassroomAPI =

809772 :<|> CoursesAnnouncementsCreateResource

810773 :<|> CoursesAnnouncementsModifyAssigneesResource

811774 :<|> CoursesAnnouncementsDeleteResource

812− :<|> CoursesTopicsListResource

813− :<|> CoursesTopicsPatchResource

814− :<|> CoursesTopicsGetResource

815− :<|> CoursesTopicsCreateResource

816− :<|> CoursesTopicsDeleteResource

817775 :<|> CoursesAliasesListResource

818776 :<|> CoursesAliasesCreateResource

819777 :<|> CoursesAliasesDeleteResource

gogol-classroom/gen/Network/Google/Classroom/Types.hs+5−30

@@ -24,7 +24,6 @@ module Network.Google.Classroom.Types

2424 , classroomCoursesScope

2525 , classroomPushNotificationsScope

2626 , classroomCourseworkStudentsReadOnlyScope

27− , classroomTopicsReadOnlyScope

2827 , classroomProFileEmailsScope

2928 , classroomProFilePhotosScope

3029 , classroomCourseworkMeScope

@@ -35,7 +34,6 @@ module Network.Google.Classroom.Types

3534 , classroomRostersScope

3635 , classroomCoursesReadOnlyScope

3736 , classroomCourseworkStudentsScope

38− , classroomTopicsScope

3937 , classroomAnnouncementsScope

4038 , classroomCourseworkMeReadOnlyScope

4139 , classroomStudentSubmissionsMeReadOnlyScope

@@ -62,7 +60,6 @@ module Network.Google.Classroom.Types

6260 , cwDueTime

6361 , cwAssociatedWithDeveloper

6462 , cwUpdateTime

65− , cwTopicId

6663 , cwMultipleChoiceQuestion

6764 , cwId

6865 , cwSubmissionModificationMode

@@ -167,12 +164,6 @@ module Network.Google.Classroom.Types

167164 , globalPermission

168165 , gpPermission

169166

170− -- * ListTopicResponse

171− , ListTopicResponse

172− , listTopicResponse

173− , ltrNextPageToken

174− , ltrTopic

175−

176167 -- * Link

177168 , Link

178169 , link

@@ -278,14 +269,6 @@ module Network.Google.Classroom.Types

278269 , aYouTubeVideo

279270 , aForm

280271

281− -- * Topic

282− , Topic

283− , topic

284− , tCourseId

285− , tUpdateTime

286− , tTopicId

287− , tName

288−

289272 -- * Announcement

290273 , Announcement

291274 , announcement

@@ -347,9 +330,9 @@ module Network.Google.Classroom.Types

347330 -- * Teacher

348331 , Teacher

349332 , teacher

350− , teaCourseId

351− , teaProFile

352− , teaUserId

333+ , tCourseId

334+ , tProFile

335+ , tUserId

353336

354337 -- * CourseMaterialSet

355338 , CourseMaterialSet

@@ -512,8 +495,8 @@ module Network.Google.Classroom.Types

512495 -- * ListTeachersResponse

513496 , ListTeachersResponse

514497 , listTeachersResponse

515− , lNextPageToken

516− , lTeachers

498+ , ltrNextPageToken

499+ , ltrTeachers

517500

518501 -- * Student

519502 , Student

@@ -562,10 +545,6 @@ classroomPushNotificationsScope = Proxy

562545classroomCourseworkStudentsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students.readonly"]

563546classroomCourseworkStudentsReadOnlyScope = Proxy

564547

565−-- | View topics in Google Classroom

566−classroomTopicsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.topics.readonly"]

567−classroomTopicsReadOnlyScope = Proxy

568−

569548-- | View the email addresses of people in your classes

570549classroomProFileEmailsScope :: Proxy '["https://www.googleapis.com/auth/classroom.profile.emails"]

571550classroomProFileEmailsScope = Proxy

@@ -609,10 +588,6 @@ classroomCoursesReadOnlyScope = Proxy

609588classroomCourseworkStudentsScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students"]

610589classroomCourseworkStudentsScope = Proxy

611590

612−-- | See, create, and edit topics in Google Classroom

613−classroomTopicsScope :: Proxy '["https://www.googleapis.com/auth/classroom.topics"]

614−classroomTopicsScope = Proxy

615−

616591-- | View and manage announcements in Google Classroom

617592classroomAnnouncementsScope :: Proxy '["https://www.googleapis.com/auth/classroom.announcements"]

618593classroomAnnouncementsScope = Proxy

gogol-classroom/gen/Network/Google/Classroom/Types/Product.hs+31−174

@@ -91,7 +91,6 @@ data CourseWork =

9191 , _cwDueTime :: !(Maybe TimeOfDay')

9292 , _cwAssociatedWithDeveloper :: !(Maybe Bool)

9393 , _cwUpdateTime :: !(Maybe DateTime')

94− , _cwTopicId :: !(Maybe Text)

9594 , _cwMultipleChoiceQuestion :: !(Maybe MultipleChoiceQuestion)

9695 , _cwId :: !(Maybe Text)

9796 , _cwSubmissionModificationMode :: !(Maybe CourseWorkSubmissionModificationMode)

@@ -133,8 +132,6 @@ data CourseWork =

133132--

134133-- * 'cwUpdateTime'

135134--

136−-- * 'cwTopicId'

137−--

138135-- * 'cwMultipleChoiceQuestion'

139136--

140137-- * 'cwId'

@@ -168,7 +165,6 @@ courseWork =

168165 , _cwDueTime = Nothing

169166 , _cwAssociatedWithDeveloper = Nothing

170167 , _cwUpdateTime = Nothing

171− , _cwTopicId = Nothing

172168 , _cwMultipleChoiceQuestion = Nothing

173169 , _cwId = Nothing

174170 , _cwSubmissionModificationMode = Nothing

@@ -263,12 +259,6 @@ cwUpdateTime

263259 = lens _cwUpdateTime (\ s a -> s{_cwUpdateTime = a})

264260 . mapping _DateTime

265261

266−-- | Identifier for the topic that this coursework is associated with. Must

267−-- match an existing topic in the course.

268−cwTopicId :: Lens' CourseWork (Maybe Text)

269−cwTopicId

270− = lens _cwTopicId (\ s a -> s{_cwTopicId = a})

271−

272262-- | Multiple choice question details. For read operations, this field is

273263-- populated only when \`work_type\` is \`MULTIPLE_CHOICE_QUESTION\`. For

274264-- write operations, this field must be specified when creating course work

@@ -344,7 +334,6 @@ instance FromJSON CourseWork where

344334 <*> (o .:? "dueTime")

345335 <*> (o .:? "associatedWithDeveloper")

346336 <*> (o .:? "updateTime")

347− <*> (o .:? "topicId")

348337 <*> (o .:? "multipleChoiceQuestion")

349338 <*> (o .:? "id")

350339 <*> (o .:? "submissionModificationMode")

@@ -373,7 +362,6 @@ instance ToJSON CourseWork where

373362 ("associatedWithDeveloper" .=) <$>

374363 _cwAssociatedWithDeveloper,

375364 ("updateTime" .=) <$> _cwUpdateTime,

376− ("topicId" .=) <$> _cwTopicId,

377365 ("multipleChoiceQuestion" .=) <$>

378366 _cwMultipleChoiceQuestion,

379367 ("id" .=) <$> _cwId,

@@ -1032,59 +1020,6 @@ instance ToJSON GlobalPermission where

10321020 = object

10331021 (catMaybes [("permission" .=) <$> _gpPermission])

10341022

1035−-- | Response when listing topics.

1036−--

1037−-- /See:/ 'listTopicResponse' smart constructor.

1038−data ListTopicResponse =

1039− ListTopicResponse'

1040− { _ltrNextPageToken :: !(Maybe Text)

1041− , _ltrTopic :: !(Maybe [Topic])

1042− }

1043− deriving (Eq, Show, Data, Typeable, Generic)

1044−

1045−

1046−-- | Creates a value of 'ListTopicResponse' with the minimum fields required to make a request.

1047−--

1048−-- Use one of the following lenses to modify other fields as desired:

1049−--

1050−-- * 'ltrNextPageToken'

1051−--

1052−-- * 'ltrTopic'

1053−listTopicResponse

1054− :: ListTopicResponse

1055−listTopicResponse =

1056− ListTopicResponse' {_ltrNextPageToken = Nothing, _ltrTopic = Nothing}

1057−

1058−

1059−-- | Token identifying the next page of results to return. If empty, no

1060−-- further results are available.

1061−ltrNextPageToken :: Lens' ListTopicResponse (Maybe Text)

1062−ltrNextPageToken

1063− = lens _ltrNextPageToken

1064− (\ s a -> s{_ltrNextPageToken = a})

1065−

1066−-- | Topic items that match the request.

1067−ltrTopic :: Lens' ListTopicResponse [Topic]

1068−ltrTopic

1069− = lens _ltrTopic (\ s a -> s{_ltrTopic = a}) .

1070− _Default

1071− . _Coerce

1072−

1073−instance FromJSON ListTopicResponse where

1074− parseJSON

1075− = withObject "ListTopicResponse"

1076− (\ o ->

1077− ListTopicResponse' <$>

1078− (o .:? "nextPageToken") <*>

1079− (o .:? "topic" .!= mempty))

1080−

1081−instance ToJSON ListTopicResponse where

1082− toJSON ListTopicResponse'{..}

1083− = object

1084− (catMaybes

1085− [("nextPageToken" .=) <$> _ltrNextPageToken,

1086− ("topic" .=) <$> _ltrTopic])

1087−

10881023-- | URL item.

10891024--

10901025-- /See:/ 'link' smart constructor.

@@ -1873,82 +1808,6 @@ instance ToJSON Attachment where

18731808 ("youTubeVideo" .=) <$> _aYouTubeVideo,

18741809 ("form" .=) <$> _aForm])

18751810

1876−-- | Topic created by a teacher for the course

1877−--

1878−-- /See:/ 'topic' smart constructor.

1879−data Topic =

1880− Topic'

1881− { _tCourseId :: !(Maybe Text)

1882− , _tUpdateTime :: !(Maybe DateTime')

1883− , _tTopicId :: !(Maybe Text)

1884− , _tName :: !(Maybe Text)

1885− }

1886− deriving (Eq, Show, Data, Typeable, Generic)

1887−

1888−

1889−-- | Creates a value of 'Topic' with the minimum fields required to make a request.

1890−--

1891−-- Use one of the following lenses to modify other fields as desired:

1892−--

1893−-- * 'tCourseId'

1894−--

1895−-- * 'tUpdateTime'

1896−--

1897−-- * 'tTopicId'

1898−--

1899−-- * 'tName'

1900−topic

1901− :: Topic

1902−topic =

1903− Topic'

1904− { _tCourseId = Nothing

1905− , _tUpdateTime = Nothing

1906− , _tTopicId = Nothing

1907− , _tName = Nothing

1908− }

1909−

1910−

1911−-- | Identifier of the course. Read-only.

1912−tCourseId :: Lens' Topic (Maybe Text)

1913−tCourseId

1914− = lens _tCourseId (\ s a -> s{_tCourseId = a})

1915−

1916−-- | The time the topic was last updated by the system. Read-only.

1917−tUpdateTime :: Lens' Topic (Maybe UTCTime)

1918−tUpdateTime

1919− = lens _tUpdateTime (\ s a -> s{_tUpdateTime = a}) .

1920− mapping _DateTime

1921−

1922−-- | Unique identifier for the topic. Read-only.

1923−tTopicId :: Lens' Topic (Maybe Text)

1924−tTopicId = lens _tTopicId (\ s a -> s{_tTopicId = a})

1925−

1926−-- | The name of the topic, generated by the user. Leading and trailing

1927−-- whitespaces, if any, will be trimmed. Also, multiple consecutive

1928−-- whitespaces will be collapsed into one inside the name. The result must

1929−-- be a non-empty string. Topic names are case sensitive, and must be no

1930−-- longer than 100 characters.

1931−tName :: Lens' Topic (Maybe Text)

1932−tName = lens _tName (\ s a -> s{_tName = a})

1933−

1934−instance FromJSON Topic where

1935− parseJSON

1936− = withObject "Topic"

1937− (\ o ->

1938− Topic' <$>

1939− (o .:? "courseId") <*> (o .:? "updateTime") <*>

1940− (o .:? "topicId")

1941− <*> (o .:? "name"))

1942−

1943−instance ToJSON Topic where

1944− toJSON Topic'{..}

1945− = object

1946− (catMaybes

1947− [("courseId" .=) <$> _tCourseId,

1948− ("updateTime" .=) <$> _tUpdateTime,

1949− ("topicId" .=) <$> _tTopicId,

1950− ("name" .=) <$> _tName])

1951−

19521811-- | Announcement created by a teacher for students of the course

19531812--

19541813-- /See:/ 'announcement' smart constructor.

@@ -2575,9 +2434,9 @@ instance ToJSON YouTubeVideo where

25752434-- /See:/ 'teacher' smart constructor.

25762435data Teacher =

25772436 Teacher'

2578− { _teaCourseId :: !(Maybe Text)

2579− , _teaProFile :: !(Maybe UserProFile)

2580− , _teaUserId :: !(Maybe Text)

2437+ { _tCourseId :: !(Maybe Text)

2438+ , _tProFile :: !(Maybe UserProFile)

2439+ , _tUserId :: !(Maybe Text)

25812440 }

25822441 deriving (Eq, Show, Data, Typeable, Generic)

25832442

@@ -2586,34 +2445,32 @@ data Teacher =

25862445--

25872446-- Use one of the following lenses to modify other fields as desired:

25882447--

2589−-- * 'teaCourseId'

2448+-- * 'tCourseId'

25902449--

2591−-- * 'teaProFile'

2450+-- * 'tProFile'

25922451--

2593−-- * 'teaUserId'

2452+-- * 'tUserId'

25942453teacher

25952454 :: Teacher

25962455teacher =

2597− Teacher' {_teaCourseId = Nothing, _teaProFile = Nothing, _teaUserId = Nothing}

2456+ Teacher' {_tCourseId = Nothing, _tProFile = Nothing, _tUserId = Nothing}

25982457

25992458

26002459-- | Identifier of the course. Read-only.

2601−teaCourseId :: Lens' Teacher (Maybe Text)

2602−teaCourseId

2603− = lens _teaCourseId (\ s a -> s{_teaCourseId = a})

2460+tCourseId :: Lens' Teacher (Maybe Text)

2461+tCourseId

2462+ = lens _tCourseId (\ s a -> s{_tCourseId = a})

26042463

26052464-- | Global user information for the teacher. Read-only.

2606−teaProFile :: Lens' Teacher (Maybe UserProFile)

2607−teaProFile

2608− = lens _teaProFile (\ s a -> s{_teaProFile = a})

2465+tProFile :: Lens' Teacher (Maybe UserProFile)

2466+tProFile = lens _tProFile (\ s a -> s{_tProFile = a})

26092467

26102468-- | Identifier of the user. When specified as a parameter of a request, this

26112469-- identifier can be one of the following: * the numeric identifier for the

26122470-- user * the email address of the user * the string literal \`\"me\"\`,

26132471-- indicating the requesting user

2614−teaUserId :: Lens' Teacher (Maybe Text)

2615−teaUserId

2616− = lens _teaUserId (\ s a -> s{_teaUserId = a})

2472+tUserId :: Lens' Teacher (Maybe Text)

2473+tUserId = lens _tUserId (\ s a -> s{_tUserId = a})

26172474

26182475instance FromJSON Teacher where

26192476 parseJSON

@@ -2627,9 +2484,9 @@ instance ToJSON Teacher where

26272484 toJSON Teacher'{..}

26282485 = object

26292486 (catMaybes

2630− [("courseId" .=) <$> _teaCourseId,

2631− ("profile" .=) <$> _teaProFile,

2632− ("userId" .=) <$> _teaUserId])

2487+ [("courseId" .=) <$> _tCourseId,

2488+ ("profile" .=) <$> _tProFile,

2489+ ("userId" .=) <$> _tUserId])

26332490

26342491-- | A set of materials that appears on the \"About\" page of the course.

26352492-- These materials might include a syllabus, schedule, or other background

@@ -3940,8 +3797,8 @@ instance ToJSON Form where

39403797-- /See:/ 'listTeachersResponse' smart constructor.

39413798data ListTeachersResponse =

39423799 ListTeachersResponse'

3943− { _lNextPageToken :: !(Maybe Text)

3944− , _lTeachers :: !(Maybe [Teacher])

3800+ { _ltrNextPageToken :: !(Maybe Text)

3801+ , _ltrTeachers :: !(Maybe [Teacher])

39453802 }

39463803 deriving (Eq, Show, Data, Typeable, Generic)

39473804

@@ -3950,26 +3807,26 @@ data ListTeachersResponse =

39503807--

39513808-- Use one of the following lenses to modify other fields as desired:

39523809--

3953−-- * 'lNextPageToken'

3810+-- * 'ltrNextPageToken'

39543811--

3955−-- * 'lTeachers'

3812+-- * 'ltrTeachers'

39563813listTeachersResponse

39573814 :: ListTeachersResponse

39583815listTeachersResponse =

3959− ListTeachersResponse' {_lNextPageToken = Nothing, _lTeachers = Nothing}

3816+ ListTeachersResponse' {_ltrNextPageToken = Nothing, _ltrTeachers = Nothing}

39603817

39613818

39623819-- | Token identifying the next page of results to return. If empty, no

39633820-- further results are available.

3964−lNextPageToken :: Lens' ListTeachersResponse (Maybe Text)

3965−lNextPageToken

3966− = lens _lNextPageToken

3967− (\ s a -> s{_lNextPageToken = a})

3821+ltrNextPageToken :: Lens' ListTeachersResponse (Maybe Text)

3822+ltrNextPageToken

3823+ = lens _ltrNextPageToken

3824+ (\ s a -> s{_ltrNextPageToken = a})

39683825

39693826-- | Teachers who match the list request.

3970−lTeachers :: Lens' ListTeachersResponse [Teacher]

3971−lTeachers

3972− = lens _lTeachers (\ s a -> s{_lTeachers = a}) .

3827+ltrTeachers :: Lens' ListTeachersResponse [Teacher]

3828+ltrTeachers

3829+ = lens _ltrTeachers (\ s a -> s{_ltrTeachers = a}) .

39733830 _Default

39743831 . _Coerce

39753832

@@ -3985,8 +3842,8 @@ instance ToJSON ListTeachersResponse where

39853842 toJSON ListTeachersResponse'{..}

39863843 = object

39873844 (catMaybes

3988− [("nextPageToken" .=) <$> _lNextPageToken,

3989− ("teachers" .=) <$> _lTeachers])

3845+ [("nextPageToken" .=) <$> _ltrNextPageToken,

3846+ ("teachers" .=) <$> _ltrTeachers])

39903847

39913848-- | Student in a course.

39923849--

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Delete.hs+59−60

@@ -38,13 +38,13 @@ module Network.Google.Resource.Classroom.Courses.Teachers.Delete

3838 , CoursesTeachersDelete

3939

4040 -- * Request Lenses

41− , ctdtXgafv

42− , ctdtUploadProtocol

43− , ctdtCourseId

44− , ctdtAccessToken

45− , ctdtUploadType

46− , ctdtUserId

47− , ctdtCallback

41+ , ctdXgafv

42+ , ctdUploadProtocol

43+ , ctdCourseId

44+ , ctdAccessToken

45+ , ctdUploadType

46+ , ctdUserId

47+ , ctdCallback

4848 ) where

4949

5050import Network.Google.Classroom.Types

@@ -75,13 +75,13 @@ type CoursesTeachersDeleteResource =

7575-- /See:/ 'coursesTeachersDelete' smart constructor.

7676data CoursesTeachersDelete =

7777 CoursesTeachersDelete'

78− { _ctdtXgafv :: !(Maybe Xgafv)

79− , _ctdtUploadProtocol :: !(Maybe Text)

80− , _ctdtCourseId :: !Text

81− , _ctdtAccessToken :: !(Maybe Text)

82− , _ctdtUploadType :: !(Maybe Text)

83− , _ctdtUserId :: !Text

84− , _ctdtCallback :: !(Maybe Text)

78+ { _ctdXgafv :: !(Maybe Xgafv)

79+ , _ctdUploadProtocol :: !(Maybe Text)

80+ , _ctdCourseId :: !Text

81+ , _ctdAccessToken :: !(Maybe Text)

82+ , _ctdUploadType :: !(Maybe Text)

83+ , _ctdUserId :: !Text

84+ , _ctdCallback :: !(Maybe Text)

8585 }

8686 deriving (Eq, Show, Data, Typeable, Generic)

8787

@@ -90,86 +90,85 @@ data CoursesTeachersDelete =

9090--

9191-- Use one of the following lenses to modify other fields as desired:

9292--

93−-- * 'ctdtXgafv'

93+-- * 'ctdXgafv'

9494--

95−-- * 'ctdtUploadProtocol'

95+-- * 'ctdUploadProtocol'

9696--

97−-- * 'ctdtCourseId'

97+-- * 'ctdCourseId'

9898--

99−-- * 'ctdtAccessToken'

99+-- * 'ctdAccessToken'

100100--

101−-- * 'ctdtUploadType'

101+-- * 'ctdUploadType'

102102--

103−-- * 'ctdtUserId'

103+-- * 'ctdUserId'

104104--

105−-- * 'ctdtCallback'

105+-- * 'ctdCallback'

106106coursesTeachersDelete

107− :: Text -- ^ 'ctdtCourseId'

108− -> Text -- ^ 'ctdtUserId'

107+ :: Text -- ^ 'ctdCourseId'

108+ -> Text -- ^ 'ctdUserId'

109109 -> CoursesTeachersDelete

110−coursesTeachersDelete pCtdtCourseId_ pCtdtUserId_ =

110+coursesTeachersDelete pCtdCourseId_ pCtdUserId_ =

111111 CoursesTeachersDelete'

112− { _ctdtXgafv = Nothing

113− , _ctdtUploadProtocol = Nothing

114− , _ctdtCourseId = pCtdtCourseId_

115− , _ctdtAccessToken = Nothing

116− , _ctdtUploadType = Nothing

117− , _ctdtUserId = pCtdtUserId_

118− , _ctdtCallback = Nothing

112+ { _ctdXgafv = Nothing

113+ , _ctdUploadProtocol = Nothing

114+ , _ctdCourseId = pCtdCourseId_

115+ , _ctdAccessToken = Nothing

116+ , _ctdUploadType = Nothing

117+ , _ctdUserId = pCtdUserId_

118+ , _ctdCallback = Nothing

119119 }

120120

121121

122122-- | V1 error format.

123−ctdtXgafv :: Lens' CoursesTeachersDelete (Maybe Xgafv)

124−ctdtXgafv

125− = lens _ctdtXgafv (\ s a -> s{_ctdtXgafv = a})

123+ctdXgafv :: Lens' CoursesTeachersDelete (Maybe Xgafv)

124+ctdXgafv = lens _ctdXgafv (\ s a -> s{_ctdXgafv = a})

126125

127126-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

128−ctdtUploadProtocol :: Lens' CoursesTeachersDelete (Maybe Text)

129−ctdtUploadProtocol

130− = lens _ctdtUploadProtocol

131− (\ s a -> s{_ctdtUploadProtocol = a})

127+ctdUploadProtocol :: Lens' CoursesTeachersDelete (Maybe Text)

128+ctdUploadProtocol

129+ = lens _ctdUploadProtocol

130+ (\ s a -> s{_ctdUploadProtocol = a})

132131

133132-- | Identifier of the course. This identifier can be either the

134133-- Classroom-assigned identifier or an alias.

135−ctdtCourseId :: Lens' CoursesTeachersDelete Text

136−ctdtCourseId

137− = lens _ctdtCourseId (\ s a -> s{_ctdtCourseId = a})

134+ctdCourseId :: Lens' CoursesTeachersDelete Text

135+ctdCourseId

136+ = lens _ctdCourseId (\ s a -> s{_ctdCourseId = a})

138137

139138-- | OAuth access token.

140−ctdtAccessToken :: Lens' CoursesTeachersDelete (Maybe Text)

141−ctdtAccessToken

142− = lens _ctdtAccessToken

143− (\ s a -> s{_ctdtAccessToken = a})

139+ctdAccessToken :: Lens' CoursesTeachersDelete (Maybe Text)

140+ctdAccessToken

141+ = lens _ctdAccessToken

142+ (\ s a -> s{_ctdAccessToken = a})

144143

145144-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

146−ctdtUploadType :: Lens' CoursesTeachersDelete (Maybe Text)

147−ctdtUploadType

148− = lens _ctdtUploadType

149− (\ s a -> s{_ctdtUploadType = a})

145+ctdUploadType :: Lens' CoursesTeachersDelete (Maybe Text)

146+ctdUploadType

147+ = lens _ctdUploadType

148+ (\ s a -> s{_ctdUploadType = a})

150149

151150-- | Identifier of the teacher to delete. The identifier can be one of the

152151-- following: * the numeric identifier for the user * the email address of

153152-- the user * the string literal \`\"me\"\`, indicating the requesting user

154−ctdtUserId :: Lens' CoursesTeachersDelete Text

155−ctdtUserId

156− = lens _ctdtUserId (\ s a -> s{_ctdtUserId = a})

153+ctdUserId :: Lens' CoursesTeachersDelete Text

154+ctdUserId

155+ = lens _ctdUserId (\ s a -> s{_ctdUserId = a})

157156

158157-- | JSONP

159−ctdtCallback :: Lens' CoursesTeachersDelete (Maybe Text)

160−ctdtCallback

161− = lens _ctdtCallback (\ s a -> s{_ctdtCallback = a})

158+ctdCallback :: Lens' CoursesTeachersDelete (Maybe Text)

159+ctdCallback

160+ = lens _ctdCallback (\ s a -> s{_ctdCallback = a})

162161

163162instance GoogleRequest CoursesTeachersDelete where

164163 type Rs CoursesTeachersDelete = Empty

165164 type Scopes CoursesTeachersDelete =

166165 '["https://www.googleapis.com/auth/classroom.rosters"]

167166 requestClient CoursesTeachersDelete'{..}

168− = go _ctdtCourseId _ctdtUserId _ctdtXgafv

169− _ctdtUploadProtocol

170− _ctdtAccessToken

171− _ctdtUploadType

172− _ctdtCallback

167+ = go _ctdCourseId _ctdUserId _ctdXgafv

168+ _ctdUploadProtocol

169+ _ctdAccessToken

170+ _ctdUploadType

171+ _ctdCallback

173172 (Just AltJSON)

174173 classroomService

175174 where go

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Get.hs+59−60

@@ -37,13 +37,13 @@ module Network.Google.Resource.Classroom.Courses.Teachers.Get

3737 , CoursesTeachersGet

3838

3939 -- * Request Lenses

40− , ctgtXgafv

41− , ctgtUploadProtocol

42− , ctgtCourseId

43− , ctgtAccessToken

44− , ctgtUploadType

45− , ctgtUserId

46− , ctgtCallback

40+ , ctgXgafv

41+ , ctgUploadProtocol

42+ , ctgCourseId

43+ , ctgAccessToken

44+ , ctgUploadType

45+ , ctgUserId

46+ , ctgCallback

4747 ) where

4848

4949import Network.Google.Classroom.Types

@@ -73,13 +73,13 @@ type CoursesTeachersGetResource =

7373-- /See:/ 'coursesTeachersGet' smart constructor.

7474data CoursesTeachersGet =

7575 CoursesTeachersGet'

76− { _ctgtXgafv :: !(Maybe Xgafv)

77− , _ctgtUploadProtocol :: !(Maybe Text)

78− , _ctgtCourseId :: !Text

79− , _ctgtAccessToken :: !(Maybe Text)

80− , _ctgtUploadType :: !(Maybe Text)

81− , _ctgtUserId :: !Text

82− , _ctgtCallback :: !(Maybe Text)

76+ { _ctgXgafv :: !(Maybe Xgafv)

77+ , _ctgUploadProtocol :: !(Maybe Text)

78+ , _ctgCourseId :: !Text

79+ , _ctgAccessToken :: !(Maybe Text)

80+ , _ctgUploadType :: !(Maybe Text)

81+ , _ctgUserId :: !Text

82+ , _ctgCallback :: !(Maybe Text)

8383 }

8484 deriving (Eq, Show, Data, Typeable, Generic)

8585

@@ -88,75 +88,74 @@ data CoursesTeachersGet =

8888--

8989-- Use one of the following lenses to modify other fields as desired:

9090--

91−-- * 'ctgtXgafv'

91+-- * 'ctgXgafv'

9292--

93−-- * 'ctgtUploadProtocol'

93+-- * 'ctgUploadProtocol'

9494--

95−-- * 'ctgtCourseId'

95+-- * 'ctgCourseId'

9696--

97−-- * 'ctgtAccessToken'

97+-- * 'ctgAccessToken'

9898--

99−-- * 'ctgtUploadType'

99+-- * 'ctgUploadType'

100100--

101−-- * 'ctgtUserId'

101+-- * 'ctgUserId'

102102--

103−-- * 'ctgtCallback'

103+-- * 'ctgCallback'

104104coursesTeachersGet

105− :: Text -- ^ 'ctgtCourseId'

106− -> Text -- ^ 'ctgtUserId'

105+ :: Text -- ^ 'ctgCourseId'

106+ -> Text -- ^ 'ctgUserId'

107107 -> CoursesTeachersGet

108−coursesTeachersGet pCtgtCourseId_ pCtgtUserId_ =

108+coursesTeachersGet pCtgCourseId_ pCtgUserId_ =

109109 CoursesTeachersGet'

110− { _ctgtXgafv = Nothing

111− , _ctgtUploadProtocol = Nothing

112− , _ctgtCourseId = pCtgtCourseId_

113− , _ctgtAccessToken = Nothing

114− , _ctgtUploadType = Nothing

115− , _ctgtUserId = pCtgtUserId_

116− , _ctgtCallback = Nothing

110+ { _ctgXgafv = Nothing

111+ , _ctgUploadProtocol = Nothing

112+ , _ctgCourseId = pCtgCourseId_

113+ , _ctgAccessToken = Nothing

114+ , _ctgUploadType = Nothing

115+ , _ctgUserId = pCtgUserId_

116+ , _ctgCallback = Nothing

117117 }

118118

119119

120120-- | V1 error format.

121−ctgtXgafv :: Lens' CoursesTeachersGet (Maybe Xgafv)

122−ctgtXgafv

123− = lens _ctgtXgafv (\ s a -> s{_ctgtXgafv = a})

121+ctgXgafv :: Lens' CoursesTeachersGet (Maybe Xgafv)

122+ctgXgafv = lens _ctgXgafv (\ s a -> s{_ctgXgafv = a})

124123

125124-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

126−ctgtUploadProtocol :: Lens' CoursesTeachersGet (Maybe Text)

127−ctgtUploadProtocol

128− = lens _ctgtUploadProtocol

129− (\ s a -> s{_ctgtUploadProtocol = a})

125+ctgUploadProtocol :: Lens' CoursesTeachersGet (Maybe Text)

126+ctgUploadProtocol

127+ = lens _ctgUploadProtocol

128+ (\ s a -> s{_ctgUploadProtocol = a})

130129

131130-- | Identifier of the course. This identifier can be either the

132131-- Classroom-assigned identifier or an alias.

133−ctgtCourseId :: Lens' CoursesTeachersGet Text

134−ctgtCourseId

135− = lens _ctgtCourseId (\ s a -> s{_ctgtCourseId = a})

132+ctgCourseId :: Lens' CoursesTeachersGet Text

133+ctgCourseId

134+ = lens _ctgCourseId (\ s a -> s{_ctgCourseId = a})

136135

137136-- | OAuth access token.

138−ctgtAccessToken :: Lens' CoursesTeachersGet (Maybe Text)

139−ctgtAccessToken

140− = lens _ctgtAccessToken

141− (\ s a -> s{_ctgtAccessToken = a})

137+ctgAccessToken :: Lens' CoursesTeachersGet (Maybe Text)

138+ctgAccessToken

139+ = lens _ctgAccessToken

140+ (\ s a -> s{_ctgAccessToken = a})

142141

143142-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

144−ctgtUploadType :: Lens' CoursesTeachersGet (Maybe Text)

145−ctgtUploadType

146− = lens _ctgtUploadType

147− (\ s a -> s{_ctgtUploadType = a})

143+ctgUploadType :: Lens' CoursesTeachersGet (Maybe Text)

144+ctgUploadType

145+ = lens _ctgUploadType

146+ (\ s a -> s{_ctgUploadType = a})

148147

149148-- | Identifier of the teacher to return. The identifier can be one of the

150149-- following: * the numeric identifier for the user * the email address of

151150-- the user * the string literal \`\"me\"\`, indicating the requesting user

152−ctgtUserId :: Lens' CoursesTeachersGet Text

153−ctgtUserId

154− = lens _ctgtUserId (\ s a -> s{_ctgtUserId = a})

151+ctgUserId :: Lens' CoursesTeachersGet Text

152+ctgUserId

153+ = lens _ctgUserId (\ s a -> s{_ctgUserId = a})

155154

156155-- | JSONP

157−ctgtCallback :: Lens' CoursesTeachersGet (Maybe Text)

158−ctgtCallback

159− = lens _ctgtCallback (\ s a -> s{_ctgtCallback = a})

156+ctgCallback :: Lens' CoursesTeachersGet (Maybe Text)

157+ctgCallback

158+ = lens _ctgCallback (\ s a -> s{_ctgCallback = a})

160159

161160instance GoogleRequest CoursesTeachersGet where

162161 type Rs CoursesTeachersGet = Teacher

@@ -166,11 +165,11 @@ instance GoogleRequest CoursesTeachersGet where

166165 "https://www.googleapis.com/auth/classroom.rosters",

167166 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

168167 requestClient CoursesTeachersGet'{..}

169− = go _ctgtCourseId _ctgtUserId _ctgtXgafv

170− _ctgtUploadProtocol

171− _ctgtAccessToken

172− _ctgtUploadType

173− _ctgtCallback

168+ = go _ctgCourseId _ctgUserId _ctgXgafv

169+ _ctgUploadProtocol

170+ _ctgAccessToken

171+ _ctgUploadType

172+ _ctgCallback

174173 (Just AltJSON)

175174 classroomService

176175 where go

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/List.hs+67−69

@@ -36,14 +36,14 @@ module Network.Google.Resource.Classroom.Courses.Teachers.List

3636 , CoursesTeachersList

3737

3838 -- * Request Lenses

39− , ctltXgafv

40− , ctltUploadProtocol

41− , ctltCourseId

42− , ctltAccessToken

43− , ctltUploadType

44− , ctltPageToken

45− , ctltPageSize

46− , ctltCallback

39+ , ctlXgafv

40+ , ctlUploadProtocol

41+ , ctlCourseId

42+ , ctlAccessToken

43+ , ctlUploadType

44+ , ctlPageToken

45+ , ctlPageSize

46+ , ctlCallback

4747 ) where

4848

4949import Network.Google.Classroom.Types

@@ -74,14 +74,14 @@ type CoursesTeachersListResource =

7474-- /See:/ 'coursesTeachersList' smart constructor.

7575data CoursesTeachersList =

7676 CoursesTeachersList'

77− { _ctltXgafv :: !(Maybe Xgafv)

78− , _ctltUploadProtocol :: !(Maybe Text)

79− , _ctltCourseId :: !Text

80− , _ctltAccessToken :: !(Maybe Text)

81− , _ctltUploadType :: !(Maybe Text)

82− , _ctltPageToken :: !(Maybe Text)

83− , _ctltPageSize :: !(Maybe (Textual Int32))

84− , _ctltCallback :: !(Maybe Text)

77+ { _ctlXgafv :: !(Maybe Xgafv)

78+ , _ctlUploadProtocol :: !(Maybe Text)

79+ , _ctlCourseId :: !Text

80+ , _ctlAccessToken :: !(Maybe Text)

81+ , _ctlUploadType :: !(Maybe Text)

82+ , _ctlPageToken :: !(Maybe Text)

83+ , _ctlPageSize :: !(Maybe (Textual Int32))

84+ , _ctlCallback :: !(Maybe Text)

8585 }

8686 deriving (Eq, Show, Data, Typeable, Generic)

8787

@@ -90,85 +90,83 @@ data CoursesTeachersList =

9090--

9191-- Use one of the following lenses to modify other fields as desired:

9292--

93−-- * 'ctltXgafv'

93+-- * 'ctlXgafv'

9494--

95−-- * 'ctltUploadProtocol'

95+-- * 'ctlUploadProtocol'

9696--

97−-- * 'ctltCourseId'

97+-- * 'ctlCourseId'

9898--

99−-- * 'ctltAccessToken'

99+-- * 'ctlAccessToken'

100100--

101−-- * 'ctltUploadType'

101+-- * 'ctlUploadType'

102102--

103−-- * 'ctltPageToken'

103+-- * 'ctlPageToken'

104104--

105−-- * 'ctltPageSize'

105+-- * 'ctlPageSize'

106106--

107−-- * 'ctltCallback'

107+-- * 'ctlCallback'

108108coursesTeachersList

109− :: Text -- ^ 'ctltCourseId'

109+ :: Text -- ^ 'ctlCourseId'

110110 -> CoursesTeachersList

111−coursesTeachersList pCtltCourseId_ =

111+coursesTeachersList pCtlCourseId_ =

112112 CoursesTeachersList'

113− { _ctltXgafv = Nothing

114− , _ctltUploadProtocol = Nothing

115− , _ctltCourseId = pCtltCourseId_

116− , _ctltAccessToken = Nothing

117− , _ctltUploadType = Nothing

118− , _ctltPageToken = Nothing

119− , _ctltPageSize = Nothing

120− , _ctltCallback = Nothing

113+ { _ctlXgafv = Nothing

114+ , _ctlUploadProtocol = Nothing

115+ , _ctlCourseId = pCtlCourseId_

116+ , _ctlAccessToken = Nothing

117+ , _ctlUploadType = Nothing

118+ , _ctlPageToken = Nothing

119+ , _ctlPageSize = Nothing

120+ , _ctlCallback = Nothing

121121 }

122122

123123

124124-- | V1 error format.

125−ctltXgafv :: Lens' CoursesTeachersList (Maybe Xgafv)

126−ctltXgafv

127− = lens _ctltXgafv (\ s a -> s{_ctltXgafv = a})

125+ctlXgafv :: Lens' CoursesTeachersList (Maybe Xgafv)

126+ctlXgafv = lens _ctlXgafv (\ s a -> s{_ctlXgafv = a})

128127

129128-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

130−ctltUploadProtocol :: Lens' CoursesTeachersList (Maybe Text)

131−ctltUploadProtocol

132− = lens _ctltUploadProtocol

133− (\ s a -> s{_ctltUploadProtocol = a})

129+ctlUploadProtocol :: Lens' CoursesTeachersList (Maybe Text)

130+ctlUploadProtocol

131+ = lens _ctlUploadProtocol

132+ (\ s a -> s{_ctlUploadProtocol = a})

134133

135134-- | Identifier of the course. This identifier can be either the

136135-- Classroom-assigned identifier or an alias.

137−ctltCourseId :: Lens' CoursesTeachersList Text

138−ctltCourseId

139− = lens _ctltCourseId (\ s a -> s{_ctltCourseId = a})

136+ctlCourseId :: Lens' CoursesTeachersList Text

137+ctlCourseId

138+ = lens _ctlCourseId (\ s a -> s{_ctlCourseId = a})

140139

141140-- | OAuth access token.

142−ctltAccessToken :: Lens' CoursesTeachersList (Maybe Text)

143−ctltAccessToken

144− = lens _ctltAccessToken

145− (\ s a -> s{_ctltAccessToken = a})

141+ctlAccessToken :: Lens' CoursesTeachersList (Maybe Text)

142+ctlAccessToken

143+ = lens _ctlAccessToken

144+ (\ s a -> s{_ctlAccessToken = a})

146145

147146-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

148−ctltUploadType :: Lens' CoursesTeachersList (Maybe Text)

149−ctltUploadType

150− = lens _ctltUploadType

151− (\ s a -> s{_ctltUploadType = a})

147+ctlUploadType :: Lens' CoursesTeachersList (Maybe Text)

148+ctlUploadType

149+ = lens _ctlUploadType

150+ (\ s a -> s{_ctlUploadType = a})

152151

153152-- | nextPageToken value returned from a previous list call, indicating that

154153-- the subsequent page of results should be returned. The list request must

155154-- be otherwise identical to the one that resulted in this token.

156−ctltPageToken :: Lens' CoursesTeachersList (Maybe Text)

157−ctltPageToken

158− = lens _ctltPageToken

159− (\ s a -> s{_ctltPageToken = a})

155+ctlPageToken :: Lens' CoursesTeachersList (Maybe Text)

156+ctlPageToken

157+ = lens _ctlPageToken (\ s a -> s{_ctlPageToken = a})

160158

161159-- | Maximum number of items to return. Zero means no maximum. The server may

162160-- return fewer than the specified number of results.

163−ctltPageSize :: Lens' CoursesTeachersList (Maybe Int32)

164−ctltPageSize

165− = lens _ctltPageSize (\ s a -> s{_ctltPageSize = a})

166− . mapping _Coerce

161+ctlPageSize :: Lens' CoursesTeachersList (Maybe Int32)

162+ctlPageSize

163+ = lens _ctlPageSize (\ s a -> s{_ctlPageSize = a}) .

164+ mapping _Coerce

167165

168166-- | JSONP

169−ctltCallback :: Lens' CoursesTeachersList (Maybe Text)

170−ctltCallback

171− = lens _ctltCallback (\ s a -> s{_ctltCallback = a})

167+ctlCallback :: Lens' CoursesTeachersList (Maybe Text)

168+ctlCallback

169+ = lens _ctlCallback (\ s a -> s{_ctlCallback = a})

172170

173171instance GoogleRequest CoursesTeachersList where

174172 type Rs CoursesTeachersList = ListTeachersResponse

@@ -178,12 +176,12 @@ instance GoogleRequest CoursesTeachersList where

178176 "https://www.googleapis.com/auth/classroom.rosters",

179177 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

180178 requestClient CoursesTeachersList'{..}

181− = go _ctltCourseId _ctltXgafv _ctltUploadProtocol

182− _ctltAccessToken

183− _ctltUploadType

184− _ctltPageToken

185− _ctltPageSize

186− _ctltCallback

179+ = go _ctlCourseId _ctlXgafv _ctlUploadProtocol

180+ _ctlAccessToken

181+ _ctlUploadType

182+ _ctlPageToken

183+ _ctlPageSize

184+ _ctlCallback

187185 (Just AltJSON)

188186 classroomService

189187 where go

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Topics/Create.hsdeleted−174

@@ -1,174 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.Classroom.Courses.Topics.Create

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Creates a topic. This method returns the following error codes: *

24−-- \`PERMISSION_DENIED\` if the requesting user is not permitted to access

25−-- the requested course, create a topic in the requested course, or for

26−-- access errors. * \`INVALID_ARGUMENT\` if the request is malformed. *

27−-- \`NOT_FOUND\` if the requested course does not exist.

28−--

29−-- /See:/ <https://developers.google.com/classroom/ Google Classroom API Reference> for @classroom.courses.topics.create@.

30−module Network.Google.Resource.Classroom.Courses.Topics.Create

31− (

32− -- * REST Resource

33− CoursesTopicsCreateResource

34−

35− -- * Creating a Request

36− , coursesTopicsCreate

37− , CoursesTopicsCreate

38−

39− -- * Request Lenses

40− , ctctXgafv

41− , ctctUploadProtocol

42− , ctctCourseId

43− , ctctAccessToken

44− , ctctUploadType

45− , ctctPayload

46− , ctctCallback

47− ) where

48−

49−import Network.Google.Classroom.Types

50−import Network.Google.Prelude

51−

52−-- | A resource alias for @classroom.courses.topics.create@ method which the

53−-- 'CoursesTopicsCreate' request conforms to.

54−type CoursesTopicsCreateResource =

55− "v1" :>

56− "courses" :>

57− Capture "courseId" Text :>

58− "topics" :>

59− QueryParam "$.xgafv" Xgafv :>

60− QueryParam "upload_protocol" Text :>

61− QueryParam "access_token" Text :>

62− QueryParam "uploadType" Text :>

63− QueryParam "callback" Text :>

64− QueryParam "alt" AltJSON :>

65− ReqBody '[JSON] Topic :> Post '[JSON] Topic

66−

67−-- | Creates a topic. This method returns the following error codes: *

68−-- \`PERMISSION_DENIED\` if the requesting user is not permitted to access

69−-- the requested course, create a topic in the requested course, or for

70−-- access errors. * \`INVALID_ARGUMENT\` if the request is malformed. *

71−-- \`NOT_FOUND\` if the requested course does not exist.

72−--

73−-- /See:/ 'coursesTopicsCreate' smart constructor.

74−data CoursesTopicsCreate =

75− CoursesTopicsCreate'

76− { _ctctXgafv :: !(Maybe Xgafv)

77− , _ctctUploadProtocol :: !(Maybe Text)

78− , _ctctCourseId :: !Text

79− , _ctctAccessToken :: !(Maybe Text)

80− , _ctctUploadType :: !(Maybe Text)

81− , _ctctPayload :: !Topic

82− , _ctctCallback :: !(Maybe Text)

83− }

84− deriving (Eq, Show, Data, Typeable, Generic)

85−

86−

87−-- | Creates a value of 'CoursesTopicsCreate' with the minimum fields required to make a request.

88−--

89−-- Use one of the following lenses to modify other fields as desired:

90−--

91−-- * 'ctctXgafv'

92−--

93−-- * 'ctctUploadProtocol'

94−--

95−-- * 'ctctCourseId'

96−--

97−-- * 'ctctAccessToken'

98−--

99−-- * 'ctctUploadType'

100−--

101−-- * 'ctctPayload'

102−--

103−-- * 'ctctCallback'

104−coursesTopicsCreate

105− :: Text -- ^ 'ctctCourseId'

106− -> Topic -- ^ 'ctctPayload'

107− -> CoursesTopicsCreate

108−coursesTopicsCreate pCtctCourseId_ pCtctPayload_ =

109− CoursesTopicsCreate'

110− { _ctctXgafv = Nothing

111− , _ctctUploadProtocol = Nothing

112− , _ctctCourseId = pCtctCourseId_

113− , _ctctAccessToken = Nothing

114− , _ctctUploadType = Nothing

115− , _ctctPayload = pCtctPayload_

116− , _ctctCallback = Nothing

117− }

118−

119−

120−-- | V1 error format.

121−ctctXgafv :: Lens' CoursesTopicsCreate (Maybe Xgafv)

122−ctctXgafv

123− = lens _ctctXgafv (\ s a -> s{_ctctXgafv = a})

124−

125−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

126−ctctUploadProtocol :: Lens' CoursesTopicsCreate (Maybe Text)

127−ctctUploadProtocol

128− = lens _ctctUploadProtocol

129− (\ s a -> s{_ctctUploadProtocol = a})

130−

131−-- | Identifier of the course. This identifier can be either the

132−-- Classroom-assigned identifier or an alias.

133−ctctCourseId :: Lens' CoursesTopicsCreate Text

134−ctctCourseId

135− = lens _ctctCourseId (\ s a -> s{_ctctCourseId = a})

136−

137−-- | OAuth access token.

138−ctctAccessToken :: Lens' CoursesTopicsCreate (Maybe Text)

139−ctctAccessToken

140− = lens _ctctAccessToken

141− (\ s a -> s{_ctctAccessToken = a})

142−

143−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

144−ctctUploadType :: Lens' CoursesTopicsCreate (Maybe Text)

145−ctctUploadType

146− = lens _ctctUploadType

147− (\ s a -> s{_ctctUploadType = a})

148−

149−-- | Multipart request metadata.

150−ctctPayload :: Lens' CoursesTopicsCreate Topic

151−ctctPayload

152− = lens _ctctPayload (\ s a -> s{_ctctPayload = a})

153−

154−-- | JSONP

155−ctctCallback :: Lens' CoursesTopicsCreate (Maybe Text)

156−ctctCallback

157− = lens _ctctCallback (\ s a -> s{_ctctCallback = a})

158−

159−instance GoogleRequest CoursesTopicsCreate where

160− type Rs CoursesTopicsCreate = Topic

161− type Scopes CoursesTopicsCreate =

162− '["https://www.googleapis.com/auth/classroom.topics"]

163− requestClient CoursesTopicsCreate'{..}

164− = go _ctctCourseId _ctctXgafv _ctctUploadProtocol

165− _ctctAccessToken

166− _ctctUploadType

167− _ctctCallback

168− (Just AltJSON)

169− _ctctPayload

170− classroomService

171− where go

172− = buildClient

173− (Proxy :: Proxy CoursesTopicsCreateResource)

174− mempty

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Topics/Delete.hsdeleted−171

@@ -1,171 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.Classroom.Courses.Topics.Delete

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Deletes a topic. This method returns the following error codes: *

24−-- \`PERMISSION_DENIED\` if the requesting user is not allowed to delete

25−-- the requested topic or for access errors. * \`FAILED_PRECONDITION\` if

26−-- the requested topic has already been deleted. * \`NOT_FOUND\` if no

27−-- course or topic exists with the requested ID.

28−--

29−-- /See:/ <https://developers.google.com/classroom/ Google Classroom API Reference> for @classroom.courses.topics.delete@.

30−module Network.Google.Resource.Classroom.Courses.Topics.Delete

31− (

32− -- * REST Resource

33− CoursesTopicsDeleteResource

34−

35− -- * Creating a Request

36− , coursesTopicsDelete

37− , CoursesTopicsDelete

38−

39− -- * Request Lenses

40− , ctdXgafv

41− , ctdUploadProtocol

42− , ctdCourseId

43− , ctdAccessToken

44− , ctdUploadType

45− , ctdId

46− , ctdCallback

47− ) where

48−

49−import Network.Google.Classroom.Types

50−import Network.Google.Prelude

51−

52−-- | A resource alias for @classroom.courses.topics.delete@ method which the

53−-- 'CoursesTopicsDelete' request conforms to.

54−type CoursesTopicsDeleteResource =

55− "v1" :>

56− "courses" :>

57− Capture "courseId" Text :>

58− "topics" :>

59− Capture "id" Text :>

60− QueryParam "$.xgafv" Xgafv :>

61− QueryParam "upload_protocol" Text :>

62− QueryParam "access_token" Text :>

63− QueryParam "uploadType" Text :>

64− QueryParam "callback" Text :>

65− QueryParam "alt" AltJSON :> Delete '[JSON] Empty

66−

67−-- | Deletes a topic. This method returns the following error codes: *

68−-- \`PERMISSION_DENIED\` if the requesting user is not allowed to delete

69−-- the requested topic or for access errors. * \`FAILED_PRECONDITION\` if

70−-- the requested topic has already been deleted. * \`NOT_FOUND\` if no

71−-- course or topic exists with the requested ID.

72−--

73−-- /See:/ 'coursesTopicsDelete' smart constructor.

74−data CoursesTopicsDelete =

75− CoursesTopicsDelete'

76− { _ctdXgafv :: !(Maybe Xgafv)

77− , _ctdUploadProtocol :: !(Maybe Text)

78− , _ctdCourseId :: !Text

79− , _ctdAccessToken :: !(Maybe Text)

80− , _ctdUploadType :: !(Maybe Text)

81− , _ctdId :: !Text

82− , _ctdCallback :: !(Maybe Text)

83− }

84− deriving (Eq, Show, Data, Typeable, Generic)

85−

86−

87−-- | Creates a value of 'CoursesTopicsDelete' with the minimum fields required to make a request.

88−--

89−-- Use one of the following lenses to modify other fields as desired:

90−--

91−-- * 'ctdXgafv'

92−--

93−-- * 'ctdUploadProtocol'

94−--

95−-- * 'ctdCourseId'

96−--

97−-- * 'ctdAccessToken'

98−--

99−-- * 'ctdUploadType'

100−--

101−-- * 'ctdId'

102−--

103−-- * 'ctdCallback'

104−coursesTopicsDelete

105− :: Text -- ^ 'ctdCourseId'

106− -> Text -- ^ 'ctdId'

107− -> CoursesTopicsDelete

108−coursesTopicsDelete pCtdCourseId_ pCtdId_ =

109− CoursesTopicsDelete'

110− { _ctdXgafv = Nothing

111− , _ctdUploadProtocol = Nothing

112− , _ctdCourseId = pCtdCourseId_

113− , _ctdAccessToken = Nothing

114− , _ctdUploadType = Nothing

115− , _ctdId = pCtdId_

116− , _ctdCallback = Nothing

117− }

118−

119−

120−-- | V1 error format.

121−ctdXgafv :: Lens' CoursesTopicsDelete (Maybe Xgafv)

122−ctdXgafv = lens _ctdXgafv (\ s a -> s{_ctdXgafv = a})

123−

124−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

125−ctdUploadProtocol :: Lens' CoursesTopicsDelete (Maybe Text)

126−ctdUploadProtocol

127− = lens _ctdUploadProtocol

128− (\ s a -> s{_ctdUploadProtocol = a})

129−

130−-- | Identifier of the course. This identifier can be either the

131−-- Classroom-assigned identifier or an alias.

132−ctdCourseId :: Lens' CoursesTopicsDelete Text

133−ctdCourseId

134− = lens _ctdCourseId (\ s a -> s{_ctdCourseId = a})

135−

136−-- | OAuth access token.

137−ctdAccessToken :: Lens' CoursesTopicsDelete (Maybe Text)

138−ctdAccessToken

139− = lens _ctdAccessToken

140− (\ s a -> s{_ctdAccessToken = a})

141−

142−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

143−ctdUploadType :: Lens' CoursesTopicsDelete (Maybe Text)

144−ctdUploadType

145− = lens _ctdUploadType

146− (\ s a -> s{_ctdUploadType = a})

147−

148−-- | Identifier of the topic to delete.

149−ctdId :: Lens' CoursesTopicsDelete Text

150−ctdId = lens _ctdId (\ s a -> s{_ctdId = a})

151−

152−-- | JSONP

153−ctdCallback :: Lens' CoursesTopicsDelete (Maybe Text)

154−ctdCallback

155− = lens _ctdCallback (\ s a -> s{_ctdCallback = a})

156−

157−instance GoogleRequest CoursesTopicsDelete where

158− type Rs CoursesTopicsDelete = Empty

159− type Scopes CoursesTopicsDelete =

160− '["https://www.googleapis.com/auth/classroom.topics"]

161− requestClient CoursesTopicsDelete'{..}

162− = go _ctdCourseId _ctdId _ctdXgafv _ctdUploadProtocol

163− _ctdAccessToken

164− _ctdUploadType

165− _ctdCallback

166− (Just AltJSON)

167− classroomService

168− where go

169− = buildClient

170− (Proxy :: Proxy CoursesTopicsDeleteResource)

171− mempty

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Topics/Get.hsdeleted−171

@@ -1,171 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.Classroom.Courses.Topics.Get

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Returns a topic. This method returns the following error codes: *

24−-- \`PERMISSION_DENIED\` if the requesting user is not permitted to access

25−-- the requested course or topic, or for access errors. *

26−-- \`INVALID_ARGUMENT\` if the request is malformed. * \`NOT_FOUND\` if the

27−-- requested course or topic does not exist.

28−--

29−-- /See:/ <https://developers.google.com/classroom/ Google Classroom API Reference> for @classroom.courses.topics.get@.

30−module Network.Google.Resource.Classroom.Courses.Topics.Get

31− (

32− -- * REST Resource

33− CoursesTopicsGetResource

34−

35− -- * Creating a Request

36− , coursesTopicsGet

37− , CoursesTopicsGet

38−

39− -- * Request Lenses

40− , ctgXgafv

41− , ctgUploadProtocol

42− , ctgCourseId

43− , ctgAccessToken

44− , ctgUploadType

45− , ctgId

46− , ctgCallback

47− ) where

48−

49−import Network.Google.Classroom.Types

50−import Network.Google.Prelude

51−

52−-- | A resource alias for @classroom.courses.topics.get@ method which the

53−-- 'CoursesTopicsGet' request conforms to.

54−type CoursesTopicsGetResource =

55− "v1" :>

56− "courses" :>

57− Capture "courseId" Text :>

58− "topics" :>

59− Capture "id" Text :>

60− QueryParam "$.xgafv" Xgafv :>

61− QueryParam "upload_protocol" Text :>

62− QueryParam "access_token" Text :>

63− QueryParam "uploadType" Text :>

64− QueryParam "callback" Text :>

65− QueryParam "alt" AltJSON :> Get '[JSON] Topic

66−

67−-- | Returns a topic. This method returns the following error codes: *

68−-- \`PERMISSION_DENIED\` if the requesting user is not permitted to access

69−-- the requested course or topic, or for access errors. *

70−-- \`INVALID_ARGUMENT\` if the request is malformed. * \`NOT_FOUND\` if the

71−-- requested course or topic does not exist.

72−--

73−-- /See:/ 'coursesTopicsGet' smart constructor.

74−data CoursesTopicsGet =

75− CoursesTopicsGet'

76− { _ctgXgafv :: !(Maybe Xgafv)

77− , _ctgUploadProtocol :: !(Maybe Text)

78− , _ctgCourseId :: !Text

79− , _ctgAccessToken :: !(Maybe Text)

80− , _ctgUploadType :: !(Maybe Text)

81− , _ctgId :: !Text

82− , _ctgCallback :: !(Maybe Text)

83− }

84− deriving (Eq, Show, Data, Typeable, Generic)

85−

86−

87−-- | Creates a value of 'CoursesTopicsGet' with the minimum fields required to make a request.

88−--

89−-- Use one of the following lenses to modify other fields as desired:

90−--

91−-- * 'ctgXgafv'

92−--

93−-- * 'ctgUploadProtocol'

94−--

95−-- * 'ctgCourseId'

96−--

97−-- * 'ctgAccessToken'

98−--

99−-- * 'ctgUploadType'

100−--

101−-- * 'ctgId'

102−--

103−-- * 'ctgCallback'

104−coursesTopicsGet

105− :: Text -- ^ 'ctgCourseId'

106− -> Text -- ^ 'ctgId'

107− -> CoursesTopicsGet

108−coursesTopicsGet pCtgCourseId_ pCtgId_ =

109− CoursesTopicsGet'

110− { _ctgXgafv = Nothing

111− , _ctgUploadProtocol = Nothing

112− , _ctgCourseId = pCtgCourseId_

113− , _ctgAccessToken = Nothing

114− , _ctgUploadType = Nothing

115− , _ctgId = pCtgId_

116− , _ctgCallback = Nothing

117− }

118−

119−

120−-- | V1 error format.

121−ctgXgafv :: Lens' CoursesTopicsGet (Maybe Xgafv)

122−ctgXgafv = lens _ctgXgafv (\ s a -> s{_ctgXgafv = a})

123−

124−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

125−ctgUploadProtocol :: Lens' CoursesTopicsGet (Maybe Text)

126−ctgUploadProtocol

127− = lens _ctgUploadProtocol

128− (\ s a -> s{_ctgUploadProtocol = a})

129−

130−-- | Identifier of the course.

131−ctgCourseId :: Lens' CoursesTopicsGet Text

132−ctgCourseId

133− = lens _ctgCourseId (\ s a -> s{_ctgCourseId = a})

134−

135−-- | OAuth access token.

136−ctgAccessToken :: Lens' CoursesTopicsGet (Maybe Text)

137−ctgAccessToken

138− = lens _ctgAccessToken

139− (\ s a -> s{_ctgAccessToken = a})

140−

141−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

142−ctgUploadType :: Lens' CoursesTopicsGet (Maybe Text)

143−ctgUploadType

144− = lens _ctgUploadType

145− (\ s a -> s{_ctgUploadType = a})

146−

147−-- | Identifier of the topic.

148−ctgId :: Lens' CoursesTopicsGet Text

149−ctgId = lens _ctgId (\ s a -> s{_ctgId = a})

150−

151−-- | JSONP

152−ctgCallback :: Lens' CoursesTopicsGet (Maybe Text)

153−ctgCallback

154− = lens _ctgCallback (\ s a -> s{_ctgCallback = a})

155−

156−instance GoogleRequest CoursesTopicsGet where

157− type Rs CoursesTopicsGet = Topic

158− type Scopes CoursesTopicsGet =

159− '["https://www.googleapis.com/auth/classroom.topics",

160− "https://www.googleapis.com/auth/classroom.topics.readonly"]

161− requestClient CoursesTopicsGet'{..}

162− = go _ctgCourseId _ctgId _ctgXgafv _ctgUploadProtocol

163− _ctgAccessToken

164− _ctgUploadType

165− _ctgCallback

166− (Just AltJSON)

167− classroomService

168− where go

169− = buildClient

170− (Proxy :: Proxy CoursesTopicsGetResource)

171− mempty

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Topics/List.hsdeleted−191

@@ -1,191 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.Classroom.Courses.Topics.List

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Returns the list of topics that the requester is permitted to view. This

24−-- method returns the following error codes: * \`PERMISSION_DENIED\` if the

25−-- requesting user is not permitted to access the requested course or for

26−-- access errors. * \`INVALID_ARGUMENT\` if the request is malformed. *

27−-- \`NOT_FOUND\` if the requested course does not exist.

28−--

29−-- /See:/ <https://developers.google.com/classroom/ Google Classroom API Reference> for @classroom.courses.topics.list@.

30−module Network.Google.Resource.Classroom.Courses.Topics.List

31− (

32− -- * REST Resource

33− CoursesTopicsListResource

34−

35− -- * Creating a Request

36− , coursesTopicsList

37− , CoursesTopicsList

38−

39− -- * Request Lenses

40− , ctlXgafv

41− , ctlUploadProtocol

42− , ctlCourseId

43− , ctlAccessToken

44− , ctlUploadType

45− , ctlPageToken

46− , ctlPageSize

47− , ctlCallback

48− ) where

49−

50−import Network.Google.Classroom.Types

51−import Network.Google.Prelude

52−

53−-- | A resource alias for @classroom.courses.topics.list@ method which the

54−-- 'CoursesTopicsList' request conforms to.

55−type CoursesTopicsListResource =

56− "v1" :>

57− "courses" :>

58− Capture "courseId" Text :>

59− "topics" :>

60− QueryParam "$.xgafv" Xgafv :>

61− QueryParam "upload_protocol" Text :>

62− QueryParam "access_token" Text :>

63− QueryParam "uploadType" Text :>

64− QueryParam "pageToken" Text :>

65− QueryParam "pageSize" (Textual Int32) :>

66− QueryParam "callback" Text :>

67− QueryParam "alt" AltJSON :>

68− Get '[JSON] ListTopicResponse

69−

70−-- | Returns the list of topics that the requester is permitted to view. This

71−-- method returns the following error codes: * \`PERMISSION_DENIED\` if the

72−-- requesting user is not permitted to access the requested course or for

73−-- access errors. * \`INVALID_ARGUMENT\` if the request is malformed. *

74−-- \`NOT_FOUND\` if the requested course does not exist.

75−--

76−-- /See:/ 'coursesTopicsList' smart constructor.

77−data CoursesTopicsList =

78− CoursesTopicsList'

79− { _ctlXgafv :: !(Maybe Xgafv)

80− , _ctlUploadProtocol :: !(Maybe Text)

81− , _ctlCourseId :: !Text

82− , _ctlAccessToken :: !(Maybe Text)

83− , _ctlUploadType :: !(Maybe Text)

84− , _ctlPageToken :: !(Maybe Text)

85− , _ctlPageSize :: !(Maybe (Textual Int32))

86− , _ctlCallback :: !(Maybe Text)

87− }

88− deriving (Eq, Show, Data, Typeable, Generic)

89−

90−

91−-- | Creates a value of 'CoursesTopicsList' with the minimum fields required to make a request.

92−--

93−-- Use one of the following lenses to modify other fields as desired:

94−--

95−-- * 'ctlXgafv'

96−--

97−-- * 'ctlUploadProtocol'

98−--

99−-- * 'ctlCourseId'

100−--

101−-- * 'ctlAccessToken'

102−--

103−-- * 'ctlUploadType'

104−--

105−-- * 'ctlPageToken'

106−--

107−-- * 'ctlPageSize'

108−--

109−-- * 'ctlCallback'

110−coursesTopicsList

111− :: Text -- ^ 'ctlCourseId'

112− -> CoursesTopicsList

113−coursesTopicsList pCtlCourseId_ =

114− CoursesTopicsList'

115− { _ctlXgafv = Nothing

116− , _ctlUploadProtocol = Nothing

117− , _ctlCourseId = pCtlCourseId_

118− , _ctlAccessToken = Nothing

119− , _ctlUploadType = Nothing

120− , _ctlPageToken = Nothing

121− , _ctlPageSize = Nothing

122− , _ctlCallback = Nothing

123− }

124−

125−

126−-- | V1 error format.

127−ctlXgafv :: Lens' CoursesTopicsList (Maybe Xgafv)

128−ctlXgafv = lens _ctlXgafv (\ s a -> s{_ctlXgafv = a})

129−

130−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

131−ctlUploadProtocol :: Lens' CoursesTopicsList (Maybe Text)

132−ctlUploadProtocol

133− = lens _ctlUploadProtocol

134− (\ s a -> s{_ctlUploadProtocol = a})

135−

136−-- | Identifier of the course. This identifier can be either the

137−-- Classroom-assigned identifier or an alias.

138−ctlCourseId :: Lens' CoursesTopicsList Text

139−ctlCourseId

140− = lens _ctlCourseId (\ s a -> s{_ctlCourseId = a})

141−

142−-- | OAuth access token.

143−ctlAccessToken :: Lens' CoursesTopicsList (Maybe Text)

144−ctlAccessToken

145− = lens _ctlAccessToken

146− (\ s a -> s{_ctlAccessToken = a})

147−

148−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

149−ctlUploadType :: Lens' CoursesTopicsList (Maybe Text)

150−ctlUploadType

151− = lens _ctlUploadType

152− (\ s a -> s{_ctlUploadType = a})

153−

154−-- | nextPageToken value returned from a previous list call, indicating that

155−-- the subsequent page of results should be returned. The list request must

156−-- be otherwise identical to the one that resulted in this token.

157−ctlPageToken :: Lens' CoursesTopicsList (Maybe Text)

158−ctlPageToken

159− = lens _ctlPageToken (\ s a -> s{_ctlPageToken = a})

160−

161−-- | Maximum number of items to return. Zero or unspecified indicates that

162−-- the server may assign a maximum. The server may return fewer than the

163−-- specified number of results.

164−ctlPageSize :: Lens' CoursesTopicsList (Maybe Int32)

165−ctlPageSize

166− = lens _ctlPageSize (\ s a -> s{_ctlPageSize = a}) .

167− mapping _Coerce

168−

169−-- | JSONP

170−ctlCallback :: Lens' CoursesTopicsList (Maybe Text)

171−ctlCallback

172− = lens _ctlCallback (\ s a -> s{_ctlCallback = a})

173−

174−instance GoogleRequest CoursesTopicsList where

175− type Rs CoursesTopicsList = ListTopicResponse

176− type Scopes CoursesTopicsList =

177− '["https://www.googleapis.com/auth/classroom.topics",

178− "https://www.googleapis.com/auth/classroom.topics.readonly"]

179− requestClient CoursesTopicsList'{..}

180− = go _ctlCourseId _ctlXgafv _ctlUploadProtocol

181− _ctlAccessToken

182− _ctlUploadType

183− _ctlPageToken

184− _ctlPageSize

185− _ctlCallback

186− (Just AltJSON)

187− classroomService

188− where go

189− = buildClient

190− (Proxy :: Proxy CoursesTopicsListResource)

191− mempty

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Topics/Patch.hsdeleted−203

@@ -1,203 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.Classroom.Courses.Topics.Patch

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Updates one or more fields of a topic. This method returns the following

24−-- error codes: * \`PERMISSION_DENIED\` if the requesting developer project

25−-- did not create the corresponding topic or for access errors. *

26−-- \`INVALID_ARGUMENT\` if the request is malformed. * \`NOT_FOUND\` if the

27−-- requested course or topic does not exist

28−--

29−-- /See:/ <https://developers.google.com/classroom/ Google Classroom API Reference> for @classroom.courses.topics.patch@.

30−module Network.Google.Resource.Classroom.Courses.Topics.Patch

31− (

32− -- * REST Resource

33− CoursesTopicsPatchResource

34−

35− -- * Creating a Request

36− , coursesTopicsPatch

37− , CoursesTopicsPatch

38−

39− -- * Request Lenses

40− , ctpXgafv

41− , ctpUploadProtocol

42− , ctpUpdateMask

43− , ctpCourseId

44− , ctpAccessToken

45− , ctpUploadType

46− , ctpPayload

47− , ctpId

48− , ctpCallback

49− ) where

50−

51−import Network.Google.Classroom.Types

52−import Network.Google.Prelude

53−

54−-- | A resource alias for @classroom.courses.topics.patch@ method which the

55−-- 'CoursesTopicsPatch' request conforms to.

56−type CoursesTopicsPatchResource =

57− "v1" :>

58− "courses" :>

59− Capture "courseId" Text :>

60− "topics" :>

61− Capture "id" Text :>

62− QueryParam "$.xgafv" Xgafv :>

63− QueryParam "upload_protocol" Text :>

64− QueryParam "updateMask" GFieldMask :>

65− QueryParam "access_token" Text :>

66− QueryParam "uploadType" Text :>

67− QueryParam "callback" Text :>

68− QueryParam "alt" AltJSON :>

69− ReqBody '[JSON] Topic :> Patch '[JSON] Topic

70−

71−-- | Updates one or more fields of a topic. This method returns the following

72−-- error codes: * \`PERMISSION_DENIED\` if the requesting developer project

73−-- did not create the corresponding topic or for access errors. *

74−-- \`INVALID_ARGUMENT\` if the request is malformed. * \`NOT_FOUND\` if the

75−-- requested course or topic does not exist

76−--

77−-- /See:/ 'coursesTopicsPatch' smart constructor.

78−data CoursesTopicsPatch =

79− CoursesTopicsPatch'

80− { _ctpXgafv :: !(Maybe Xgafv)

81− , _ctpUploadProtocol :: !(Maybe Text)

82− , _ctpUpdateMask :: !(Maybe GFieldMask)

83− , _ctpCourseId :: !Text

84− , _ctpAccessToken :: !(Maybe Text)

85− , _ctpUploadType :: !(Maybe Text)

86− , _ctpPayload :: !Topic

87− , _ctpId :: !Text

88− , _ctpCallback :: !(Maybe Text)

89− }

90− deriving (Eq, Show, Data, Typeable, Generic)

91−

92−

93−-- | Creates a value of 'CoursesTopicsPatch' with the minimum fields required to make a request.

94−--

95−-- Use one of the following lenses to modify other fields as desired:

96−--

97−-- * 'ctpXgafv'

98−--

99−-- * 'ctpUploadProtocol'

100−--

101−-- * 'ctpUpdateMask'

102−--

103−-- * 'ctpCourseId'

104−--

105−-- * 'ctpAccessToken'

106−--

107−-- * 'ctpUploadType'

108−--

109−-- * 'ctpPayload'

110−--

111−-- * 'ctpId'

112−--

113−-- * 'ctpCallback'

114−coursesTopicsPatch

115− :: Text -- ^ 'ctpCourseId'

116− -> Topic -- ^ 'ctpPayload'

117− -> Text -- ^ 'ctpId'

118− -> CoursesTopicsPatch

119−coursesTopicsPatch pCtpCourseId_ pCtpPayload_ pCtpId_ =

120− CoursesTopicsPatch'

121− { _ctpXgafv = Nothing

122− , _ctpUploadProtocol = Nothing

123− , _ctpUpdateMask = Nothing

124− , _ctpCourseId = pCtpCourseId_

125− , _ctpAccessToken = Nothing

126− , _ctpUploadType = Nothing

127− , _ctpPayload = pCtpPayload_

128− , _ctpId = pCtpId_

129− , _ctpCallback = Nothing

130− }

131−

132−

133−-- | V1 error format.

134−ctpXgafv :: Lens' CoursesTopicsPatch (Maybe Xgafv)

135−ctpXgafv = lens _ctpXgafv (\ s a -> s{_ctpXgafv = a})

136−

137−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

138−ctpUploadProtocol :: Lens' CoursesTopicsPatch (Maybe Text)

139−ctpUploadProtocol

140− = lens _ctpUploadProtocol

141− (\ s a -> s{_ctpUploadProtocol = a})

142−

143−-- | Mask that identifies which fields on the topic to update. This field is

144−-- required to do an update. The update fails if invalid fields are

145−-- specified. If a field supports empty values, it can be cleared by

146−-- specifying it in the update mask and not in the Topic object. If a field

147−-- that does not support empty values is included in the update mask and

148−-- not set in the Topic object, an \`INVALID_ARGUMENT\` error will be

149−-- returned. The following fields may be specified: * \`name\`

150−ctpUpdateMask :: Lens' CoursesTopicsPatch (Maybe GFieldMask)

151−ctpUpdateMask

152− = lens _ctpUpdateMask

153− (\ s a -> s{_ctpUpdateMask = a})

154−

155−-- | Identifier of the course. This identifier can be either the

156−-- Classroom-assigned identifier or an alias.

157−ctpCourseId :: Lens' CoursesTopicsPatch Text

158−ctpCourseId

159− = lens _ctpCourseId (\ s a -> s{_ctpCourseId = a})

160−

161−-- | OAuth access token.

162−ctpAccessToken :: Lens' CoursesTopicsPatch (Maybe Text)

163−ctpAccessToken

164− = lens _ctpAccessToken

165− (\ s a -> s{_ctpAccessToken = a})

166−

167−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

168−ctpUploadType :: Lens' CoursesTopicsPatch (Maybe Text)

169−ctpUploadType

170− = lens _ctpUploadType

171− (\ s a -> s{_ctpUploadType = a})

172−

173−-- | Multipart request metadata.

174−ctpPayload :: Lens' CoursesTopicsPatch Topic

175−ctpPayload

176− = lens _ctpPayload (\ s a -> s{_ctpPayload = a})

177−

178−-- | Identifier of the topic.

179−ctpId :: Lens' CoursesTopicsPatch Text

180−ctpId = lens _ctpId (\ s a -> s{_ctpId = a})

181−

182−-- | JSONP

183−ctpCallback :: Lens' CoursesTopicsPatch (Maybe Text)

184−ctpCallback

185− = lens _ctpCallback (\ s a -> s{_ctpCallback = a})

186−

187−instance GoogleRequest CoursesTopicsPatch where

188− type Rs CoursesTopicsPatch = Topic

189− type Scopes CoursesTopicsPatch =

190− '["https://www.googleapis.com/auth/classroom.topics"]

191− requestClient CoursesTopicsPatch'{..}

192− = go _ctpCourseId _ctpId _ctpXgafv _ctpUploadProtocol

193− _ctpUpdateMask

194− _ctpAccessToken

195− _ctpUploadType

196− _ctpCallback

197− (Just AltJSON)

198− _ctpPayload

199− classroomService

200− where go

201− = buildClient

202− (Proxy :: Proxy CoursesTopicsPatchResource)

203− mempty

gogol-classroom/gogol-classroom.cabal−5

@@ -70,11 +70,6 @@ library

7070 , Network.Google.Resource.Classroom.Courses.Teachers.Delete

7171 , Network.Google.Resource.Classroom.Courses.Teachers.Get

7272 , Network.Google.Resource.Classroom.Courses.Teachers.List

73− , Network.Google.Resource.Classroom.Courses.Topics.Create

74− , Network.Google.Resource.Classroom.Courses.Topics.Delete

75− , Network.Google.Resource.Classroom.Courses.Topics.Get

76− , Network.Google.Resource.Classroom.Courses.Topics.List

77− , Network.Google.Resource.Classroom.Courses.Topics.Patch

7873 , Network.Google.Resource.Classroom.Courses.Update

7974 , Network.Google.Resource.Classroom.Invitations.Accept

8075 , Network.Google.Resource.Classroom.Invitations.Create

gogol-cloudasset/gen/Network/Google/CloudAsset.hs+38−14

@@ -16,7 +16,7 @@

1616-- The cloud asset API manages the history and inventory of cloud

1717-- resources.

1818--

19−-- /See:/ <https://cloud.google.com/resource-manager/docs/cloud-asset-inventory/quickstart-cloud-asset-inventory Cloud Asset API Reference>

19+-- /See:/ <https://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference>

2020module Network.Google.CloudAsset

2121 (

2222 -- * Service Configuration

@@ -30,14 +30,29 @@ module Network.Google.CloudAsset

3030

3131 -- * Resources

3232

33− -- ** cloudasset.batchGetAssetsHistory

34− , module Network.Google.Resource.CloudAsset.BatchGetAssetsHistory

33+ -- ** cloudasset.folders.exportAssets

34+ , module Network.Google.Resource.CloudAsset.Folders.ExportAssets

3535

36− -- ** cloudasset.exportAssets

37− , module Network.Google.Resource.CloudAsset.ExportAssets

36+ -- ** cloudasset.folders.operations.get

37+ , module Network.Google.Resource.CloudAsset.Folders.Operations.Get

3838

39− -- ** cloudasset.operations.get

40− , module Network.Google.Resource.CloudAsset.Operations.Get

39+ -- ** cloudasset.organizations.batchGetAssetsHistory

40+ , module Network.Google.Resource.CloudAsset.Organizations.BatchGetAssetsHistory

41+

42+ -- ** cloudasset.organizations.exportAssets

43+ , module Network.Google.Resource.CloudAsset.Organizations.ExportAssets

44+

45+ -- ** cloudasset.organizations.operations.get

46+ , module Network.Google.Resource.CloudAsset.Organizations.Operations.Get

47+

48+ -- ** cloudasset.projects.batchGetAssetsHistory

49+ , module Network.Google.Resource.CloudAsset.Projects.BatchGetAssetsHistory

50+

51+ -- ** cloudasset.projects.exportAssets

52+ , module Network.Google.Resource.CloudAsset.Projects.ExportAssets

53+

54+ -- ** cloudasset.projects.operations.get

55+ , module Network.Google.Resource.CloudAsset.Projects.Operations.Get

4156

4257 -- * Types

4358

@@ -85,7 +100,6 @@ module Network.Google.CloudAsset

85100 -- ** GcsDestination

86101 , GcsDestination

87102 , gcsDestination

88− , gdURIPrefix

89103 , gdURI

90104

91105 -- ** StatusDetailsItem

@@ -179,9 +193,14 @@ module Network.Google.CloudAsset

179193

180194import Network.Google.CloudAsset.Types

181195import Network.Google.Prelude

182−import Network.Google.Resource.CloudAsset.BatchGetAssetsHistory

183−import Network.Google.Resource.CloudAsset.ExportAssets

184−import Network.Google.Resource.CloudAsset.Operations.Get

196+import Network.Google.Resource.CloudAsset.Folders.ExportAssets

197+import Network.Google.Resource.CloudAsset.Folders.Operations.Get

198+import Network.Google.Resource.CloudAsset.Organizations.BatchGetAssetsHistory

199+import Network.Google.Resource.CloudAsset.Organizations.ExportAssets

200+import Network.Google.Resource.CloudAsset.Organizations.Operations.Get

201+import Network.Google.Resource.CloudAsset.Projects.BatchGetAssetsHistory

202+import Network.Google.Resource.CloudAsset.Projects.ExportAssets

203+import Network.Google.Resource.CloudAsset.Projects.Operations.Get

185204

186205{- $resources

187206TODO

@@ -189,6 +208,11 @@ TODO

189208

190209-- | Represents the entirety of the methods and resources available for the Cloud Asset API service.

191210type CloudAssetAPI =

192− ExportAssetsResource :<|>

193− BatchGetAssetsHistoryResource

194− :<|> OperationsGetResource

211+ FoldersOperationsGetResource :<|>

212+ FoldersExportAssetsResource

213+ :<|> OrganizationsOperationsGetResource

214+ :<|> OrganizationsExportAssetsResource

215+ :<|> OrganizationsBatchGetAssetsHistoryResource

216+ :<|> ProjectsOperationsGetResource

217+ :<|> ProjectsExportAssetsResource

218+ :<|> ProjectsBatchGetAssetsHistoryResource

gogol-cloudasset/gen/Network/Google/CloudAsset/Types.hs+2−3

@@ -66,7 +66,6 @@ module Network.Google.CloudAsset.Types

6666 -- * GcsDestination

6767 , GcsDestination

6868 , gcsDestination

69− , gdURIPrefix

7069 , gdURI

7170

7271 -- * StatusDetailsItem

@@ -162,10 +161,10 @@ import Network.Google.CloudAsset.Types.Product

162161import Network.Google.CloudAsset.Types.Sum

163162import Network.Google.Prelude

164163

165−-- | Default request referring to version 'v1' of the Cloud Asset API. This contains the host and root path used as a starting point for constructing service requests.

164+-- | Default request referring to version 'v1beta1' of the Cloud Asset API. This contains the host and root path used as a starting point for constructing service requests.

166165cloudAssetService :: ServiceConfig

167166cloudAssetService

168− = defaultService (ServiceId "cloudasset:v1")

167+ = defaultService (ServiceId "cloudasset:v1beta1")

169168 "cloudasset.googleapis.com"

170169

171170-- | View and manage your data across Google Cloud Platform services

gogol-cloudasset/gen/Network/Google/CloudAsset/Types/Product.hs+15−35

@@ -415,7 +415,7 @@ aIAMPolicy :: Lens' Asset (Maybe Policy)

415415aIAMPolicy

416416 = lens _aIAMPolicy (\ s a -> s{_aIAMPolicy = a})

417417

418−-- | Type of the asset. Example: \"compute.googleapis.com\/Disk\".

418+-- | Type of the asset. Example: \"google.compute.Disk\".

419419aAssetType :: Lens' Asset (Maybe Text)

420420aAssetType

421421 = lens _aAssetType (\ s a -> s{_aAssetType = a})

@@ -441,10 +441,9 @@ instance ToJSON Asset where

441441-- | A Cloud Storage location.

442442--

443443-- /See:/ 'gcsDestination' smart constructor.

444−data GcsDestination =

444+newtype GcsDestination =

445445 GcsDestination'

446− { _gdURIPrefix :: !(Maybe Text)

447− , _gdURI :: !(Maybe Text)

446+ { _gdURI :: Maybe Text

448447 }

449448 deriving (Eq, Show, Data, Typeable, Generic)

450449

@@ -453,26 +452,11 @@ data GcsDestination =

453452--

454453-- Use one of the following lenses to modify other fields as desired:

455454--

456−-- * 'gdURIPrefix'

457−--

458455-- * 'gdURI'

459456gcsDestination

460457 :: GcsDestination

461−gcsDestination = GcsDestination' {_gdURIPrefix = Nothing, _gdURI = Nothing}

462−

463−

464−-- | The uri prefix of all generated Cloud Storage objects. For example:

465−-- \"gs:\/\/bucket_name\/object_name_prefix\". Each object uri is in

466−-- format: \"gs:\/\/bucket_name\/object_name_prefix\/\/ and only contains

467−-- assets for that type. starts from 0. For example:

468−-- \"gs:\/\/bucket_name\/object_name_prefix\/compute.googleapis.com\/Disk\/0\"

469−-- is the first shard of output objects containing all

470−-- compute.googleapis.com\/Disk assets. An INVALID_ARGUMENT error will be

471−-- returned if file with the same name

472−-- \"gs:\/\/bucket_name\/object_name_prefix\" already exists.

473−gdURIPrefix :: Lens' GcsDestination (Maybe Text)

474−gdURIPrefix

475− = lens _gdURIPrefix (\ s a -> s{_gdURIPrefix = a})

458+gcsDestination = GcsDestination' {_gdURI = Nothing}

459+

476460

477461-- | The uri of the Cloud Storage object. It\'s the same uri that is used by

478462-- gsutil. For example: \"gs:\/\/bucket_name\/object_name\". See [Viewing

@@ -485,16 +469,11 @@ gdURI = lens _gdURI (\ s a -> s{_gdURI = a})

485469instance FromJSON GcsDestination where

486470 parseJSON

487471 = withObject "GcsDestination"

488− (\ o ->

489− GcsDestination' <$>

490− (o .:? "uriPrefix") <*> (o .:? "uri"))

472+ (\ o -> GcsDestination' <$> (o .:? "uri"))

491473

492474instance ToJSON GcsDestination where

493475 toJSON GcsDestination'{..}

494− = object

495− (catMaybes

496− [("uriPrefix" .=) <$> _gdURIPrefix,

497− ("uri" .=) <$> _gdURI])

476+ = object (catMaybes [("uri" .=) <$> _gdURI])

498477

499478--

500479-- /See:/ 'statusDetailsItem' smart constructor.

@@ -577,8 +556,8 @@ earReadTime

577556 mapping _DateTime

578557

579558-- | A list of asset types of which to take a snapshot for. For example:

580−-- \"compute.googleapis.com\/Disk\". If specified, only matching assets

581−-- will be returned. See [Introduction to Cloud Asset

559+-- \"google.compute.Disk\". If specified, only matching assets will be

560+-- returned. See [Introduction to Cloud Asset

582561-- Inventory](https:\/\/cloud.google.com\/resource-manager\/docs\/cloud-asset-inventory\/overview)

583562-- for all supported asset types.

584563earAssetTypes :: Lens' ExportAssetsRequest [Text]

@@ -1233,8 +1212,8 @@ binding =

12331212-- that represents a service account. For example,

12341213-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

12351214-- email address that represents a Google group. For example,

1236−-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

1237−-- (primary) that represents all the users of that domain. For example,

1215+-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

1216+-- name that represents all the users of that domain. For example,

12381217-- \`google.com\` or \`example.com\`.

12391218bMembers :: Lens' Binding [Text]

12401219bMembers

@@ -1247,9 +1226,10 @@ bMembers

12471226bRole :: Lens' Binding (Maybe Text)

12481227bRole = lens _bRole (\ s a -> s{_bRole = a})

12491228

1250−-- | The condition that is associated with this binding. NOTE: An unsatisfied

1251−-- condition will not allow user access via current binding. Different

1252−-- bindings, including their conditions, are examined independently.

1229+-- | Unimplemented. The condition that is associated with this binding. NOTE:

1230+-- an unsatisfied condition will not allow user access via current binding.

1231+-- Different bindings, including their conditions, are examined

1232+-- independently.

12531233bCondition :: Lens' Binding (Maybe Expr)

12541234bCondition

12551235 = lens _bCondition (\ s a -> s{_bCondition = a})

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/BatchGetAssetsHistory.hsdeleted−230

@@ -1,230 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.CloudAsset.BatchGetAssetsHistory

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Batch gets the update history of assets that overlap a time window. For

24−-- RESOURCE content, this API outputs history with asset in both non-delete

25−-- or deleted status. For IAM_POLICY content, this API outputs history when

26−-- the asset and its attached IAM POLICY both exist. This can create gaps

27−-- in the output history. If a specified asset does not exist, this API

28−-- returns an INVALID_ARGUMENT error.

29−--

30−-- /See:/ <https://cloud.google.com/resource-manager/docs/cloud-asset-inventory/quickstart-cloud-asset-inventory Cloud Asset API Reference> for @cloudasset.batchGetAssetsHistory@.

31−module Network.Google.Resource.CloudAsset.BatchGetAssetsHistory

32− (

33− -- * REST Resource

34− BatchGetAssetsHistoryResource

35−

36− -- * Creating a Request

37− , batchGetAssetsHistory

38− , BatchGetAssetsHistory

39−

40− -- * Request Lenses

41− , bgahParent

42− , bgahXgafv

43− , bgahReadTimeWindowEndTime

44− , bgahUploadProtocol

45− , bgahAccessToken

46− , bgahUploadType

47− , bgahAssetNames

48− , bgahReadTimeWindowStartTime

49− , bgahContentType

50− , bgahCallback

51− ) where

52−

53−import Network.Google.CloudAsset.Types

54−import Network.Google.Prelude

55−

56−-- | A resource alias for @cloudasset.batchGetAssetsHistory@ method which the

57−-- 'BatchGetAssetsHistory' request conforms to.

58−type BatchGetAssetsHistoryResource =

59− "v1" :>

60− CaptureMode "parent" "batchGetAssetsHistory" Text :>

61− QueryParam "$.xgafv" Xgafv :>

62− QueryParam "readTimeWindow.endTime" DateTime' :>

63− QueryParam "upload_protocol" Text :>

64− QueryParam "access_token" Text :>

65− QueryParam "uploadType" Text :>

66− QueryParams "assetNames" Text :>

67− QueryParam "readTimeWindow.startTime" DateTime' :>

68− QueryParam "contentType" Text :>

69− QueryParam "callback" Text :>

70− QueryParam "alt" AltJSON :>

71− Get '[JSON] BatchGetAssetsHistoryResponse

72−

73−-- | Batch gets the update history of assets that overlap a time window. For

74−-- RESOURCE content, this API outputs history with asset in both non-delete

75−-- or deleted status. For IAM_POLICY content, this API outputs history when

76−-- the asset and its attached IAM POLICY both exist. This can create gaps

77−-- in the output history. If a specified asset does not exist, this API

78−-- returns an INVALID_ARGUMENT error.

79−--

80−-- /See:/ 'batchGetAssetsHistory' smart constructor.

81−data BatchGetAssetsHistory =

82− BatchGetAssetsHistory'

83− { _bgahParent :: !Text

84− , _bgahXgafv :: !(Maybe Xgafv)

85− , _bgahReadTimeWindowEndTime :: !(Maybe DateTime')

86− , _bgahUploadProtocol :: !(Maybe Text)

87− , _bgahAccessToken :: !(Maybe Text)

88− , _bgahUploadType :: !(Maybe Text)

89− , _bgahAssetNames :: !(Maybe [Text])

90− , _bgahReadTimeWindowStartTime :: !(Maybe DateTime')

91− , _bgahContentType :: !(Maybe Text)

92− , _bgahCallback :: !(Maybe Text)

93− }

94− deriving (Eq, Show, Data, Typeable, Generic)

95−

96−

97−-- | Creates a value of 'BatchGetAssetsHistory' with the minimum fields required to make a request.

98−--

99−-- Use one of the following lenses to modify other fields as desired:

100−--

101−-- * 'bgahParent'

102−--

103−-- * 'bgahXgafv'

104−--

105−-- * 'bgahReadTimeWindowEndTime'

106−--

107−-- * 'bgahUploadProtocol'

108−--

109−-- * 'bgahAccessToken'

110−--

111−-- * 'bgahUploadType'

112−--

113−-- * 'bgahAssetNames'

114−--

115−-- * 'bgahReadTimeWindowStartTime'

116−--

117−-- * 'bgahContentType'

118−--

119−-- * 'bgahCallback'

120−batchGetAssetsHistory

121− :: Text -- ^ 'bgahParent'

122− -> BatchGetAssetsHistory

123−batchGetAssetsHistory pBgahParent_ =

124− BatchGetAssetsHistory'

125− { _bgahParent = pBgahParent_

126− , _bgahXgafv = Nothing

127− , _bgahReadTimeWindowEndTime = Nothing

128− , _bgahUploadProtocol = Nothing

129− , _bgahAccessToken = Nothing

130− , _bgahUploadType = Nothing

131− , _bgahAssetNames = Nothing

132− , _bgahReadTimeWindowStartTime = Nothing

133− , _bgahContentType = Nothing

134− , _bgahCallback = Nothing

135− }

136−

137−

138−-- | Required. The relative name of the root asset. It can only be an

139−-- organization number (such as \"organizations\/123\"), a project ID (such

140−-- as \"projects\/my-project-id\")\", or a project number (such as

141−-- \"projects\/12345\").

142−bgahParent :: Lens' BatchGetAssetsHistory Text

143−bgahParent

144− = lens _bgahParent (\ s a -> s{_bgahParent = a})

145−

146−-- | V1 error format.

147−bgahXgafv :: Lens' BatchGetAssetsHistory (Maybe Xgafv)

148−bgahXgafv

149− = lens _bgahXgafv (\ s a -> s{_bgahXgafv = a})

150−

151−-- | End time of the time window (inclusive). Current timestamp if not

152−-- specified.

153−bgahReadTimeWindowEndTime :: Lens' BatchGetAssetsHistory (Maybe UTCTime)

154−bgahReadTimeWindowEndTime

155− = lens _bgahReadTimeWindowEndTime

156− (\ s a -> s{_bgahReadTimeWindowEndTime = a})

157− . mapping _DateTime

158−

159−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

160−bgahUploadProtocol :: Lens' BatchGetAssetsHistory (Maybe Text)

161−bgahUploadProtocol

162− = lens _bgahUploadProtocol

163− (\ s a -> s{_bgahUploadProtocol = a})

164−

165−-- | OAuth access token.

166−bgahAccessToken :: Lens' BatchGetAssetsHistory (Maybe Text)

167−bgahAccessToken

168− = lens _bgahAccessToken

169− (\ s a -> s{_bgahAccessToken = a})

170−

171−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

172−bgahUploadType :: Lens' BatchGetAssetsHistory (Maybe Text)

173−bgahUploadType

174− = lens _bgahUploadType

175− (\ s a -> s{_bgahUploadType = a})

176−

177−-- | A list of the full names of the assets. For example:

178−-- \`\/\/compute.googleapis.com\/projects\/my_project_123\/zones\/zone1\/instances\/instance1\`.

179−-- See [Resource

180−-- Names](https:\/\/cloud.google.com\/apis\/design\/resource_names#full_resource_name)

181−-- and [Resource Name

182−-- Format](https:\/\/cloud.google.com\/resource-manager\/docs\/cloud-asset-inventory\/resource-name-format)

183−-- for more info. The request becomes a no-op if the asset name list is

184−-- empty, and the max size of the asset name list is 100 in one request.

185−bgahAssetNames :: Lens' BatchGetAssetsHistory [Text]

186−bgahAssetNames

187− = lens _bgahAssetNames

188− (\ s a -> s{_bgahAssetNames = a})

189− . _Default

190− . _Coerce

191−

192−-- | Start time of the time window (exclusive).

193−bgahReadTimeWindowStartTime :: Lens' BatchGetAssetsHistory (Maybe UTCTime)

194−bgahReadTimeWindowStartTime

195− = lens _bgahReadTimeWindowStartTime

196− (\ s a -> s{_bgahReadTimeWindowStartTime = a})

197− . mapping _DateTime

198−

199−-- | Required. The content type.

200−bgahContentType :: Lens' BatchGetAssetsHistory (Maybe Text)

201−bgahContentType

202− = lens _bgahContentType

203− (\ s a -> s{_bgahContentType = a})

204−

205−-- | JSONP

206−bgahCallback :: Lens' BatchGetAssetsHistory (Maybe Text)

207−bgahCallback

208− = lens _bgahCallback (\ s a -> s{_bgahCallback = a})

209−

210−instance GoogleRequest BatchGetAssetsHistory where

211− type Rs BatchGetAssetsHistory =

212− BatchGetAssetsHistoryResponse

213− type Scopes BatchGetAssetsHistory =

214− '["https://www.googleapis.com/auth/cloud-platform"]

215− requestClient BatchGetAssetsHistory'{..}

216− = go _bgahParent _bgahXgafv

217− _bgahReadTimeWindowEndTime

218− _bgahUploadProtocol

219− _bgahAccessToken

220− _bgahUploadType

221− (_bgahAssetNames ^. _Default)

222− _bgahReadTimeWindowStartTime

223− _bgahContentType

224− _bgahCallback

225− (Just AltJSON)

226− cloudAssetService

227− where go

228− = buildClient

229− (Proxy :: Proxy BatchGetAssetsHistoryResource)

230− mempty

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/ExportAssets.hsdeleted−169

@@ -1,169 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.CloudAsset.ExportAssets

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Exports assets with time and resource types to a given Cloud Storage

24−-- location. The output format is newline-delimited JSON. This API

25−-- implements the google.longrunning.Operation API allowing you to keep

26−-- track of the export.

27−--

28−-- /See:/ <https://cloud.google.com/resource-manager/docs/cloud-asset-inventory/quickstart-cloud-asset-inventory Cloud Asset API Reference> for @cloudasset.exportAssets@.

29−module Network.Google.Resource.CloudAsset.ExportAssets

30− (

31− -- * REST Resource

32− ExportAssetsResource

33−

34− -- * Creating a Request

35− , exportAssets

36− , ExportAssets

37−

38− -- * Request Lenses

39− , eaParent

40− , eaXgafv

41− , eaUploadProtocol

42− , eaAccessToken

43− , eaUploadType

44− , eaPayload

45− , eaCallback

46− ) where

47−

48−import Network.Google.CloudAsset.Types

49−import Network.Google.Prelude

50−

51−-- | A resource alias for @cloudasset.exportAssets@ method which the

52−-- 'ExportAssets' request conforms to.

53−type ExportAssetsResource =

54− "v1" :>

55− CaptureMode "parent" "exportAssets" Text :>

56− QueryParam "$.xgafv" Xgafv :>

57− QueryParam "upload_protocol" Text :>

58− QueryParam "access_token" Text :>

59− QueryParam "uploadType" Text :>

60− QueryParam "callback" Text :>

61− QueryParam "alt" AltJSON :>

62− ReqBody '[JSON] ExportAssetsRequest :>

63− Post '[JSON] Operation

64−

65−-- | Exports assets with time and resource types to a given Cloud Storage

66−-- location. The output format is newline-delimited JSON. This API

67−-- implements the google.longrunning.Operation API allowing you to keep

68−-- track of the export.

69−--

70−-- /See:/ 'exportAssets' smart constructor.

71−data ExportAssets =

72− ExportAssets'

73− { _eaParent :: !Text

74− , _eaXgafv :: !(Maybe Xgafv)

75− , _eaUploadProtocol :: !(Maybe Text)

76− , _eaAccessToken :: !(Maybe Text)

77− , _eaUploadType :: !(Maybe Text)

78− , _eaPayload :: !ExportAssetsRequest

79− , _eaCallback :: !(Maybe Text)

80− }

81− deriving (Eq, Show, Data, Typeable, Generic)

82−

83−

84−-- | Creates a value of 'ExportAssets' with the minimum fields required to make a request.

85−--

86−-- Use one of the following lenses to modify other fields as desired:

87−--

88−-- * 'eaParent'

89−--

90−-- * 'eaXgafv'

91−--

92−-- * 'eaUploadProtocol'

93−--

94−-- * 'eaAccessToken'

95−--

96−-- * 'eaUploadType'

97−--

98−-- * 'eaPayload'

99−--

100−-- * 'eaCallback'

101−exportAssets

102− :: Text -- ^ 'eaParent'

103− -> ExportAssetsRequest -- ^ 'eaPayload'

104− -> ExportAssets

105−exportAssets pEaParent_ pEaPayload_ =

106− ExportAssets'

107− { _eaParent = pEaParent_

108− , _eaXgafv = Nothing

109− , _eaUploadProtocol = Nothing

110− , _eaAccessToken = Nothing

111− , _eaUploadType = Nothing

112− , _eaPayload = pEaPayload_

113− , _eaCallback = Nothing

114− }

115−

116−

117−-- | Required. The relative name of the root asset. This can only be an

118−-- organization number (such as \"organizations\/123\"), a project ID (such

119−-- as \"projects\/my-project-id\"), or a project number (such as

120−-- \"projects\/12345\"), or a folder number (such as \"folders\/123\").

121−eaParent :: Lens' ExportAssets Text

122−eaParent = lens _eaParent (\ s a -> s{_eaParent = a})

123−

124−-- | V1 error format.

125−eaXgafv :: Lens' ExportAssets (Maybe Xgafv)

126−eaXgafv = lens _eaXgafv (\ s a -> s{_eaXgafv = a})

127−

128−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

129−eaUploadProtocol :: Lens' ExportAssets (Maybe Text)

130−eaUploadProtocol

131− = lens _eaUploadProtocol

132− (\ s a -> s{_eaUploadProtocol = a})

133−

134−-- | OAuth access token.

135−eaAccessToken :: Lens' ExportAssets (Maybe Text)

136−eaAccessToken

137− = lens _eaAccessToken

138− (\ s a -> s{_eaAccessToken = a})

139−

140−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

141−eaUploadType :: Lens' ExportAssets (Maybe Text)

142−eaUploadType

143− = lens _eaUploadType (\ s a -> s{_eaUploadType = a})

144−

145−-- | Multipart request metadata.

146−eaPayload :: Lens' ExportAssets ExportAssetsRequest

147−eaPayload

148− = lens _eaPayload (\ s a -> s{_eaPayload = a})

149−

150−-- | JSONP

151−eaCallback :: Lens' ExportAssets (Maybe Text)

152−eaCallback

153− = lens _eaCallback (\ s a -> s{_eaCallback = a})

154−

155−instance GoogleRequest ExportAssets where

156− type Rs ExportAssets = Operation

157− type Scopes ExportAssets =

158− '["https://www.googleapis.com/auth/cloud-platform"]

159− requestClient ExportAssets'{..}

160− = go _eaParent _eaXgafv _eaUploadProtocol

161− _eaAccessToken

162− _eaUploadType

163− _eaCallback

164− (Just AltJSON)

165− _eaPayload

166− cloudAssetService

167− where go

168− = buildClient (Proxy :: Proxy ExportAssetsResource)

169− mempty

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Folders/ExportAssets.hsnew file+172

@@ -0,0 +1,172 @@

1+{-# LANGUAGE DataKinds #-}

2+{-# LANGUAGE DeriveDataTypeable #-}

3+{-# LANGUAGE DeriveGeneric #-}

4+{-# LANGUAGE FlexibleInstances #-}

5+{-# LANGUAGE NoImplicitPrelude #-}

6+{-# LANGUAGE OverloadedStrings #-}

7+{-# LANGUAGE RecordWildCards #-}

8+{-# LANGUAGE TypeFamilies #-}

9+{-# LANGUAGE TypeOperators #-}

10+

11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14+

15+-- |

16+-- Module : Network.Google.Resource.CloudAsset.Folders.ExportAssets

17+-- Copyright : (c) 2015-2016 Brendan Hay

18+-- License : Mozilla Public License, v. 2.0.

19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20+-- Stability : auto-generated

21+-- Portability : non-portable (GHC extensions)

22+--

23+-- Exports assets with time and resource types to a given Cloud Storage

24+-- location. The output format is newline-delimited JSON. This API

25+-- implements the google.longrunning.Operation API allowing you to keep

26+-- track of the export.

27+--

28+-- /See:/ <https://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference> for @cloudasset.folders.exportAssets@.

29+module Network.Google.Resource.CloudAsset.Folders.ExportAssets

30+ (

31+ -- * REST Resource

32+ FoldersExportAssetsResource

33+

34+ -- * Creating a Request

35+ , foldersExportAssets

36+ , FoldersExportAssets

37+

38+ -- * Request Lenses

39+ , feaParent

40+ , feaXgafv

41+ , feaUploadProtocol

42+ , feaAccessToken

43+ , feaUploadType

44+ , feaPayload

45+ , feaCallback

46+ ) where

47+

48+import Network.Google.CloudAsset.Types

49+import Network.Google.Prelude

50+

51+-- | A resource alias for @cloudasset.folders.exportAssets@ method which the

52+-- 'FoldersExportAssets' request conforms to.

53+type FoldersExportAssetsResource =

54+ "v1beta1" :>

55+ CaptureMode "parent" "exportAssets" Text :>

56+ QueryParam "$.xgafv" Xgafv :>

57+ QueryParam "upload_protocol" Text :>

58+ QueryParam "access_token" Text :>

59+ QueryParam "uploadType" Text :>

60+ QueryParam "callback" Text :>

61+ QueryParam "alt" AltJSON :>

62+ ReqBody '[JSON] ExportAssetsRequest :>

63+ Post '[JSON] Operation

64+

65+-- | Exports assets with time and resource types to a given Cloud Storage

66+-- location. The output format is newline-delimited JSON. This API

67+-- implements the google.longrunning.Operation API allowing you to keep

68+-- track of the export.

69+--

70+-- /See:/ 'foldersExportAssets' smart constructor.

71+data FoldersExportAssets =

72+ FoldersExportAssets'

73+ { _feaParent :: !Text

74+ , _feaXgafv :: !(Maybe Xgafv)

75+ , _feaUploadProtocol :: !(Maybe Text)

76+ , _feaAccessToken :: !(Maybe Text)

77+ , _feaUploadType :: !(Maybe Text)

78+ , _feaPayload :: !ExportAssetsRequest

79+ , _feaCallback :: !(Maybe Text)

80+ }

81+ deriving (Eq, Show, Data, Typeable, Generic)

82+

83+

84+-- | Creates a value of 'FoldersExportAssets' with the minimum fields required to make a request.

85+--

86+-- Use one of the following lenses to modify other fields as desired:

87+--

88+-- * 'feaParent'

89+--

90+-- * 'feaXgafv'

91+--

92+-- * 'feaUploadProtocol'

93+--

94+-- * 'feaAccessToken'

95+--

96+-- * 'feaUploadType'

97+--

98+-- * 'feaPayload'

99+--

100+-- * 'feaCallback'

101+foldersExportAssets

102+ :: Text -- ^ 'feaParent'

103+ -> ExportAssetsRequest -- ^ 'feaPayload'

104+ -> FoldersExportAssets

105+foldersExportAssets pFeaParent_ pFeaPayload_ =

106+ FoldersExportAssets'

107+ { _feaParent = pFeaParent_

108+ , _feaXgafv = Nothing

109+ , _feaUploadProtocol = Nothing

110+ , _feaAccessToken = Nothing

111+ , _feaUploadType = Nothing

112+ , _feaPayload = pFeaPayload_

113+ , _feaCallback = Nothing

114+ }

115+

116+

117+-- | Required. The relative name of the root asset. This can only be an

118+-- organization number (such as \"organizations\/123\"), a project ID (such

119+-- as \"projects\/my-project-id\"), a project number (such as

120+-- \"projects\/12345\"), or a folder number (such as \"folders\/123\").

121+feaParent :: Lens' FoldersExportAssets Text

122+feaParent

123+ = lens _feaParent (\ s a -> s{_feaParent = a})

124+

125+-- | V1 error format.

126+feaXgafv :: Lens' FoldersExportAssets (Maybe Xgafv)

127+feaXgafv = lens _feaXgafv (\ s a -> s{_feaXgafv = a})

128+

129+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

130+feaUploadProtocol :: Lens' FoldersExportAssets (Maybe Text)

131+feaUploadProtocol

132+ = lens _feaUploadProtocol

133+ (\ s a -> s{_feaUploadProtocol = a})

134+

135+-- | OAuth access token.

136+feaAccessToken :: Lens' FoldersExportAssets (Maybe Text)

137+feaAccessToken

138+ = lens _feaAccessToken

139+ (\ s a -> s{_feaAccessToken = a})

140+

141+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

142+feaUploadType :: Lens' FoldersExportAssets (Maybe Text)

143+feaUploadType

144+ = lens _feaUploadType

145+ (\ s a -> s{_feaUploadType = a})

146+

147+-- | Multipart request metadata.

148+feaPayload :: Lens' FoldersExportAssets ExportAssetsRequest

149+feaPayload

150+ = lens _feaPayload (\ s a -> s{_feaPayload = a})

151+

152+-- | JSONP

153+feaCallback :: Lens' FoldersExportAssets (Maybe Text)

154+feaCallback

155+ = lens _feaCallback (\ s a -> s{_feaCallback = a})

156+

157+instance GoogleRequest FoldersExportAssets where

158+ type Rs FoldersExportAssets = Operation

159+ type Scopes FoldersExportAssets =

160+ '["https://www.googleapis.com/auth/cloud-platform"]

161+ requestClient FoldersExportAssets'{..}

162+ = go _feaParent _feaXgafv _feaUploadProtocol

163+ _feaAccessToken

164+ _feaUploadType

165+ _feaCallback

166+ (Just AltJSON)

167+ _feaPayload

168+ cloudAssetService

169+ where go

170+ = buildClient

171+ (Proxy :: Proxy FoldersExportAssetsResource)

172+ mempty

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Folders/Operations/Get.hsnew file+152

@@ -0,0 +1,152 @@

1+{-# LANGUAGE DataKinds #-}

2+{-# LANGUAGE DeriveDataTypeable #-}

3+{-# LANGUAGE DeriveGeneric #-}

4+{-# LANGUAGE FlexibleInstances #-}

5+{-# LANGUAGE NoImplicitPrelude #-}

6+{-# LANGUAGE OverloadedStrings #-}

7+{-# LANGUAGE RecordWildCards #-}

8+{-# LANGUAGE TypeFamilies #-}

9+{-# LANGUAGE TypeOperators #-}

10+

11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14+

15+-- |

16+-- Module : Network.Google.Resource.CloudAsset.Folders.Operations.Get

17+-- Copyright : (c) 2015-2016 Brendan Hay

18+-- License : Mozilla Public License, v. 2.0.

19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20+-- Stability : auto-generated

21+-- Portability : non-portable (GHC extensions)

22+--

23+-- Gets the latest state of a long-running operation. Clients can use this

24+-- method to poll the operation result at intervals as recommended by the

25+-- API service.

26+--

27+-- /See:/ <https://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference> for @cloudasset.folders.operations.get@.

28+module Network.Google.Resource.CloudAsset.Folders.Operations.Get

29+ (

30+ -- * REST Resource

31+ FoldersOperationsGetResource

32+

33+ -- * Creating a Request

34+ , foldersOperationsGet

35+ , FoldersOperationsGet

36+

37+ -- * Request Lenses

38+ , fogXgafv

39+ , fogUploadProtocol

40+ , fogAccessToken

41+ , fogUploadType

42+ , fogName

43+ , fogCallback

44+ ) where

45+

46+import Network.Google.CloudAsset.Types

47+import Network.Google.Prelude

48+

49+-- | A resource alias for @cloudasset.folders.operations.get@ method which the

50+-- 'FoldersOperationsGet' request conforms to.

51+type FoldersOperationsGetResource =

52+ "v1beta1" :>

53+ Capture "name" Text :>

54+ QueryParam "$.xgafv" Xgafv :>

55+ QueryParam "upload_protocol" Text :>

56+ QueryParam "access_token" Text :>

57+ QueryParam "uploadType" Text :>

58+ QueryParam "callback" Text :>

59+ QueryParam "alt" AltJSON :> Get '[JSON] Operation

60+

61+-- | Gets the latest state of a long-running operation. Clients can use this

62+-- method to poll the operation result at intervals as recommended by the

63+-- API service.

64+--

65+-- /See:/ 'foldersOperationsGet' smart constructor.

66+data FoldersOperationsGet =

67+ FoldersOperationsGet'

68+ { _fogXgafv :: !(Maybe Xgafv)

69+ , _fogUploadProtocol :: !(Maybe Text)

70+ , _fogAccessToken :: !(Maybe Text)

71+ , _fogUploadType :: !(Maybe Text)

72+ , _fogName :: !Text

73+ , _fogCallback :: !(Maybe Text)

74+ }

75+ deriving (Eq, Show, Data, Typeable, Generic)

76+

77+

78+-- | Creates a value of 'FoldersOperationsGet' with the minimum fields required to make a request.

79+--

80+-- Use one of the following lenses to modify other fields as desired:

81+--

82+-- * 'fogXgafv'

83+--

84+-- * 'fogUploadProtocol'

85+--

86+-- * 'fogAccessToken'

87+--

88+-- * 'fogUploadType'

89+--

90+-- * 'fogName'

91+--

92+-- * 'fogCallback'

93+foldersOperationsGet

94+ :: Text -- ^ 'fogName'

95+ -> FoldersOperationsGet

96+foldersOperationsGet pFogName_ =

97+ FoldersOperationsGet'

98+ { _fogXgafv = Nothing

99+ , _fogUploadProtocol = Nothing

100+ , _fogAccessToken = Nothing

101+ , _fogUploadType = Nothing

102+ , _fogName = pFogName_

103+ , _fogCallback = Nothing

104+ }

105+

106+

107+-- | V1 error format.

108+fogXgafv :: Lens' FoldersOperationsGet (Maybe Xgafv)

109+fogXgafv = lens _fogXgafv (\ s a -> s{_fogXgafv = a})

110+

111+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

112+fogUploadProtocol :: Lens' FoldersOperationsGet (Maybe Text)

113+fogUploadProtocol

114+ = lens _fogUploadProtocol

115+ (\ s a -> s{_fogUploadProtocol = a})

116+

117+-- | OAuth access token.

118+fogAccessToken :: Lens' FoldersOperationsGet (Maybe Text)

119+fogAccessToken

120+ = lens _fogAccessToken

121+ (\ s a -> s{_fogAccessToken = a})

122+

123+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

124+fogUploadType :: Lens' FoldersOperationsGet (Maybe Text)

125+fogUploadType

126+ = lens _fogUploadType

127+ (\ s a -> s{_fogUploadType = a})

128+

129+-- | The name of the operation resource.

130+fogName :: Lens' FoldersOperationsGet Text

131+fogName = lens _fogName (\ s a -> s{_fogName = a})

132+

133+-- | JSONP

134+fogCallback :: Lens' FoldersOperationsGet (Maybe Text)

135+fogCallback

136+ = lens _fogCallback (\ s a -> s{_fogCallback = a})

137+

138+instance GoogleRequest FoldersOperationsGet where

139+ type Rs FoldersOperationsGet = Operation

140+ type Scopes FoldersOperationsGet =

141+ '["https://www.googleapis.com/auth/cloud-platform"]

142+ requestClient FoldersOperationsGet'{..}

143+ = go _fogName _fogXgafv _fogUploadProtocol

144+ _fogAccessToken

145+ _fogUploadType

146+ _fogCallback

147+ (Just AltJSON)

148+ cloudAssetService

149+ where go

150+ = buildClient

151+ (Proxy :: Proxy FoldersOperationsGetResource)

152+ mempty

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Operations/Get.hsdeleted−150

@@ -1,150 +0,0 @@

1−{-# LANGUAGE DataKinds #-}

2−{-# LANGUAGE DeriveDataTypeable #-}

3−{-# LANGUAGE DeriveGeneric #-}

4−{-# LANGUAGE FlexibleInstances #-}

5−{-# LANGUAGE NoImplicitPrelude #-}

6−{-# LANGUAGE OverloadedStrings #-}

7−{-# LANGUAGE RecordWildCards #-}

8−{-# LANGUAGE TypeFamilies #-}

9−{-# LANGUAGE TypeOperators #-}

10−

11−{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12−{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13−{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14−

15−-- |

16−-- Module : Network.Google.Resource.CloudAsset.Operations.Get

17−-- Copyright : (c) 2015-2016 Brendan Hay

18−-- License : Mozilla Public License, v. 2.0.

19−-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20−-- Stability : auto-generated

21−-- Portability : non-portable (GHC extensions)

22−--

23−-- Gets the latest state of a long-running operation. Clients can use this

24−-- method to poll the operation result at intervals as recommended by the

25−-- API service.

26−--

27−-- /See:/ <https://cloud.google.com/resource-manager/docs/cloud-asset-inventory/quickstart-cloud-asset-inventory Cloud Asset API Reference> for @cloudasset.operations.get@.

28−module Network.Google.Resource.CloudAsset.Operations.Get

29− (

30− -- * REST Resource

31− OperationsGetResource

32−

33− -- * Creating a Request

34− , operationsGet

35− , OperationsGet

36−

37− -- * Request Lenses

38− , ogXgafv

39− , ogUploadProtocol

40− , ogAccessToken

41− , ogUploadType

42− , ogName

43− , ogCallback

44− ) where

45−

46−import Network.Google.CloudAsset.Types

47−import Network.Google.Prelude

48−

49−-- | A resource alias for @cloudasset.operations.get@ method which the

50−-- 'OperationsGet' request conforms to.

51−type OperationsGetResource =

52− "v1" :>

53− Capture "name" Text :>

54− QueryParam "$.xgafv" Xgafv :>

55− QueryParam "upload_protocol" Text :>

56− QueryParam "access_token" Text :>

57− QueryParam "uploadType" Text :>

58− QueryParam "callback" Text :>

59− QueryParam "alt" AltJSON :> Get '[JSON] Operation

60−

61−-- | Gets the latest state of a long-running operation. Clients can use this

62−-- method to poll the operation result at intervals as recommended by the

63−-- API service.

64−--

65−-- /See:/ 'operationsGet' smart constructor.

66−data OperationsGet =

67− OperationsGet'

68− { _ogXgafv :: !(Maybe Xgafv)

69− , _ogUploadProtocol :: !(Maybe Text)

70− , _ogAccessToken :: !(Maybe Text)

71− , _ogUploadType :: !(Maybe Text)

72− , _ogName :: !Text

73− , _ogCallback :: !(Maybe Text)

74− }

75− deriving (Eq, Show, Data, Typeable, Generic)

76−

77−

78−-- | Creates a value of 'OperationsGet' with the minimum fields required to make a request.

79−--

80−-- Use one of the following lenses to modify other fields as desired:

81−--

82−-- * 'ogXgafv'

83−--

84−-- * 'ogUploadProtocol'

85−--

86−-- * 'ogAccessToken'

87−--

88−-- * 'ogUploadType'

89−--

90−-- * 'ogName'

91−--

92−-- * 'ogCallback'

93−operationsGet

94− :: Text -- ^ 'ogName'

95− -> OperationsGet

96−operationsGet pOgName_ =

97− OperationsGet'

98− { _ogXgafv = Nothing

99− , _ogUploadProtocol = Nothing

100− , _ogAccessToken = Nothing

101− , _ogUploadType = Nothing

102− , _ogName = pOgName_

103− , _ogCallback = Nothing

104− }

105−

106−

107−-- | V1 error format.

108−ogXgafv :: Lens' OperationsGet (Maybe Xgafv)

109−ogXgafv = lens _ogXgafv (\ s a -> s{_ogXgafv = a})

110−

111−-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

112−ogUploadProtocol :: Lens' OperationsGet (Maybe Text)

113−ogUploadProtocol

114− = lens _ogUploadProtocol

115− (\ s a -> s{_ogUploadProtocol = a})

116−

117−-- | OAuth access token.

118−ogAccessToken :: Lens' OperationsGet (Maybe Text)

119−ogAccessToken

120− = lens _ogAccessToken

121− (\ s a -> s{_ogAccessToken = a})

122−

123−-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

124−ogUploadType :: Lens' OperationsGet (Maybe Text)

125−ogUploadType

126− = lens _ogUploadType (\ s a -> s{_ogUploadType = a})

127−

128−-- | The name of the operation resource.

129−ogName :: Lens' OperationsGet Text

130−ogName = lens _ogName (\ s a -> s{_ogName = a})

131−

132−-- | JSONP

133−ogCallback :: Lens' OperationsGet (Maybe Text)

134−ogCallback

135− = lens _ogCallback (\ s a -> s{_ogCallback = a})

136−

137−instance GoogleRequest OperationsGet where

138− type Rs OperationsGet = Operation

139− type Scopes OperationsGet =

140− '["https://www.googleapis.com/auth/cloud-platform"]

141− requestClient OperationsGet'{..}

142− = go _ogName _ogXgafv _ogUploadProtocol

143− _ogAccessToken

144− _ogUploadType

145− _ogCallback

146− (Just AltJSON)

147− cloudAssetService

148− where go

149− = buildClient (Proxy :: Proxy OperationsGetResource)

150− mempty

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Organizations/BatchGetAssetsHistory.hsnew file+232

@@ -0,0 +1,232 @@

1+{-# LANGUAGE DataKinds #-}

2+{-# LANGUAGE DeriveDataTypeable #-}

3+{-# LANGUAGE DeriveGeneric #-}

4+{-# LANGUAGE FlexibleInstances #-}

5+{-# LANGUAGE NoImplicitPrelude #-}

6+{-# LANGUAGE OverloadedStrings #-}

7+{-# LANGUAGE RecordWildCards #-}

8+{-# LANGUAGE TypeFamilies #-}

9+{-# LANGUAGE TypeOperators #-}

10+

11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14+

15+-- |

16+-- Module : Network.Google.Resource.CloudAsset.Organizations.BatchGetAssetsHistory

17+-- Copyright : (c) 2015-2016 Brendan Hay

18+-- License : Mozilla Public License, v. 2.0.

19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20+-- Stability : auto-generated

21+-- Portability : non-portable (GHC extensions)

22+--

23+-- Batch gets the update history of assets that overlap a time window. For

24+-- RESOURCE content, this API outputs history with asset in both non-delete

25+-- or deleted status. For IAM_POLICY content, this API outputs history when

26+-- the asset and its attached IAM POLICY both exist. This can create gaps

27+-- in the output history. If a specified asset does not exist, this API

28+-- returns an INVALID_ARGUMENT error.

29+--

30+-- /See:/ <https://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference> for @cloudasset.organizations.batchGetAssetsHistory@.

31+module Network.Google.Resource.CloudAsset.Organizations.BatchGetAssetsHistory

32+ (

33+ -- * REST Resource

34+ OrganizationsBatchGetAssetsHistoryResource

35+

36+ -- * Creating a Request

37+ , organizationsBatchGetAssetsHistory

38+ , OrganizationsBatchGetAssetsHistory

39+

40+ -- * Request Lenses

41+ , obgahParent

42+ , obgahXgafv

43+ , obgahReadTimeWindowEndTime

44+ , obgahUploadProtocol

45+ , obgahAccessToken

46+ , obgahUploadType

47+ , obgahAssetNames

48+ , obgahReadTimeWindowStartTime

49+ , obgahContentType

50+ , obgahCallback

51+ ) where

52+

53+import Network.Google.CloudAsset.Types

54+import Network.Google.Prelude

55+

56+-- | A resource alias for @cloudasset.organizations.batchGetAssetsHistory@ method which the

57+-- 'OrganizationsBatchGetAssetsHistory' request conforms to.

58+type OrganizationsBatchGetAssetsHistoryResource =

59+ "v1beta1" :>

60+ CaptureMode "parent" "batchGetAssetsHistory" Text :>

61+ QueryParam "$.xgafv" Xgafv :>

62+ QueryParam "readTimeWindow.endTime" DateTime' :>

63+ QueryParam "upload_protocol" Text :>

64+ QueryParam "access_token" Text :>

65+ QueryParam "uploadType" Text :>

66+ QueryParams "assetNames" Text :>

67+ QueryParam "readTimeWindow.startTime" DateTime' :>

68+ QueryParam "contentType" Text :>

69+ QueryParam "callback" Text :>

70+ QueryParam "alt" AltJSON :>

71+ Get '[JSON] BatchGetAssetsHistoryResponse

72+

73+-- | Batch gets the update history of assets that overlap a time window. For

74+-- RESOURCE content, this API outputs history with asset in both non-delete

75+-- or deleted status. For IAM_POLICY content, this API outputs history when

76+-- the asset and its attached IAM POLICY both exist. This can create gaps

77+-- in the output history. If a specified asset does not exist, this API

78+-- returns an INVALID_ARGUMENT error.

79+--

80+-- /See:/ 'organizationsBatchGetAssetsHistory' smart constructor.

81+data OrganizationsBatchGetAssetsHistory =

82+ OrganizationsBatchGetAssetsHistory'

83+ { _obgahParent :: !Text

84+ , _obgahXgafv :: !(Maybe Xgafv)

85+ , _obgahReadTimeWindowEndTime :: !(Maybe DateTime')

86+ , _obgahUploadProtocol :: !(Maybe Text)

87+ , _obgahAccessToken :: !(Maybe Text)

88+ , _obgahUploadType :: !(Maybe Text)

89+ , _obgahAssetNames :: !(Maybe [Text])

90+ , _obgahReadTimeWindowStartTime :: !(Maybe DateTime')

91+ , _obgahContentType :: !(Maybe Text)

92+ , _obgahCallback :: !(Maybe Text)

93+ }

94+ deriving (Eq, Show, Data, Typeable, Generic)

95+

96+

97+-- | Creates a value of 'OrganizationsBatchGetAssetsHistory' with the minimum fields required to make a request.

98+--

99+-- Use one of the following lenses to modify other fields as desired:

100+--

101+-- * 'obgahParent'

102+--

103+-- * 'obgahXgafv'

104+--

105+-- * 'obgahReadTimeWindowEndTime'

106+--

107+-- * 'obgahUploadProtocol'

108+--

109+-- * 'obgahAccessToken'

110+--

111+-- * 'obgahUploadType'

112+--

113+-- * 'obgahAssetNames'

114+--

115+-- * 'obgahReadTimeWindowStartTime'

116+--

117+-- * 'obgahContentType'

118+--

119+-- * 'obgahCallback'

120+organizationsBatchGetAssetsHistory

121+ :: Text -- ^ 'obgahParent'

122+ -> OrganizationsBatchGetAssetsHistory

123+organizationsBatchGetAssetsHistory pObgahParent_ =

124+ OrganizationsBatchGetAssetsHistory'

125+ { _obgahParent = pObgahParent_

126+ , _obgahXgafv = Nothing

127+ , _obgahReadTimeWindowEndTime = Nothing

128+ , _obgahUploadProtocol = Nothing

129+ , _obgahAccessToken = Nothing

130+ , _obgahUploadType = Nothing

131+ , _obgahAssetNames = Nothing

132+ , _obgahReadTimeWindowStartTime = Nothing

133+ , _obgahContentType = Nothing

134+ , _obgahCallback = Nothing

135+ }

136+

137+

138+-- | Required. The relative name of the root asset. It can only be an

139+-- organization number (such as \"organizations\/123\"), a project ID (such

140+-- as \"projects\/my-project-id\")\", or a project number (such as

141+-- \"projects\/12345\").

142+obgahParent :: Lens' OrganizationsBatchGetAssetsHistory Text

143+obgahParent

144+ = lens _obgahParent (\ s a -> s{_obgahParent = a})

145+

146+-- | V1 error format.

147+obgahXgafv :: Lens' OrganizationsBatchGetAssetsHistory (Maybe Xgafv)

148+obgahXgafv

149+ = lens _obgahXgafv (\ s a -> s{_obgahXgafv = a})

150+

151+-- | End time of the time window (inclusive). Current timestamp if not

152+-- specified.

153+obgahReadTimeWindowEndTime :: Lens' OrganizationsBatchGetAssetsHistory (Maybe UTCTime)

154+obgahReadTimeWindowEndTime

155+ = lens _obgahReadTimeWindowEndTime

156+ (\ s a -> s{_obgahReadTimeWindowEndTime = a})

157+ . mapping _DateTime

158+

159+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

160+obgahUploadProtocol :: Lens' OrganizationsBatchGetAssetsHistory (Maybe Text)

161+obgahUploadProtocol

162+ = lens _obgahUploadProtocol

163+ (\ s a -> s{_obgahUploadProtocol = a})

164+

165+-- | OAuth access token.

166+obgahAccessToken :: Lens' OrganizationsBatchGetAssetsHistory (Maybe Text)

167+obgahAccessToken

168+ = lens _obgahAccessToken

169+ (\ s a -> s{_obgahAccessToken = a})

170+

171+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

172+obgahUploadType :: Lens' OrganizationsBatchGetAssetsHistory (Maybe Text)

173+obgahUploadType

174+ = lens _obgahUploadType

175+ (\ s a -> s{_obgahUploadType = a})

176+

177+-- | A list of the full names of the assets. For example:

178+-- \`\/\/compute.googleapis.com\/projects\/my_project_123\/zones\/zone1\/instances\/instance1\`.

179+-- See [Resource

180+-- Names](https:\/\/cloud.google.com\/apis\/design\/resource_names#full_resource_name)

181+-- for more info. The request becomes a no-op if the asset name list is

182+-- empty, and the max size of the asset name list is 100 in one request.

183+obgahAssetNames :: Lens' OrganizationsBatchGetAssetsHistory [Text]

184+obgahAssetNames

185+ = lens _obgahAssetNames

186+ (\ s a -> s{_obgahAssetNames = a})

187+ . _Default

188+ . _Coerce

189+

190+-- | Start time of the time window (exclusive).

191+obgahReadTimeWindowStartTime :: Lens' OrganizationsBatchGetAssetsHistory (Maybe UTCTime)

192+obgahReadTimeWindowStartTime

193+ = lens _obgahReadTimeWindowStartTime

194+ (\ s a -> s{_obgahReadTimeWindowStartTime = a})

195+ . mapping _DateTime

196+

197+-- | Required. The content type.

198+obgahContentType :: Lens' OrganizationsBatchGetAssetsHistory (Maybe Text)

199+obgahContentType

200+ = lens _obgahContentType

201+ (\ s a -> s{_obgahContentType = a})

202+

203+-- | JSONP

204+obgahCallback :: Lens' OrganizationsBatchGetAssetsHistory (Maybe Text)

205+obgahCallback

206+ = lens _obgahCallback

207+ (\ s a -> s{_obgahCallback = a})

208+

209+instance GoogleRequest

210+ OrganizationsBatchGetAssetsHistory

211+ where

212+ type Rs OrganizationsBatchGetAssetsHistory =

213+ BatchGetAssetsHistoryResponse

214+ type Scopes OrganizationsBatchGetAssetsHistory =

215+ '["https://www.googleapis.com/auth/cloud-platform"]

216+ requestClient OrganizationsBatchGetAssetsHistory'{..}

217+ = go _obgahParent _obgahXgafv

218+ _obgahReadTimeWindowEndTime

219+ _obgahUploadProtocol

220+ _obgahAccessToken

221+ _obgahUploadType

222+ (_obgahAssetNames ^. _Default)

223+ _obgahReadTimeWindowStartTime

224+ _obgahContentType

225+ _obgahCallback

226+ (Just AltJSON)

227+ cloudAssetService

228+ where go

229+ = buildClient

230+ (Proxy ::

231+ Proxy OrganizationsBatchGetAssetsHistoryResource)

232+ mempty

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Organizations/ExportAssets.hsnew file+173

@@ -0,0 +1,173 @@

1+{-# LANGUAGE DataKinds #-}

2+{-# LANGUAGE DeriveDataTypeable #-}

3+{-# LANGUAGE DeriveGeneric #-}

4+{-# LANGUAGE FlexibleInstances #-}

5+{-# LANGUAGE NoImplicitPrelude #-}

6+{-# LANGUAGE OverloadedStrings #-}

7+{-# LANGUAGE RecordWildCards #-}

8+{-# LANGUAGE TypeFamilies #-}

9+{-# LANGUAGE TypeOperators #-}

10+

11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14+

15+-- |

16+-- Module : Network.Google.Resource.CloudAsset.Organizations.ExportAssets

17+-- Copyright : (c) 2015-2016 Brendan Hay

18+-- License : Mozilla Public License, v. 2.0.

19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20+-- Stability : auto-generated

21+-- Portability : non-portable (GHC extensions)

22+--

23+-- Exports assets with time and resource types to a given Cloud Storage

24+-- location. The output format is newline-delimited JSON. This API

25+-- implements the google.longrunning.Operation API allowing you to keep

26+-- track of the export.

27+--

28+-- /See:/ <https://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference> for @cloudasset.organizations.exportAssets@.

29+module Network.Google.Resource.CloudAsset.Organizations.ExportAssets

30+ (

31+ -- * REST Resource

32+ OrganizationsExportAssetsResource

33+

34+ -- * Creating a Request

35+ , organizationsExportAssets

36+ , OrganizationsExportAssets

37+

38+ -- * Request Lenses

39+ , oeaParent

40+ , oeaXgafv

41+ , oeaUploadProtocol

42+ , oeaAccessToken

43+ , oeaUploadType

44+ , oeaPayload

45+ , oeaCallback

46+ ) where

47+

48+import Network.Google.CloudAsset.Types

49+import Network.Google.Prelude

50+

51+-- | A resource alias for @cloudasset.organizations.exportAssets@ method which the

52+-- 'OrganizationsExportAssets' request conforms to.

53+type OrganizationsExportAssetsResource =

54+ "v1beta1" :>

55+ CaptureMode "parent" "exportAssets" Text :>

56+ QueryParam "$.xgafv" Xgafv :>

57+ QueryParam "upload_protocol" Text :>

58+ QueryParam "access_token" Text :>

59+ QueryParam "uploadType" Text :>

60+ QueryParam "callback" Text :>

61+ QueryParam "alt" AltJSON :>

62+ ReqBody '[JSON] ExportAssetsRequest :>

63+ Post '[JSON] Operation

64+

65+-- | Exports assets with time and resource types to a given Cloud Storage

66+-- location. The output format is newline-delimited JSON. This API

67+-- implements the google.longrunning.Operation API allowing you to keep

68+-- track of the export.

69+--

70+-- /See:/ 'organizationsExportAssets' smart constructor.

71+data OrganizationsExportAssets =

72+ OrganizationsExportAssets'

73+ { _oeaParent :: !Text

74+ , _oeaXgafv :: !(Maybe Xgafv)

75+ , _oeaUploadProtocol :: !(Maybe Text)

76+ , _oeaAccessToken :: !(Maybe Text)

77+ , _oeaUploadType :: !(Maybe Text)

78+ , _oeaPayload :: !ExportAssetsRequest

79+ , _oeaCallback :: !(Maybe Text)

80+ }

81+ deriving (Eq, Show, Data, Typeable, Generic)

82+

83+

84+-- | Creates a value of 'OrganizationsExportAssets' with the minimum fields required to make a request.

85+--

86+-- Use one of the following lenses to modify other fields as desired:

87+--

88+-- * 'oeaParent'

89+--

90+-- * 'oeaXgafv'

91+--

92+-- * 'oeaUploadProtocol'

93+--

94+-- * 'oeaAccessToken'

95+--

96+-- * 'oeaUploadType'

97+--

98+-- * 'oeaPayload'

99+--

100+-- * 'oeaCallback'

101+organizationsExportAssets

102+ :: Text -- ^ 'oeaParent'

103+ -> ExportAssetsRequest -- ^ 'oeaPayload'

104+ -> OrganizationsExportAssets

105+organizationsExportAssets pOeaParent_ pOeaPayload_ =

106+ OrganizationsExportAssets'

107+ { _oeaParent = pOeaParent_

108+ , _oeaXgafv = Nothing

109+ , _oeaUploadProtocol = Nothing

110+ , _oeaAccessToken = Nothing

111+ , _oeaUploadType = Nothing

112+ , _oeaPayload = pOeaPayload_

113+ , _oeaCallback = Nothing

114+ }

115+

116+

117+-- | Required. The relative name of the root asset. This can only be an

118+-- organization number (such as \"organizations\/123\"), a project ID (such

119+-- as \"projects\/my-project-id\"), a project number (such as

120+-- \"projects\/12345\"), or a folder number (such as \"folders\/123\").

121+oeaParent :: Lens' OrganizationsExportAssets Text

122+oeaParent

123+ = lens _oeaParent (\ s a -> s{_oeaParent = a})

124+

125+-- | V1 error format.

126+oeaXgafv :: Lens' OrganizationsExportAssets (Maybe Xgafv)

127+oeaXgafv = lens _oeaXgafv (\ s a -> s{_oeaXgafv = a})

128+

129+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

130+oeaUploadProtocol :: Lens' OrganizationsExportAssets (Maybe Text)

131+oeaUploadProtocol

132+ = lens _oeaUploadProtocol

133+ (\ s a -> s{_oeaUploadProtocol = a})

134+

135+-- | OAuth access token.

136+oeaAccessToken :: Lens' OrganizationsExportAssets (Maybe Text)

137+oeaAccessToken

138+ = lens _oeaAccessToken

139+ (\ s a -> s{_oeaAccessToken = a})

140+

141+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

142+oeaUploadType :: Lens' OrganizationsExportAssets (Maybe Text)

143+oeaUploadType

144+ = lens _oeaUploadType

145+ (\ s a -> s{_oeaUploadType = a})

146+

147+-- | Multipart request metadata.

148+oeaPayload :: Lens' OrganizationsExportAssets ExportAssetsRequest

149+oeaPayload

150+ = lens _oeaPayload (\ s a -> s{_oeaPayload = a})

151+

152+-- | JSONP

153+oeaCallback :: Lens' OrganizationsExportAssets (Maybe Text)

154+oeaCallback

155+ = lens _oeaCallback (\ s a -> s{_oeaCallback = a})

156+

157+instance GoogleRequest OrganizationsExportAssets

158+ where

159+ type Rs OrganizationsExportAssets = Operation

160+ type Scopes OrganizationsExportAssets =

161+ '["https://www.googleapis.com/auth/cloud-platform"]

162+ requestClient OrganizationsExportAssets'{..}

163+ = go _oeaParent _oeaXgafv _oeaUploadProtocol

164+ _oeaAccessToken

165+ _oeaUploadType

166+ _oeaCallback

167+ (Just AltJSON)

168+ _oeaPayload

169+ cloudAssetService

170+ where go

171+ = buildClient

172+ (Proxy :: Proxy OrganizationsExportAssetsResource)

173+ mempty

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Operations/Get.hs → gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Organizations/Operations/Get.hsrenamed+7−7

@@ -13,7 +13,7 @@

1313{-# OPTIONS_GHC -fno-warn-unused-imports #-}

1414

1515-- |

16−-- Module : Network.Google.Resource.SecurityCenter.Organizations.Operations.Get

16+-- Module : Network.Google.Resource.CloudAsset.Organizations.Operations.Get

1717-- Copyright : (c) 2015-2016 Brendan Hay

1818-- License : Mozilla Public License, v. 2.0.

1919-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

@@ -24,8 +24,8 @@

2424-- method to poll the operation result at intervals as recommended by the

2525-- API service.

2626--

27−-- /See:/ <https://console.cloud.google.com/apis/api/securitycenter.googleapis.com/overview Cloud Security Command Center API Reference> for @securitycenter.organizations.operations.get@.

28−module Network.Google.Resource.SecurityCenter.Organizations.Operations.Get

27+-- /See:/ <https://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference> for @cloudasset.organizations.operations.get@.

28+module Network.Google.Resource.CloudAsset.Organizations.Operations.Get

2929 (

3030 -- * REST Resource

3131 OrganizationsOperationsGetResource

@@ -43,13 +43,13 @@ module Network.Google.Resource.SecurityCenter.Organizations.Operations.Get

4343 , oogCallback

4444 ) where

4545

46+import Network.Google.CloudAsset.Types

4647import Network.Google.Prelude

47−import Network.Google.SecurityCenter.Types

4848

49−-- | A resource alias for @securitycenter.organizations.operations.get@ method which the

49+-- | A resource alias for @cloudasset.organizations.operations.get@ method which the

5050-- 'OrganizationsOperationsGet' request conforms to.

5151type OrganizationsOperationsGetResource =

52− "v1" :>

52+ "v1beta1" :>

5353 Capture "name" Text :>

5454 QueryParam "$.xgafv" Xgafv :>

5555 QueryParam "upload_protocol" Text :>

@@ -146,7 +146,7 @@ instance GoogleRequest OrganizationsOperationsGet

146146 _oogUploadType

147147 _oogCallback

148148 (Just AltJSON)

149− securityCenterService

149+ cloudAssetService

150150 where go

151151 = buildClient

152152 (Proxy :: Proxy OrganizationsOperationsGetResource)

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Projects/BatchGetAssetsHistory.hsnew file+231

@@ -0,0 +1,231 @@

1+{-# LANGUAGE DataKinds #-}

2+{-# LANGUAGE DeriveDataTypeable #-}

3+{-# LANGUAGE DeriveGeneric #-}

4+{-# LANGUAGE FlexibleInstances #-}

5+{-# LANGUAGE NoImplicitPrelude #-}

6+{-# LANGUAGE OverloadedStrings #-}

7+{-# LANGUAGE RecordWildCards #-}

8+{-# LANGUAGE TypeFamilies #-}

9+{-# LANGUAGE TypeOperators #-}

10+

11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14+

15+-- |

16+-- Module : Network.Google.Resource.CloudAsset.Projects.BatchGetAssetsHistory

17+-- Copyright : (c) 2015-2016 Brendan Hay

18+-- License : Mozilla Public License, v. 2.0.

19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20+-- Stability : auto-generated

21+-- Portability : non-portable (GHC extensions)

22+--

23+-- Batch gets the update history of assets that overlap a time window. For

24+-- RESOURCE content, this API outputs history with asset in both non-delete

25+-- or deleted status. For IAM_POLICY content, this API outputs history when

26+-- the asset and its attached IAM POLICY both exist. This can create gaps

27+-- in the output history. If a specified asset does not exist, this API

28+-- returns an INVALID_ARGUMENT error.

29+--

30+-- /See:/ <https://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference> for @cloudasset.projects.batchGetAssetsHistory@.

31+module Network.Google.Resource.CloudAsset.Projects.BatchGetAssetsHistory

32+ (

33+ -- * REST Resource

34+ ProjectsBatchGetAssetsHistoryResource

35+

36+ -- * Creating a Request

37+ , projectsBatchGetAssetsHistory

38+ , ProjectsBatchGetAssetsHistory

39+

40+ -- * Request Lenses

41+ , pbgahParent

42+ , pbgahXgafv

43+ , pbgahReadTimeWindowEndTime

44+ , pbgahUploadProtocol

45+ , pbgahAccessToken

46+ , pbgahUploadType

47+ , pbgahAssetNames

48+ , pbgahReadTimeWindowStartTime

49+ , pbgahContentType

50+ , pbgahCallback

51+ ) where

52+

53+import Network.Google.CloudAsset.Types

54+import Network.Google.Prelude

55+

56+-- | A resource alias for @cloudasset.projects.batchGetAssetsHistory@ method which the

57+-- 'ProjectsBatchGetAssetsHistory' request conforms to.

58+type ProjectsBatchGetAssetsHistoryResource =

59+ "v1beta1" :>

60+ CaptureMode "parent" "batchGetAssetsHistory" Text :>

61+ QueryParam "$.xgafv" Xgafv :>

62+ QueryParam "readTimeWindow.endTime" DateTime' :>

63+ QueryParam "upload_protocol" Text :>

64+ QueryParam "access_token" Text :>

65+ QueryParam "uploadType" Text :>

66+ QueryParams "assetNames" Text :>

67+ QueryParam "readTimeWindow.startTime" DateTime' :>

68+ QueryParam "contentType" Text :>

69+ QueryParam "callback" Text :>

70+ QueryParam "alt" AltJSON :>

71+ Get '[JSON] BatchGetAssetsHistoryResponse

72+

73+-- | Batch gets the update history of assets that overlap a time window. For

74+-- RESOURCE content, this API outputs history with asset in both non-delete

75+-- or deleted status. For IAM_POLICY content, this API outputs history when

76+-- the asset and its attached IAM POLICY both exist. This can create gaps

77+-- in the output history. If a specified asset does not exist, this API

78+-- returns an INVALID_ARGUMENT error.

79+--

80+-- /See:/ 'projectsBatchGetAssetsHistory' smart constructor.

81+data ProjectsBatchGetAssetsHistory =

82+ ProjectsBatchGetAssetsHistory'

83+ { _pbgahParent :: !Text

84+ , _pbgahXgafv :: !(Maybe Xgafv)

85+ , _pbgahReadTimeWindowEndTime :: !(Maybe DateTime')

86+ , _pbgahUploadProtocol :: !(Maybe Text)

87+ , _pbgahAccessToken :: !(Maybe Text)

88+ , _pbgahUploadType :: !(Maybe Text)

89+ , _pbgahAssetNames :: !(Maybe [Text])

90+ , _pbgahReadTimeWindowStartTime :: !(Maybe DateTime')

91+ , _pbgahContentType :: !(Maybe Text)

92+ , _pbgahCallback :: !(Maybe Text)

93+ }

94+ deriving (Eq, Show, Data, Typeable, Generic)

95+

96+

97+-- | Creates a value of 'ProjectsBatchGetAssetsHistory' with the minimum fields required to make a request.

98+--

99+-- Use one of the following lenses to modify other fields as desired:

100+--

101+-- * 'pbgahParent'

102+--

103+-- * 'pbgahXgafv'

104+--

105+-- * 'pbgahReadTimeWindowEndTime'

106+--

107+-- * 'pbgahUploadProtocol'

108+--

109+-- * 'pbgahAccessToken'

110+--

111+-- * 'pbgahUploadType'

112+--

113+-- * 'pbgahAssetNames'

114+--

115+-- * 'pbgahReadTimeWindowStartTime'

116+--

117+-- * 'pbgahContentType'

118+--

119+-- * 'pbgahCallback'

120+projectsBatchGetAssetsHistory

121+ :: Text -- ^ 'pbgahParent'

122+ -> ProjectsBatchGetAssetsHistory

123+projectsBatchGetAssetsHistory pPbgahParent_ =

124+ ProjectsBatchGetAssetsHistory'

125+ { _pbgahParent = pPbgahParent_

126+ , _pbgahXgafv = Nothing

127+ , _pbgahReadTimeWindowEndTime = Nothing

128+ , _pbgahUploadProtocol = Nothing

129+ , _pbgahAccessToken = Nothing

130+ , _pbgahUploadType = Nothing

131+ , _pbgahAssetNames = Nothing

132+ , _pbgahReadTimeWindowStartTime = Nothing

133+ , _pbgahContentType = Nothing

134+ , _pbgahCallback = Nothing

135+ }

136+

137+

138+-- | Required. The relative name of the root asset. It can only be an

139+-- organization number (such as \"organizations\/123\"), a project ID (such

140+-- as \"projects\/my-project-id\")\", or a project number (such as

141+-- \"projects\/12345\").

142+pbgahParent :: Lens' ProjectsBatchGetAssetsHistory Text

143+pbgahParent

144+ = lens _pbgahParent (\ s a -> s{_pbgahParent = a})

145+

146+-- | V1 error format.

147+pbgahXgafv :: Lens' ProjectsBatchGetAssetsHistory (Maybe Xgafv)

148+pbgahXgafv

149+ = lens _pbgahXgafv (\ s a -> s{_pbgahXgafv = a})

150+

151+-- | End time of the time window (inclusive). Current timestamp if not

152+-- specified.

153+pbgahReadTimeWindowEndTime :: Lens' ProjectsBatchGetAssetsHistory (Maybe UTCTime)

154+pbgahReadTimeWindowEndTime

155+ = lens _pbgahReadTimeWindowEndTime

156+ (\ s a -> s{_pbgahReadTimeWindowEndTime = a})

157+ . mapping _DateTime

158+

159+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

160+pbgahUploadProtocol :: Lens' ProjectsBatchGetAssetsHistory (Maybe Text)

161+pbgahUploadProtocol

162+ = lens _pbgahUploadProtocol

163+ (\ s a -> s{_pbgahUploadProtocol = a})

164+

165+-- | OAuth access token.

166+pbgahAccessToken :: Lens' ProjectsBatchGetAssetsHistory (Maybe Text)

167+pbgahAccessToken

168+ = lens _pbgahAccessToken

169+ (\ s a -> s{_pbgahAccessToken = a})

170+

171+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

172+pbgahUploadType :: Lens' ProjectsBatchGetAssetsHistory (Maybe Text)

173+pbgahUploadType

174+ = lens _pbgahUploadType

175+ (\ s a -> s{_pbgahUploadType = a})

176+

177+-- | A list of the full names of the assets. For example:

178+-- \`\/\/compute.googleapis.com\/projects\/my_project_123\/zones\/zone1\/instances\/instance1\`.

179+-- See [Resource

180+-- Names](https:\/\/cloud.google.com\/apis\/design\/resource_names#full_resource_name)

181+-- for more info. The request becomes a no-op if the asset name list is

182+-- empty, and the max size of the asset name list is 100 in one request.

183+pbgahAssetNames :: Lens' ProjectsBatchGetAssetsHistory [Text]

184+pbgahAssetNames

185+ = lens _pbgahAssetNames

186+ (\ s a -> s{_pbgahAssetNames = a})

187+ . _Default

188+ . _Coerce

189+

190+-- | Start time of the time window (exclusive).

191+pbgahReadTimeWindowStartTime :: Lens' ProjectsBatchGetAssetsHistory (Maybe UTCTime)

192+pbgahReadTimeWindowStartTime

193+ = lens _pbgahReadTimeWindowStartTime

194+ (\ s a -> s{_pbgahReadTimeWindowStartTime = a})

195+ . mapping _DateTime

196+

197+-- | Required. The content type.

198+pbgahContentType :: Lens' ProjectsBatchGetAssetsHistory (Maybe Text)

199+pbgahContentType

200+ = lens _pbgahContentType

201+ (\ s a -> s{_pbgahContentType = a})

202+

203+-- | JSONP

204+pbgahCallback :: Lens' ProjectsBatchGetAssetsHistory (Maybe Text)

205+pbgahCallback

206+ = lens _pbgahCallback

207+ (\ s a -> s{_pbgahCallback = a})

208+

209+instance GoogleRequest ProjectsBatchGetAssetsHistory

210+ where

211+ type Rs ProjectsBatchGetAssetsHistory =

212+ BatchGetAssetsHistoryResponse

213+ type Scopes ProjectsBatchGetAssetsHistory =

214+ '["https://www.googleapis.com/auth/cloud-platform"]

215+ requestClient ProjectsBatchGetAssetsHistory'{..}

216+ = go _pbgahParent _pbgahXgafv

217+ _pbgahReadTimeWindowEndTime

218+ _pbgahUploadProtocol

219+ _pbgahAccessToken

220+ _pbgahUploadType

221+ (_pbgahAssetNames ^. _Default)

222+ _pbgahReadTimeWindowStartTime

223+ _pbgahContentType

224+ _pbgahCallback

225+ (Just AltJSON)

226+ cloudAssetService

227+ where go

228+ = buildClient

229+ (Proxy ::

230+ Proxy ProjectsBatchGetAssetsHistoryResource)

231+ mempty

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Projects/ExportAssets.hsnew file+172

@@ -0,0 +1,172 @@

1+{-# LANGUAGE DataKinds #-}

2+{-# LANGUAGE DeriveDataTypeable #-}

3+{-# LANGUAGE DeriveGeneric #-}

4+{-# LANGUAGE FlexibleInstances #-}

5+{-# LANGUAGE NoImplicitPrelude #-}

6+{-# LANGUAGE OverloadedStrings #-}

7+{-# LANGUAGE RecordWildCards #-}

8+{-# LANGUAGE TypeFamilies #-}

9+{-# LANGUAGE TypeOperators #-}

10+

11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14+

15+-- |

16+-- Module : Network.Google.Resource.CloudAsset.Projects.ExportAssets

17+-- Copyright : (c) 2015-2016 Brendan Hay

18+-- License : Mozilla Public License, v. 2.0.

19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20+-- Stability : auto-generated

21+-- Portability : non-portable (GHC extensions)

22+--

23+-- Exports assets with time and resource types to a given Cloud Storage

24+-- location. The output format is newline-delimited JSON. This API

25+-- implements the google.longrunning.Operation API allowing you to keep

26+-- track of the export.

27+--

28+-- /See:/ <https://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference> for @cloudasset.projects.exportAssets@.

29+module Network.Google.Resource.CloudAsset.Projects.ExportAssets

30+ (

31+ -- * REST Resource

32+ ProjectsExportAssetsResource

33+

34+ -- * Creating a Request

35+ , projectsExportAssets

36+ , ProjectsExportAssets

37+

38+ -- * Request Lenses

39+ , peaParent

40+ , peaXgafv

41+ , peaUploadProtocol

42+ , peaAccessToken

43+ , peaUploadType

44+ , peaPayload

45+ , peaCallback

46+ ) where

47+

48+import Network.Google.CloudAsset.Types

49+import Network.Google.Prelude

50+

51+-- | A resource alias for @cloudasset.projects.exportAssets@ method which the

52+-- 'ProjectsExportAssets' request conforms to.

53+type ProjectsExportAssetsResource =

54+ "v1beta1" :>

55+ CaptureMode "parent" "exportAssets" Text :>

56+ QueryParam "$.xgafv" Xgafv :>

57+ QueryParam "upload_protocol" Text :>

58+ QueryParam "access_token" Text :>

59+ QueryParam "uploadType" Text :>

60+ QueryParam "callback" Text :>

61+ QueryParam "alt" AltJSON :>

62+ ReqBody '[JSON] ExportAssetsRequest :>

63+ Post '[JSON] Operation

64+

65+-- | Exports assets with time and resource types to a given Cloud Storage

66+-- location. The output format is newline-delimited JSON. This API

67+-- implements the google.longrunning.Operation API allowing you to keep

68+-- track of the export.

69+--

70+-- /See:/ 'projectsExportAssets' smart constructor.

71+data ProjectsExportAssets =

72+ ProjectsExportAssets'

73+ { _peaParent :: !Text

74+ , _peaXgafv :: !(Maybe Xgafv)

75+ , _peaUploadProtocol :: !(Maybe Text)

76+ , _peaAccessToken :: !(Maybe Text)

77+ , _peaUploadType :: !(Maybe Text)

78+ , _peaPayload :: !ExportAssetsRequest

79+ , _peaCallback :: !(Maybe Text)

80+ }

81+ deriving (Eq, Show, Data, Typeable, Generic)

82+

83+

84+-- | Creates a value of 'ProjectsExportAssets' with the minimum fields required to make a request.

85+--

86+-- Use one of the following lenses to modify other fields as desired:

87+--

88+-- * 'peaParent'

89+--

90+-- * 'peaXgafv'

91+--

92+-- * 'peaUploadProtocol'

93+--

94+-- * 'peaAccessToken'

95+--

96+-- * 'peaUploadType'

97+--

98+-- * 'peaPayload'

99+--

100+-- * 'peaCallback'

101+projectsExportAssets

102+ :: Text -- ^ 'peaParent'

103+ -> ExportAssetsRequest -- ^ 'peaPayload'

104+ -> ProjectsExportAssets

105+projectsExportAssets pPeaParent_ pPeaPayload_ =

106+ ProjectsExportAssets'

107+ { _peaParent = pPeaParent_

108+ , _peaXgafv = Nothing

109+ , _peaUploadProtocol = Nothing

110+ , _peaAccessToken = Nothing

111+ , _peaUploadType = Nothing

112+ , _peaPayload = pPeaPayload_

113+ , _peaCallback = Nothing

114+ }

115+

116+

117+-- | Required. The relative name of the root asset. This can only be an

118+-- organization number (such as \"organizations\/123\"), a project ID (such

119+-- as \"projects\/my-project-id\"), a project number (such as

120+-- \"projects\/12345\"), or a folder number (such as \"folders\/123\").

121+peaParent :: Lens' ProjectsExportAssets Text

122+peaParent

123+ = lens _peaParent (\ s a -> s{_peaParent = a})

124+

125+-- | V1 error format.

126+peaXgafv :: Lens' ProjectsExportAssets (Maybe Xgafv)

127+peaXgafv = lens _peaXgafv (\ s a -> s{_peaXgafv = a})

128+

129+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

130+peaUploadProtocol :: Lens' ProjectsExportAssets (Maybe Text)

131+peaUploadProtocol

132+ = lens _peaUploadProtocol

133+ (\ s a -> s{_peaUploadProtocol = a})

134+

135+-- | OAuth access token.

136+peaAccessToken :: Lens' ProjectsExportAssets (Maybe Text)

137+peaAccessToken

138+ = lens _peaAccessToken

139+ (\ s a -> s{_peaAccessToken = a})

140+

141+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

142+peaUploadType :: Lens' ProjectsExportAssets (Maybe Text)

143+peaUploadType

144+ = lens _peaUploadType

145+ (\ s a -> s{_peaUploadType = a})

146+

147+-- | Multipart request metadata.

148+peaPayload :: Lens' ProjectsExportAssets ExportAssetsRequest

149+peaPayload

150+ = lens _peaPayload (\ s a -> s{_peaPayload = a})

151+

152+-- | JSONP

153+peaCallback :: Lens' ProjectsExportAssets (Maybe Text)

154+peaCallback

155+ = lens _peaCallback (\ s a -> s{_peaCallback = a})

156+

157+instance GoogleRequest ProjectsExportAssets where

158+ type Rs ProjectsExportAssets = Operation

159+ type Scopes ProjectsExportAssets =

160+ '["https://www.googleapis.com/auth/cloud-platform"]

161+ requestClient ProjectsExportAssets'{..}

162+ = go _peaParent _peaXgafv _peaUploadProtocol

163+ _peaAccessToken

164+ _peaUploadType

165+ _peaCallback

166+ (Just AltJSON)

167+ _peaPayload

168+ cloudAssetService

169+ where go

170+ = buildClient

171+ (Proxy :: Proxy ProjectsExportAssetsResource)

172+ mempty

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Projects/Operations/Get.hsnew file+152

@@ -0,0 +1,152 @@

1+{-# LANGUAGE DataKinds #-}

2+{-# LANGUAGE DeriveDataTypeable #-}

3+{-# LANGUAGE DeriveGeneric #-}

4+{-# LANGUAGE FlexibleInstances #-}

5+{-# LANGUAGE NoImplicitPrelude #-}

6+{-# LANGUAGE OverloadedStrings #-}

7+{-# LANGUAGE RecordWildCards #-}

8+{-# LANGUAGE TypeFamilies #-}

9+{-# LANGUAGE TypeOperators #-}

10+

11+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}

12+{-# OPTIONS_GHC -fno-warn-unused-binds #-}

13+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

14+

15+-- |

16+-- Module : Network.Google.Resource.CloudAsset.Projects.Operations.Get

17+-- Copyright : (c) 2015-2016 Brendan Hay

18+-- License : Mozilla Public License, v. 2.0.

19+-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>

20+-- Stability : auto-generated

21+-- Portability : non-portable (GHC extensions)

22+--

23+-- Gets the latest state of a long-running operation. Clients can use this

24+-- method to poll the operation result at intervals as recommended by the

25+-- API service.

26+--

27+-- /See:/ <https://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference> for @cloudasset.projects.operations.get@.

28+module Network.Google.Resource.CloudAsset.Projects.Operations.Get

29+ (

30+ -- * REST Resource

31+ ProjectsOperationsGetResource

32+

33+ -- * Creating a Request

34+ , projectsOperationsGet

35+ , ProjectsOperationsGet

36+

37+ -- * Request Lenses

38+ , pogXgafv

39+ , pogUploadProtocol

40+ , pogAccessToken

41+ , pogUploadType

42+ , pogName

43+ , pogCallback

44+ ) where

45+

46+import Network.Google.CloudAsset.Types

47+import Network.Google.Prelude

48+

49+-- | A resource alias for @cloudasset.projects.operations.get@ method which the

50+-- 'ProjectsOperationsGet' request conforms to.

51+type ProjectsOperationsGetResource =

52+ "v1beta1" :>

53+ Capture "name" Text :>

54+ QueryParam "$.xgafv" Xgafv :>

55+ QueryParam "upload_protocol" Text :>

56+ QueryParam "access_token" Text :>

57+ QueryParam "uploadType" Text :>

58+ QueryParam "callback" Text :>

59+ QueryParam "alt" AltJSON :> Get '[JSON] Operation

60+

61+-- | Gets the latest state of a long-running operation. Clients can use this

62+-- method to poll the operation result at intervals as recommended by the

63+-- API service.

64+--

65+-- /See:/ 'projectsOperationsGet' smart constructor.

66+data ProjectsOperationsGet =

67+ ProjectsOperationsGet'

68+ { _pogXgafv :: !(Maybe Xgafv)

69+ , _pogUploadProtocol :: !(Maybe Text)

70+ , _pogAccessToken :: !(Maybe Text)

71+ , _pogUploadType :: !(Maybe Text)

72+ , _pogName :: !Text

73+ , _pogCallback :: !(Maybe Text)

74+ }

75+ deriving (Eq, Show, Data, Typeable, Generic)

76+

77+

78+-- | Creates a value of 'ProjectsOperationsGet' with the minimum fields required to make a request.

79+--

80+-- Use one of the following lenses to modify other fields as desired:

81+--

82+-- * 'pogXgafv'

83+--

84+-- * 'pogUploadProtocol'

85+--

86+-- * 'pogAccessToken'

87+--

88+-- * 'pogUploadType'

89+--

90+-- * 'pogName'

91+--

92+-- * 'pogCallback'

93+projectsOperationsGet

94+ :: Text -- ^ 'pogName'

95+ -> ProjectsOperationsGet

96+projectsOperationsGet pPogName_ =

97+ ProjectsOperationsGet'

98+ { _pogXgafv = Nothing

99+ , _pogUploadProtocol = Nothing

100+ , _pogAccessToken = Nothing

101+ , _pogUploadType = Nothing

102+ , _pogName = pPogName_

103+ , _pogCallback = Nothing

104+ }

105+

106+

107+-- | V1 error format.

108+pogXgafv :: Lens' ProjectsOperationsGet (Maybe Xgafv)

109+pogXgafv = lens _pogXgafv (\ s a -> s{_pogXgafv = a})

110+

111+-- | Upload protocol for media (e.g. \"raw\", \"multipart\").

112+pogUploadProtocol :: Lens' ProjectsOperationsGet (Maybe Text)

113+pogUploadProtocol

114+ = lens _pogUploadProtocol

115+ (\ s a -> s{_pogUploadProtocol = a})

116+

117+-- | OAuth access token.

118+pogAccessToken :: Lens' ProjectsOperationsGet (Maybe Text)

119+pogAccessToken

120+ = lens _pogAccessToken

121+ (\ s a -> s{_pogAccessToken = a})

122+

123+-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").

124+pogUploadType :: Lens' ProjectsOperationsGet (Maybe Text)

125+pogUploadType

126+ = lens _pogUploadType

127+ (\ s a -> s{_pogUploadType = a})

128+

129+-- | The name of the operation resource.

130+pogName :: Lens' ProjectsOperationsGet Text

131+pogName = lens _pogName (\ s a -> s{_pogName = a})

132+

133+-- | JSONP

134+pogCallback :: Lens' ProjectsOperationsGet (Maybe Text)

135+pogCallback

136+ = lens _pogCallback (\ s a -> s{_pogCallback = a})

137+

138+instance GoogleRequest ProjectsOperationsGet where

139+ type Rs ProjectsOperationsGet = Operation

140+ type Scopes ProjectsOperationsGet =

141+ '["https://www.googleapis.com/auth/cloud-platform"]

142+ requestClient ProjectsOperationsGet'{..}

143+ = go _pogName _pogXgafv _pogUploadProtocol

144+ _pogAccessToken

145+ _pogUploadType

146+ _pogCallback

147+ (Just AltJSON)

148+ cloudAssetService

149+ where go

150+ = buildClient

151+ (Proxy :: Proxy ProjectsOperationsGetResource)

152+ mempty

gogol-cloudasset/gogol-cloudasset.cabal+9−4

This diff is too big to show here.

gogol-cloudfunctions/gen/Network/Google/CloudFunctions/Types/Product.hs+11−11

This diff is too big to show here.

gogol-cloudfunctions/gen/Network/Google/Resource/CloudFunctions/Projects/Locations/Functions/Call.hs+4−4

This diff is too big to show here.

gogol-cloudfunctions/gen/Network/Google/Resource/CloudFunctions/Projects/Locations/Functions/GenerateUploadURL.hs+4−14

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/CloudIdentity.hs−4

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/CloudIdentity/Types.hs−14

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Create.hs+1−2

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Delete.hs+1−2

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Get.hs+1−3

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/List.hs+3−5

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Lookup.hs+1−3

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/Create.hs+1−2

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/Delete.hs+1−2

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/Get.hs+1−3

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/List.hs+3−5

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/Lookup.hs+1−3

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Patch.hs+1−2

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Search.hs+3−5

This diff is too big to show here.

gogol-cloudiot/gen/Network/Google/CloudIOT/Types/Product.hs+6−5

This diff is too big to show here.

gogol-cloudkms/gen/Network/Google/CloudKMS/Types/Product.hs+7−8

This diff is too big to show here.

gogol-cloudkms/gen/Network/Google/CloudKMS/Types/Sum.hs−6

This diff is too big to show here.

gogol-cloudprivatecatalog/LICENSEdeleted−367

This diff is too big to show here.

gogol-cloudprivatecatalog/Makefiledeleted−1

This diff is too big to show here.

gogol-cloudprivatecatalog/README.mddeleted−28

This diff is too big to show here.

gogol-cloudprivatecatalog/Setup.hsdeleted−2

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/CloudPrivateCatalog.hsdeleted−148

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/CloudPrivateCatalog/Types.hsdeleted−98

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/CloudPrivateCatalog/Types/Product.hsdeleted−662

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/CloudPrivateCatalog/Types/Sum.hsdeleted−48

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Catalogs/Search.hsdeleted−196

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Products/Search.hsdeleted−197

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Versions/Search.hsdeleted−198

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Catalogs/Search.hsdeleted−197

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Products/Search.hsdeleted−198

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Versions/Search.hsdeleted−199

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Catalogs/Search.hsdeleted−196

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Products/Search.hsdeleted−197

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Versions/Search.hsdeleted−198

This diff is too big to show here.

gogol-cloudprivatecatalog/gogol-cloudprivatecatalog.cabaldeleted−55

This diff is too big to show here.

gogol-cloudprivatecatalog/src/.gitkeepdeleted

No changes to the content.

gogol-cloudprivatecatalogproducer/LICENSEdeleted−367

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/Makefiledeleted−1

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/README.mddeleted−28

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/Setup.hsdeleted−2

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/CloudPrivateCatalogProducer.hsdeleted−386

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/CloudPrivateCatalogProducer/Types.hsdeleted−236

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/CloudPrivateCatalogProducer/Types/Product.hsdeleted−2080

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/CloudPrivateCatalogProducer/Types/Sum.hsdeleted−87

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Associations/Create.hsdeleted−169

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Associations/Delete.hsdeleted−151

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Associations/Get.hsdeleted−151

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Associations/List.hsdeleted−180

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Create.hsdeleted−150

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Delete.hsdeleted−167

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Get.hsdeleted−149

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/GetIAMPolicy.hsdeleted−152

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/List.hsdeleted−178

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Patch.hsdeleted−177

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Copy.hsdeleted−160

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Create.hsdeleted−168

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Delete.hsdeleted−149

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Get.hsdeleted−151

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Icons/Upload.hsdeleted−176

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/List.hsdeleted−195

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Patch.hsdeleted−183

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/Create.hsdeleted−169

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/Delete.hsdeleted−153

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/Get.hsdeleted−153

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/List.hsdeleted−185

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/Patch.hsdeleted−186

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/SetIAMPolicy.hsdeleted−165

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/TestIAMPermissions.hsdeleted−168

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Undelete.hsdeleted−165

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Operations/Cancel.hsdeleted−178

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Operations/Delete.hsdeleted−154

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Operations/Get.hsdeleted−151

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Operations/List.hsdeleted−202

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gogol-cloudprivatecatalogproducer.cabaldeleted−75

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/src/.gitkeepdeleted

No changes to the content.

gogol-cloudscheduler/gen/Network/Google/CloudScheduler/Types.hs+2−2

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/CloudScheduler/Types/Product.hs+8−11

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/Get.hs+1−1

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/Jobs/Create.hs+1−1

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/Jobs/Delete.hs+1−1

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/Jobs/Get.hs+1−1

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/Jobs/List.hs+1−1

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/Jobs/Patch.hs+2−3

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/Jobs/Pause.hs+1−1

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/Jobs/Resume.hs+1−1

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/Jobs/Run.hs+1−1

This diff is too big to show here.

gogol-cloudscheduler/gen/Network/Google/Resource/CloudScheduler/Projects/Locations/List.hs+1−1

This diff is too big to show here.

gogol-cloudscheduler/gogol-cloudscheduler.cabal+1−1

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/CloudSearch.hs−52

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/CloudSearch/Types.hs−52

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/CloudSearch/Types/Product.hs+56−373

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/CloudSearch/Types/Sum.hs−291

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Debug/Datasources/Items/CheckAccess.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Debug/Datasources/Items/UnmAppedids/List.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Debug/Identitysources/Items/ListForunmAppedidentity.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Debug/Identitysources/UnmAppedids/List.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/DeleteSchema.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/GetSchema.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Delete.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Get.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/List.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Upload.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Query/Sources/List.hs+3−5

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Settings/Datasources/Create.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Settings/Datasources/Delete.hs+5−5

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Settings/Datasources/Get.hs+5−5

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Settings/Datasources/List.hs+5−5

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Settings/Datasources/Update.hs+4−4

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Settings/SearchApplications/Delete.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Settings/SearchApplications/Get.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Settings/SearchApplications/List.hs+2−2

This diff is too big to show here.

gogol-cloudsearch/gen/Network/Google/Resource/CloudSearch/Stats/GetIndex.hs+2−6

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/CloudTasks.hs+6−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/CloudTasks/Types.hs+8−3

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/CloudTasks/Types/Product.hs+79−33

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Get.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/List.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Create.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Delete.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Get.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/GetIAMPolicy.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/List.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Patch.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Pause.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Purge.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Resume.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/SetIAMPolicy.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Tasks/Create.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Tasks/Delete.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Tasks/Get.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Tasks/List.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/Tasks/Run.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/Resource/CloudTasks/Projects/Locations/Queues/TestIAMPermissions.hs+1−1

This diff is too big to show here.

gogol-cloudtasks/gogol-cloudtasks.cabal+1−1

This diff is too big to show here.

gogol-commentanalyzer/LICENSEdeleted−367

This diff is too big to show here.

gogol-commentanalyzer/Makefiledeleted−1

This diff is too big to show here.

gogol-commentanalyzer/README.mddeleted−28

This diff is too big to show here.

gogol-commentanalyzer/Setup.hsdeleted−2

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/CommentAnalyzer.hsdeleted−168

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/CommentAnalyzer/Types.hsdeleted−148

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/CommentAnalyzer/Types/Product.hsdeleted−988

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/CommentAnalyzer/Types/Sum.hsdeleted−183

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/Resource/CommentAnalyzer/Comments/Analyze.hsdeleted−150

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/Resource/CommentAnalyzer/Comments/Suggestscore.hsdeleted−151

This diff is too big to show here.

gogol-commentanalyzer/gogol-commentanalyzer.cabaldeleted−53

This diff is too big to show here.

gogol-commentanalyzer/src/.gitkeepdeleted

No changes to the content.

gogol-compute/gen/Network/Google/Compute.hs+7−321

This diff is too big to show here.

gogol-compute/gen/Network/Google/Compute/Types.hs+7−257

This diff is too big to show here.

gogol-compute/gen/Network/Google/Compute/Types/Product.hs+184−2383

This diff is too big to show here.

gogol-compute/gen/Network/Google/Compute/Types/Sum.hs+67−878

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/AttachDisk.hs+1−1

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/GetShieldedInstanceIdentity.hsdeleted−127

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/Reset.hs+2−2

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/SetShieldedInstanceIntegrityPolicy.hsdeleted−171

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/UpdateShieldedInstanceConfig.hsdeleted−165

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/AggregatedList.hsdeleted−177

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/AttachNetworkEndpoints.hsdeleted−173

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/Delete.hsdeleted−149

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/DetachNetworkEndpoints.hsdeleted−173

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/Get.hsdeleted−124

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/Insert.hsdeleted−144

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/List.hsdeleted−188

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/ListNetworkEndpoints.hsdeleted−231

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/TestIAMPermissions.hsdeleted−144

This diff is too big to show here.

gogol-compute/gogol-compute.cabal−12

This diff is too big to show here.

gogol-container/gen/Network/Google/Container.hs+2−42

This diff is too big to show here.

gogol-container/gen/Network/Google/Container/Types.hs−35

This diff is too big to show here.

gogol-container/gen/Network/Google/Container/Types/Product.hs+14−349

This diff is too big to show here.

gogol-container/gen/Network/Google/Container/Types/Sum.hs+15−64

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Aggregated/UsableSubnetworks/List.hsdeleted−209

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/Create.hs+6−6

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/Delete.hs+4−4

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/GetJWKs.hs+6−6

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/NodePools/Get.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/NodePools/Rollback.hs+4−4

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/NodePools/SetAutoscaling.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/NodePools/Update.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/SetMasterAuth.hs+6−6

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/SetNetworkPolicy.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/StartIPRotation.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/Clusters/WellKnown/GetOpenidConfiguration.hs+10−10

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Locations/GetServerConfig.hs+4−4

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Create.hs+6−6

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/Delete.hs+4−4

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/NodePools/Autoscaling.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/NodePools/Get.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/NodePools/Rollback.hs+4−4

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/NodePools/Update.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/SetMasterAuth.hs+6−6

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/SetNetworkPolicy.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/Clusters/StartIPRotation.hs+2−2

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Zones/GetServerConfig.hs+4−4

This diff is too big to show here.

gogol-container/gogol-container.cabal−1

This diff is too big to show here.

gogol-containeranalysis/gen/Network/Google/ContainerAnalysis.hs−61

This diff is too big to show here.

gogol-containeranalysis/gen/Network/Google/ContainerAnalysis/Types.hs−61

This diff is too big to show here.

gogol-containeranalysis/gen/Network/Google/ContainerAnalysis/Types/Product.hs+22−385

This diff is too big to show here.

gogol-containeranalysis/gen/Network/Google/ContainerAnalysis/Types/Sum.hs+23−375

This diff is too big to show here.

gogol-containerbuilder/gen/Network/Google/ContainerBuilder.hs−32

This diff is too big to show here.

gogol-containerbuilder/gen/Network/Google/ContainerBuilder/Types.hs−32

This diff is too big to show here.

gogol-containerbuilder/gen/Network/Google/ContainerBuilder/Types/Product.hs+8−268

This diff is too big to show here.

gogol-containerbuilder/gen/Network/Google/ContainerBuilder/Types/Sum.hs−31

This diff is too big to show here.

gogol-containerbuilder/gen/Network/Google/Resource/Cloudbuild/Projects/Triggers/List.hs+3−28

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Dataflow.hs−55

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Dataflow/Types.hs−20

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+30−195

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Dataflow/Types/Sum.hs−34

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/DeleteSnapshots.hsdeleted−181

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Aggregated.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Create.hs+3−13

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Get.hs+3−15

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/GetMetrics.hs+3−13

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/List.hs+3−19

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Messages/List.hs+3−15

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Update.hs+3−15

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Create.hs+3−13

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/GetConfig.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/SendCapture.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Get.hs+3−15

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/GetMetrics.hs+3−13

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/List.hs+3−19

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Messages/List.hs+3−15

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Update.hs+3−15

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/WorkItems/Lease.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/WorkItems/ReportStatus.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/SQL/Validate.hsdeleted−193

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Snapshots/Delete.hsdeleted−189

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Snapshots/Get.hsdeleted−186

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Snapshots/List.hsdeleted−174

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Templates/Create.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Templates/Get.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Templates/Launch.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/WorkerMessages.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Snapshots/Get.hsdeleted−180

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Snapshots/List.hsdeleted−167

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Templates/Get.hs+1−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Templates/Launch.hs+1−3

This diff is too big to show here.

gogol-dataflow/gogol-dataflow.cabal−7

This diff is too big to show here.

gogol-datafusion/LICENSEdeleted−367

This diff is too big to show here.

gogol-datafusion/Makefiledeleted−1

This diff is too big to show here.

gogol-datafusion/Setup.hsdeleted−2

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/DataFusion.hsdeleted−400

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/DataFusion/Types.hsdeleted−308

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/DataFusion/Types/Product.hsdeleted−2258

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/DataFusion/Types/Sum.hsdeleted−531

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Get.hsdeleted−148

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Create.hsdeleted−183

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Delete.hsdeleted−153

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Get.hsdeleted−152

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/GetIAMPolicy.hsdeleted−161

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/List.hsdeleted−210

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Patch.hsdeleted−184

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Restart.hsdeleted−169

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/SetIAMPolicy.hsdeleted−176

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/TestIAMPermissions.hsdeleted−188

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Upgrade.hsdeleted−171

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/List.hsdeleted−187

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Operations/Cancel.hsdeleted−182

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Operations/Delete.hsdeleted−158

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Operations/Get.hsdeleted−155

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Operations/List.hsdeleted−211

This diff is too big to show here.

gogol-datafusion/gogol-datafusion.cabaldeleted−67

This diff is too big to show here.

gogol-datafusion/src/.gitkeepdeleted

No changes to the content.

gogol-dataproc/gen/Network/Google/Dataproc.hs−1

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Dataproc/Types.hs−1

This diff is too big to show here.

gogol-dataproc/gen/Network/Google/Dataproc/Types/Product.hs+39−56

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/DialogFlow.hs+4−57

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/DialogFlow/Types.hs+4−57

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/DialogFlow/Types/Product.hs+121−641

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/DialogFlow/Types/Sum.hs−142

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Create.hs+4−4

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Get.hs+4−4

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/List.hs+4−4

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Patch.hs+4−4

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/Create.hs+4−4

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/Get.hs+4−4

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/List.hs+4−4

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/Patch.hs+4−4

This diff is too big to show here.

gogol-dlp/gen/Network/Google/DLP.hs−17

This diff is too big to show here.

gogol-dlp/gen/Network/Google/DLP/Types.hs−12

This diff is too big to show here.

gogol-dlp/gen/Network/Google/DLP/Types/Product.hs+25−180

This diff is too big to show here.

gogol-dlp/gen/Network/Google/DLP/Types/Sum.hs+2−2

This diff is too big to show here.

gogol-dlp/gen/Network/Google/Resource/DLP/Projects/JobTriggers/Activate.hsdeleted−169

This diff is too big to show here.

gogol-dlp/gogol-dlp.cabal−1

This diff is too big to show here.

gogol-dns/gen/Network/Google/DNS.hs−19

This diff is too big to show here.

gogol-dns/gen/Network/Google/DNS/Types.hs−19

This diff is too big to show here.

gogol-dns/gen/Network/Google/DNS/Types/Product.hs+15−191

This diff is too big to show here.

gogol-dns/gen/Network/Google/DNS/Types/Sum.hs−28

This diff is too big to show here.

gogol-docs/gen/Network/Google/Docs.hs+3−20

This diff is too big to show here.

gogol-docs/gen/Network/Google/Docs/Types.hs+3−20

This diff is too big to show here.

gogol-docs/gen/Network/Google/Docs/Types/Product.hs+87−255

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types/Product.hs+5−7

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types/Sum.hs+1−2

This diff is too big to show here.

gogol-drive/gen/Network/Google/Drive.hs−122

This diff is too big to show here.

gogol-drive/gen/Network/Google/Drive/Types.hs−87

This diff is too big to show here.

gogol-drive/gen/Network/Google/Drive/Types/Product.hs+83−1050

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/GetStartPageToken.hs+8−35

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/List.hs+21−62

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/Watch.hs+20−61

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Create.hsdeleted−102

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Delete.hsdeleted−87

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Get.hsdeleted−102

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Hide.hsdeleted−86

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/List.hsdeleted−127

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Unhide.hsdeleted−86

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Update.hsdeleted−115

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Copy.hs+6−20

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Create.hs+11−28

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Delete.hs+12−29

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Get.hs+12−28

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/List.hs+23−62

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Update.hs+12−28

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Watch.hs+11−27

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Create.hs+12−28

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Delete.hs+9−24

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Get.hs+8−23

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/List.hs+18−33

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Update.hs+11−26

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Delete.hs+4−8

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Teamdrives/Create.hs+2−2

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Teamdrives/Delete.hs+4−2

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Teamdrives/Get.hs+2−2

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Teamdrives/List.hs+2−2

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Teamdrives/Update.hs+2−2

This diff is too big to show here.

gogol-drive/gogol-drive.cabal−7

This diff is too big to show here.

gogol-driveactivity/gen/Network/Google/DriveActivity.hs+2−34

This diff is too big to show here.

gogol-driveactivity/gen/Network/Google/DriveActivity/Types.hs+2−34

This diff is too big to show here.

gogol-driveactivity/gen/Network/Google/DriveActivity/Types/Product.hs+68−307

This diff is too big to show here.

gogol-driveactivity/gen/Network/Google/DriveActivity/Types/Sum.hs+15−53

This diff is too big to show here.

gogol-factchecktools/LICENSEdeleted−367

This diff is too big to show here.

gogol-factchecktools/Makefiledeleted−1

This diff is too big to show here.

gogol-factchecktools/README.mddeleted−28

This diff is too big to show here.

gogol-factchecktools/Setup.hsdeleted−2

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/FactCheckTools.hsdeleted−160

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/FactCheckTools/Types.hsdeleted−127

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/FactCheckTools/Types/Product.hsdeleted−941

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/FactCheckTools/Types/Sum.hsdeleted−48

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Claims/Search.hsdeleted−236

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/Create.hsdeleted−153

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/Delete.hsdeleted−147

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/Get.hsdeleted−149

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/List.hsdeleted−213

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/Update.hsdeleted−172

This diff is too big to show here.

gogol-factchecktools/gogol-factchecktools.cabaldeleted−51

This diff is too big to show here.

gogol-factchecktools/src/.gitkeepdeleted

No changes to the content.

gogol-file/gen/Network/Google/File.hs−79

This diff is too big to show here.

gogol-file/gen/Network/Google/File/Types.hs−79

This diff is too big to show here.

gogol-file/gen/Network/Google/File/Types/Product.hs−862

This diff is too big to show here.

gogol-file/gen/Network/Google/File/Types/Sum.hs+18−68

This diff is too big to show here.

gogol-firebase-dynamiclinks/gen/Network/Google/FirebaseDynamicLinks.hs+7−4

This diff is too big to show here.

gogol-firebase-dynamiclinks/gen/Network/Google/FirebaseDynamicLinks/Types.hs+7−4

This diff is too big to show here.

gogol-firebase-dynamiclinks/gen/Network/Google/FirebaseDynamicLinks/Types/Product.hs+68−48

This diff is too big to show here.

gogol-firebase-rules/gen/Network/Google/FirebaseRules/Types/Product.hs+2−5

This diff is too big to show here.

gogol-firebase-rules/gen/Network/Google/Resource/FirebaseRules/Projects/Rulesets/List.hs+2−2

This diff is too big to show here.

gogol-firebasehosting/gen/Network/Google/FirebaseHosting/Types/Product.hs+8−9

This diff is too big to show here.

gogol-firestore/gen/Network/Google/FireStore/Types/Product.hs+1−1

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Fitness.hs+5

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Fitness/Types/Product.hs+8−10

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Patch.hsnew file+133

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/Sessions/List.hs+1−1

This diff is too big to show here.

gogol-fitness/gogol-fitness.cabal+1

This diff is too big to show here.

gogol-games-management/gen/Network/Google/GamesManagement/Types.hs+2−1

This diff is too big to show here.

gogol-games/gen/Network/Google/Games/Types.hs+3−2

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Genomics.hs+10

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Genomics/Types.hs+10

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+90−5

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Projects/Operations/List.hs+2−1

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Gmail.hs−15

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Gmail/Types.hs−5

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Gmail/Types/Product.hs−49

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Settings/GetLanguage.hsdeleted−92

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Settings/UpdateLanguage.hsdeleted−113

This diff is too big to show here.

gogol-gmail/gogol-gmail.cabal−2

This diff is too big to show here.

gogol-groups-settings/gen/Network/Google/GroupsSettings.hs+1−19

This diff is too big to show here.

gogol-groups-settings/gen/Network/Google/GroupsSettings/Types.hs−18

This diff is too big to show here.

gogol-groups-settings/gen/Network/Google/GroupsSettings/Types/Product.hs+48−293

This diff is too big to show here.

gogol-groups-settings/gogol-groups-settings.cabal+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Healthcare.hs+334−337

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Healthcare/Types.hs+153−150

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Healthcare/Types/Product.hs+1369−1417

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Healthcare/Types/Sum.hs+4−132

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/Create.hsnew file+184

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/Delete.hsnew file+162

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/Get.hsnew file+162

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/List.hsnew file+211

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/Patch.hsnew file+193

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Create.hsnew file+192

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Delete.hsnew file+163

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Get.hsnew file+163

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/GetIAMPolicy.hsnew file+187

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/List.hsnew file+207

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Patch.hsnew file+192

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/SetIAMPolicy.hsnew file+183

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/TestIAMPermissions.hsnew file+186

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Create.hs+5−11

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Deidentify.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Delete.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Create.hs+3−3

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Delete.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/DicomWeb/DicomWebDelete.hsnew file+191

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/DicomWeb/DicomWebGet.hsnew file+192

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/DicomWeb/DicomWebPost.hsnew file+206

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Export.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Get.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/GetIAMPolicy.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Import.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/List.hs+6−21

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Patch.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/SearchForInstances.hsdeleted−182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/SearchForSeries.hsdeleted−182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/SearchForStudies.hsdeleted−182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/SetIAMPolicy.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/StoreInstances.hsdeleted−198

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Delete.hsdeleted−184

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/RetrieveMetadata.hsdeleted−184

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/RetrieveStudy.hsdeleted−182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/SearchForInstances.hsdeleted−182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/SearchForSeries.hsdeleted−182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Delete.hsdeleted−185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/Delete.hsdeleted−185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/Frames/RetrieveFrames.hsdeleted−185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/Frames/RetrieveRendered.hsdeleted−187

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/RetrieveInstance.hsdeleted−185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/RetrieveMetadata.hsdeleted−187

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/RetrieveRendered.hsdeleted−187

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/RetrieveMetadata.hsdeleted−185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/RetrieveSeries.hsdeleted−185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/SearchForInstances.hsdeleted−182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/StoreInstances.hsdeleted−198

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/TestIAMPermissions.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Create.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Delete.hs+5−3

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/ExecuteBundle.hsnew file+181

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Export.hs+12−15

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Capabilities.hsdeleted−176

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ConditionalDelete.hsdeleted−195

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ConditionalPatch.hsdeleted−221

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ConditionalUpdate.hsdeleted−231

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Create.hsdeleted−212

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Delete.hsdeleted−173

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ExecuteBundle.hsdeleted−216

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/History.hsdeleted−247

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ObservationLastn.hsdeleted−194

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Patch.hsdeleted−197

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/PatientEverything.hsdeleted−207

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Read.hsdeleted−181

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ResourcePurge.hsdeleted−170

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Search.hsdeleted−231

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Update.hsdeleted−203

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Vread.hsdeleted−175

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Get.hs+3−3

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/GetIAMPolicy.hs+32−9

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/GetMetadata.hsnew file+163

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Import.hs+11−35

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/List.hs+6−21

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Patch.hs+3−3

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/ConditionalDeleteResource.hsnew file+188

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/ConditionalPatchResource.hsnew file+194

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/ConditionalUpdateResource.hsnew file+194

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/CreateResource.hsnew file+191

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Delete.hsnew file+170

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/DeletePurge.hsnew file+168

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Get.hsnew file+162

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/GetMetadata.hsnew file+165

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/History/Get.hsnew file+163

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/History/List.hsnew file+166

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Patch.hsnew file+176

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Patient/GetEverything.hsnew file+192

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Search.hsnew file+180

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/SearchResources.hsnew file+178

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Update.hsnew file+180

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/SecurityLabels/GetIAMPolicy.hsnew file+189

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/SecurityLabels/SetIAMPolicy.hsnew file+185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/SetIAMPolicy.hs+9−5

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/TestIAMPermissions.hs+5−9

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Get.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/GetIAMPolicy.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Create.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Delete.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Get.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/GetIAMPolicy.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/List.hs+6−21

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Messages/Create.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Messages/Delete.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Messages/Get.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Messages/Ingest.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Messages/List.hs+20−32

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Messages/Patch.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/Patch.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/SetIAMPolicy.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Hl7V2Stores/TestIAMPermissions.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/List.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Operations/Get.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Operations/List.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Patch.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/SetIAMPolicy.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/TestIAMPermissions.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/Get.hs+1−1

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/List.hs+1−1

This diff is too big to show here.

gogol-healthcare/gogol-healthcare.cabal+37−38

This diff is too big to show here.

gogol-iam/gen/Network/Google/IAM.hs+7−52

This diff is too big to show here.

gogol-iam/gen/Network/Google/IAM/Types.hs+7−32

This diff is too big to show here.

gogol-iam/gen/Network/Google/IAM/Types/Product.hs+54−238

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Organizations/Roles/List.hs+1−4

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/Roles/List.hs+1−4

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Delete.hs+50−46

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Disable.hsdeleted−169

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Enable.hsdeleted−168

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/GetIAMPolicy.hs+2−22

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Patch.hsdeleted−176

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/SetIAMPolicy.hs+2−26

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Undelete.hsdeleted−172

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Update.hs+63−66

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Roles/List.hs+1−4

This diff is too big to show here.

gogol-iam/gogol-iam.cabal−4

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/IAMCredentials/Types/Product.hs+4−12

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/GenerateAccessToken.hs+1−3

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/GenerateIdToken.hs+1−3

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/GenerateIdentityBindingAccessToken.hs+1−3

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/SignBlob.hs+1−3

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/SignJwt.hs+1−3

This diff is too big to show here.

gogol-iap/gen/Network/Google/IAP/Types/Product.hs+6−5

This diff is too big to show here.

gogol-jobs/gen/Network/Google/Jobs/Types/Product.hs+10−14

This diff is too big to show here.

gogol-jobs/gen/Network/Google/Jobs/Types/Sum.hs+2−12

This diff is too big to show here.

gogol-jobs/gen/Network/Google/Resource/Jobs/Projects/ClientEvents/Create.hs+2−2

This diff is too big to show here.

gogol-language/gen/Network/Google/Language/Types/Product.hs+6−8

This diff is too big to show here.

gogol-language/gen/Network/Google/Language/Types/Sum.hs+8−48

This diff is too big to show here.

gogol-logging/gen/Network/Google/Logging/Types/Product.hs+6−9

This diff is too big to show here.

gogol-ml/gen/Network/Google/MachineLearning.hs+1−15

This diff is too big to show here.

gogol-ml/gen/Network/Google/MachineLearning/Types.hs+1−15

This diff is too big to show here.

gogol-ml/gen/Network/Google/MachineLearning/Types/Product.hs+76−322

This diff is too big to show here.

gogol-ml/gen/Network/Google/MachineLearning/Types/Sum.hs+10−14

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Monitoring.hs+1

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Monitoring/Types.hs+1

This diff is too big to show here.

gogol-monitoring/gen/Network/Google/Monitoring/Types/Product.hs+20−5

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/OAuth2.hs+1

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/OAuth2/Types.hs+7−3

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/Resource/OAuth2/UserInfo/Get.hs+2−1

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/Resource/OAuth2/UserInfo/V2/Me/Get.hs+2−1

This diff is too big to show here.

gogol-people/gen/Network/Google/People.hs+1−1

This diff is too big to show here.

gogol-people/gen/Network/Google/People/Types.hs+6−3

This diff is too big to show here.

gogol-people/gen/Network/Google/People/Types/Product.hs+14−33

This diff is too big to show here.

gogol-people/gen/Network/Google/People/Types/Sum.hs+1−2

This diff is too big to show here.

gogol-people/gen/Network/Google/Resource/People/ContactGroups/Members/Modify.hs−6

This diff is too big to show here.

gogol-people/gen/Network/Google/Resource/People/People/Get.hs+1

This diff is too big to show here.

gogol-people/gen/Network/Google/Resource/People/People/GetBatchGet.hs+1

This diff is too big to show here.

gogol-people/gen/Network/Google/Resource/People/People/UpdateContact.hs+3−3

This diff is too big to show here.

gogol-accessapproval/LICENSE → gogol-photoslibrary/LICENSErenamed

The content is the same.

gogol-accessapproval/Makefile → gogol-photoslibrary/Makefilerenamed

The content is the same.

gogol-datafusion/README.md → gogol-photoslibrary/README.mdrenamed+3−3

This diff is too big to show here.

gogol-accessapproval/Setup.hs → gogol-photoslibrary/Setup.hsrenamed

The content is the same.

gogol-photoslibrary/gen/Network/Google/PhotosLibrary.hsnew file+363

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/PhotosLibrary/Types.hsnew file+328

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/PhotosLibrary/Types/Product.hsnew file+2366

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/PhotosLibrary/Types/Sum.hsnew file+132

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/AddEnrichment.hsnew file+191

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/Create.hsnew file+175

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/Get.hsnew file+175

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/List.hsnew file+194

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/Share.hsnew file+191

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/MediaItems/BatchCreate.hsnew file+189

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/MediaItems/Get.hsnew file+177

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/MediaItems/Search.hsnew file+188

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/SharedAlbums/Join.hsnew file+175

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/SharedAlbums/List.hsnew file+196

This diff is too big to show here.

gogol-run/gogol-run.cabal → gogol-photoslibrary/gogol-photoslibrary.cabalrenamed+17−9

This diff is too big to show here.

gogol-accessapproval/src/.gitkeep → gogol-photoslibrary/src/.gitkeeprenamed

The content is the same.

gogol-plus-domains/gen/Network/Google/PlusDomains.hs+53−1

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/PlusDomains/Types.hs+15−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/Get.hs+2−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/Insert.hsnew file+115

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/List.hs+4−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Audiences/List.hs+2−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/AddPeople.hsnew file+119

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Get.hsnew file+86

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Insert.hsnew file+101

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/List.hs+2−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Patch.hsnew file+99

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Remove.hsnew file+86

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/RemovePeople.hsnew file+117

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Update.hsnew file+99

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/Get.hs+2−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/Insert.hsnew file+99

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/List.hs+2−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Media/Insert.hs+8−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/ListByActivity.hs+4−4

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/People/ListByCircle.hsnew file+123

This diff is too big to show here.

gogol-plus-domains/gogol-plus-domains.cabal+10

This diff is too big to show here.

gogol-plus/gen/Network/Google/Plus/Types.hs+3−4

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Activities/Get.hs+2−4

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Activities/List.hs+4−4

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Activities/Search.hs+2−4

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Comments/Get.hs+2−4

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Comments/List.hs+2−4

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/People/ListByActivity.hs+4−4

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/People/Search.hs+2−4

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/PubSub.hs−7

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/PubSub/Types.hs−7

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/PubSub/Types/Product.hs+34−82

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Snapshots/Create.hs+6

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Snapshots/Delete.hs+8−2

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Snapshots/Get.hs+6

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Snapshots/List.hs+6

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Snapshots/Patch.hs+8

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Subscriptions/Seek.hs+6

This diff is too big to show here.

gogol-pubsub/gen/Network/Google/Resource/PubSub/Projects/Topics/Snapshots/List.hs+6

This diff is too big to show here.

gogol-redis/gen/Network/Google/Redis.hs−13

This diff is too big to show here.

gogol-redis/gen/Network/Google/Redis/Types.hs−8

This diff is too big to show here.

gogol-redis/gen/Network/Google/Redis/Types/Product.hs−43

This diff is too big to show here.

gogol-redis/gen/Network/Google/Redis/Types/Sum.hs−43

This diff is too big to show here.

gogol-redis/gen/Network/Google/Resource/Redis/Projects/Locations/Instances/Failover.hsdeleted−171

This diff is too big to show here.

gogol-redis/gogol-redis.cabal−1

This diff is too big to show here.

gogol-remotebuildexecution/gen/Network/Google/RemoteBuildExecution.hs−2

This diff is too big to show here.

gogol-remotebuildexecution/gen/Network/Google/RemoteBuildExecution/Types.hs−2

This diff is too big to show here.

gogol-remotebuildexecution/gen/Network/Google/RemoteBuildExecution/Types/Product.hs+8−37

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/Resource/CloudResourceManager/Folders/Move.hs+8−8

This diff is too big to show here.

gogol-resourcemanager/gen/Network/Google/ResourceManager/Types/Product.hs+6−5

This diff is too big to show here.

gogol-run/LICENSEdeleted−367

This diff is too big to show here.

gogol-run/Makefiledeleted−1

This diff is too big to show here.

gogol-run/README.mddeleted−28

This diff is too big to show here.

gogol-run/Setup.hsdeleted−2

This diff is too big to show here.

gogol-run/gen/Network/Google/Resource/Run/Projects/Locations/Get.hsdeleted−148

This diff is too big to show here.

gogol-run/gen/Network/Google/Run.hsdeleted−70

This diff is too big to show here.

gogol-run/gen/Network/Google/Run/Types.hsdeleted−60

This diff is too big to show here.

gogol-run/gen/Network/Google/Run/Types/Product.hsdeleted−180

This diff is too big to show here.

gogol-run/gen/Network/Google/Run/Types/Sum.hsdeleted−48

This diff is too big to show here.

gogol-run/src/.gitkeepdeleted

No changes to the content.

gogol-script/gen/Network/Google/Script.hs+1

This diff is too big to show here.

gogol-script/gen/Network/Google/Script/Types.hs+1

This diff is too big to show here.

gogol-script/gen/Network/Google/Script/Types/Product.hs+12

This diff is too big to show here.

gogol-securitycenter/LICENSEdeleted−367

This diff is too big to show here.

gogol-securitycenter/Makefiledeleted−1

This diff is too big to show here.

gogol-securitycenter/README.mddeleted−28

This diff is too big to show here.

gogol-securitycenter/Setup.hsdeleted−2

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Assets/Group.hsdeleted−168

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Assets/List.hsdeleted−297

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Assets/RunDiscovery.hsdeleted−175

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Assets/UpdateSecurityMarks.hsdeleted−205

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/GetOrganizationSettings.hsdeleted−156

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Operations/Cancel.hsdeleted−166

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Operations/Delete.hsdeleted−156

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Operations/List.hsdeleted−206

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Create.hsdeleted−165

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/Create.hsdeleted−185

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/Group.hsdeleted−176

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/List.hsdeleted−303

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/Patch.hsdeleted−186

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/SetState.hsdeleted−172

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/UpdateSecurityMarks.hsdeleted−210

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Get.hsdeleted−149

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/GetIAMPolicy.hsdeleted−170

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/List.hsdeleted−181

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Patch.hsdeleted−178

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/SetIAMPolicy.hsdeleted−170

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/TestIAMPermissions.hsdeleted−173

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/UpdateOrganizationSettings.hsdeleted−186

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/SecurityCenter.hsdeleted−466

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/SecurityCenter/Types.hsdeleted−344

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/SecurityCenter/Types/Product.hsdeleted−2793

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/SecurityCenter/Types/Sum.hsdeleted−360

This diff is too big to show here.

gogol-securitycenter/gogol-securitycenter.cabaldeleted−69

This diff is too big to show here.

gogol-securitycenter/src/.gitkeepdeleted

No changes to the content.

gogol-servicebroker/gen/Network/Google/ServiceBroker/Types/Product.hs+6−5

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/Search.hs+11−11

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/AddProject.hs+9−10

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/ApplyProjectConfig.hs+27−30

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/AttachProject.hs+17−20

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/Create.hs+1−1

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/Delete.hs+4−4

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/DeleteProject.hsdeleted−183

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/List.hs+14−16

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/RemoveProject.hs+12−12

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/UndeleteProject.hsdeleted−179

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/ServiceConsumerManagement.hs−92

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/ServiceConsumerManagement/Types.hs−82

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/ServiceConsumerManagement/Types/Product.hs+45−732

This diff is too big to show here.

gogol-serviceconsumermanagement/gogol-serviceconsumermanagement.cabal−2

This diff is too big to show here.

gogol-servicecontrol/gen/Network/Google/ServiceControl.hs−28

This diff is too big to show here.

gogol-servicecontrol/gen/Network/Google/ServiceControl/Types.hs−28

This diff is too big to show here.

gogol-servicecontrol/gen/Network/Google/ServiceControl/Types/Product.hs+6−256

This diff is too big to show here.

gogol-servicecontrol/gen/Network/Google/ServiceControl/Types/Sum.hs+1−17

This diff is too big to show here.

gogol-servicemanagement/gen/Network/Google/Resource/ServiceManagement/Services/Configs/List.hs+1−2

This diff is too big to show here.

gogol-servicemanagement/gen/Network/Google/Resource/ServiceManagement/Services/List.hs+1−2

This diff is too big to show here.

gogol-servicemanagement/gen/Network/Google/Resource/ServiceManagement/Services/Rollouts/List.hs+1−2

This diff is too big to show here.

gogol-servicemanagement/gen/Network/Google/ServiceManagement/Types/Product.hs+14−14

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Operations/Cancel.hs+1−1

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Operations/Delete.hs+1−1

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Operations/Get.hs+1−1

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Operations/List.hs+1−1

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Services/AddSubnetwork.hsdeleted−188

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Services/Connections/Create.hsdeleted−184

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Services/Connections/List.hsdeleted−178

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Services/Connections/Patch.hsdeleted−196

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Services/SearchRange.hsdeleted−176

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/ServiceNetworking.hs+9−81

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/ServiceNetworking/Types.hs+6−53

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/ServiceNetworking/Types/Product.hs+83−581

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/ServiceNetworking/Types/Sum.hs−53

This diff is too big to show here.

gogol-servicenetworking/gogol-servicenetworking.cabal+2−7

This diff is too big to show here.

gogol-serviceusage/gen/Network/Google/ServiceUsage.hs−22

This diff is too big to show here.

gogol-serviceusage/gen/Network/Google/ServiceUsage/Types.hs−22

This diff is too big to show here.

gogol-serviceusage/gen/Network/Google/ServiceUsage/Types/Product.hs+7−226

This diff is too big to show here.

gogol-sheets/gen/Network/Google/Sheets/Types/Product.hs+11−15

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accounts/Link.hs+4−4

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Accountstatuses/Get.hs+4−4

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeeds/Custombatch.hs−5

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Datafeedstatuses/Custombatch.hs−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orderinvoices/Createchargeinvoice.hs+2−2

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orderinvoices/Createrefundinvoice.hs+6−6

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/GetbymerchantOrderid.hs+3−3

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Instorerefundlineitem.hs−12

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Orders/Setlineitemmetadata.hs+2−10

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Products/Delete.hs+1−1

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Products/Get.hs+1−1

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Productstatuses/Get.hs+1−1

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Regionalinventory/Custombatch.hsdeleted−93

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Regionalinventory/Insert.hsdeleted−123

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/ShoppingContent.hs+33−76

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/ShoppingContent/Types.hs+33−66

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/ShoppingContent/Types/Product.hs+428−757

This diff is too big to show here.

gogol-shopping-content/gogol-shopping-content.cabal−2

This diff is too big to show here.

gogol-sourcerepo/gen/Network/Google/Resource/SourceRepo/Projects/Repos/Sync.hsdeleted−165

This diff is too big to show here.

gogol-sourcerepo/gen/Network/Google/SourceRepo.hs−40

This diff is too big to show here.

gogol-sourcerepo/gen/Network/Google/SourceRepo/Types.hs−35

This diff is too big to show here.

gogol-sourcerepo/gen/Network/Google/SourceRepo/Types/Product.hs+6−336

This diff is too big to show here.

gogol-sourcerepo/gogol-sourcerepo.cabal−1

This diff is too big to show here.

gogol-spanner/gen/Network/Google/Resource/Spanner/Projects/Instances/Databases/Sessions/Delete.hs+2−6

This diff is too big to show here.

gogol-spanner/gen/Network/Google/Resource/Spanner/Projects/Instances/Databases/Sessions/ExecuteBatchDml.hsdeleted−201

This diff is too big to show here.

gogol-spanner/gen/Network/Google/Resource/Spanner/Projects/Instances/Patch.hs+1−1

This diff is too big to show here.

gogol-spanner/gen/Network/Google/Spanner.hs−36

This diff is too big to show here.

gogol-spanner/gen/Network/Google/Spanner/Types.hs−30

This diff is too big to show here.

gogol-spanner/gen/Network/Google/Spanner/Types/Product.hs+4−302

This diff is too big to show here.

gogol-spanner/gogol-spanner.cabal−1

This diff is too big to show here.

gogol-speech/gen/Network/Google/Resource/Speech/Speech/Longrunningrecognize.hs+2−6

This diff is too big to show here.

gogol-speech/gen/Network/Google/Speech.hs−1

This diff is too big to show here.

gogol-speech/gen/Network/Google/Speech/Types.hs−1

This diff is too big to show here.

gogol-speech/gen/Network/Google/Speech/Types/Product.hs+6−15

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/SQLAdmin.hs−16

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/SQLAdmin/Types.hs−16

This diff is too big to show here.

gogol-sqladmin/gen/Network/Google/SQLAdmin/Types/Product.hs+45−189

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/GoogleServiceAccounts/Get.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Create.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Get.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/List.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferJobs/Patch.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Cancel.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Delete.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Get.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/List.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Pause.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/Resource/StorageTransfer/TransferOperations/Resume.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/StorageTransfer.hs+1−1

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+10−18

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Sum.hs+1−2

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/Create.hsdeleted−107

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/Delete.hsdeleted−104

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/Get.hsdeleted−105

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/List.hsdeleted−153

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/Update.hsdeleted−121

This diff is too big to show here.

gogol-storage/gen/Network/Google/Storage.hs−53

This diff is too big to show here.

gogol-storage/gen/Network/Google/Storage/Types.hs−28

This diff is too big to show here.

gogol-storage/gen/Network/Google/Storage/Types/Product.hs−262

This diff is too big to show here.

gogol-storage/gogol-storage.cabal−5

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photo/Create.hs+6−6

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photo/Get.hs+1−1

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photo/StartUpload.hs+14−14

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photo/Update.hs+24−20

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photos/BatchDelete.hs+12−10

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photos/BatchGet.hs+13−11

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photos/BatchUpdate.hs+6−6

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photos/List.hs+4−4

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/StreetViewPublish/Types/Product.hs+15−15

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/StreetViewPublish/Types/Sum.hs+2−2

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Environments/Patch.hsnew file+121

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/GetProposal.hsnew file+95

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Proposal/Create.hsnew file+110

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Proposal/Delete.hsnew file+95

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/UpdateProposal.hsnew file+109

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Create.hsdeleted−108

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Delete.hsdeleted−93

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Get.hsdeleted−92

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/List.hsdeleted−108

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Revert.hsdeleted−109

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Update.hsdeleted−123

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/TagManager.hs+95−68

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/TagManager/Types.hs+67−38

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/TagManager/Types/Product.hs+470−356

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/TagManager/Types/Sum.hs+231−32

This diff is too big to show here.

gogol-tagmanager/gogol-tagmanager.cabal+5−6

This diff is too big to show here.

gogol-testing/gen/Network/Google/Testing.hs+1−1

This diff is too big to show here.

gogol-testing/gen/Network/Google/Testing/Types.hs+1−1

This diff is too big to show here.

gogol-testing/gen/Network/Google/Testing/Types/Product.hs+31−27

This diff is too big to show here.

gogol-testing/gen/Network/Google/Testing/Types/Sum.hs−17

This diff is too big to show here.

gogol-texttospeech/gen/Network/Google/TextToSpeech/Types/Sum.hs+1−1

This diff is too big to show here.

gogol-toolresults/gen/Network/Google/Resource/ToolResults/Projects/Histories/Executions/Steps/TestCases/Get.hsdeleted−167

This diff is too big to show here.

gogol-toolresults/gen/Network/Google/Resource/ToolResults/Projects/Histories/Executions/Steps/TestCases/List.hsdeleted−183

This diff is too big to show here.

gogol-toolresults/gen/Network/Google/ToolResults.hs−35

This diff is too big to show here.

gogol-toolresults/gen/Network/Google/ToolResults/Types.hs−23

This diff is too big to show here.

gogol-toolresults/gen/Network/Google/ToolResults/Types/Product.hs+5−213

This diff is too big to show here.

gogol-toolresults/gen/Network/Google/ToolResults/Types/Sum.hs−43

This diff is too big to show here.

gogol-toolresults/gogol-toolresults.cabal−2

This diff is too big to show here.

gogol-tpu/gen/Network/Google/TPU.hs−1

This diff is too big to show here.

gogol-tpu/gen/Network/Google/TPU/Types.hs−1

This diff is too big to show here.

gogol-tpu/gen/Network/Google/TPU/Types/Product.hs+5−18

This diff is too big to show here.

gogol-tpu/gen/Network/Google/TPU/Types/Sum.hs+1−16

This diff is too big to show here.

gogol-vault/gen/Network/Google/Vault.hs−4

This diff is too big to show here.

gogol-vault/gen/Network/Google/Vault/Types.hs−4

This diff is too big to show here.

gogol-vault/gen/Network/Google/Vault/Types/Product.hs+11−63

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/Create.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/Delete.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/Get.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/List.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/Patch.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/ScanRuns/CrawledURLs/List.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/ScanRuns/FindingTypeStats/List.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/ScanRuns/Findings/Get.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/ScanRuns/Findings/List.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/ScanRuns/Get.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/ScanRuns/List.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/ScanRuns/Stop.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/Resource/WebSecurityScanner/Projects/ScanConfigs/Start.hs+1−1

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/WebSecurityScanner.hs+6−40

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/WebSecurityScanner/Types.hs+8−42

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/WebSecurityScanner/Types/Product.hs+18−279

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/WebSecurityScanner/Types/Sum.hs+201−389

This diff is too big to show here.

gogol-websecurityscanner/gogol-websecurityscanner.cabal+1−1

This diff is too big to show here.

gogol-youtube/gen/Network/Google/YouTube/Types/Sum.hs+4−4

This diff is too big to show here.

gogol/src/Network/Google/Auth.hs+11−15

This diff is too big to show here.

gogol/src/Network/Google/Internal/HTTP.hs+4−1

This diff is too big to show here.

stack-8.2.2.yaml+1−8

This diff is too big to show here.

stack-8.4.4.yaml+1−8

This diff is too big to show here.

stack-8.6.4.yaml → stack-8.6.3.yamlrenamed+2−9

This diff is too big to show here.

stack.yaml+1−1

This diff is too big to show here.

stack.yaml.lockdeleted−12

This diff is too big to show here.