git.iko.soy/gogol

on d74db49 help sign in

from801f00b

swap

to1 ahead, 8 behind

compare

.travis.yml+2−16

since splitsnapshots

unifiedsplit

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

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

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

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

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

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

95 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] } }

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

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

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

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

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

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

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

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

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

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

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

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

173 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] } }

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

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

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

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

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

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

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

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

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

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

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

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

185 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] } }

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

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

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

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

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

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

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

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

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

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

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

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

199 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] } }

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

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

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

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

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

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

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

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

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

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

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

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

227 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] } }

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

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

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

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

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

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

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

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

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

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

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

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

295 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] } }

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

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

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

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

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

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

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

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

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

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

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

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

325 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] } }

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

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

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

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

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

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

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

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

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

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

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

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

333 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] } }

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

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

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

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

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

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

core/gogol-core.cabal+1−1

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

61 , lens >= 4.4

61 , lens >= 4.4

62 , resourcet >= 1.1

62 , resourcet >= 1.1

63 , scientific >= 0.3

63 , scientific >= 0.3

64− , servant >= 0.14.1

64+ , servant >= 0.4.4

65 , text >= 1.1

65 , text >= 1.1

66 , unordered-containers >= 0.2.5

66 , unordered-containers >= 0.2.5

67

67

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

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

28import Numeric.Natural as Export (Natural)

28import Numeric.Natural as Export (Natural)

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

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

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

30import 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)

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

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

33

33

34import Network.Google.Data.Bytes as Export

34import 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

2

2

3nix:

3nix:

4 enable: false

4 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

75 -- ** accesscontextmanager.accessPolicies.servicePerimeters.patch

75 -- ** accesscontextmanager.accessPolicies.servicePerimeters.patch

76 , module Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Patch

76 , module Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Patch

77

77

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−

84 -- ** accesscontextmanager.operations.get

78 -- ** accesscontextmanager.operations.get

85 , module Network.Google.Resource.AccessContextManager.Operations.Get

79 , module Network.Google.Resource.AccessContextManager.Operations.Get

86

80

87− -- ** accesscontextmanager.operations.list

88− , module Network.Google.Resource.AccessContextManager.Operations.List

89−

90 -- * Types

81 -- * Types

91

82

92 -- ** Status

83 -- ** Status

@@ -102,16 +93,6 @@ module Network.Google.AccessContextManager

102 , blConditions

93 , blConditions

103 , blCombiningFunction

94 , blCombiningFunction

104

95

105− -- ** ListOperationsResponse

106− , ListOperationsResponse

107− , listOperationsResponse

108− , lorNextPageToken

109− , lorOperations

110−

111− -- ** CancelOperationRequest

112− , CancelOperationRequest

113− , cancelOperationRequest

114−

115 -- ** AccessLevel

96 -- ** AccessLevel

116 , AccessLevel

97 , AccessLevel

117 , accessLevel

98 , accessLevel

@@ -128,6 +109,7 @@ module Network.Google.AccessContextManager

128 -- ** ServicePerimeterConfig

109 -- ** ServicePerimeterConfig

129 , ServicePerimeterConfig

110 , ServicePerimeterConfig

130 , servicePerimeterConfig

111 , servicePerimeterConfig

112+ , spcUnrestrictedServices

131 , spcResources

113 , spcResources

132 , spcRestrictedServices

114 , spcRestrictedServices

133 , spcAccessLevels

115 , spcAccessLevels

@@ -144,10 +126,6 @@ module Network.Google.AccessContextManager

144 -- ** ServicePerimeterPerimeterType

126 -- ** ServicePerimeterPerimeterType

145 , ServicePerimeterPerimeterType (..)

127 , ServicePerimeterPerimeterType (..)

146

128

147− -- ** Empty

148− , Empty

149− , empty

150−

151 -- ** OSConstraintOSType

129 -- ** OSConstraintOSType

152 , OSConstraintOSType (..)

130 , OSConstraintOSType (..)

153

131

@@ -178,7 +156,6 @@ module Network.Google.AccessContextManager

178 , osConstraint

156 , osConstraint

179 , ocOSType

157 , ocOSType

180 , ocMinimumVersion

158 , ocMinimumVersion

181− , ocRequireVerifiedChromeOS

182

159

183 -- ** AccessPolicy

160 -- ** AccessPolicy

184 , AccessPolicy

161 , AccessPolicy

@@ -213,8 +190,6 @@ module Network.Google.AccessContextManager

213 , DevicePolicy

190 , DevicePolicy

214 , devicePolicy

191 , devicePolicy

215 , dpOSConstraints

192 , dpOSConstraints

216− , dpRequireAdminApproval

217− , dpRequireCorpOwned

218 , dpRequireScreenlock

193 , dpRequireScreenlock

219 , dpAllowedEncryptionStatuses

194 , dpAllowedEncryptionStatuses

220 , dpAllowedDeviceManagementLevels

195 , dpAllowedDeviceManagementLevels

@@ -223,7 +198,6 @@ module Network.Google.AccessContextManager

223 , Condition

198 , Condition

224 , condition

199 , condition

225 , cMembers

200 , cMembers

226− , cRegions

227 , cNegate

201 , cNegate

228 , cIPSubnetworks

202 , cIPSubnetworks

229 , cDevicePolicy

203 , cDevicePolicy

@@ -252,10 +226,7 @@ import Network.Google.Resource.AccessContextManager.AccessPolicies.Ser

252import Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Get

226import Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Get

253import Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.List

227import Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.List

254import Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Patch

228import Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Patch

255−import Network.Google.Resource.AccessContextManager.Operations.Cancel

256−import Network.Google.Resource.AccessContextManager.Operations.Delete

257import Network.Google.Resource.AccessContextManager.Operations.Get

229import Network.Google.Resource.AccessContextManager.Operations.Get

258−import Network.Google.Resource.AccessContextManager.Operations.List

259

230

260{- $resources

231{- $resources

261TODO

232TODO

@@ -278,7 +249,4 @@ type AccessContextManagerAPI =

278 :<|> AccessPoliciesGetResource

249 :<|> AccessPoliciesGetResource

279 :<|> AccessPoliciesCreateResource

250 :<|> AccessPoliciesCreateResource

280 :<|> AccessPoliciesDeleteResource

251 :<|> AccessPoliciesDeleteResource

281− :<|> OperationsListResource

282 :<|> OperationsGetResource

252 :<|> OperationsGetResource

283− :<|> OperationsCancelResource

284− :<|> OperationsDeleteResource

gogol-accesscontextmanager/gen/Network/Google/AccessContextManager/Types.hs+3−20

@@ -35,16 +35,6 @@ module Network.Google.AccessContextManager.Types

35 , blConditions

35 , blConditions

36 , blCombiningFunction

36 , blCombiningFunction

37

37

38− -- * ListOperationsResponse

39− , ListOperationsResponse

40− , listOperationsResponse

41− , lorNextPageToken

42− , lorOperations

43−

44− -- * CancelOperationRequest

45− , CancelOperationRequest

46− , cancelOperationRequest

47−

48 -- * AccessLevel

38 -- * AccessLevel

49 , AccessLevel

39 , AccessLevel

50 , accessLevel

40 , accessLevel

@@ -61,6 +51,7 @@ module Network.Google.AccessContextManager.Types

61 -- * ServicePerimeterConfig

51 -- * ServicePerimeterConfig

62 , ServicePerimeterConfig

52 , ServicePerimeterConfig

63 , servicePerimeterConfig

53 , servicePerimeterConfig

54+ , spcUnrestrictedServices

64 , spcResources

55 , spcResources

65 , spcRestrictedServices

56 , spcRestrictedServices

66 , spcAccessLevels

57 , spcAccessLevels

@@ -77,10 +68,6 @@ module Network.Google.AccessContextManager.Types

77 -- * ServicePerimeterPerimeterType

68 -- * ServicePerimeterPerimeterType

78 , ServicePerimeterPerimeterType (..)

69 , ServicePerimeterPerimeterType (..)

79

70

80− -- * Empty

81− , Empty

82− , empty

83−

84 -- * OSConstraintOSType

71 -- * OSConstraintOSType

85 , OSConstraintOSType (..)

72 , OSConstraintOSType (..)

86

73

@@ -111,7 +98,6 @@ module Network.Google.AccessContextManager.Types

111 , osConstraint

98 , osConstraint

112 , ocOSType

99 , ocOSType

113 , ocMinimumVersion

100 , ocMinimumVersion

114− , ocRequireVerifiedChromeOS

115

101

116 -- * AccessPolicy

102 -- * AccessPolicy

117 , AccessPolicy

103 , AccessPolicy

@@ -146,8 +132,6 @@ module Network.Google.AccessContextManager.Types

146 , DevicePolicy

132 , DevicePolicy

147 , devicePolicy

133 , devicePolicy

148 , dpOSConstraints

134 , dpOSConstraints

149− , dpRequireAdminApproval

150− , dpRequireCorpOwned

151 , dpRequireScreenlock

135 , dpRequireScreenlock

152 , dpAllowedEncryptionStatuses

136 , dpAllowedEncryptionStatuses

153 , dpAllowedDeviceManagementLevels

137 , dpAllowedDeviceManagementLevels

@@ -156,7 +140,6 @@ module Network.Google.AccessContextManager.Types

156 , Condition

140 , Condition

157 , condition

141 , condition

158 , cMembers

142 , cMembers

159− , cRegions

160 , cNegate

143 , cNegate

161 , cIPSubnetworks

144 , cIPSubnetworks

162 , cDevicePolicy

145 , cDevicePolicy

@@ -172,11 +155,11 @@ import Network.Google.AccessContextManager.Types.Product

172import Network.Google.AccessContextManager.Types.Sum

155import Network.Google.AccessContextManager.Types.Sum

173import Network.Google.Prelude

156import Network.Google.Prelude

174

157

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.

176accessContextManagerService :: ServiceConfig

159accessContextManagerService :: ServiceConfig

177accessContextManagerService

160accessContextManagerService

178 = defaultService

161 = defaultService

179− (ServiceId "accesscontextmanager:v1")

162+ (ServiceId "accesscontextmanager:v1beta")

180 "accesscontextmanager.googleapis.com"

163 "accesscontextmanager.googleapis.com"

181

164

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

165-- | 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

174 [("conditions" .=) <$> _blConditions,

174 [("conditions" .=) <$> _blConditions,

175 ("combiningFunction" .=) <$> _blCombiningFunction])

175 ("combiningFunction" .=) <$> _blCombiningFunction])

176

176

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−

254-- | An \`AccessLevel\` is a label that can be applied to requests to GCP

177-- | An \`AccessLevel\` is a label that can be applied to requests to GCP

255-- services, along with a list of requirements necessary for the label to

178-- services, along with a list of requirements necessary for the label to

256-- be applied.

179-- be applied.

@@ -357,9 +280,10 @@ instance ToJSON AccessLevel where

357-- /See:/ 'servicePerimeterConfig' smart constructor.

280-- /See:/ 'servicePerimeterConfig' smart constructor.

358data ServicePerimeterConfig =

281data ServicePerimeterConfig =

359 ServicePerimeterConfig'

282 ServicePerimeterConfig'

283+ { _spcUnrestrictedServices :: !(Maybe [Text])

360− { _spcResources :: !(Maybe [Text])

284+ , _spcResources :: !(Maybe [Text])

361− , _spcRestrictedServices :: !(Maybe [Text])

285+ , _spcRestrictedServices :: !(Maybe [Text])

362− , _spcAccessLevels :: !(Maybe [Text])

286+ , _spcAccessLevels :: !(Maybe [Text])

363 }

287 }

364 deriving (Eq, Show, Data, Typeable, Generic)

288 deriving (Eq, Show, Data, Typeable, Generic)

365

289

@@ -368,6 +292,8 @@ data ServicePerimeterConfig =

368--

292--

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

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

370--

294--

295+-- * 'spcUnrestrictedServices'

296+--

371-- * 'spcResources'

297-- * 'spcResources'

372--

298--

373-- * 'spcRestrictedServices'

299-- * 'spcRestrictedServices'

@@ -377,12 +303,32 @@ servicePerimeterConfig

377 :: ServicePerimeterConfig

303 :: ServicePerimeterConfig

378servicePerimeterConfig =

304servicePerimeterConfig =

379 ServicePerimeterConfig'

305 ServicePerimeterConfig'

306+ { _spcUnrestrictedServices = Nothing

380− { _spcResources = Nothing

307+ , _spcResources = Nothing

381 , _spcRestrictedServices = Nothing

308 , _spcRestrictedServices = Nothing

382 , _spcAccessLevels = Nothing

309 , _spcAccessLevels = Nothing

383 }

310 }

384

311

385

312

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+

386-- | A list of GCP resources that are inside of the service perimeter.

332-- | A list of GCP resources that are inside of the service perimeter.

387-- Currently only projects are allowed. Format:

333-- Currently only projects are allowed. Format:

388-- \`projects\/{project_number}\`

334-- \`projects\/{project_number}\`

@@ -392,10 +338,17 @@ spcResources

392 . _Default

338 . _Default

393 . _Coerce

339 . _Coerce

394

340

395−-- | GCP services that are subject to the Service Perimeter restrictions. For

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

396−-- example, if \`storage.googleapis.com\` is specified, access to the

343+-- \`storage.googleapis.com\` is specified, access to the storage buckets

397−-- storage buckets inside the perimeter must meet the perimeter\'s access

344+-- inside the perimeter must meet the perimeter\'s access restrictions.

398−-- 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.

399spcRestrictedServices :: Lens' ServicePerimeterConfig [Text]

352spcRestrictedServices :: Lens' ServicePerimeterConfig [Text]

400spcRestrictedServices

353spcRestrictedServices

401 = lens _spcRestrictedServices

354 = lens _spcRestrictedServices

@@ -424,15 +377,18 @@ instance FromJSON ServicePerimeterConfig where

424 = withObject "ServicePerimeterConfig"

377 = withObject "ServicePerimeterConfig"

425 (\ o ->

378 (\ o ->

426 ServicePerimeterConfig' <$>

379 ServicePerimeterConfig' <$>

380+ (o .:? "unrestrictedServices" .!= mempty) <*>

427− (o .:? "resources" .!= mempty) <*>

381+ (o .:? "resources" .!= mempty)

428− (o .:? "restrictedServices" .!= mempty)

382+ <*> (o .:? "restrictedServices" .!= mempty)

429 <*> (o .:? "accessLevels" .!= mempty))

383 <*> (o .:? "accessLevels" .!= mempty))

430

384

431instance ToJSON ServicePerimeterConfig where

385instance ToJSON ServicePerimeterConfig where

432 toJSON ServicePerimeterConfig'{..}

386 toJSON ServicePerimeterConfig'{..}

433 = object

387 = object

434 (catMaybes

388 (catMaybes

389+ [("unrestrictedServices" .=) <$>

390+ _spcUnrestrictedServices,

435− [("resources" .=) <$> _spcResources,

391+ ("resources" .=) <$> _spcResources,

436 ("restrictedServices" .=) <$> _spcRestrictedServices,

392 ("restrictedServices" .=) <$> _spcRestrictedServices,

437 ("accessLevels" .=) <$> _spcAccessLevels])

393 ("accessLevels" .=) <$> _spcAccessLevels])

438

394

@@ -531,31 +487,6 @@ instance ToJSON Operation where

531 ("name" .=) <$> _oName,

487 ("name" .=) <$> _oName,

532 ("metadata" .=) <$> _oMetadata])

488 ("metadata" .=) <$> _oMetadata])

533

489

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−

559-- | \`ServicePerimeter\` describes a set of GCP resources which can freely

490-- | \`ServicePerimeter\` describes a set of GCP resources which can freely

560-- import and export data amongst themselves, but not export outside of the

491-- import and export data amongst themselves, but not export outside of the

561-- \`ServicePerimeter\`. If a request with a source within this

492-- \`ServicePerimeter\`. If a request with a source within this

@@ -613,16 +544,17 @@ servicePerimeter =

613

544

614

545

615-- | Current ServicePerimeter configuration. Specifies sets of resources,

546-- | Current ServicePerimeter configuration. Specifies sets of resources,

616−-- restricted services and access levels that determine perimeter content

547+-- restricted\/unrestricted services and access levels that determine

617−-- and boundaries.

548+-- perimeter content and boundaries.

618spStatus :: Lens' ServicePerimeter (Maybe ServicePerimeterConfig)

549spStatus :: Lens' ServicePerimeter (Maybe ServicePerimeterConfig)

619spStatus = lens _spStatus (\ s a -> s{_spStatus = a})

550spStatus = lens _spStatus (\ s a -> s{_spStatus = a})

620

551

621-- | Perimeter type indicator. A single project is allowed to be a member of

552-- | Perimeter type indicator. A single project is allowed to be a member of

622-- single regular perimeter, but multiple service perimeter bridges. A

553-- single regular perimeter, but multiple service perimeter bridges. A

623-- project cannot be a included in a perimeter bridge without being

554-- project cannot be a included in a perimeter bridge without being

624−-- included in regular perimeter. For perimeter bridges, the restricted

555+-- included in regular perimeter. For perimeter bridges,

625−-- service list as well as access level lists must be empty.

556+-- restricted\/unrestricted service lists as well as access lists must be

557+-- empty.

626spPerimeterType :: Lens' ServicePerimeter (Maybe ServicePerimeterPerimeterType)

558spPerimeterType :: Lens' ServicePerimeter (Maybe ServicePerimeterPerimeterType)

627spPerimeterType

559spPerimeterType

628 = lens _spPerimeterType

560 = lens _spPerimeterType

@@ -776,9 +708,8 @@ instance ToJSON StatusDetailsItem where

776-- /See:/ 'osConstraint' smart constructor.

708-- /See:/ 'osConstraint' smart constructor.

777data OSConstraint =

709data OSConstraint =

778 OSConstraint'

710 OSConstraint'

779− { _ocOSType :: !(Maybe OSConstraintOSType)

711+ { _ocOSType :: !(Maybe OSConstraintOSType)

780− , _ocMinimumVersion :: !(Maybe Text)

712+ , _ocMinimumVersion :: !(Maybe Text)

781− , _ocRequireVerifiedChromeOS :: !(Maybe Bool)

782 }

713 }

783 deriving (Eq, Show, Data, Typeable, Generic)

714 deriving (Eq, Show, Data, Typeable, Generic)

784

715

@@ -790,16 +721,9 @@ data OSConstraint =

790-- * 'ocOSType'

721-- * 'ocOSType'

791--

722--

792-- * 'ocMinimumVersion'

723-- * 'ocMinimumVersion'

793−--

794−-- * 'ocRequireVerifiedChromeOS'

795osConstraint

724osConstraint

796 :: OSConstraint

725 :: OSConstraint

797−osConstraint =

798− OSConstraint'

799− { _ocOSType = Nothing

800− , _ocMinimumVersion = Nothing

726+osConstraint = OSConstraint' {_ocOSType = Nothing, _ocMinimumVersion = Nothing}

801− , _ocRequireVerifiedChromeOS = Nothing

802− }

803

727

804

728

805-- | Required. The allowed OS type.

729-- | Required. The allowed OS type.

@@ -814,31 +738,19 @@ ocMinimumVersion

814 = lens _ocMinimumVersion

738 = lens _ocMinimumVersion

815 (\ s a -> s{_ocMinimumVersion = a})

739 (\ s a -> s{_ocMinimumVersion = a})

816

740

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−

826instance FromJSON OSConstraint where

741instance FromJSON OSConstraint where

827 parseJSON

742 parseJSON

828 = withObject "OSConstraint"

743 = withObject "OSConstraint"

829 (\ o ->

744 (\ o ->

830 OSConstraint' <$>

745 OSConstraint' <$>

831− (o .:? "osType") <*> (o .:? "minimumVersion") <*>

746+ (o .:? "osType") <*> (o .:? "minimumVersion"))

832− (o .:? "requireVerifiedChromeOs"))

833

747

834instance ToJSON OSConstraint where

748instance ToJSON OSConstraint where

835 toJSON OSConstraint'{..}

749 toJSON OSConstraint'{..}

836 = object

750 = object

837 (catMaybes

751 (catMaybes

838 [("osType" .=) <$> _ocOSType,

752 [("osType" .=) <$> _ocOSType,

839− ("minimumVersion" .=) <$> _ocMinimumVersion,

753+ ("minimumVersion" .=) <$> _ocMinimumVersion])

840− ("requireVerifiedChromeOs" .=) <$>

841− _ocRequireVerifiedChromeOS])

842

754

843-- | \`AccessPolicy\` is a container for \`AccessLevels\` (which define the

755-- | \`AccessPolicy\` is a container for \`AccessLevels\` (which define the

844-- necessary attributes to use GCP services) and \`ServicePerimeters\`

756-- necessary attributes to use GCP services) and \`ServicePerimeters\`

@@ -1093,8 +1005,6 @@ instance ToJSON OperationMetadata where

1093data DevicePolicy =

1005data DevicePolicy =

1094 DevicePolicy'

1006 DevicePolicy'

1095 { _dpOSConstraints :: !(Maybe [OSConstraint])

1007 { _dpOSConstraints :: !(Maybe [OSConstraint])

1096− , _dpRequireAdminApproval :: !(Maybe Bool)

1097− , _dpRequireCorpOwned :: !(Maybe Bool)

1098 , _dpRequireScreenlock :: !(Maybe Bool)

1008 , _dpRequireScreenlock :: !(Maybe Bool)

1099 , _dpAllowedEncryptionStatuses :: !(Maybe [Text])

1009 , _dpAllowedEncryptionStatuses :: !(Maybe [Text])

1100 , _dpAllowedDeviceManagementLevels :: !(Maybe [Text])

1010 , _dpAllowedDeviceManagementLevels :: !(Maybe [Text])

@@ -1108,10 +1018,6 @@ data DevicePolicy =

1108--

1018--

1109-- * 'dpOSConstraints'

1019-- * 'dpOSConstraints'

1110--

1020--

1111−-- * 'dpRequireAdminApproval'

1112−--

1113−-- * 'dpRequireCorpOwned'

1114−--

1115-- * 'dpRequireScreenlock'

1021-- * 'dpRequireScreenlock'

1116--

1022--

1117-- * 'dpAllowedEncryptionStatuses'

1023-- * 'dpAllowedEncryptionStatuses'

@@ -1122,8 +1028,6 @@ devicePolicy

1122devicePolicy =

1028devicePolicy =

1123 DevicePolicy'

1029 DevicePolicy'

1124 { _dpOSConstraints = Nothing

1030 { _dpOSConstraints = Nothing

1125− , _dpRequireAdminApproval = Nothing

1126− , _dpRequireCorpOwned = Nothing

1127 , _dpRequireScreenlock = Nothing

1031 , _dpRequireScreenlock = Nothing

1128 , _dpAllowedEncryptionStatuses = Nothing

1032 , _dpAllowedEncryptionStatuses = Nothing

1129 , _dpAllowedDeviceManagementLevels = Nothing

1033 , _dpAllowedDeviceManagementLevels = Nothing

@@ -1138,18 +1042,6 @@ dpOSConstraints

1138 . _Default

1042 . _Default

1139 . _Coerce

1043 . _Coerce

1140

1044

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−

1153-- | Whether or not screenlock is required for the DevicePolicy to be true.

1045-- | Whether or not screenlock is required for the DevicePolicy to be true.

1154-- Defaults to \`false\`.

1046-- Defaults to \`false\`.

1155dpRequireScreenlock :: Lens' DevicePolicy (Maybe Bool)

1047dpRequireScreenlock :: Lens' DevicePolicy (Maybe Bool)

@@ -1180,9 +1072,7 @@ instance FromJSON DevicePolicy where

1180 (\ o ->

1072 (\ o ->

1181 DevicePolicy' <$>

1073 DevicePolicy' <$>

1182 (o .:? "osConstraints" .!= mempty) <*>

1074 (o .:? "osConstraints" .!= mempty) <*>

1183− (o .:? "requireAdminApproval")

1184− <*> (o .:? "requireCorpOwned")

1185− <*> (o .:? "requireScreenlock")

1075+ (o .:? "requireScreenlock")

1186 <*> (o .:? "allowedEncryptionStatuses" .!= mempty)

1076 <*> (o .:? "allowedEncryptionStatuses" .!= mempty)

1187 <*>

1077 <*>

1188 (o .:? "allowedDeviceManagementLevels" .!= mempty))

1078 (o .:? "allowedDeviceManagementLevels" .!= mempty))

@@ -1192,9 +1082,6 @@ instance ToJSON DevicePolicy where

1192 = object

1082 = object

1193 (catMaybes

1083 (catMaybes

1194 [("osConstraints" .=) <$> _dpOSConstraints,

1084 [("osConstraints" .=) <$> _dpOSConstraints,

1195− ("requireAdminApproval" .=) <$>

1196− _dpRequireAdminApproval,

1197− ("requireCorpOwned" .=) <$> _dpRequireCorpOwned,

1198 ("requireScreenlock" .=) <$> _dpRequireScreenlock,

1085 ("requireScreenlock" .=) <$> _dpRequireScreenlock,

1199 ("allowedEncryptionStatuses" .=) <$>

1086 ("allowedEncryptionStatuses" .=) <$>

1200 _dpAllowedEncryptionStatuses,

1087 _dpAllowedEncryptionStatuses,

@@ -1212,7 +1099,6 @@ instance ToJSON DevicePolicy where

1212data Condition =

1099data Condition =

1213 Condition'

1100 Condition'

1214 { _cMembers :: !(Maybe [Text])

1101 { _cMembers :: !(Maybe [Text])

1215− , _cRegions :: !(Maybe [Text])

1216 , _cNegate :: !(Maybe Bool)

1102 , _cNegate :: !(Maybe Bool)

1217 , _cIPSubnetworks :: !(Maybe [Text])

1103 , _cIPSubnetworks :: !(Maybe [Text])

1218 , _cDevicePolicy :: !(Maybe DevicePolicy)

1104 , _cDevicePolicy :: !(Maybe DevicePolicy)

@@ -1227,8 +1113,6 @@ data Condition =

1227--

1113--

1228-- * 'cMembers'

1114-- * 'cMembers'

1229--

1115--

1230−-- * 'cRegions'

1231−--

1232-- * 'cNegate'

1116-- * 'cNegate'

1233--

1117--

1234-- * 'cIPSubnetworks'

1118-- * 'cIPSubnetworks'

@@ -1241,7 +1125,6 @@ condition

1241condition =

1125condition =

1242 Condition'

1126 Condition'

1243 { _cMembers = Nothing

1127 { _cMembers = Nothing

1244− , _cRegions = Nothing

1245 , _cNegate = Nothing

1128 , _cNegate = Nothing

1246 , _cIPSubnetworks = Nothing

1129 , _cIPSubnetworks = Nothing

1247 , _cDevicePolicy = Nothing

1130 , _cDevicePolicy = Nothing

@@ -1259,14 +1142,6 @@ cMembers

1259 _Default

1142 _Default

1260 . _Coerce

1143 . _Coerce

1261

1144

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−

1270-- | Whether to negate the Condition. If true, the Condition becomes a NAND

1145-- | Whether to negate the Condition. If true, the Condition becomes a NAND

1271-- over its non-empty fields, each field must be false for the Condition

1146-- over its non-empty fields, each field must be false for the Condition

1272-- overall to be satisfied. Defaults to false.

1147-- overall to be satisfied. Defaults to false.

@@ -1312,10 +1187,8 @@ instance FromJSON Condition where

1312 = withObject "Condition"

1187 = withObject "Condition"

1313 (\ o ->

1188 (\ o ->

1314 Condition' <$>

1189 Condition' <$>

1315− (o .:? "members" .!= mempty) <*>

1190+ (o .:? "members" .!= mempty) <*> (o .:? "negate") <*>

1316− (o .:? "regions" .!= mempty)

1317− <*> (o .:? "negate")

1318− <*> (o .:? "ipSubnetworks" .!= mempty)

1191+ (o .:? "ipSubnetworks" .!= mempty)

1319 <*> (o .:? "devicePolicy")

1192 <*> (o .:? "devicePolicy")

1320 <*> (o .:? "requiredAccessLevels" .!= mempty))

1193 <*> (o .:? "requiredAccessLevels" .!= mempty))

1321

1194

@@ -1324,7 +1197,6 @@ instance ToJSON Condition where

1324 = object

1197 = object

1325 (catMaybes

1198 (catMaybes

1326 [("members" .=) <$> _cMembers,

1199 [("members" .=) <$> _cMembers,

1327− ("regions" .=) <$> _cRegions,

1328 ("negate" .=) <$> _cNegate,

1200 ("negate" .=) <$> _cNegate,

1329 ("ipSubnetworks" .=) <$> _cIPSubnetworks,

1201 ("ipSubnetworks" .=) <$> _cIPSubnetworks,

1330 ("devicePolicy" .=) <$> _cDevicePolicy,

1202 ("devicePolicy" .=) <$> _cDevicePolicy,

gogol-accesscontextmanager/gen/Network/Google/AccessContextManager/Types/Sum.hs+13−2

@@ -55,8 +55,9 @@ instance ToJSON BasicLevelCombiningFunction where

55-- | Perimeter type indicator. A single project is allowed to be a member of

55-- | Perimeter type indicator. A single project is allowed to be a member of

56-- single regular perimeter, but multiple service perimeter bridges. A

56-- single regular perimeter, but multiple service perimeter bridges. A

57-- project cannot be a included in a perimeter bridge without being

57-- project cannot be a included in a perimeter bridge without being

58−-- included in regular perimeter. For perimeter bridges, the restricted

58+-- included in regular perimeter. For perimeter bridges,

59−-- service list as well as access level lists must be empty.

59+-- restricted\/unrestricted service lists as well as access lists must be

60+-- empty.

60data ServicePerimeterPerimeterType

61data ServicePerimeterPerimeterType

61 = PerimeterTypeRegular

62 = PerimeterTypeRegular

62 -- ^ @PERIMETER_TYPE_REGULAR@

63 -- ^ @PERIMETER_TYPE_REGULAR@

@@ -102,6 +103,12 @@ data OSConstraintOSType

102 | DesktopChromeOS

103 | DesktopChromeOS

103 -- ^ @DESKTOP_CHROME_OS@

104 -- ^ @DESKTOP_CHROME_OS@

104 -- A desktop ChromeOS operating system.

105 -- A desktop ChromeOS operating system.

106+ | Android

107+ -- ^ @ANDROID@

108+ -- An Android operating system.

109+ | Ios

110+ -- ^ @IOS@

111+ -- An iOS operating system.

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

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

106

113

107instance Hashable OSConstraintOSType

114instance Hashable OSConstraintOSType

@@ -113,6 +120,8 @@ instance FromHttpApiData OSConstraintOSType where

113 "DESKTOP_WINDOWS" -> Right DesktopWindows

120 "DESKTOP_WINDOWS" -> Right DesktopWindows

114 "DESKTOP_LINUX" -> Right DesktopLinux

121 "DESKTOP_LINUX" -> Right DesktopLinux

115 "DESKTOP_CHROME_OS" -> Right DesktopChromeOS

122 "DESKTOP_CHROME_OS" -> Right DesktopChromeOS

123+ "ANDROID" -> Right Android

124+ "IOS" -> Right Ios

116 x -> Left ("Unable to parse OSConstraintOSType from: " <> x)

125 x -> Left ("Unable to parse OSConstraintOSType from: " <> x)

117

126

118instance ToHttpApiData OSConstraintOSType where

127instance ToHttpApiData OSConstraintOSType where

@@ -122,6 +131,8 @@ instance ToHttpApiData OSConstraintOSType where

122 DesktopWindows -> "DESKTOP_WINDOWS"

131 DesktopWindows -> "DESKTOP_WINDOWS"

123 DesktopLinux -> "DESKTOP_LINUX"

132 DesktopLinux -> "DESKTOP_LINUX"

124 DesktopChromeOS -> "DESKTOP_CHROME_OS"

133 DesktopChromeOS -> "DESKTOP_CHROME_OS"

134+ Android -> "ANDROID"

135+ Ios -> "IOS"

125

136

126instance FromJSON OSConstraintOSType where

137instance FromJSON OSConstraintOSType where

127 parseJSON = parseJSONText "OSConstraintOSType"

138 parseJSON = parseJSONText "OSConstraintOSType"

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/AccessLevels/Create.hs+1−1

@@ -51,7 +51,7 @@ import Network.Google.Prelude

51-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.create@ method which the

51-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.create@ method which the

52-- 'AccessPoliciesAccessLevelsCreate' request conforms to.

52-- 'AccessPoliciesAccessLevelsCreate' request conforms to.

53type AccessPoliciesAccessLevelsCreateResource =

53type AccessPoliciesAccessLevelsCreateResource =

54− "v1" :>

54+ "v1beta" :>

55 Capture "parent" Text :>

55 Capture "parent" Text :>

56 "accessLevels" :>

56 "accessLevels" :>

57 QueryParam "$.xgafv" Xgafv :>

57 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/AccessLevels/Delete.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

49-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.delete@ method which the

49-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.delete@ method which the

50-- 'AccessPoliciesAccessLevelsDelete' request conforms to.

50-- 'AccessPoliciesAccessLevelsDelete' request conforms to.

51type AccessPoliciesAccessLevelsDeleteResource =

51type AccessPoliciesAccessLevelsDeleteResource =

52− "v1" :>

52+ "v1beta" :>

53 Capture "name" Text :>

53 Capture "name" Text :>

54 QueryParam "$.xgafv" Xgafv :>

54 QueryParam "$.xgafv" Xgafv :>

55 QueryParam "upload_protocol" Text :>

55 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

48-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.get@ method which the

48-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.get@ method which the

49-- 'AccessPoliciesAccessLevelsGet' request conforms to.

49-- 'AccessPoliciesAccessLevelsGet' request conforms to.

50type AccessPoliciesAccessLevelsGetResource =

50type AccessPoliciesAccessLevelsGetResource =

51− "v1" :>

51+ "v1beta" :>

52 Capture "name" Text :>

52 Capture "name" Text :>

53 QueryParam "$.xgafv" Xgafv :>

53 QueryParam "$.xgafv" Xgafv :>

54 QueryParam "upload_protocol" Text :>

54 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

50-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.list@ method which the

50-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.list@ method which the

51-- 'AccessPoliciesAccessLevelsList' request conforms to.

51-- 'AccessPoliciesAccessLevelsList' request conforms to.

52type AccessPoliciesAccessLevelsListResource =

52type AccessPoliciesAccessLevelsListResource =

53− "v1" :>

53+ "v1beta" :>

54 Capture "parent" Text :>

54 Capture "parent" Text :>

55 "accessLevels" :>

55 "accessLevels" :>

56 QueryParam "$.xgafv" Xgafv :>

56 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/AccessLevels/Patch.hs+1−1

@@ -52,7 +52,7 @@ import Network.Google.Prelude

52-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.patch@ method which the

52-- | A resource alias for @accesscontextmanager.accessPolicies.accessLevels.patch@ method which the

53-- 'AccessPoliciesAccessLevelsPatch' request conforms to.

53-- 'AccessPoliciesAccessLevelsPatch' request conforms to.

54type AccessPoliciesAccessLevelsPatchResource =

54type AccessPoliciesAccessLevelsPatchResource =

55− "v1" :>

55+ "v1beta" :>

56 Capture "name" Text :>

56 Capture "name" Text :>

57 QueryParam "$.xgafv" Xgafv :>

57 QueryParam "$.xgafv" Xgafv :>

58 QueryParam "upload_protocol" Text :>

58 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/Create.hs+1−1

@@ -51,7 +51,7 @@ import Network.Google.Prelude

51-- | A resource alias for @accesscontextmanager.accessPolicies.create@ method which the

51-- | A resource alias for @accesscontextmanager.accessPolicies.create@ method which the

52-- 'AccessPoliciesCreate' request conforms to.

52-- 'AccessPoliciesCreate' request conforms to.

53type AccessPoliciesCreateResource =

53type AccessPoliciesCreateResource =

54− "v1" :>

54+ "v1beta" :>

55 "accessPolicies" :>

55 "accessPolicies" :>

56 QueryParam "$.xgafv" Xgafv :>

56 QueryParam "$.xgafv" Xgafv :>

57 QueryParam "upload_protocol" Text :>

57 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/Delete.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

49-- | A resource alias for @accesscontextmanager.accessPolicies.delete@ method which the

49-- | A resource alias for @accesscontextmanager.accessPolicies.delete@ method which the

50-- 'AccessPoliciesDelete' request conforms to.

50-- 'AccessPoliciesDelete' request conforms to.

51type AccessPoliciesDeleteResource =

51type AccessPoliciesDeleteResource =

52− "v1" :>

52+ "v1beta" :>

53 Capture "name" Text :>

53 Capture "name" Text :>

54 QueryParam "$.xgafv" Xgafv :>

54 QueryParam "$.xgafv" Xgafv :>

55 QueryParam "upload_protocol" Text :>

55 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/Get.hs+1−1

@@ -47,7 +47,7 @@ import Network.Google.Prelude

47-- | A resource alias for @accesscontextmanager.accessPolicies.get@ method which the

47-- | A resource alias for @accesscontextmanager.accessPolicies.get@ method which the

48-- 'AccessPoliciesGet' request conforms to.

48-- 'AccessPoliciesGet' request conforms to.

49type AccessPoliciesGetResource =

49type AccessPoliciesGetResource =

50− "v1" :>

50+ "v1beta" :>

51 Capture "name" Text :>

51 Capture "name" Text :>

52 QueryParam "$.xgafv" Xgafv :>

52 QueryParam "$.xgafv" Xgafv :>

53 QueryParam "upload_protocol" Text :>

53 QueryParam "upload_protocol" Text :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/List.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

49-- | A resource alias for @accesscontextmanager.accessPolicies.list@ method which the

49-- | A resource alias for @accesscontextmanager.accessPolicies.list@ method which the

50-- 'AccessPoliciesList' request conforms to.

50-- 'AccessPoliciesList' request conforms to.

51type AccessPoliciesListResource =

51type AccessPoliciesListResource =

52− "v1" :>

52+ "v1beta" :>

53 "accessPolicies" :>

53 "accessPolicies" :>

54 QueryParam "parent" Text :>

54 QueryParam "parent" Text :>

55 QueryParam "$.xgafv" Xgafv :>

55 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/Patch.hs+1−1

@@ -52,7 +52,7 @@ import Network.Google.Prelude

52-- | A resource alias for @accesscontextmanager.accessPolicies.patch@ method which the

52-- | A resource alias for @accesscontextmanager.accessPolicies.patch@ method which the

53-- 'AccessPoliciesPatch' request conforms to.

53-- 'AccessPoliciesPatch' request conforms to.

54type AccessPoliciesPatchResource =

54type AccessPoliciesPatchResource =

55− "v1" :>

55+ "v1beta" :>

56 Capture "name" Text :>

56 Capture "name" Text :>

57 QueryParam "$.xgafv" Xgafv :>

57 QueryParam "$.xgafv" Xgafv :>

58 QueryParam "upload_protocol" Text :>

58 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

51-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.create@ method which the

51-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.create@ method which the

52-- 'AccessPoliciesServicePerimetersCreate' request conforms to.

52-- 'AccessPoliciesServicePerimetersCreate' request conforms to.

53type AccessPoliciesServicePerimetersCreateResource =

53type AccessPoliciesServicePerimetersCreateResource =

54− "v1" :>

54+ "v1beta" :>

55 Capture "parent" Text :>

55 Capture "parent" Text :>

56 "servicePerimeters" :>

56 "servicePerimeters" :>

57 QueryParam "$.xgafv" Xgafv :>

57 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/ServicePerimeters/Delete.hs+1−1

@@ -49,7 +49,7 @@ import Network.Google.Prelude

49-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.delete@ method which the

49-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.delete@ method which the

50-- 'AccessPoliciesServicePerimetersDelete' request conforms to.

50-- 'AccessPoliciesServicePerimetersDelete' request conforms to.

51type AccessPoliciesServicePerimetersDeleteResource =

51type AccessPoliciesServicePerimetersDeleteResource =

52− "v1" :>

52+ "v1beta" :>

53 Capture "name" Text :>

53 Capture "name" Text :>

54 QueryParam "$.xgafv" Xgafv :>

54 QueryParam "$.xgafv" Xgafv :>

55 QueryParam "upload_protocol" Text :>

55 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

47-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.get@ method which the

47-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.get@ method which the

48-- 'AccessPoliciesServicePerimetersGet' request conforms to.

48-- 'AccessPoliciesServicePerimetersGet' request conforms to.

49type AccessPoliciesServicePerimetersGetResource =

49type AccessPoliciesServicePerimetersGetResource =

50− "v1" :>

50+ "v1beta" :>

51 Capture "name" Text :>

51 Capture "name" Text :>

52 QueryParam "$.xgafv" Xgafv :>

52 QueryParam "$.xgafv" Xgafv :>

53 QueryParam "upload_protocol" Text :>

53 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

49-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.list@ method which the

49-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.list@ method which the

50-- 'AccessPoliciesServicePerimetersList' request conforms to.

50-- 'AccessPoliciesServicePerimetersList' request conforms to.

51type AccessPoliciesServicePerimetersListResource =

51type AccessPoliciesServicePerimetersListResource =

52− "v1" :>

52+ "v1beta" :>

53 Capture "parent" Text :>

53 Capture "parent" Text :>

54 "servicePerimeters" :>

54 "servicePerimeters" :>

55 QueryParam "$.xgafv" Xgafv :>

55 QueryParam "$.xgafv" Xgafv :>

gogol-accesscontextmanager/gen/Network/Google/Resource/AccessContextManager/AccessPolicies/ServicePerimeters/Patch.hs+1−1

@@ -52,7 +52,7 @@ import Network.Google.Prelude

52-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.patch@ method which the

52-- | A resource alias for @accesscontextmanager.accessPolicies.servicePerimeters.patch@ method which the

53-- 'AccessPoliciesServicePerimetersPatch' request conforms to.

53-- 'AccessPoliciesServicePerimetersPatch' request conforms to.

54type AccessPoliciesServicePerimetersPatchResource =

54type AccessPoliciesServicePerimetersPatchResource =

55− "v1" :>

55+ "v1beta" :>

56 Capture "name" Text :>

56 Capture "name" Text :>

57 QueryParam "$.xgafv" Xgafv :>

57 QueryParam "$.xgafv" Xgafv :>

58 QueryParam "upload_protocol" Text :>

58 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

49-- | A resource alias for @accesscontextmanager.operations.get@ method which the

49-- | A resource alias for @accesscontextmanager.operations.get@ method which the

50-- 'OperationsGet' request conforms to.

50-- 'OperationsGet' request conforms to.

51type OperationsGetResource =

51type OperationsGetResource =

52− "v1" :>

52+ "v1beta" :>

53 Capture "name" Text :>

53 Capture "name" Text :>

54 QueryParam "$.xgafv" Xgafv :>

54 QueryParam "$.xgafv" Xgafv :>

55 QueryParam "upload_protocol" Text :>

55 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:

20 /Warning:/ This is an experimental prototype/preview release which is still

20 /Warning:/ This is an experimental prototype/preview release which is still

21 under exploratory development and not intended for public use, caveat emptor!

21 under exploratory development and not intended for public use, caveat emptor!

22 .

22 .

23− This library is compatible with version @v1@

23+ This library is compatible with version @v1beta@

24 of the API.

24 of the API.

25

25

26source-repository head

26source-repository head

@@ -51,10 +51,7 @@ library

51 , Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Get

51 , Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Get

52 , Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.List

52 , Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.List

53 , Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Patch

53 , Network.Google.Resource.AccessContextManager.AccessPolicies.ServicePerimeters.Patch

54− , Network.Google.Resource.AccessContextManager.Operations.Cancel

55− , Network.Google.Resource.AccessContextManager.Operations.Delete

56 , Network.Google.Resource.AccessContextManager.Operations.Get

54 , Network.Google.Resource.AccessContextManager.Operations.Get

57− , Network.Google.Resource.AccessContextManager.Operations.List

58

55

59 other-modules:

56 other-modules:

60 Network.Google.AccessContextManager.Types.Product

57 Network.Google.AccessContextManager.Types.Product

gogol-adexchangebuyer2/gen/Network/Google/AdExchangeBuyer2.hs+6−1

@@ -133,6 +133,9 @@ module Network.Google.AdExchangeBuyer2

133 -- ** adexchangebuyer2.accounts.publisherProfiles.list

133 -- ** adexchangebuyer2.accounts.publisherProfiles.list

134 , module Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.List

134 , module Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.List

135

135

136+ -- ** adexchangebuyer2.bidders.accounts.creatives.delete

137+ , module Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.Creatives.Delete

138+

136 -- ** adexchangebuyer2.bidders.accounts.filterSets.bidMetrics.list

139 -- ** adexchangebuyer2.bidders.accounts.filterSets.bidMetrics.list

137 , module Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidMetrics.List

140 , module Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidMetrics.List

138

141

@@ -1164,6 +1167,7 @@ import Network.Google.Resource.AdExchangeBuyer2.Accounts.Proposals.Res

1164import Network.Google.Resource.AdExchangeBuyer2.Accounts.Proposals.Update

1167import Network.Google.Resource.AdExchangeBuyer2.Accounts.Proposals.Update

1165import Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.Get

1168import Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.Get

1166import Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.List

1169import Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.List

1170+import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.Creatives.Delete

1167import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidMetrics.List

1171import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidMetrics.List

1168import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponseErrors.List

1172import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponseErrors.List

1169import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponsesWithoutBids.List

1173import Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponsesWithoutBids.List

@@ -1199,7 +1203,8 @@ TODO

1199

1203

1200-- | Represents the entirety of the methods and resources available for the Ad Exchange Buyer API II service.

1204-- | Represents the entirety of the methods and resources available for the Ad Exchange Buyer API II service.

1201type AdExchangeBuyer2API =

1205type AdExchangeBuyer2API =

1206+ BiddersAccountsCreativesDeleteResource :<|>

1202− BiddersAccountsFilterSetsFilteredBidRequestsListResource

1207+ BiddersAccountsFilterSetsFilteredBidRequestsListResource

1203 :<|>

1208 :<|>

1204 BiddersAccountsFilterSetsBidResponsesWithoutBidsListResource

1209 BiddersAccountsFilterSetsBidResponsesWithoutBidsListResource

1205 :<|>

1210 :<|>

gogol-adexchangebuyer2/gen/Network/Google/AdExchangeBuyer2/Types/Product.hs+2−4

@@ -2224,7 +2224,7 @@ instance ToJSON PricePerBuyer where

2224 ("advertiserIds" .=) <$> _ppbAdvertiserIds,

2224 ("advertiserIds" .=) <$> _ppbAdvertiserIds,

2225 ("buyer" .=) <$> _ppbBuyer])

2225 ("buyer" .=) <$> _ppbBuyer])

2226

2226

2227−-- | A creative and its classification data.

2227+-- | A creative and its classification data. Next ID: 40

2228--

2228--

2229-- /See:/ 'creative' smart constructor.

2229-- /See:/ 'creative' smart constructor.

2230data Creative =

2230data Creative =

@@ -2531,9 +2531,7 @@ cOpenAuctionStatus

2531 = lens _cOpenAuctionStatus

2531 = lens _cOpenAuctionStatus

2532 (\ s a -> s{_cOpenAuctionStatus = a})

2532 (\ s a -> s{_cOpenAuctionStatus = a})

2533

2533

2534−-- | \'OutputOnly The filtering stats for this creative. Deprecated; please

2534+-- | \'OutputOnly The filtering stats for this creative.

2535−-- use bidders.accounts.filterSets.filteredBids.creatives.list method

2536−-- instead.

2537cFilteringStats :: Lens' Creative (Maybe FilteringStats)

2535cFilteringStats :: Lens' Creative (Maybe FilteringStats)

2538cFilteringStats

2536cFilteringStats

2539 = lens _cFilteringStats

2537 = lens _cFilteringStats

gogol-adexchangebuyer2/gen/Network/Google/AdExchangeBuyer2/Types/Sum.hs−6

@@ -1631,10 +1631,6 @@ data ClientEntityType

1631 | CETAgency

1631 | CETAgency

1632 -- ^ @AGENCY@

1632 -- ^ @AGENCY@

1633 -- An advertising agency.

1633 -- 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.

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

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

1639

1635

1640instance Hashable ClientEntityType

1636instance Hashable ClientEntityType

@@ -1645,7 +1641,6 @@ instance FromHttpApiData ClientEntityType where

1645 "ADVERTISER" -> Right CETAdvertiser

1641 "ADVERTISER" -> Right CETAdvertiser

1646 "BRAND" -> Right CETBrand

1642 "BRAND" -> Right CETBrand

1647 "AGENCY" -> Right CETAgency

1643 "AGENCY" -> Right CETAgency

1648− "ENTITY_TYPE_UNCLASSIFIED" -> Right CETEntityTypeUnclassified

1649 x -> Left ("Unable to parse ClientEntityType from: " <> x)

1644 x -> Left ("Unable to parse ClientEntityType from: " <> x)

1650

1645

1651instance ToHttpApiData ClientEntityType where

1646instance ToHttpApiData ClientEntityType where

@@ -1654,7 +1649,6 @@ instance ToHttpApiData ClientEntityType where

1654 CETAdvertiser -> "ADVERTISER"

1649 CETAdvertiser -> "ADVERTISER"

1655 CETBrand -> "BRAND"

1650 CETBrand -> "BRAND"

1656 CETAgency -> "AGENCY"

1651 CETAgency -> "AGENCY"

1657− CETEntityTypeUnclassified -> "ENTITY_TYPE_UNCLASSIFIED"

1658

1652

1659instance FromJSON ClientEntityType where

1653instance FromJSON ClientEntityType where

1660 parseJSON = parseJSONText "ClientEntityType"

1654 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

71 , Network.Google.Resource.AdExchangeBuyer2.Accounts.Proposals.Update

71 , Network.Google.Resource.AdExchangeBuyer2.Accounts.Proposals.Update

72 , Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.Get

72 , Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.Get

73 , Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.List

73 , Network.Google.Resource.AdExchangeBuyer2.Accounts.PublisherProFiles.List

74+ , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.Creatives.Delete

74 , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidMetrics.List

75 , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidMetrics.List

75 , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponseErrors.List

76 , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponseErrors.List

76 , Network.Google.Resource.AdExchangeBuyer2.Bidders.Accounts.FilterSets.BidResponsesWithoutBids.List

77 , 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

899 , useIncludeInGlobalAddressList

899 , useIncludeInGlobalAddressList

900 , useGender

900 , useGender

901 , usePhones

901 , usePhones

902+ , useRecoveryEmail

902 , useName

903 , useName

903 , usePassword

904 , usePassword

904 , useEmails

905 , useEmails

906+ , useRecoveryPhone

905 , useIms

907 , useIms

906 , useKeywords

908 , useKeywords

907 , useIsAdmin

909 , useIsAdmin

gogol-admin-directory/gen/Network/Google/Directory/Types.hs+2

@@ -550,9 +550,11 @@ module Network.Google.Directory.Types

550 , useIncludeInGlobalAddressList

550 , useIncludeInGlobalAddressList

551 , useGender

551 , useGender

552 , usePhones

552 , usePhones

553+ , useRecoveryEmail

553 , useName

554 , useName

554 , usePassword

555 , usePassword

555 , useEmails

556 , useEmails

557+ , useRecoveryPhone

556 , useIms

558 , useIms

557 , useKeywords

559 , useKeywords

558 , useIsAdmin

560 , useIsAdmin

gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+66−6

@@ -2552,24 +2552,38 @@ buildingAddress =

2552

2552

2553

2553

2554-- | Optional. BCP-47 language code of the contents of this address (if

2554-- | 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\".

2556baLanguageCode :: Lens' BuildingAddress (Maybe Text)

2563baLanguageCode :: Lens' BuildingAddress (Maybe Text)

2557baLanguageCode

2564baLanguageCode

2558 = lens _baLanguageCode

2565 = lens _baLanguageCode

2559 (\ s a -> s{_baLanguageCode = a})

2566 (\ s a -> s{_baLanguageCode = a})

2560

2567

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

2562baRegionCode :: Lens' BuildingAddress (Maybe Text)

2572baRegionCode :: Lens' BuildingAddress (Maybe Text)

2563baRegionCode

2573baRegionCode

2564 = lens _baRegionCode (\ s a -> s{_baRegionCode = a})

2574 = lens _baRegionCode (\ s a -> s{_baRegionCode = a})

2565

2575

2566−-- | Optional. Sublocality of the address.

2576+-- | Optional. Sublocality of the address. For example, this can be

2577+-- neighborhoods, boroughs, districts.

2567baSublocality :: Lens' BuildingAddress (Maybe Text)

2578baSublocality :: Lens' BuildingAddress (Maybe Text)

2568baSublocality

2579baSublocality

2569 = lens _baSublocality

2580 = lens _baSublocality

2570 (\ s a -> s{_baSublocality = a})

2581 (\ s a -> s{_baSublocality = a})

2571

2582

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.).

2573baPostalCode :: Lens' BuildingAddress (Maybe Text)

2587baPostalCode :: Lens' BuildingAddress (Maybe Text)

2574baPostalCode

2588baPostalCode

2575 = lens _baPostalCode (\ s a -> s{_baPostalCode = a})

2589 = lens _baPostalCode (\ s a -> s{_baPostalCode = a})

@@ -2583,13 +2597,34 @@ baLocality

2583 = lens _baLocality (\ s a -> s{_baLocality = a})

2597 = lens _baLocality (\ s a -> s{_baLocality = a})

2584

2598

2585-- | Optional. Highest administrative subdivision which is used for postal

2599-- | 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.

2587baAdministrativeArea :: Lens' BuildingAddress (Maybe Text)

2605baAdministrativeArea :: Lens' BuildingAddress (Maybe Text)

2588baAdministrativeArea

2606baAdministrativeArea

2589 = lens _baAdministrativeArea

2607 = lens _baAdministrativeArea

2590 (\ s a -> s{_baAdministrativeArea = a})

2608 (\ s a -> s{_baAdministrativeArea = a})

2591

2609

2592-- | Unstructured address lines describing the lower levels of an address.

2610-- | 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).

2593baAddressLines :: Lens' BuildingAddress [Text]

2628baAddressLines :: Lens' BuildingAddress [Text]

2594baAddressLines

2629baAddressLines

2595 = lens _baAddressLines

2630 = lens _baAddressLines

@@ -4196,9 +4231,11 @@ data User =

4196 , _useIncludeInGlobalAddressList :: !(Maybe Bool)

4231 , _useIncludeInGlobalAddressList :: !(Maybe Bool)

4197 , _useGender :: !(Maybe JSONValue)

4232 , _useGender :: !(Maybe JSONValue)

4198 , _usePhones :: !(Maybe JSONValue)

4233 , _usePhones :: !(Maybe JSONValue)

4234+ , _useRecoveryEmail :: !(Maybe Text)

4199 , _useName :: !(Maybe UserName)

4235 , _useName :: !(Maybe UserName)

4200 , _usePassword :: !(Maybe Text)

4236 , _usePassword :: !(Maybe Text)

4201 , _useEmails :: !(Maybe JSONValue)

4237 , _useEmails :: !(Maybe JSONValue)

4238+ , _useRecoveryPhone :: !(Maybe Text)

4202 , _useIms :: !(Maybe JSONValue)

4239 , _useIms :: !(Maybe JSONValue)

4203 , _useKeywords :: !(Maybe JSONValue)

4240 , _useKeywords :: !(Maybe JSONValue)

4204 , _useIsAdmin :: !(Maybe Bool)

4241 , _useIsAdmin :: !(Maybe Bool)

@@ -4274,12 +4311,16 @@ data User =

4274--

4311--

4275-- * 'usePhones'

4312-- * 'usePhones'

4276--

4313--

4314+-- * 'useRecoveryEmail'

4315+--

4277-- * 'useName'

4316-- * 'useName'

4278--

4317--

4279-- * 'usePassword'

4318-- * 'usePassword'

4280--

4319--

4281-- * 'useEmails'

4320-- * 'useEmails'

4282--

4321--

4322+-- * 'useRecoveryPhone'

4323+--

4283-- * 'useIms'

4324-- * 'useIms'

4284--

4325--

4285-- * 'useKeywords'

4326-- * 'useKeywords'

@@ -4339,9 +4380,11 @@ user =

4339 , _useIncludeInGlobalAddressList = Nothing

4380 , _useIncludeInGlobalAddressList = Nothing

4340 , _useGender = Nothing

4381 , _useGender = Nothing

4341 , _usePhones = Nothing

4382 , _usePhones = Nothing

4383+ , _useRecoveryEmail = Nothing

4342 , _useName = Nothing

4384 , _useName = Nothing

4343 , _usePassword = Nothing

4385 , _usePassword = Nothing

4344 , _useEmails = Nothing

4386 , _useEmails = Nothing

4387+ , _useRecoveryPhone = Nothing

4345 , _useIms = Nothing

4388 , _useIms = Nothing

4346 , _useKeywords = Nothing

4389 , _useKeywords = Nothing

4347 , _useIsAdmin = Nothing

4390 , _useIsAdmin = Nothing

@@ -4501,6 +4544,12 @@ usePhones :: Lens' User (Maybe JSONValue)

4501usePhones

4544usePhones

4502 = lens _usePhones (\ s a -> s{_usePhones = a})

4545 = lens _usePhones (\ s a -> s{_usePhones = a})

4503

4546

4547+-- | Recovery email of the user.

4548+useRecoveryEmail :: Lens' User (Maybe Text)

4549+useRecoveryEmail

4550+ = lens _useRecoveryEmail

4551+ (\ s a -> s{_useRecoveryEmail = a})

4552+

4504-- | User\'s name

4553-- | User\'s name

4505useName :: Lens' User (Maybe UserName)

4554useName :: Lens' User (Maybe UserName)

4506useName = lens _useName (\ s a -> s{_useName = a})

4555useName = lens _useName (\ s a -> s{_useName = a})

@@ -4514,6 +4563,12 @@ useEmails :: Lens' User (Maybe JSONValue)

4514useEmails

4563useEmails

4515 = lens _useEmails (\ s a -> s{_useEmails = a})

4564 = lens _useEmails (\ s a -> s{_useEmails = a})

4516

4565

4566+-- | Recovery phone of the user.

4567+useRecoveryPhone :: Lens' User (Maybe Text)

4568+useRecoveryPhone

4569+ = lens _useRecoveryPhone

4570+ (\ s a -> s{_useRecoveryPhone = a})

4571+

4517useIms :: Lens' User (Maybe JSONValue)

4572useIms :: Lens' User (Maybe JSONValue)

4518useIms = lens _useIms (\ s a -> s{_useIms = a})

4573useIms = lens _useIms (\ s a -> s{_useIms = a})

4519

4574

@@ -4619,9 +4674,11 @@ instance FromJSON User where

4619 <*> (o .:? "includeInGlobalAddressList")

4674 <*> (o .:? "includeInGlobalAddressList")

4620 <*> (o .:? "gender")

4675 <*> (o .:? "gender")

4621 <*> (o .:? "phones")

4676 <*> (o .:? "phones")

4677+ <*> (o .:? "recoveryEmail")

4622 <*> (o .:? "name")

4678 <*> (o .:? "name")

4623 <*> (o .:? "password")

4679 <*> (o .:? "password")

4624 <*> (o .:? "emails")

4680 <*> (o .:? "emails")

4681+ <*> (o .:? "recoveryPhone")

4625 <*> (o .:? "ims")

4682 <*> (o .:? "ims")

4626 <*> (o .:? "keywords")

4683 <*> (o .:? "keywords")

4627 <*> (o .:? "isAdmin")

4684 <*> (o .:? "isAdmin")

@@ -4670,9 +4727,12 @@ instance ToJSON User where

4670 _useIncludeInGlobalAddressList,

4727 _useIncludeInGlobalAddressList,

4671 ("gender" .=) <$> _useGender,

4728 ("gender" .=) <$> _useGender,

4672 ("phones" .=) <$> _usePhones,

4729 ("phones" .=) <$> _usePhones,

4730+ ("recoveryEmail" .=) <$> _useRecoveryEmail,

4673 ("name" .=) <$> _useName,

4731 ("name" .=) <$> _useName,

4674 ("password" .=) <$> _usePassword,

4732 ("password" .=) <$> _usePassword,

4675− ("emails" .=) <$> _useEmails, ("ims" .=) <$> _useIms,

4733+ ("emails" .=) <$> _useEmails,

4734+ ("recoveryPhone" .=) <$> _useRecoveryPhone,

4735+ ("ims" .=) <$> _useIms,

4676 ("keywords" .=) <$> _useKeywords,

4736 ("keywords" .=) <$> _useKeywords,

4677 ("isAdmin" .=) <$> _useIsAdmin,

4737 ("isAdmin" .=) <$> _useIsAdmin,

4678 ("isEnrolledIn2Sv" .=) <$> _useIsEnrolledIn2Sv,

4738 ("isEnrolledIn2Sv" .=) <$> _useIsEnrolledIn2Sv,

gogol-alertcenter/gen/Network/Google/AlertCenter.hs+12−17

@@ -127,22 +127,6 @@ module Network.Google.AlertCenter

127 , notification

127 , notification

128 , nCloudPubsubTopic

128 , nCloudPubsubTopic

129

129

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−

146 -- ** AccountWarning

130 -- ** AccountWarning

147 , AccountWarning

131 , AccountWarning

148 , accountWarning

132 , accountWarning

@@ -199,7 +183,6 @@ module Network.Google.AlertCenter

199 , aAlertId

183 , aAlertId

200 , aSecurityInvestigationToolLink

184 , aSecurityInvestigationToolLink

201 , aCustomerId

185 , aCustomerId

202− , aUpdateTime

203 , aEndTime

186 , aEndTime

204 , aSource

187 , aSource

205 , aDeleted

188 , aDeleted

@@ -211,6 +194,13 @@ module Network.Google.AlertCenter

211 , attachment

194 , attachment

212 , aCSV

195 , aCSV

213

196

197+ -- ** RequestInfo

198+ , RequestInfo

199+ , requestInfo

200+ , riNumberOfRequests

201+ , riAppDeveloperEmail

202+ , riAppName

203+

214 -- ** GoogleOperations

204 -- ** GoogleOperations

215 , GoogleOperations

205 , GoogleOperations

216 , googleOperations

206 , googleOperations

@@ -231,6 +221,11 @@ module Network.Google.AlertCenter

231 -- ** Xgafv

221 -- ** Xgafv

232 , Xgafv (..)

222 , Xgafv (..)

233

223

224+ -- ** AppMakerSQLSetupNotification

225+ , AppMakerSQLSetupNotification

226+ , appMakerSQLSetupNotification

227+ , amsqlsnRequestInfo

228+

234 -- ** DomainWideTakeoutInitiated

229 -- ** DomainWideTakeoutInitiated

235 , DomainWideTakeoutInitiated

230 , DomainWideTakeoutInitiated

236 , domainWideTakeoutInitiated

231 , domainWideTakeoutInitiated

gogol-alertcenter/gen/Network/Google/AlertCenter/Types.hs+12−17

@@ -94,22 +94,6 @@ module Network.Google.AlertCenter.Types

94 , notification

94 , notification

95 , nCloudPubsubTopic

95 , nCloudPubsubTopic

96

96

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−

113 -- * AccountWarning

97 -- * AccountWarning

114 , AccountWarning

98 , AccountWarning

115 , accountWarning

99 , accountWarning

@@ -166,7 +150,6 @@ module Network.Google.AlertCenter.Types

166 , aAlertId

150 , aAlertId

167 , aSecurityInvestigationToolLink

151 , aSecurityInvestigationToolLink

168 , aCustomerId

152 , aCustomerId

169− , aUpdateTime

170 , aEndTime

153 , aEndTime

171 , aSource

154 , aSource

172 , aDeleted

155 , aDeleted

@@ -178,6 +161,13 @@ module Network.Google.AlertCenter.Types

178 , attachment

161 , attachment

179 , aCSV

162 , aCSV

180

163

164+ -- * RequestInfo

165+ , RequestInfo

166+ , requestInfo

167+ , riNumberOfRequests

168+ , riAppDeveloperEmail

169+ , riAppName

170+

181 -- * GoogleOperations

171 -- * GoogleOperations

182 , GoogleOperations

172 , GoogleOperations

183 , googleOperations

173 , googleOperations

@@ -198,6 +188,11 @@ module Network.Google.AlertCenter.Types

198 -- * Xgafv

188 -- * Xgafv

199 , Xgafv (..)

189 , Xgafv (..)

200

190

191+ -- * AppMakerSQLSetupNotification

192+ , AppMakerSQLSetupNotification

193+ , appMakerSQLSetupNotification

194+ , amsqlsnRequestInfo

195+

201 -- * DomainWideTakeoutInitiated

196 -- * DomainWideTakeoutInitiated

202 , DomainWideTakeoutInitiated

197 , DomainWideTakeoutInitiated

203 , domainWideTakeoutInitiated

198 , domainWideTakeoutInitiated

gogol-alertcenter/gen/Network/Google/AlertCenter/Types/Product.hs+113−191

@@ -644,184 +644,6 @@ instance ToJSON Notification where

644 (catMaybes

644 (catMaybes

645 [("cloudPubsubTopic" .=) <$> _nCloudPubsubTopic])

645 [("cloudPubsubTopic" .=) <$> _nCloudPubsubTopic])

646

646

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−

825-- | Alerts for user account warning events.

647-- | Alerts for user account warning events.

826--

648--

827-- /See:/ 'accountWarning' smart constructor.

649-- /See:/ 'accountWarning' smart constructor.

@@ -1257,7 +1079,6 @@ data Alert =

1257 , _aAlertId :: !(Maybe Text)

1079 , _aAlertId :: !(Maybe Text)

1258 , _aSecurityInvestigationToolLink :: !(Maybe Text)

1080 , _aSecurityInvestigationToolLink :: !(Maybe Text)

1259 , _aCustomerId :: !(Maybe Text)

1081 , _aCustomerId :: !(Maybe Text)

1260− , _aUpdateTime :: !(Maybe DateTime')

1261 , _aEndTime :: !(Maybe DateTime')

1082 , _aEndTime :: !(Maybe DateTime')

1262 , _aSource :: !(Maybe Text)

1083 , _aSource :: !(Maybe Text)

1263 , _aDeleted :: !(Maybe Bool)

1084 , _aDeleted :: !(Maybe Bool)

@@ -1281,8 +1102,6 @@ data Alert =

1281--

1102--

1282-- * 'aCustomerId'

1103-- * 'aCustomerId'

1283--

1104--

1284−-- * 'aUpdateTime'

1285−--

1286-- * 'aEndTime'

1105-- * 'aEndTime'

1287--

1106--

1288-- * 'aSource'

1107-- * 'aSource'

@@ -1301,7 +1120,6 @@ alert =

1301 , _aAlertId = Nothing

1120 , _aAlertId = Nothing

1302 , _aSecurityInvestigationToolLink = Nothing

1121 , _aSecurityInvestigationToolLink = Nothing

1303 , _aCustomerId = Nothing

1122 , _aCustomerId = Nothing

1304− , _aUpdateTime = Nothing

1305 , _aEndTime = Nothing

1123 , _aEndTime = Nothing

1306 , _aSource = Nothing

1124 , _aSource = Nothing

1307 , _aDeleted = Nothing

1125 , _aDeleted = Nothing

@@ -1340,15 +1158,9 @@ aCustomerId :: Lens' Alert (Maybe Text)

1340aCustomerId

1158aCustomerId

1341 = lens _aCustomerId (\ s a -> s{_aCustomerId = a})

1159 = lens _aCustomerId (\ s a -> s{_aCustomerId = a})

1342

1160

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−

1349-- | Optional. The time the event that caused this alert ceased being active.

1161-- | Optional. The time the event that caused this alert ceased being active.

1350-- If provided, the end time must not be earlier than the start time. If

1162-- 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.

1352aEndTime :: Lens' Alert (Maybe UTCTime)

1164aEndTime :: Lens' Alert (Maybe UTCTime)

1353aEndTime

1165aEndTime

1354 = lens _aEndTime (\ s a -> s{_aEndTime = a}) .

1166 = lens _aEndTime (\ s a -> s{_aEndTime = a}) .

@@ -1387,7 +1199,6 @@ instance FromJSON Alert where

1387 (o .:? "alertId")

1199 (o .:? "alertId")

1388 <*> (o .:? "securityInvestigationToolLink")

1200 <*> (o .:? "securityInvestigationToolLink")

1389 <*> (o .:? "customerId")

1201 <*> (o .:? "customerId")

1390− <*> (o .:? "updateTime")

1391 <*> (o .:? "endTime")

1202 <*> (o .:? "endTime")

1392 <*> (o .:? "source")

1203 <*> (o .:? "source")

1393 <*> (o .:? "deleted")

1204 <*> (o .:? "deleted")

@@ -1403,7 +1214,6 @@ instance ToJSON Alert where

1403 ("securityInvestigationToolLink" .=) <$>

1214 ("securityInvestigationToolLink" .=) <$>

1404 _aSecurityInvestigationToolLink,

1215 _aSecurityInvestigationToolLink,

1405 ("customerId" .=) <$> _aCustomerId,

1216 ("customerId" .=) <$> _aCustomerId,

1406− ("updateTime" .=) <$> _aUpdateTime,

1407 ("endTime" .=) <$> _aEndTime,

1217 ("endTime" .=) <$> _aEndTime,

1408 ("source" .=) <$> _aSource,

1218 ("source" .=) <$> _aSource,

1409 ("deleted" .=) <$> _aDeleted, ("type" .=) <$> _aType,

1219 ("deleted" .=) <$> _aDeleted, ("type" .=) <$> _aType,

@@ -1442,6 +1252,76 @@ instance ToJSON Attachment where

1442 toJSON Attachment'{..}

1252 toJSON Attachment'{..}

1443 = object (catMaybes [("csv" .=) <$> _aCSV])

1253 = object (catMaybes [("csv" .=) <$> _aCSV])

1444

1254

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+

1445-- | An incident reported by Google Operations for a G Suite application.

1325-- | An incident reported by Google Operations for a G Suite application.

1446--

1326--

1447-- /See:/ 'googleOperations' smart constructor.

1327-- /See:/ 'googleOperations' smart constructor.

@@ -1572,6 +1452,48 @@ instance ToJSON SuspiciousActivity where

1572 [("email" .=) <$> _saEmail,

1452 [("email" .=) <$> _saEmail,

1573 ("events" .=) <$> _saEvents])

1453 ("events" .=) <$> _saEvents])

1574

1454

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+

1575-- | A takeout operation for the entire domain was initiated by an admin.

1497-- | A takeout operation for the entire domain was initiated by an admin.

1576-- Derived from audit logs.

1498-- Derived from audit logs.

1577--

1499--

gogol-alertcenter/gen/Network/Google/Resource/AlertCenter/Alerts/List.hs+2−2

@@ -138,8 +138,8 @@ alUploadProtocol

138-- | Optional. The sort order of the list results. If not specified results

138-- | Optional. The sort order of the list results. If not specified results

139-- may be returned in arbitrary order. You can sort the results in

139-- may be returned in arbitrary order. You can sort the results in

140-- descending order based on the creation timestamp using

140-- descending order based on the creation timestamp using

141−-- \`order_by=\"create_time desc\"\`. Currently, supported sorting are

141+-- \`order_by=\"create_time desc\"\`. Currently, only sorting by

142−-- \`create_time asc\`, \`create_time desc\`, \`update_time desc\`

142+-- \`create_time desc\` is supported.

143alOrderBy :: Lens' AlertsList (Maybe Text)

143alOrderBy :: Lens' AlertsList (Maybe Text)

144alOrderBy

144alOrderBy

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

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

gogol-analyticsreporting/gen/Network/Google/AnalyticsReporting.hs+1−142

@@ -33,9 +33,6 @@ module Network.Google.AnalyticsReporting

33 -- ** analyticsreporting.reports.batchGet

33 -- ** analyticsreporting.reports.batchGet

34 , module Network.Google.Resource.AnalyticsReporting.Reports.BatchGet

34 , module Network.Google.Resource.AnalyticsReporting.Reports.BatchGet

35

35

36− -- ** analyticsreporting.userActivity.search

37− , module Network.Google.Resource.AnalyticsReporting.UserActivity.Search

38−

39 -- * Types

36 -- * Types

40

37

41 -- ** MetricFilter

38 -- ** MetricFilter

@@ -46,15 +43,6 @@ module Network.Google.AnalyticsReporting

46 , mfMetricName

43 , mfMetricName

47 , mfComparisonValue

44 , mfComparisonValue

48

45

49− -- ** EventData

50− , EventData

51− , eventData

52− , edEventCategory

53− , edEventCount

54− , edEventValue

55− , edEventLabel

56− , edEventAction

57−

58 -- ** MetricFilterOperator

46 -- ** MetricFilterOperator

59 , MetricFilterOperator (..)

47 , MetricFilterOperator (..)

60

48

@@ -103,11 +91,6 @@ module Network.Google.AnalyticsReporting

103 , mheName

91 , mheName

104 , mheType

92 , mheType

105

93

106− -- ** GoalSetData

107− , GoalSetData

108− , goalSetData

109− , gsdGoals

110−

111 -- ** CohortGroup

94 -- ** CohortGroup

112 , CohortGroup

95 , CohortGroup

113 , cohortGroup

96 , cohortGroup

@@ -156,16 +139,6 @@ module Network.Google.AnalyticsReporting

156 , phTotalPivotGroupsCount

139 , phTotalPivotGroupsCount

157 , phPivotHeaderEntries

140 , phPivotHeaderEntries

158

141

159− -- ** SearchUserActivityRequest

160− , SearchUserActivityRequest

161− , searchUserActivityRequest

162− , suarViewId

163− , suarDateRange

164− , suarUser

165− , suarPageToken

166− , suarPageSize

167− , suarActivityTypes

168−

169 -- ** MetricHeader

142 -- ** MetricHeader

170 , MetricHeader

143 , MetricHeader

171 , metricHeader

144 , metricHeader

@@ -195,15 +168,6 @@ module Network.Google.AnalyticsReporting

195 , rData

168 , rData

196 , rColumnHeader

169 , rColumnHeader

197

170

198− -- ** PageviewData

199− , PageviewData

200− , pageviewData

201− , pdPageTitle

202− , pdPagePath

203−

204− -- ** EcommerceDataActionType

205− , EcommerceDataActionType (..)

206−

207 -- ** ReportData

171 -- ** ReportData

208 , ReportData

172 , ReportData

209 , reportData

173 , reportData

@@ -243,12 +207,6 @@ module Network.Google.AnalyticsReporting

243 -- ** OrderBySortOrder

207 -- ** OrderBySortOrder

244 , OrderBySortOrder (..)

208 , OrderBySortOrder (..)

245

209

246− -- ** User

247− , User

248− , user

249− , uUserId

250− , uType

251−

252 -- ** Pivot

210 -- ** Pivot

253 , Pivot

211 , Pivot

254 , pivot

212 , pivot

@@ -258,14 +216,6 @@ module Network.Google.AnalyticsReporting

258 , pDimensions

216 , pDimensions

259 , pDimensionFilterClauses

217 , pDimensionFilterClauses

260

218

261− -- ** TransactionData

262− , TransactionData

263− , transactionData

264− , tdTransactionId

265− , tdTransactionTax

266− , tdTransactionShipping

267− , tdTransactionRevenue

268−

269 -- ** SequenceSegment

219 -- ** SequenceSegment

270 , SequenceSegment

220 , SequenceSegment

271 , sequenceSegment

221 , sequenceSegment

@@ -306,50 +256,9 @@ module Network.Google.AnalyticsReporting

306 , grrUseResourceQuotas

256 , grrUseResourceQuotas

307 , grrReportRequests

257 , grrReportRequests

308

258

309− -- ** UserActivitySession

310− , UserActivitySession

311− , userActivitySession

312− , uasPlatform

313− , uasDeviceCategory

314− , uasActivities

315− , uasSessionDate

316− , uasDataSource

317− , uasSessionId

318−

319 -- ** SegmentSequenceStepMatchType

259 -- ** SegmentSequenceStepMatchType

320 , SegmentSequenceStepMatchType (..)

260 , SegmentSequenceStepMatchType (..)

321

261

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−

353 -- ** Cohort

262 -- ** Cohort

354 , Cohort

263 , Cohort

355 , cohort

264 , cohort

@@ -360,17 +269,6 @@ module Network.Google.AnalyticsReporting

360 -- ** SegmentMetricFilterScope

269 -- ** SegmentMetricFilterScope

361 , SegmentMetricFilterScope (..)

270 , SegmentMetricFilterScope (..)

362

271

363− -- ** EcommerceData

364− , EcommerceData

365− , ecommerceData

366− , edEcommerceType

367− , edTransaction

368− , edProducts

369− , edActionType

370−

371− -- ** EcommerceDataEcommerceType

372− , EcommerceDataEcommerceType (..)

373−

374 -- ** DimensionFilter

272 -- ** DimensionFilter

375 , DimensionFilter

273 , DimensionFilter

376 , dimensionFilter

274 , dimensionFilter

@@ -390,32 +288,15 @@ module Network.Google.AnalyticsReporting

390 -- ** DimensionFilterOperator

288 -- ** DimensionFilterOperator

391 , DimensionFilterOperator (..)

289 , DimensionFilterOperator (..)

392

290

393− -- ** ActivityActivityType

394− , ActivityActivityType (..)

395−

396 -- ** MetricFormattingType

291 -- ** MetricFormattingType

397 , MetricFormattingType (..)

292 , MetricFormattingType (..)

398

293

399− -- ** CustomDimension

400− , CustomDimension

401− , customDimension

402− , cdValue

403− , cdIndex

404−

405 -- ** Segment

294 -- ** Segment

406 , Segment

295 , Segment

407 , segment

296 , segment

408 , sDynamicSegment

297 , sDynamicSegment

409 , sSegmentId

298 , sSegmentId

410

299

411− -- ** ProductData

412− , ProductData

413− , productData

414− , pdProductName

415− , pdProductSKU

416− , pdItemRevenue

417− , pdProductQuantity

418−

419 -- ** SegmentDimensionFilterOperator

300 -- ** SegmentDimensionFilterOperator

420 , SegmentDimensionFilterOperator (..)

301 , SegmentDimensionFilterOperator (..)

421

302

@@ -451,42 +332,20 @@ module Network.Google.AnalyticsReporting

451 -- ** MetricFilterClauseOperator

332 -- ** MetricFilterClauseOperator

452 , MetricFilterClauseOperator (..)

333 , MetricFilterClauseOperator (..)

453

334

454− -- ** UserType

455− , UserType (..)

456−

457 -- ** ColumnHeader

335 -- ** ColumnHeader

458 , ColumnHeader

336 , ColumnHeader

459 , columnHeader

337 , columnHeader

460 , chMetricHeader

338 , chMetricHeader

461 , chDimensions

339 , 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

478 ) where

340 ) where

479

341

480import Network.Google.AnalyticsReporting.Types

342import Network.Google.AnalyticsReporting.Types

481import Network.Google.Prelude

343import Network.Google.Prelude

482import Network.Google.Resource.AnalyticsReporting.Reports.BatchGet

344import Network.Google.Resource.AnalyticsReporting.Reports.BatchGet

483−import Network.Google.Resource.AnalyticsReporting.UserActivity.Search

484

345

485{- $resources

346{- $resources

486TODO

347TODO

487-}

348-}

488

349

489-- | Represents the entirety of the methods and resources available for the Analytics Reporting API service.

350-- | Represents the entirety of the methods and resources available for the Analytics Reporting API service.

490−type AnalyticsReportingAPI =

351+type AnalyticsReportingAPI = ReportsBatchGetResource

491− ReportsBatchGetResource :<|>

492− UserActivitySearchResource

gogol-analyticsreporting/gen/Network/Google/AnalyticsReporting/Types.hs−135

@@ -31,15 +31,6 @@ module Network.Google.AnalyticsReporting.Types

31 , mfMetricName

31 , mfMetricName

32 , mfComparisonValue

32 , mfComparisonValue

33

33

34− -- * EventData

35− , EventData

36− , eventData

37− , edEventCategory

38− , edEventCount

39− , edEventValue

40− , edEventLabel

41− , edEventAction

42−

43 -- * MetricFilterOperator

34 -- * MetricFilterOperator

44 , MetricFilterOperator (..)

35 , MetricFilterOperator (..)

45

36

@@ -88,11 +79,6 @@ module Network.Google.AnalyticsReporting.Types

88 , mheName

79 , mheName

89 , mheType

80 , mheType

90

81

91− -- * GoalSetData

92− , GoalSetData

93− , goalSetData

94− , gsdGoals

95−

96 -- * CohortGroup

82 -- * CohortGroup

97 , CohortGroup

83 , CohortGroup

98 , cohortGroup

84 , cohortGroup

@@ -141,16 +127,6 @@ module Network.Google.AnalyticsReporting.Types

141 , phTotalPivotGroupsCount

127 , phTotalPivotGroupsCount

142 , phPivotHeaderEntries

128 , phPivotHeaderEntries

143

129

144− -- * SearchUserActivityRequest

145− , SearchUserActivityRequest

146− , searchUserActivityRequest

147− , suarViewId

148− , suarDateRange

149− , suarUser

150− , suarPageToken

151− , suarPageSize

152− , suarActivityTypes

153−

154 -- * MetricHeader

130 -- * MetricHeader

155 , MetricHeader

131 , MetricHeader

156 , metricHeader

132 , metricHeader

@@ -180,15 +156,6 @@ module Network.Google.AnalyticsReporting.Types

180 , rData

156 , rData

181 , rColumnHeader

157 , rColumnHeader

182

158

183− -- * PageviewData

184− , PageviewData

185− , pageviewData

186− , pdPageTitle

187− , pdPagePath

188−

189− -- * EcommerceDataActionType

190− , EcommerceDataActionType (..)

191−

192 -- * ReportData

159 -- * ReportData

193 , ReportData

160 , ReportData

194 , reportData

161 , reportData

@@ -228,12 +195,6 @@ module Network.Google.AnalyticsReporting.Types

228 -- * OrderBySortOrder

195 -- * OrderBySortOrder

229 , OrderBySortOrder (..)

196 , OrderBySortOrder (..)

230

197

231− -- * User

232− , User

233− , user

234− , uUserId

235− , uType

236−

237 -- * Pivot

198 -- * Pivot

238 , Pivot

199 , Pivot

239 , pivot

200 , pivot

@@ -243,14 +204,6 @@ module Network.Google.AnalyticsReporting.Types

243 , pDimensions

204 , pDimensions

244 , pDimensionFilterClauses

205 , pDimensionFilterClauses

245

206

246− -- * TransactionData

247− , TransactionData

248− , transactionData

249− , tdTransactionId

250− , tdTransactionTax

251− , tdTransactionShipping

252− , tdTransactionRevenue

253−

254 -- * SequenceSegment

207 -- * SequenceSegment

255 , SequenceSegment

208 , SequenceSegment

256 , sequenceSegment

209 , sequenceSegment

@@ -291,50 +244,9 @@ module Network.Google.AnalyticsReporting.Types

291 , grrUseResourceQuotas

244 , grrUseResourceQuotas

292 , grrReportRequests

245 , grrReportRequests

293

246

294− -- * UserActivitySession

295− , UserActivitySession

296− , userActivitySession

297− , uasPlatform

298− , uasDeviceCategory

299− , uasActivities

300− , uasSessionDate

301− , uasDataSource

302− , uasSessionId

303−

304 -- * SegmentSequenceStepMatchType

247 -- * SegmentSequenceStepMatchType

305 , SegmentSequenceStepMatchType (..)

248 , SegmentSequenceStepMatchType (..)

306

249

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−

338 -- * Cohort

250 -- * Cohort

339 , Cohort

251 , Cohort

340 , cohort

252 , cohort

@@ -345,17 +257,6 @@ module Network.Google.AnalyticsReporting.Types

345 -- * SegmentMetricFilterScope

257 -- * SegmentMetricFilterScope

346 , SegmentMetricFilterScope (..)

258 , SegmentMetricFilterScope (..)

347

259

348− -- * EcommerceData

349− , EcommerceData

350− , ecommerceData

351− , edEcommerceType

352− , edTransaction

353− , edProducts

354− , edActionType

355−

356− -- * EcommerceDataEcommerceType

357− , EcommerceDataEcommerceType (..)

358−

359 -- * DimensionFilter

260 -- * DimensionFilter

360 , DimensionFilter

261 , DimensionFilter

361 , dimensionFilter

262 , dimensionFilter

@@ -375,32 +276,15 @@ module Network.Google.AnalyticsReporting.Types

375 -- * DimensionFilterOperator

276 -- * DimensionFilterOperator

376 , DimensionFilterOperator (..)

277 , DimensionFilterOperator (..)

377

278

378− -- * ActivityActivityType

379− , ActivityActivityType (..)

380−

381 -- * MetricFormattingType

279 -- * MetricFormattingType

382 , MetricFormattingType (..)

280 , MetricFormattingType (..)

383

281

384− -- * CustomDimension

385− , CustomDimension

386− , customDimension

387− , cdValue

388− , cdIndex

389−

390 -- * Segment

282 -- * Segment

391 , Segment

283 , Segment

392 , segment

284 , segment

393 , sDynamicSegment

285 , sDynamicSegment

394 , sSegmentId

286 , sSegmentId

395

287

396− -- * ProductData

397− , ProductData

398− , productData

399− , pdProductName

400− , pdProductSKU

401− , pdItemRevenue

402− , pdProductQuantity

403−

404 -- * SegmentDimensionFilterOperator

288 -- * SegmentDimensionFilterOperator

405 , SegmentDimensionFilterOperator (..)

289 , SegmentDimensionFilterOperator (..)

406

290

@@ -436,30 +320,11 @@ module Network.Google.AnalyticsReporting.Types

436 -- * MetricFilterClauseOperator

320 -- * MetricFilterClauseOperator

437 , MetricFilterClauseOperator (..)

321 , MetricFilterClauseOperator (..)

438

322

439− -- * UserType

440− , UserType (..)

441−

442 -- * ColumnHeader

323 -- * ColumnHeader

443 , ColumnHeader

324 , ColumnHeader

444 , columnHeader

325 , columnHeader

445 , chMetricHeader

326 , chMetricHeader

446 , chDimensions

327 , 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

463 ) where

328 ) where

464

329

465import Network.Google.AnalyticsReporting.Types.Product

330import Network.Google.AnalyticsReporting.Types.Product

gogol-analyticsreporting/gen/Network/Google/AnalyticsReporting/Types/Product.hs−1237

@@ -100,94 +100,6 @@ instance ToJSON MetricFilter where

100 ("metricName" .=) <$> _mfMetricName,

100 ("metricName" .=) <$> _mfMetricName,

101 ("comparisonValue" .=) <$> _mfComparisonValue])

101 ("comparisonValue" .=) <$> _mfComparisonValue])

102

102

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−

191-- | A row in the report.

103-- | A row in the report.

192--

104--

193-- /See:/ 'reportRow' smart constructor.

105-- /See:/ 'reportRow' smart constructor.

@@ -686,42 +598,6 @@ instance ToJSON MetricHeaderEntry where

686 (catMaybes

598 (catMaybes

687 [("name" .=) <$> _mheName, ("type" .=) <$> _mheType])

599 [("name" .=) <$> _mheName, ("type" .=) <$> _mheType])

688

600

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−

725-- | Defines a cohort group. For example: \"cohortGroup\": { \"cohorts\": [{

601-- | Defines a cohort group. For example: \"cohortGroup\": { \"cohorts\": [{

726-- \"name\": \"cohort 1\", \"type\": \"FIRST_VISIT_DATE\", \"dateRange\": {

602-- \"name\": \"cohort 1\", \"type\": \"FIRST_VISIT_DATE\", \"dateRange\": {

727-- \"startDate\": \"2015-08-01\", \"endDate\": \"2015-08-01\" } },{

603-- \"startDate\": \"2015-08-01\", \"endDate\": \"2015-08-01\" } },{

@@ -1140,123 +1016,6 @@ instance ToJSON PivotHeader where

1140 _phTotalPivotGroupsCount,

1016 _phTotalPivotGroupsCount,

1141 ("pivotHeaderEntries" .=) <$> _phPivotHeaderEntries])

1017 ("pivotHeaderEntries" .=) <$> _phPivotHeaderEntries])

1142

1018

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−

1260-- | The headers for the metrics.

1019-- | The headers for the metrics.

1261--

1020--

1262-- /See:/ 'metricHeader' smart constructor.

1021-- /See:/ 'metricHeader' smart constructor.

@@ -1495,53 +1254,6 @@ instance ToJSON Report where

1495 ("data" .=) <$> _rData,

1254 ("data" .=) <$> _rData,

1496 ("columnHeader" .=) <$> _rColumnHeader])

1255 ("columnHeader" .=) <$> _rColumnHeader])

1497

1256

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−

1545-- | The data part of the report.

1257-- | The data part of the report.

1546--

1258--

1547-- /See:/ 'reportData' smart constructor.

1259-- /See:/ 'reportData' smart constructor.

@@ -1919,50 +1631,6 @@ instance ToJSON SegmentDefinition where

1919 (catMaybes

1631 (catMaybes

1920 [("segmentFilters" .=) <$> _sdSegmentFilters])

1632 [("segmentFilters" .=) <$> _sdSegmentFilters])

1921

1633

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−

1966-- | The Pivot describes the pivot section in the request. The Pivot helps

1634-- | The Pivot describes the pivot section in the request. The Pivot helps

1967-- rearrange the information in the table for certain reports by pivoting

1635-- rearrange the information in the table for certain reports by pivoting

1968-- your data on a second dimension.

1636-- your data on a second dimension.

@@ -2081,89 +1749,6 @@ instance ToJSON Pivot where

2081 ("dimensionFilterClauses" .=) <$>

1749 ("dimensionFilterClauses" .=) <$>

2082 _pDimensionFilterClauses])

1750 _pDimensionFilterClauses])

2083

1751

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−

2167-- | Sequence conditions consist of one or more steps, where each step is

1752-- | Sequence conditions consist of one or more steps, where each step is

2168-- defined by one or more dimension\/metric conditions. Multiple steps can

1753-- defined by one or more dimension\/metric conditions. Multiple steps can

2169-- be combined with special sequence operators.

1754-- be combined with special sequence operators.

@@ -2453,462 +2038,6 @@ instance ToJSON GetReportsRequest where

2453 [("useResourceQuotas" .=) <$> _grrUseResourceQuotas,

2038 [("useResourceQuotas" .=) <$> _grrUseResourceQuotas,

2454 ("reportRequests" .=) <$> _grrReportRequests])

2039 ("reportRequests" .=) <$> _grrReportRequests])

2455

2040

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−

2912-- | Defines a cohort. A cohort is a group of users who share a common

2041-- | Defines a cohort. A cohort is a group of users who share a common

2913-- characteristic. For example, all users with the same acquisition date

2042-- characteristic. For example, all users with the same acquisition date

2914-- belong to the same cohort.

2043-- belong to the same cohort.

@@ -2977,83 +2106,6 @@ instance ToJSON Cohort where

2977 [("dateRange" .=) <$> _cDateRange,

2106 [("dateRange" .=) <$> _cDateRange,

2978 ("name" .=) <$> _cName, ("type" .=) <$> _cType])

2107 ("name" .=) <$> _cName, ("type" .=) <$> _cType])

2979

2108

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−

3057-- | Dimension filter specifies the filtering options on a dimension.

2109-- | Dimension filter specifies the filtering options on a dimension.

3058--

2110--

3059-- /See:/ 'dimensionFilter' smart constructor.

2111-- /See:/ 'dimensionFilter' smart constructor.

@@ -3217,54 +2269,6 @@ instance ToJSON GetReportsResponse where

3217 _grrResourceQuotasRemaining,

2269 _grrResourceQuotasRemaining,

3218 ("queryCost" .=) <$> _grrQueryCost])

2270 ("queryCost" .=) <$> _grrQueryCost])

3219

2271

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−

3268-- | The segment definition, if the report needs to be segmented. A Segment

2272-- | The segment definition, if the report needs to be segmented. A Segment

3269-- is a subset of the Analytics data. For example, of the entire set of

2273-- is a subset of the Analytics data. For example, of the entire set of

3270-- users, one Segment might be users from a particular country or city.

2274-- users, one Segment might be users from a particular country or city.

@@ -3316,85 +2320,6 @@ instance ToJSON Segment where

3316 [("dynamicSegment" .=) <$> _sDynamicSegment,

2320 [("dynamicSegment" .=) <$> _sDynamicSegment,

3317 ("segmentId" .=) <$> _sSegmentId])

2321 ("segmentId" .=) <$> _sSegmentId])

3318

2322

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−

3398-- | The resource quota tokens remaining for the property after the request

2323-- | The resource quota tokens remaining for the property after the request

3399-- is completed.

2324-- is completed.

3400--

2325--

@@ -3722,165 +2647,3 @@ instance ToJSON ColumnHeader where

3722 (catMaybes

2647 (catMaybes

3723 [("metricHeader" .=) <$> _chMetricHeader,

2648 [("metricHeader" .=) <$> _chMetricHeader,

3724 ("dimensions" .=) <$> _chDimensions])

2649 ("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

190instance ToJSON OrderByOrderType where

190instance ToJSON OrderByOrderType where

191 toJSON = toJSONText

191 toJSON = toJSONText

192

192

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−

257-- | The sorting order for the field.

193-- | The sorting order for the field.

258data OrderBySortOrder

194data OrderBySortOrder

259 = SortOrderUnspecified

195 = SortOrderUnspecified

@@ -501,21 +437,21 @@ instance ToJSON SegmentSequenceStepMatchType where

501-- scope as defined in the data model. The primary scope is defined by if

437-- scope as defined in the data model. The primary scope is defined by if

502-- the segment is selecting users or sessions.

438-- the segment is selecting users or sessions.

503data SegmentMetricFilterScope

439data SegmentMetricFilterScope

504− = SMFSUnspecifiedScope

440+ = UnspecifiedScope

505 -- ^ @UNSPECIFIED_SCOPE@

441 -- ^ @UNSPECIFIED_SCOPE@

506 -- If the scope is unspecified, it defaults to the condition scope,

442 -- If the scope is unspecified, it defaults to the condition scope,

507 -- \`USER\` or \`SESSION\` depending on if the segment is trying to choose

443 -- \`USER\` or \`SESSION\` depending on if the segment is trying to choose

508 -- users or sessions.

444 -- users or sessions.

509− | SMFSProduct

445+ | Product

510 -- ^ @PRODUCT@

446 -- ^ @PRODUCT@

511 -- Product scope.

447 -- Product scope.

512− | SMFSHit

448+ | Hit

513 -- ^ @HIT@

449 -- ^ @HIT@

514 -- Hit scope.

450 -- Hit scope.

515− | SMFSSession

451+ | Session

516 -- ^ @SESSION@

452 -- ^ @SESSION@

517 -- Session scope.

453 -- Session scope.

518− | SMFSUser

454+ | User

519 -- ^ @USER@

455 -- ^ @USER@

520 -- User scope.

456 -- User scope.

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

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

@@ -524,20 +460,20 @@ instance Hashable SegmentMetricFilterScope

524

460

525instance FromHttpApiData SegmentMetricFilterScope where

461instance FromHttpApiData SegmentMetricFilterScope where

526 parseQueryParam = \case

462 parseQueryParam = \case

527− "UNSPECIFIED_SCOPE" -> Right SMFSUnspecifiedScope

463+ "UNSPECIFIED_SCOPE" -> Right UnspecifiedScope

528− "PRODUCT" -> Right SMFSProduct

464+ "PRODUCT" -> Right Product

529− "HIT" -> Right SMFSHit

465+ "HIT" -> Right Hit

530− "SESSION" -> Right SMFSSession

466+ "SESSION" -> Right Session

531− "USER" -> Right SMFSUser

467+ "USER" -> Right User

532 x -> Left ("Unable to parse SegmentMetricFilterScope from: " <> x)

468 x -> Left ("Unable to parse SegmentMetricFilterScope from: " <> x)

533

469

534instance ToHttpApiData SegmentMetricFilterScope where

470instance ToHttpApiData SegmentMetricFilterScope where

535 toQueryParam = \case

471 toQueryParam = \case

536− SMFSUnspecifiedScope -> "UNSPECIFIED_SCOPE"

472+ UnspecifiedScope -> "UNSPECIFIED_SCOPE"

537− SMFSProduct -> "PRODUCT"

473+ Product -> "PRODUCT"

538− SMFSHit -> "HIT"

474+ Hit -> "HIT"

539− SMFSSession -> "SESSION"

475+ Session -> "SESSION"

540− SMFSUser -> "USER"

476+ User -> "USER"

541

477

542instance FromJSON SegmentMetricFilterScope where

478instance FromJSON SegmentMetricFilterScope where

543 parseJSON = parseJSONText "SegmentMetricFilterScope"

479 parseJSON = parseJSONText "SegmentMetricFilterScope"

@@ -545,40 +481,6 @@ instance FromJSON SegmentMetricFilterScope where

545instance ToJSON SegmentMetricFilterScope where

481instance ToJSON SegmentMetricFilterScope where

546 toJSON = toJSONText

482 toJSON = toJSONText

547

483

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−

582-- | How to match the dimension to the expression. The default is REGEXP.

484-- | How to match the dimension to the expression. The default is REGEXP.

583data DimensionFilterOperator

485data DimensionFilterOperator

584 = DFOOperatorUnspecified

486 = DFOOperatorUnspecified

@@ -661,57 +563,6 @@ instance FromJSON DimensionFilterOperator where

661instance ToJSON DimensionFilterOperator where

563instance ToJSON DimensionFilterOperator where

662 toJSON = toJSONText

564 toJSON = toJSONText

663

565

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−

715-- | Specifies how the metric expression should be formatted, for example

566-- | Specifies how the metric expression should be formatted, for example

716-- \`INTEGER\`.

567-- \`INTEGER\`.

717data MetricFormattingType

568data MetricFormattingType

@@ -878,40 +729,3 @@ instance FromJSON MetricFilterClauseOperator where

878

729

879instance ToJSON MetricFilterClauseOperator where

730instance ToJSON MetricFilterClauseOperator where

880 toJSON = toJSONText

731 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

36 Network.Google.AnalyticsReporting

36 Network.Google.AnalyticsReporting

37 , Network.Google.AnalyticsReporting.Types

37 , Network.Google.AnalyticsReporting.Types

38 , Network.Google.Resource.AnalyticsReporting.Reports.BatchGet

38 , Network.Google.Resource.AnalyticsReporting.Reports.BatchGet

39− , Network.Google.Resource.AnalyticsReporting.UserActivity.Search

40

39

41 other-modules:

40 other-modules:

42 Network.Google.AnalyticsReporting.Types.Product

41 Network.Google.AnalyticsReporting.Types.Product

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise.hs+11−1

@@ -83,6 +83,9 @@ module Network.Google.AndroidEnterprise

83 -- ** androidenterprise.enterprises.setAccount

83 -- ** androidenterprise.enterprises.setAccount

84 , module Network.Google.Resource.AndroidEnterprise.Enterprises.SetAccount

84 , module Network.Google.Resource.AndroidEnterprise.Enterprises.SetAccount

85

85

86+ -- ** androidenterprise.enterprises.setAndroidDevicePolicyConfig

87+ , module Network.Google.Resource.AndroidEnterprise.Enterprises.SetAndroidDevicePolicyConfig

88+

86 -- ** androidenterprise.enterprises.setStoreLayout

89 -- ** androidenterprise.enterprises.setStoreLayout

87 , module Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

90 , module Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

88

91

@@ -504,7 +507,6 @@ module Network.Google.AndroidEnterprise

504 , ProductPolicy

507 , ProductPolicy

505 , productPolicy

508 , productPolicy

506 , ppTracks

509 , ppTracks

507− , ppManagedConfiguration

508 , ppTrackIds

510 , ppTrackIds

509 , ppAutoInstallPolicy

511 , ppAutoInstallPolicy

510 , ppProductId

512 , ppProductId

@@ -563,6 +565,12 @@ module Network.Google.AndroidEnterprise

563 , gllrGroupLicense

565 , gllrGroupLicense

564 , gllrKind

566 , gllrKind

565

567

568+ -- ** AndroidDevicePolicyConfig

569+ , AndroidDevicePolicyConfig

570+ , androidDevicePolicyConfig

571+ , adpcState

572+ , adpcKind

573+

566 -- ** ProductSet

574 -- ** ProductSet

567 , ProductSet

575 , ProductSet

568 , productSet

576 , productSet

@@ -901,6 +909,7 @@ import Network.Google.Resource.AndroidEnterprise.Enterprises.List

901import Network.Google.Resource.AndroidEnterprise.Enterprises.PullNotificationSet

909import Network.Google.Resource.AndroidEnterprise.Enterprises.PullNotificationSet

902import Network.Google.Resource.AndroidEnterprise.Enterprises.SendTestPushNotification

910import Network.Google.Resource.AndroidEnterprise.Enterprises.SendTestPushNotification

903import Network.Google.Resource.AndroidEnterprise.Enterprises.SetAccount

911import Network.Google.Resource.AndroidEnterprise.Enterprises.SetAccount

912+import Network.Google.Resource.AndroidEnterprise.Enterprises.SetAndroidDevicePolicyConfig

904import Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

913import Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

905import Network.Google.Resource.AndroidEnterprise.Enterprises.Unenroll

914import Network.Google.Resource.AndroidEnterprise.Enterprises.Unenroll

906import Network.Google.Resource.AndroidEnterprise.Entitlements.Delete

915import Network.Google.Resource.AndroidEnterprise.Entitlements.Delete

@@ -1014,6 +1023,7 @@ type AndroidEnterpriseAPI =

1014 :<|> EnterprisesListResource

1023 :<|> EnterprisesListResource

1015 :<|> EnterprisesUnenrollResource

1024 :<|> EnterprisesUnenrollResource

1016 :<|> EnterprisesGetStoreLayoutResource

1025 :<|> EnterprisesGetStoreLayoutResource

1026+ :<|> EnterprisesSetAndroidDevicePolicyConfigResource

1017 :<|> EnterprisesSetAccountResource

1027 :<|> EnterprisesSetAccountResource

1018 :<|> EnterprisesEnrollResource

1028 :<|> EnterprisesEnrollResource

1019 :<|> EnterprisesGetResource

1029 :<|> EnterprisesGetResource

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types.hs+6−1

@@ -240,7 +240,6 @@ module Network.Google.AndroidEnterprise.Types

240 , ProductPolicy

240 , ProductPolicy

241 , productPolicy

241 , productPolicy

242 , ppTracks

242 , ppTracks

243− , ppManagedConfiguration

244 , ppTrackIds

243 , ppTrackIds

245 , ppAutoInstallPolicy

244 , ppAutoInstallPolicy

246 , ppProductId

245 , ppProductId

@@ -299,6 +298,12 @@ module Network.Google.AndroidEnterprise.Types

299 , gllrGroupLicense

298 , gllrGroupLicense

300 , gllrKind

299 , gllrKind

301

300

301+ -- * AndroidDevicePolicyConfig

302+ , AndroidDevicePolicyConfig

303+ , androidDevicePolicyConfig

304+ , adpcState

305+ , adpcKind

306+

302 -- * ProductSet

307 -- * ProductSet

303 , ProductSet

308 , ProductSet

304 , productSet

309 , productSet

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Product.hs+63−36

@@ -2196,11 +2196,10 @@ instance ToJSON AppRestrictionsSchemaRestriction

2196-- /See:/ 'productPolicy' smart constructor.

2196-- /See:/ 'productPolicy' smart constructor.

2197data ProductPolicy =

2197data ProductPolicy =

2198 ProductPolicy'

2198 ProductPolicy'

2199− { _ppTracks :: !(Maybe [Text])

2199+ { _ppTracks :: !(Maybe [Text])

2200− , _ppManagedConfiguration :: !(Maybe ManagedConfiguration)

2201− , _ppTrackIds :: !(Maybe [Text])

2200+ , _ppTrackIds :: !(Maybe [Text])

2202− , _ppAutoInstallPolicy :: !(Maybe AutoInstallPolicy)

2201+ , _ppAutoInstallPolicy :: !(Maybe AutoInstallPolicy)

2203− , _ppProductId :: !(Maybe Text)

2202+ , _ppProductId :: !(Maybe Text)

2204 }

2203 }

2205 deriving (Eq, Show, Data, Typeable, Generic)

2204 deriving (Eq, Show, Data, Typeable, Generic)

2206

2205

@@ -2211,8 +2210,6 @@ data ProductPolicy =

2211--

2210--

2212-- * 'ppTracks'

2211-- * 'ppTracks'

2213--

2212--

2214−-- * 'ppManagedConfiguration'

2215−--

2216-- * 'ppTrackIds'

2213-- * 'ppTrackIds'

2217--

2214--

2218-- * 'ppAutoInstallPolicy'

2215-- * 'ppAutoInstallPolicy'

@@ -2223,7 +2220,6 @@ productPolicy

2223productPolicy =

2220productPolicy =

2224 ProductPolicy'

2221 ProductPolicy'

2225 { _ppTracks = Nothing

2222 { _ppTracks = Nothing

2226− , _ppManagedConfiguration = Nothing

2227 , _ppTrackIds = Nothing

2223 , _ppTrackIds = Nothing

2228 , _ppAutoInstallPolicy = Nothing

2224 , _ppAutoInstallPolicy = Nothing

2229 , _ppProductId = Nothing

2225 , _ppProductId = Nothing

@@ -2237,12 +2233,6 @@ ppTracks

2237 _Default

2233 _Default

2238 . _Coerce

2234 . _Coerce

2239

2235

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−

2246-- | Grants the device visibility to the specified product release track(s),

2236-- | Grants the device visibility to the specified product release track(s),

2247-- identified by trackIds. The list of release tracks of a product can be

2237-- identified by trackIds. The list of release tracks of a product can be

2248-- obtained by calling Products.Get.

2238-- obtained by calling Products.Get.

@@ -2269,8 +2259,7 @@ instance FromJSON ProductPolicy where

2269 (\ o ->

2259 (\ o ->

2270 ProductPolicy' <$>

2260 ProductPolicy' <$>

2271 (o .:? "tracks" .!= mempty) <*>

2261 (o .:? "tracks" .!= mempty) <*>

2272− (o .:? "managedConfiguration")

2273− <*> (o .:? "trackIds" .!= mempty)

2262+ (o .:? "trackIds" .!= mempty)

2274 <*> (o .:? "autoInstallPolicy")

2263 <*> (o .:? "autoInstallPolicy")

2275 <*> (o .:? "productId"))

2264 <*> (o .:? "productId"))

2276

2265

@@ -2279,8 +2268,6 @@ instance ToJSON ProductPolicy where

2279 = object

2268 = object

2280 (catMaybes

2269 (catMaybes

2281 [("tracks" .=) <$> _ppTracks,

2270 [("tracks" .=) <$> _ppTracks,

2282− ("managedConfiguration" .=) <$>

2283− _ppManagedConfiguration,

2284 ("trackIds" .=) <$> _ppTrackIds,

2271 ("trackIds" .=) <$> _ppTrackIds,

2285 ("autoInstallPolicy" .=) <$> _ppAutoInstallPolicy,

2272 ("autoInstallPolicy" .=) <$> _ppAutoInstallPolicy,

2286 ("productId" .=) <$> _ppProductId])

2273 ("productId" .=) <$> _ppProductId])

@@ -2750,6 +2737,59 @@ instance ToJSON GroupLicensesListResponse where

2750 [("groupLicense" .=) <$> _gllrGroupLicense,

2737 [("groupLicense" .=) <$> _gllrGroupLicense,

2751 Just ("kind" .= _gllrKind)])

2738 Just ("kind" .= _gllrKind)])

2752

2739

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+

2753-- | A set of products.

2793-- | A set of products.

2754--

2794--

2755-- /See:/ 'productSet' smart constructor.

2795-- /See:/ 'productSet' smart constructor.

@@ -5805,10 +5845,7 @@ instance ToJSON ProductsListResponse where

5805 Just ("kind" .= _plrKind),

5845 Just ("kind" .= _plrKind),

5806 ("product" .=) <$> _plrProduct])

5846 ("product" .=) <$> _plrProduct])

5807

5847

5808−-- | A WebApps resource represents a web app created for an enterprise. Web

5848+-- | WebApp resource info.

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.

5812--

5849--

5813-- /See:/ 'webApp' smart constructor.

5850-- /See:/ 'webApp' smart constructor.

5814data WebApp =

5851data WebApp =

@@ -5855,9 +5892,7 @@ webApp =

5855 }

5892 }

5856

5893

5857

5894

5858−-- | The ID of the application. A string of the form \"app:\" where the

5895+-- | The ID of the application.

5859−-- package name always starts with the prefix

5860−-- \"com.google.enterprise.webapp.\" followed by a random id.

5861waWebAppId :: Lens' WebApp (Maybe Text)

5896waWebAppId :: Lens' WebApp (Maybe Text)

5862waWebAppId

5897waWebAppId

5863 = lens _waWebAppId (\ s a -> s{_waWebAppId = a})

5898 = lens _waWebAppId (\ s a -> s{_waWebAppId = a})

@@ -5884,15 +5919,7 @@ waStartURL :: Lens' WebApp (Maybe Text)

5884waStartURL

5919waStartURL

5885 = lens _waStartURL (\ s a -> s{_waStartURL = a})

5920 = lens _waStartURL (\ s a -> s{_waStartURL = a})

5886

5921

5887−-- | The display mode of the web app. Possible values include: -

5922+-- | The display mode of the web app.

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.

5896waDisplayMode :: Lens' WebApp (Maybe Text)

5923waDisplayMode :: Lens' WebApp (Maybe Text)

5897waDisplayMode

5924waDisplayMode

5898 = lens _waDisplayMode

5925 = lens _waDisplayMode

@@ -5904,8 +5931,8 @@ waIsPublished

5904 = lens _waIsPublished

5931 = lens _waIsPublished

5905 (\ s a -> s{_waIsPublished = a})

5932 (\ s a -> s{_waIsPublished = a})

5906

5933

5907−-- | The title of the web app as displayed to the user (e.g., amongst a list

5934+-- | The title of the web application as displayed to the user (e.g., amongst

5908−-- of other applications, or as a label for an icon).

5935+-- a list of other applications, or as a label for an icon).

5909waTitle :: Lens' WebApp (Maybe Text)

5936waTitle :: Lens' WebApp (Maybe Text)

5910waTitle = lens _waTitle (\ s a -> s{_waTitle = a})

5937waTitle = lens _waTitle (\ s a -> s{_waTitle = a})

5911

5938

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

53 , Network.Google.Resource.AndroidEnterprise.Enterprises.PullNotificationSet

53 , Network.Google.Resource.AndroidEnterprise.Enterprises.PullNotificationSet

54 , Network.Google.Resource.AndroidEnterprise.Enterprises.SendTestPushNotification

54 , Network.Google.Resource.AndroidEnterprise.Enterprises.SendTestPushNotification

55 , Network.Google.Resource.AndroidEnterprise.Enterprises.SetAccount

55 , Network.Google.Resource.AndroidEnterprise.Enterprises.SetAccount

56+ , Network.Google.Resource.AndroidEnterprise.Enterprises.SetAndroidDevicePolicyConfig

56 , Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

57 , Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

57 , Network.Google.Resource.AndroidEnterprise.Enterprises.Unenroll

58 , Network.Google.Resource.AndroidEnterprise.Enterprises.Unenroll

58 , Network.Google.Resource.AndroidEnterprise.Entitlements.Delete

59 , Network.Google.Resource.AndroidEnterprise.Entitlements.Delete

gogol-android-publisher/gen/Network/Google/AndroidPublisher.hs−7

@@ -410,18 +410,11 @@ module Network.Google.AndroidPublisher

410 , trStatus

410 , trStatus

411 , trReleaseNotes

411 , trReleaseNotes

412 , trUserFraction

412 , trUserFraction

413− , trCountryTargeting

414 , trName

413 , trName

415

414

416 -- ** EditsImagesListImageType

415 -- ** EditsImagesListImageType

417 , EditsImagesListImageType (..)

416 , EditsImagesListImageType (..)

418

417

419− -- ** CountryTargeting

420− , CountryTargeting

421− , countryTargeting

422− , ctIncludeRestOfWorld

423− , ctCountries

424−

425 -- ** Bundle

418 -- ** Bundle

426 , Bundle

419 , Bundle

427 , bundle

420 , bundle

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs−7

@@ -245,18 +245,11 @@ module Network.Google.AndroidPublisher.Types

245 , trStatus

245 , trStatus

246 , trReleaseNotes

246 , trReleaseNotes

247 , trUserFraction

247 , trUserFraction

248− , trCountryTargeting

249 , trName

248 , trName

250

249

251 -- * EditsImagesListImageType

250 -- * EditsImagesListImageType

252 , EditsImagesListImageType (..)

251 , EditsImagesListImageType (..)

253

252

254− -- * CountryTargeting

255− , CountryTargeting

256− , countryTargeting

257− , ctIncludeRestOfWorld

258− , ctCountries

259−

260 -- * Bundle

253 -- * Bundle

261 , Bundle

254 , Bundle

262 , bundle

255 , bundle

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+5−65

@@ -2088,12 +2088,11 @@ instance ToJSON ExternallyHostedAPK where

2088-- /See:/ 'trackRelease' smart constructor.

2088-- /See:/ 'trackRelease' smart constructor.

2089data TrackRelease =

2089data TrackRelease =

2090 TrackRelease'

2090 TrackRelease'

2091− { _trVersionCodes :: !(Maybe [Textual Int64])

2091+ { _trVersionCodes :: !(Maybe [Textual Int64])

2092− , _trStatus :: !(Maybe Text)

2092+ , _trStatus :: !(Maybe Text)

2093− , _trReleaseNotes :: !(Maybe [LocalizedText])

2093+ , _trReleaseNotes :: !(Maybe [LocalizedText])

2094− , _trUserFraction :: !(Maybe (Textual Double))

2094+ , _trUserFraction :: !(Maybe (Textual Double))

2095− , _trCountryTargeting :: !(Maybe CountryTargeting)

2096− , _trName :: !(Maybe Text)

2095+ , _trName :: !(Maybe Text)

2097 }

2096 }

2098 deriving (Eq, Show, Data, Typeable, Generic)

2097 deriving (Eq, Show, Data, Typeable, Generic)

2099

2098

@@ -2110,8 +2109,6 @@ data TrackRelease =

2110--

2109--

2111-- * 'trUserFraction'

2110-- * 'trUserFraction'

2112--

2111--

2113−-- * 'trCountryTargeting'

2114−--

2115-- * 'trName'

2112-- * 'trName'

2116trackRelease

2113trackRelease

2117 :: TrackRelease

2114 :: TrackRelease

@@ -2121,7 +2118,6 @@ trackRelease =

2121 , _trStatus = Nothing

2118 , _trStatus = Nothing

2122 , _trReleaseNotes = Nothing

2119 , _trReleaseNotes = Nothing

2123 , _trUserFraction = Nothing

2120 , _trUserFraction = Nothing

2124− , _trCountryTargeting = Nothing

2125 , _trName = Nothing

2121 , _trName = Nothing

2126 }

2122 }

2127

2123

@@ -2157,11 +2153,6 @@ trUserFraction

2157 (\ s a -> s{_trUserFraction = a})

2153 (\ s a -> s{_trUserFraction = a})

2158 . mapping _Coerce

2154 . mapping _Coerce

2159

2155

2160−trCountryTargeting :: Lens' TrackRelease (Maybe CountryTargeting)

2161−trCountryTargeting

2162− = lens _trCountryTargeting

2163− (\ s a -> s{_trCountryTargeting = a})

2164−

2165-- | The release name, used to identify this release in the Play Console UI.

2156-- | The release name, used to identify this release in the Play Console UI.

2166-- Not required to be unique. This is optional, if not set it will be

2157-- Not required to be unique. This is optional, if not set it will be

2167-- generated from the version_name in the APKs.

2158-- generated from the version_name in the APKs.

@@ -2177,7 +2168,6 @@ instance FromJSON TrackRelease where

2177 (o .:? "status")

2168 (o .:? "status")

2178 <*> (o .:? "releaseNotes" .!= mempty)

2169 <*> (o .:? "releaseNotes" .!= mempty)

2179 <*> (o .:? "userFraction")

2170 <*> (o .:? "userFraction")

2180− <*> (o .:? "countryTargeting")

2181 <*> (o .:? "name"))

2171 <*> (o .:? "name"))

2182

2172

2183instance ToJSON TrackRelease where

2173instance ToJSON TrackRelease where

@@ -2188,58 +2178,8 @@ instance ToJSON TrackRelease where

2188 ("status" .=) <$> _trStatus,

2178 ("status" .=) <$> _trStatus,

2189 ("releaseNotes" .=) <$> _trReleaseNotes,

2179 ("releaseNotes" .=) <$> _trReleaseNotes,

2190 ("userFraction" .=) <$> _trUserFraction,

2180 ("userFraction" .=) <$> _trUserFraction,

2191− ("countryTargeting" .=) <$> _trCountryTargeting,

2192 ("name" .=) <$> _trName])

2181 ("name" .=) <$> _trName])

2193

2182

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−

2243--

2183--

2244-- /See:/ 'bundle' smart constructor.

2184-- /See:/ 'bundle' smart constructor.

2245data Bundle =

2185data Bundle =

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Get.hs+2−1

@@ -85,7 +85,8 @@ editsTestersGet pEtgTrack_ pEtgPackageName_ pEtgEditId_ =

85 }

85 }

86

86

87

87

88−-- | The track to read or modify.

88+-- | The track to read or modify. Acceptable values are: \"alpha\", \"beta\",

89+-- \"production\", \"rollout\" or \"internal\".

89etgTrack :: Lens' EditsTestersGet Text

90etgTrack :: Lens' EditsTestersGet Text

90etgTrack = lens _etgTrack (\ s a -> s{_etgTrack = a})

91etgTrack = lens _etgTrack (\ s a -> s{_etgTrack = a})

91

92

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Patch.hs+2−1

@@ -92,7 +92,8 @@ editsTestersPatch pEtpTrack_ pEtpPackageName_ pEtpPayload_ pEtpEditId_ =

92 }

92 }

93

93

94

94

95−-- | The track to read or modify.

95+-- | The track to read or modify. Acceptable values are: \"alpha\", \"beta\",

96+-- \"production\", \"rollout\" or \"internal\".

96etpTrack :: Lens' EditsTestersPatch Text

97etpTrack :: Lens' EditsTestersPatch Text

97etpTrack = lens _etpTrack (\ s a -> s{_etpTrack = a})

98etpTrack = lens _etpTrack (\ s a -> s{_etpTrack = a})

98

99

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Update.hs+2−1

@@ -92,7 +92,8 @@ editsTestersUpdate pEtutTrack_ pEtutPackageName_ pEtutPayload_ pEtutEditId_ =

92 }

92 }

93

93

94

94

95−-- | The track to read or modify.

95+-- | The track to read or modify. Acceptable values are: \"alpha\", \"beta\",

96+-- \"production\", \"rollout\" or \"internal\".

96etutTrack :: Lens' EditsTestersUpdate Text

97etutTrack :: Lens' EditsTestersUpdate Text

97etutTrack

98etutTrack

98 = lens _etutTrack (\ s a -> s{_etutTrack = a})

99 = 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 @@

20-- Stability : auto-generated

20-- Stability : auto-generated

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

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

22--

22--

23−-- Updates the track configuration for the specified track type. This

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

24−-- method supports patch semantics.

26+-- semantics.

25--

27--

26-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.patch@.

28-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.patch@.

27module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Patch

29module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Patch

@@ -57,8 +59,10 @@ type EditsTracksPatchResource =

57 QueryParam "alt" AltJSON :>

59 QueryParam "alt" AltJSON :>

58 ReqBody '[JSON] Track :> Patch '[JSON] Track

60 ReqBody '[JSON] Track :> Patch '[JSON] Track

59

61

60−-- | Updates the track configuration for the specified track type. This

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

61−-- method supports patch semantics.

65+-- semantics.

62--

66--

63-- /See:/ 'editsTracksPatch' smart constructor.

67-- /See:/ 'editsTracksPatch' smart constructor.

64data EditsTracksPatch =

68data EditsTracksPatch =

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Update.hs+6−2

@@ -20,7 +20,9 @@

20-- Stability : auto-generated

20-- Stability : auto-generated

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

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

22--

22--

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.

24--

26--

25-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.update@.

27-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.update@.

26module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Update

28module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Update

@@ -56,7 +58,9 @@ type EditsTracksUpdateResource =

56 QueryParam "alt" AltJSON :>

58 QueryParam "alt" AltJSON :>

57 ReqBody '[JSON] Track :> Put '[JSON] Track

59 ReqBody '[JSON] Track :> Put '[JSON] Track

58

60

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.

60--

64--

61-- /See:/ 'editsTracksUpdate' smart constructor.

65-- /See:/ 'editsTracksUpdate' smart constructor.

62data EditsTracksUpdate =

66data EditsTracksUpdate =

gogol-androiddeviceprovisioning/gen/Network/Google/AndroidDeviceProvisioning.hs−6

@@ -164,8 +164,6 @@ module Network.Google.AndroidDeviceProvisioning

164 , partnerUnclaim

164 , partnerUnclaim

165 , puDeviceIdentifier

165 , puDeviceIdentifier

166 , puSectionType

166 , puSectionType

167− , puVacationModeExpireTime

168− , puVacationModeDays

169 , puDeviceId

167 , puDeviceId

170

168

171 -- ** Dpc

169 -- ** Dpc

@@ -314,8 +312,6 @@ module Network.Google.AndroidDeviceProvisioning

314 , DeviceClaim

312 , DeviceClaim

315 , deviceClaim

313 , deviceClaim

316 , dcSectionType

314 , dcSectionType

317− , dcVacationModeExpireTime

318− , dcVacationModeStartTime

319 , dcOwnerCompanyId

315 , dcOwnerCompanyId

320 , dcResellerId

316 , dcResellerId

321

317

@@ -349,8 +345,6 @@ module Network.Google.AndroidDeviceProvisioning

349 , unclaimDeviceRequest

345 , unclaimDeviceRequest

350 , udrDeviceIdentifier

346 , udrDeviceIdentifier

351 , udrSectionType

347 , udrSectionType

352− , udrVacationModeExpireTime

353− , udrVacationModeDays

354 , udrDeviceId

348 , udrDeviceId

355

349

356 -- ** DevicesLongRunningOperationResponse

350 -- ** DevicesLongRunningOperationResponse

gogol-androiddeviceprovisioning/gen/Network/Google/AndroidDeviceProvisioning/Types.hs−6

@@ -76,8 +76,6 @@ module Network.Google.AndroidDeviceProvisioning.Types

76 , partnerUnclaim

76 , partnerUnclaim

77 , puDeviceIdentifier

77 , puDeviceIdentifier

78 , puSectionType

78 , puSectionType

79− , puVacationModeExpireTime

80− , puVacationModeDays

81 , puDeviceId

79 , puDeviceId

82

80

83 -- * Dpc

81 -- * Dpc

@@ -226,8 +224,6 @@ module Network.Google.AndroidDeviceProvisioning.Types

226 , DeviceClaim

224 , DeviceClaim

227 , deviceClaim

225 , deviceClaim

228 , dcSectionType

226 , dcSectionType

229− , dcVacationModeExpireTime

230− , dcVacationModeStartTime

231 , dcOwnerCompanyId

227 , dcOwnerCompanyId

232 , dcResellerId

228 , dcResellerId

233

229

@@ -261,8 +257,6 @@ module Network.Google.AndroidDeviceProvisioning.Types

261 , unclaimDeviceRequest

257 , unclaimDeviceRequest

262 , udrDeviceIdentifier

258 , udrDeviceIdentifier

263 , udrSectionType

259 , udrSectionType

264− , udrVacationModeExpireTime

265− , udrVacationModeDays

266 , udrDeviceId

260 , udrDeviceId

267

261

268 -- * DevicesLongRunningOperationResponse

262 -- * DevicesLongRunningOperationResponse

gogol-androiddeviceprovisioning/gen/Network/Google/AndroidDeviceProvisioning/Types/Product.hs+10−97

@@ -472,11 +472,9 @@ instance ToJSON DeviceMetadataEntries where

472-- /See:/ 'partnerUnclaim' smart constructor.

472-- /See:/ 'partnerUnclaim' smart constructor.

473data PartnerUnclaim =

473data PartnerUnclaim =

474 PartnerUnclaim'

474 PartnerUnclaim'

475− { _puDeviceIdentifier :: !(Maybe DeviceIdentifier)

475+ { _puDeviceIdentifier :: !(Maybe DeviceIdentifier)

476− , _puSectionType :: !(Maybe PartnerUnclaimSectionType)

476+ , _puSectionType :: !(Maybe PartnerUnclaimSectionType)

477− , _puVacationModeExpireTime :: !(Maybe DateTime')

478− , _puVacationModeDays :: !(Maybe (Textual Int32))

479− , _puDeviceId :: !(Maybe (Textual Int64))

477+ , _puDeviceId :: !(Maybe (Textual Int64))

480 }

478 }

481 deriving (Eq, Show, Data, Typeable, Generic)

479 deriving (Eq, Show, Data, Typeable, Generic)

482

480

@@ -489,10 +487,6 @@ data PartnerUnclaim =

489--

487--

490-- * 'puSectionType'

488-- * 'puSectionType'

491--

489--

492−-- * 'puVacationModeExpireTime'

493−--

494−-- * 'puVacationModeDays'

495−--

496-- * 'puDeviceId'

490-- * 'puDeviceId'

497partnerUnclaim

491partnerUnclaim

498 :: PartnerUnclaim

492 :: PartnerUnclaim

@@ -500,8 +494,6 @@ partnerUnclaim =

500 PartnerUnclaim'

494 PartnerUnclaim'

501 { _puDeviceIdentifier = Nothing

495 { _puDeviceIdentifier = Nothing

502 , _puSectionType = Nothing

496 , _puSectionType = Nothing

503− , _puVacationModeExpireTime = Nothing

504− , _puVacationModeDays = Nothing

505 , _puDeviceId = Nothing

497 , _puDeviceId = Nothing

506 }

498 }

507

499

@@ -518,21 +510,6 @@ puSectionType

518 = lens _puSectionType

510 = lens _puSectionType

519 (\ s a -> s{_puSectionType = a})

511 (\ s a -> s{_puSectionType = a})

520

512

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−

536-- | Device ID of the device.

513-- | Device ID of the device.

537puDeviceId :: Lens' PartnerUnclaim (Maybe Int64)

514puDeviceId :: Lens' PartnerUnclaim (Maybe Int64)

538puDeviceId

515puDeviceId

@@ -545,8 +522,6 @@ instance FromJSON PartnerUnclaim where

545 (\ o ->

522 (\ o ->

546 PartnerUnclaim' <$>

523 PartnerUnclaim' <$>

547 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

524 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

548− <*> (o .:? "vacationModeExpireTime")

549− <*> (o .:? "vacationModeDays")

550 <*> (o .:? "deviceId"))

525 <*> (o .:? "deviceId"))

551

526

552instance ToJSON PartnerUnclaim where

527instance ToJSON PartnerUnclaim where

@@ -555,9 +530,6 @@ instance ToJSON PartnerUnclaim where

555 (catMaybes

530 (catMaybes

556 [("deviceIdentifier" .=) <$> _puDeviceIdentifier,

531 [("deviceIdentifier" .=) <$> _puDeviceIdentifier,

557 ("sectionType" .=) <$> _puSectionType,

532 ("sectionType" .=) <$> _puSectionType,

558− ("vacationModeExpireTime" .=) <$>

559− _puVacationModeExpireTime,

560− ("vacationModeDays" .=) <$> _puVacationModeDays,

561 ("deviceId" .=) <$> _puDeviceId])

533 ("deviceId" .=) <$> _puDeviceId])

562

534

563-- | An EMM\'s DPC ([device policy

535-- | An EMM\'s DPC ([device policy

@@ -1788,11 +1760,9 @@ instance ToJSON CustomerListCustomersResponse where

1788-- /See:/ 'deviceClaim' smart constructor.

1760-- /See:/ 'deviceClaim' smart constructor.

1789data DeviceClaim =

1761data DeviceClaim =

1790 DeviceClaim'

1762 DeviceClaim'

1791− { _dcSectionType :: !(Maybe DeviceClaimSectionType)

1763+ { _dcSectionType :: !(Maybe DeviceClaimSectionType)

1792− , _dcVacationModeExpireTime :: !(Maybe DateTime')

1793− , _dcVacationModeStartTime :: !(Maybe DateTime')

1794− , _dcOwnerCompanyId :: !(Maybe (Textual Int64))

1764+ , _dcOwnerCompanyId :: !(Maybe (Textual Int64))

1795− , _dcResellerId :: !(Maybe (Textual Int64))

1765+ , _dcResellerId :: !(Maybe (Textual Int64))

1796 }

1766 }

1797 deriving (Eq, Show, Data, Typeable, Generic)

1767 deriving (Eq, Show, Data, Typeable, Generic)

1798

1768

@@ -1803,10 +1773,6 @@ data DeviceClaim =

1803--

1773--

1804-- * 'dcSectionType'

1774-- * 'dcSectionType'

1805--

1775--

1806−-- * 'dcVacationModeExpireTime'

1807−--

1808−-- * 'dcVacationModeStartTime'

1809−--

1810-- * 'dcOwnerCompanyId'

1776-- * 'dcOwnerCompanyId'

1811--

1777--

1812-- * 'dcResellerId'

1778-- * 'dcResellerId'

@@ -1815,8 +1781,6 @@ deviceClaim

1815deviceClaim =

1781deviceClaim =

1816 DeviceClaim'

1782 DeviceClaim'

1817 { _dcSectionType = Nothing

1783 { _dcSectionType = Nothing

1818− , _dcVacationModeExpireTime = Nothing

1819− , _dcVacationModeStartTime = Nothing

1820 , _dcOwnerCompanyId = Nothing

1784 , _dcOwnerCompanyId = Nothing

1821 , _dcResellerId = Nothing

1785 , _dcResellerId = Nothing

1822 }

1786 }

@@ -1828,22 +1792,6 @@ dcSectionType

1828 = lens _dcSectionType

1792 = lens _dcSectionType

1829 (\ s a -> s{_dcSectionType = a})

1793 (\ s a -> s{_dcSectionType = a})

1830

1794

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−

1847-- | The ID of the Customer that purchased the device.

1795-- | The ID of the Customer that purchased the device.

1848dcOwnerCompanyId :: Lens' DeviceClaim (Maybe Int64)

1796dcOwnerCompanyId :: Lens' DeviceClaim (Maybe Int64)

1849dcOwnerCompanyId

1797dcOwnerCompanyId

@@ -1862,10 +1810,7 @@ instance FromJSON DeviceClaim where

1862 = withObject "DeviceClaim"

1810 = withObject "DeviceClaim"

1863 (\ o ->

1811 (\ o ->

1864 DeviceClaim' <$>

1812 DeviceClaim' <$>

1865− (o .:? "sectionType") <*>

1866− (o .:? "vacationModeExpireTime")

1867− <*> (o .:? "vacationModeStartTime")

1868− <*> (o .:? "ownerCompanyId")

1813+ (o .:? "sectionType") <*> (o .:? "ownerCompanyId")

1869 <*> (o .:? "resellerId"))

1814 <*> (o .:? "resellerId"))

1870

1815

1871instance ToJSON DeviceClaim where

1816instance ToJSON DeviceClaim where

@@ -1873,10 +1818,6 @@ instance ToJSON DeviceClaim where

1873 = object

1818 = object

1874 (catMaybes

1819 (catMaybes

1875 [("sectionType" .=) <$> _dcSectionType,

1820 [("sectionType" .=) <$> _dcSectionType,

1876− ("vacationModeExpireTime" .=) <$>

1877− _dcVacationModeExpireTime,

1878− ("vacationModeStartTime" .=) <$>

1879− _dcVacationModeStartTime,

1880 ("ownerCompanyId" .=) <$> _dcOwnerCompanyId,

1821 ("ownerCompanyId" .=) <$> _dcOwnerCompanyId,

1881 ("resellerId" .=) <$> _dcResellerId])

1822 ("resellerId" .=) <$> _dcResellerId])

1882

1823

@@ -2113,11 +2054,9 @@ instance ToJSON FindDevicesByDeviceIdentifierResponse

2113-- /See:/ 'unclaimDeviceRequest' smart constructor.

2054-- /See:/ 'unclaimDeviceRequest' smart constructor.

2114data UnclaimDeviceRequest =

2055data UnclaimDeviceRequest =

2115 UnclaimDeviceRequest'

2056 UnclaimDeviceRequest'

2116− { _udrDeviceIdentifier :: !(Maybe DeviceIdentifier)

2057+ { _udrDeviceIdentifier :: !(Maybe DeviceIdentifier)

2117− , _udrSectionType :: !(Maybe UnclaimDeviceRequestSectionType)

2058+ , _udrSectionType :: !(Maybe UnclaimDeviceRequestSectionType)

2118− , _udrVacationModeExpireTime :: !(Maybe DateTime')

2119− , _udrVacationModeDays :: !(Maybe (Textual Int32))

2120− , _udrDeviceId :: !(Maybe (Textual Int64))

2059+ , _udrDeviceId :: !(Maybe (Textual Int64))

2121 }

2060 }

2122 deriving (Eq, Show, Data, Typeable, Generic)

2061 deriving (Eq, Show, Data, Typeable, Generic)

2123

2062

@@ -2130,10 +2069,6 @@ data UnclaimDeviceRequest =

2130--

2069--

2131-- * 'udrSectionType'

2070-- * 'udrSectionType'

2132--

2071--

2133−-- * 'udrVacationModeExpireTime'

2134−--

2135−-- * 'udrVacationModeDays'

2136−--

2137-- * 'udrDeviceId'

2072-- * 'udrDeviceId'

2138unclaimDeviceRequest

2073unclaimDeviceRequest

2139 :: UnclaimDeviceRequest

2074 :: UnclaimDeviceRequest

@@ -2141,8 +2076,6 @@ unclaimDeviceRequest =

2141 UnclaimDeviceRequest'

2076 UnclaimDeviceRequest'

2142 { _udrDeviceIdentifier = Nothing

2077 { _udrDeviceIdentifier = Nothing

2143 , _udrSectionType = Nothing

2078 , _udrSectionType = Nothing

2144− , _udrVacationModeExpireTime = Nothing

2145− , _udrVacationModeDays = Nothing

2146 , _udrDeviceId = Nothing

2079 , _udrDeviceId = Nothing

2147 }

2080 }

2148

2081

@@ -2159,21 +2092,6 @@ udrSectionType

2159 = lens _udrSectionType

2092 = lens _udrSectionType

2160 (\ s a -> s{_udrSectionType = a})

2093 (\ s a -> s{_udrSectionType = a})

2161

2094

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−

2177-- | The device ID returned by \`ClaimDevice\`.

2095-- | The device ID returned by \`ClaimDevice\`.

2178udrDeviceId :: Lens' UnclaimDeviceRequest (Maybe Int64)

2096udrDeviceId :: Lens' UnclaimDeviceRequest (Maybe Int64)

2179udrDeviceId

2097udrDeviceId

@@ -2186,8 +2104,6 @@ instance FromJSON UnclaimDeviceRequest where

2186 (\ o ->

2104 (\ o ->

2187 UnclaimDeviceRequest' <$>

2105 UnclaimDeviceRequest' <$>

2188 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

2106 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

2189− <*> (o .:? "vacationModeExpireTime")

2190− <*> (o .:? "vacationModeDays")

2191 <*> (o .:? "deviceId"))

2107 <*> (o .:? "deviceId"))

2192

2108

2193instance ToJSON UnclaimDeviceRequest where

2109instance ToJSON UnclaimDeviceRequest where

@@ -2196,9 +2112,6 @@ instance ToJSON UnclaimDeviceRequest where

2196 (catMaybes

2112 (catMaybes

2197 [("deviceIdentifier" .=) <$> _udrDeviceIdentifier,

2113 [("deviceIdentifier" .=) <$> _udrDeviceIdentifier,

2198 ("sectionType" .=) <$> _udrSectionType,

2114 ("sectionType" .=) <$> _udrSectionType,

2199− ("vacationModeExpireTime" .=) <$>

2200− _udrVacationModeExpireTime,

2201− ("vacationModeDays" .=) <$> _udrVacationModeDays,

2202 ("deviceId" .=) <$> _udrDeviceId])

2115 ("deviceId" .=) <$> _udrDeviceId])

2203

2116

2204-- | Tracks the status of a long-running operation to claim, unclaim, or

2117-- | 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

87 -- ** androidmanagement.enterprises.policies.patch

87 -- ** androidmanagement.enterprises.policies.patch

88 , module Network.Google.Resource.AndroidManagement.Enterprises.Policies.Patch

88 , module Network.Google.Resource.AndroidManagement.Enterprises.Policies.Patch

89

89

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−

105 -- ** androidmanagement.enterprises.webTokens.create

90 -- ** androidmanagement.enterprises.webTokens.create

106 , module Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

91 , module Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

107

92

@@ -339,9 +324,6 @@ module Network.Google.AndroidManagement

339 , devEnrollmentTime

324 , devEnrollmentTime

340 , devDisplays

325 , devDisplays

341

326

342− -- ** WebAppDisplayMode

343− , WebAppDisplayMode (..)

344−

345 -- ** ApplicationReportApplicationSource

327 -- ** ApplicationReportApplicationSource

346 , ApplicationReportApplicationSource (..)

328 , ApplicationReportApplicationSource (..)

347

329

@@ -404,7 +386,6 @@ module Network.Google.AndroidManagement

404 , arVersionName

386 , arVersionName

405 , arPackageName

387 , arPackageName

406 , arPackageSha256Hash

388 , arPackageSha256Hash

407− , arKeyedAppStates

408 , arApplicationSource

389 , arApplicationSource

409 , arEvents

390 , arEvents

410 , arDisplayName

391 , arDisplayName

@@ -445,7 +426,6 @@ module Network.Google.AndroidManagement

445 , srsMemoryInfoEnabled

426 , srsMemoryInfoEnabled

446 , srsNetworkInfoEnabled

427 , srsNetworkInfoEnabled

447 , srsDeviceSettingsEnabled

428 , srsDeviceSettingsEnabled

448− , srsApplicationReportingSettings

449

429

450 -- ** CommandType

430 -- ** CommandType

451 , CommandType (..)

431 , CommandType (..)

@@ -453,11 +433,6 @@ module Network.Google.AndroidManagement

453 -- ** ApplicationPolicyDefaultPermissionPolicy

433 -- ** ApplicationPolicyDefaultPermissionPolicy

454 , ApplicationPolicyDefaultPermissionPolicy (..)

434 , ApplicationPolicyDefaultPermissionPolicy (..)

455

435

456− -- ** WebAppIcon

457− , WebAppIcon

458− , webAppIcon

459− , waiImageData

460−

461 -- ** Xgafv

436 -- ** Xgafv

462 , Xgafv (..)

437 , Xgafv (..)

463

438

@@ -642,16 +617,6 @@ module Network.Google.AndroidManagement

642 , ncdcNonComplianceReason

617 , ncdcNonComplianceReason

643 , ncdcSettingName

618 , ncdcSettingName

644

619

645− -- ** KeyedAppState

646− , KeyedAppState

647− , keyedAppState

648− , kasData

649− , kasSeverity

650− , kasKey

651− , kasMessage

652− , kasLastUpdateTime

653− , kasCreateTime

654−

655 -- ** OperationMetadata

620 -- ** OperationMetadata

656 , OperationMetadata

621 , OperationMetadata

657 , operationMetadata

622 , operationMetadata

@@ -665,9 +630,6 @@ module Network.Google.AndroidManagement

665 , wtName

630 , wtName

666 , wtPermissions

631 , wtPermissions

667

632

668− -- ** KeyedAppStateSeverity

669− , KeyedAppStateSeverity (..)

670−

671 -- ** ComplianceRule

633 -- ** ComplianceRule

672 , ComplianceRule

634 , ComplianceRule

673 , complianceRule

635 , complianceRule

@@ -676,12 +638,6 @@ module Network.Google.AndroidManagement

676 , crPackageNamesToDisable

638 , crPackageNamesToDisable

677 , crNonComplianceDetailCondition

639 , crNonComplianceDetailCondition

678

640

679− -- ** ListWebAppsResponse

680− , ListWebAppsResponse

681− , listWebAppsResponse

682− , lwarNextPageToken

683− , lwarWebApps

684−

685 -- ** PasswordRequirements

641 -- ** PasswordRequirements

686 , PasswordRequirements

642 , PasswordRequirements

687 , passwordRequirements

643 , passwordRequirements

@@ -751,11 +707,6 @@ module Network.Google.AndroidManagement

751 , siAndroidBuildNumber

707 , siAndroidBuildNumber

752 , siAndroidVersion

708 , siAndroidVersion

753

709

754− -- ** ApplicationReportingSettings

755− , ApplicationReportingSettings

756− , applicationReportingSettings

757− , arsIncludeRemovedApps

758−

759 -- ** MemoryEventEventType

710 -- ** MemoryEventEventType

760 , MemoryEventEventType (..)

711 , MemoryEventEventType (..)

761

712

@@ -773,16 +724,6 @@ module Network.Google.AndroidManagement

773 , saTitle

724 , saTitle

774 , saDescription

725 , saDescription

775

726

776− -- ** WebApp

777− , WebApp

778− , webApp

779− , waVersionCode

780− , waIcons

781− , waStartURL

782− , waDisplayMode

783− , waName

784− , waTitle

785−

786 -- ** PasswordRequirementsPasswordQuality

727 -- ** PasswordRequirementsPasswordQuality

787 , PasswordRequirementsPasswordQuality (..)

728 , PasswordRequirementsPasswordQuality (..)

788 ) where

729 ) where

@@ -808,11 +749,6 @@ import Network.Google.Resource.AndroidManagement.Enterprises.Policies.

808import Network.Google.Resource.AndroidManagement.Enterprises.Policies.Get

749import Network.Google.Resource.AndroidManagement.Enterprises.Policies.Get

809import Network.Google.Resource.AndroidManagement.Enterprises.Policies.List

750import Network.Google.Resource.AndroidManagement.Enterprises.Policies.List

810import Network.Google.Resource.AndroidManagement.Enterprises.Policies.Patch

751import 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

816import Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

752import Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

817import Network.Google.Resource.AndroidManagement.SignupURLs.Create

753import Network.Google.Resource.AndroidManagement.SignupURLs.Create

818

754

@@ -824,11 +760,6 @@ TODO

824type AndroidManagementAPI =

760type AndroidManagementAPI =

825 EnterprisesEnrollmentTokensCreateResource :<|>

761 EnterprisesEnrollmentTokensCreateResource :<|>

826 EnterprisesEnrollmentTokensDeleteResource

762 EnterprisesEnrollmentTokensDeleteResource

827− :<|> EnterprisesWebAppsListResource

828− :<|> EnterprisesWebAppsPatchResource

829− :<|> EnterprisesWebAppsGetResource

830− :<|> EnterprisesWebAppsCreateResource

831− :<|> EnterprisesWebAppsDeleteResource

832 :<|> EnterprisesWebTokensCreateResource

763 :<|> EnterprisesWebTokensCreateResource

833 :<|> EnterprisesDevicesOperationsListResource

764 :<|> EnterprisesDevicesOperationsListResource

834 :<|> EnterprisesDevicesOperationsGetResource

765 :<|> EnterprisesDevicesOperationsGetResource

gogol-androidmanagement/gen/Network/Google/AndroidManagement/Types.hs−44

@@ -251,9 +251,6 @@ module Network.Google.AndroidManagement.Types

251 , devEnrollmentTime

251 , devEnrollmentTime

252 , devDisplays

252 , devDisplays

253

253

254− -- * WebAppDisplayMode

255− , WebAppDisplayMode (..)

256−

257 -- * ApplicationReportApplicationSource

254 -- * ApplicationReportApplicationSource

258 , ApplicationReportApplicationSource (..)

255 , ApplicationReportApplicationSource (..)

259

256

@@ -316,7 +313,6 @@ module Network.Google.AndroidManagement.Types

316 , arVersionName

313 , arVersionName

317 , arPackageName

314 , arPackageName

318 , arPackageSha256Hash

315 , arPackageSha256Hash

319− , arKeyedAppStates

320 , arApplicationSource

316 , arApplicationSource

321 , arEvents

317 , arEvents

322 , arDisplayName

318 , arDisplayName

@@ -357,7 +353,6 @@ module Network.Google.AndroidManagement.Types

357 , srsMemoryInfoEnabled

353 , srsMemoryInfoEnabled

358 , srsNetworkInfoEnabled

354 , srsNetworkInfoEnabled

359 , srsDeviceSettingsEnabled

355 , srsDeviceSettingsEnabled

360− , srsApplicationReportingSettings

361

356

362 -- * CommandType

357 -- * CommandType

363 , CommandType (..)

358 , CommandType (..)

@@ -365,11 +360,6 @@ module Network.Google.AndroidManagement.Types

365 -- * ApplicationPolicyDefaultPermissionPolicy

360 -- * ApplicationPolicyDefaultPermissionPolicy

366 , ApplicationPolicyDefaultPermissionPolicy (..)

361 , ApplicationPolicyDefaultPermissionPolicy (..)

367

362

368− -- * WebAppIcon

369− , WebAppIcon

370− , webAppIcon

371− , waiImageData

372−

373 -- * Xgafv

363 -- * Xgafv

374 , Xgafv (..)

364 , Xgafv (..)

375

365

@@ -554,16 +544,6 @@ module Network.Google.AndroidManagement.Types

554 , ncdcNonComplianceReason

544 , ncdcNonComplianceReason

555 , ncdcSettingName

545 , ncdcSettingName

556

546

557− -- * KeyedAppState

558− , KeyedAppState

559− , keyedAppState

560− , kasData

561− , kasSeverity

562− , kasKey

563− , kasMessage

564− , kasLastUpdateTime

565− , kasCreateTime

566−

567 -- * OperationMetadata

547 -- * OperationMetadata

568 , OperationMetadata

548 , OperationMetadata

569 , operationMetadata

549 , operationMetadata

@@ -577,9 +557,6 @@ module Network.Google.AndroidManagement.Types

577 , wtName

557 , wtName

578 , wtPermissions

558 , wtPermissions

579

559

580− -- * KeyedAppStateSeverity

581− , KeyedAppStateSeverity (..)

582−

583 -- * ComplianceRule

560 -- * ComplianceRule

584 , ComplianceRule

561 , ComplianceRule

585 , complianceRule

562 , complianceRule

@@ -588,12 +565,6 @@ module Network.Google.AndroidManagement.Types

588 , crPackageNamesToDisable

565 , crPackageNamesToDisable

589 , crNonComplianceDetailCondition

566 , crNonComplianceDetailCondition

590

567

591− -- * ListWebAppsResponse

592− , ListWebAppsResponse

593− , listWebAppsResponse

594− , lwarNextPageToken

595− , lwarWebApps

596−

597 -- * PasswordRequirements

568 -- * PasswordRequirements

598 , PasswordRequirements

569 , PasswordRequirements

599 , passwordRequirements

570 , passwordRequirements

@@ -663,11 +634,6 @@ module Network.Google.AndroidManagement.Types

663 , siAndroidBuildNumber

634 , siAndroidBuildNumber

664 , siAndroidVersion

635 , siAndroidVersion

665

636

666− -- * ApplicationReportingSettings

667− , ApplicationReportingSettings

668− , applicationReportingSettings

669− , arsIncludeRemovedApps

670−

671 -- * MemoryEventEventType

637 -- * MemoryEventEventType

672 , MemoryEventEventType (..)

638 , MemoryEventEventType (..)

673

639

@@ -685,16 +651,6 @@ module Network.Google.AndroidManagement.Types

685 , saTitle

651 , saTitle

686 , saDescription

652 , saDescription

687

653

688− -- * WebApp

689− , WebApp

690− , webApp

691− , waVersionCode

692− , waIcons

693− , waStartURL

694− , waDisplayMode

695− , waName

696− , waTitle

697−

698 -- * PasswordRequirementsPasswordQuality

654 -- * PasswordRequirementsPasswordQuality

699 , PasswordRequirementsPasswordQuality (..)

655 , PasswordRequirementsPasswordQuality (..)

700 ) where

656 ) where

gogol-androidmanagement/gen/Network/Google/AndroidManagement/Types/Product.hs+2−371

@@ -2511,7 +2511,6 @@ data ApplicationReport =

2511 , _arVersionName :: !(Maybe Text)

2511 , _arVersionName :: !(Maybe Text)

2512 , _arPackageName :: !(Maybe Text)

2512 , _arPackageName :: !(Maybe Text)

2513 , _arPackageSha256Hash :: !(Maybe Text)

2513 , _arPackageSha256Hash :: !(Maybe Text)

2514− , _arKeyedAppStates :: !(Maybe [KeyedAppState])

2515 , _arApplicationSource :: !(Maybe ApplicationReportApplicationSource)

2514 , _arApplicationSource :: !(Maybe ApplicationReportApplicationSource)

2516 , _arEvents :: !(Maybe [ApplicationEvent])

2515 , _arEvents :: !(Maybe [ApplicationEvent])

2517 , _arDisplayName :: !(Maybe Text)

2516 , _arDisplayName :: !(Maybe Text)

@@ -2536,8 +2535,6 @@ data ApplicationReport =

2536--

2535--

2537-- * 'arPackageSha256Hash'

2536-- * 'arPackageSha256Hash'

2538--

2537--

2539−-- * 'arKeyedAppStates'

2540−--

2541-- * 'arApplicationSource'

2538-- * 'arApplicationSource'

2542--

2539--

2543-- * 'arEvents'

2540-- * 'arEvents'

@@ -2555,7 +2552,6 @@ applicationReport =

2555 , _arVersionName = Nothing

2552 , _arVersionName = Nothing

2556 , _arPackageName = Nothing

2553 , _arPackageName = Nothing

2557 , _arPackageSha256Hash = Nothing

2554 , _arPackageSha256Hash = Nothing

2558− , _arKeyedAppStates = Nothing

2559 , _arApplicationSource = Nothing

2555 , _arApplicationSource = Nothing

2560 , _arEvents = Nothing

2556 , _arEvents = Nothing

2561 , _arDisplayName = Nothing

2557 , _arDisplayName = Nothing

@@ -2606,14 +2602,6 @@ arPackageSha256Hash

2606 = lens _arPackageSha256Hash

2602 = lens _arPackageSha256Hash

2607 (\ s a -> s{_arPackageSha256Hash = a})

2603 (\ s a -> s{_arPackageSha256Hash = a})

2608

2604

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−

2617-- | The source of the package.

2605-- | The source of the package.

2618arApplicationSource :: Lens' ApplicationReport (Maybe ApplicationReportApplicationSource)

2606arApplicationSource :: Lens' ApplicationReport (Maybe ApplicationReportApplicationSource)

2619arApplicationSource

2607arApplicationSource

@@ -2650,7 +2638,6 @@ instance FromJSON ApplicationReport where

2650 <*> (o .:? "versionName")

2638 <*> (o .:? "versionName")

2651 <*> (o .:? "packageName")

2639 <*> (o .:? "packageName")

2652 <*> (o .:? "packageSha256Hash")

2640 <*> (o .:? "packageSha256Hash")

2653− <*> (o .:? "keyedAppStates" .!= mempty)

2654 <*> (o .:? "applicationSource")

2641 <*> (o .:? "applicationSource")

2655 <*> (o .:? "events" .!= mempty)

2642 <*> (o .:? "events" .!= mempty)

2656 <*> (o .:? "displayName")

2643 <*> (o .:? "displayName")

@@ -2667,7 +2654,6 @@ instance ToJSON ApplicationReport where

2667 ("versionName" .=) <$> _arVersionName,

2654 ("versionName" .=) <$> _arVersionName,

2668 ("packageName" .=) <$> _arPackageName,

2655 ("packageName" .=) <$> _arPackageName,

2669 ("packageSha256Hash" .=) <$> _arPackageSha256Hash,

2656 ("packageSha256Hash" .=) <$> _arPackageSha256Hash,

2670− ("keyedAppStates" .=) <$> _arKeyedAppStates,

2671 ("applicationSource" .=) <$> _arApplicationSource,

2657 ("applicationSource" .=) <$> _arApplicationSource,

2672 ("events" .=) <$> _arEvents,

2658 ("events" .=) <$> _arEvents,

2673 ("displayName" .=) <$> _arDisplayName,

2659 ("displayName" .=) <$> _arDisplayName,

@@ -2904,7 +2890,6 @@ data StatusReportingSettings =

2904 , _srsMemoryInfoEnabled :: !(Maybe Bool)

2890 , _srsMemoryInfoEnabled :: !(Maybe Bool)

2905 , _srsNetworkInfoEnabled :: !(Maybe Bool)

2891 , _srsNetworkInfoEnabled :: !(Maybe Bool)

2906 , _srsDeviceSettingsEnabled :: !(Maybe Bool)

2892 , _srsDeviceSettingsEnabled :: !(Maybe Bool)

2907− , _srsApplicationReportingSettings :: !(Maybe ApplicationReportingSettings)

2908 }

2893 }

2909 deriving (Eq, Show, Data, Typeable, Generic)

2894 deriving (Eq, Show, Data, Typeable, Generic)

2910

2895

@@ -2928,8 +2913,6 @@ data StatusReportingSettings =

2928-- * 'srsNetworkInfoEnabled'

2913-- * 'srsNetworkInfoEnabled'

2929--

2914--

2930-- * 'srsDeviceSettingsEnabled'

2915-- * 'srsDeviceSettingsEnabled'

2931−--

2932−-- * 'srsApplicationReportingSettings'

2933statusReportingSettings

2916statusReportingSettings

2934 :: StatusReportingSettings

2917 :: StatusReportingSettings

2935statusReportingSettings =

2918statusReportingSettings =

@@ -2942,7 +2925,6 @@ statusReportingSettings =

2942 , _srsMemoryInfoEnabled = Nothing

2925 , _srsMemoryInfoEnabled = Nothing

2943 , _srsNetworkInfoEnabled = Nothing

2926 , _srsNetworkInfoEnabled = Nothing

2944 , _srsDeviceSettingsEnabled = Nothing

2927 , _srsDeviceSettingsEnabled = Nothing

2945− , _srsApplicationReportingSettings = Nothing

2946 }

2928 }

2947

2929

2948

2930

@@ -2994,13 +2976,6 @@ srsDeviceSettingsEnabled

2994 = lens _srsDeviceSettingsEnabled

2976 = lens _srsDeviceSettingsEnabled

2995 (\ s a -> s{_srsDeviceSettingsEnabled = a})

2977 (\ s a -> s{_srsDeviceSettingsEnabled = a})

2996

2978

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−

3004instance FromJSON StatusReportingSettings where

2979instance FromJSON StatusReportingSettings where

3005 parseJSON

2980 parseJSON

3006 = withObject "StatusReportingSettings"

2981 = withObject "StatusReportingSettings"

@@ -3013,8 +2988,7 @@ instance FromJSON StatusReportingSettings where

3013 <*> (o .:? "applicationReportsEnabled")

2988 <*> (o .:? "applicationReportsEnabled")

3014 <*> (o .:? "memoryInfoEnabled")

2989 <*> (o .:? "memoryInfoEnabled")

3015 <*> (o .:? "networkInfoEnabled")

2990 <*> (o .:? "networkInfoEnabled")

3016− <*> (o .:? "deviceSettingsEnabled")

2991+ <*> (o .:? "deviceSettingsEnabled"))

3017− <*> (o .:? "applicationReportingSettings"))

3018

2992

3019instance ToJSON StatusReportingSettings where

2993instance ToJSON StatusReportingSettings where

3020 toJSON StatusReportingSettings'{..}

2994 toJSON StatusReportingSettings'{..}

@@ -3032,50 +3006,7 @@ instance ToJSON StatusReportingSettings where

3032 ("memoryInfoEnabled" .=) <$> _srsMemoryInfoEnabled,

3006 ("memoryInfoEnabled" .=) <$> _srsMemoryInfoEnabled,

3033 ("networkInfoEnabled" .=) <$> _srsNetworkInfoEnabled,

3007 ("networkInfoEnabled" .=) <$> _srsNetworkInfoEnabled,

3034 ("deviceSettingsEnabled" .=) <$>

3008 ("deviceSettingsEnabled" .=) <$>

3035− _srsDeviceSettingsEnabled,

3009+ _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])

3079

3010

3080-- | Policy for an individual app.

3011-- | Policy for an individual app.

3081--

3012--

@@ -5035,109 +4966,6 @@ instance ToJSON NonComplianceDetailCondition where

5035 _ncdcNonComplianceReason,

4966 _ncdcNonComplianceReason,

5036 ("settingName" .=) <$> _ncdcSettingName])

4967 ("settingName" .=) <$> _ncdcSettingName])

5037

4968

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−

5141-- | Service-specific metadata associated with the operation. It typically

4969-- | Service-specific metadata associated with the operation. It typically

5142-- contains progress information and common metadata such as create time.

4970-- contains progress information and common metadata such as create time.

5143-- Some services might not provide such metadata. Any method that returns a

4971-- Some services might not provide such metadata. Any method that returns a

@@ -5349,58 +5177,6 @@ instance ToJSON ComplianceRule where

5349 ("nonComplianceDetailCondition" .=) <$>

5177 ("nonComplianceDetailCondition" .=) <$>

5350 _crNonComplianceDetailCondition])

5178 _crNonComplianceDetailCondition])

5351

5179

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−

5404-- | Requirements for the password used to unlock a device.

5180-- | Requirements for the password used to unlock a device.

5405--

5181--

5406-- /See:/ 'passwordRequirements' smart constructor.

5182-- /See:/ 'passwordRequirements' smart constructor.

@@ -6080,47 +5856,6 @@ instance ToJSON SoftwareInfo where

6080 ("androidBuildNumber" .=) <$> _siAndroidBuildNumber,

5856 ("androidBuildNumber" .=) <$> _siAndroidBuildNumber,

6081 ("androidVersion" .=) <$> _siAndroidVersion])

5857 ("androidVersion" .=) <$> _siAndroidVersion])

6082

5858

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−

6124-- | A permission required by the app.

5859-- | A permission required by the app.

6125--

5860--

6126-- /See:/ 'applicationPermission' smart constructor.

5861-- /See:/ 'applicationPermission' smart constructor.

@@ -6240,107 +5975,3 @@ instance ToJSON SetupAction where

6240 [("launchApp" .=) <$> _saLaunchApp,

5975 [("launchApp" .=) <$> _saLaunchApp,

6241 ("title" .=) <$> _saTitle,

5976 ("title" .=) <$> _saTitle,

6242 ("description" .=) <$> _saDescription])

5977 ("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

380instance ToJSON DeviceManagementMode where

380instance ToJSON DeviceManagementMode where

381 toJSON = toJSONText

381 toJSON = toJSONText

382

382

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−

428-- | The source of the package.

383-- | The source of the package.

429data ApplicationReportApplicationSource

384data ApplicationReportApplicationSource

430 = ApplicationSourceUnspecified

385 = ApplicationSourceUnspecified

@@ -1214,41 +1169,6 @@ instance FromJSON PolicyDefaultPermissionPolicy where

1214instance ToJSON PolicyDefaultPermissionPolicy where

1169instance ToJSON PolicyDefaultPermissionPolicy where

1215 toJSON = toJSONText

1170 toJSON = toJSONText

1216

1171

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−

1252-- | Application state.

1172-- | Application state.

1253data ApplicationReportState

1173data ApplicationReportState

1254 = ARSInstalled

1174 = 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

55 , Network.Google.Resource.AndroidManagement.Enterprises.Policies.Get

55 , Network.Google.Resource.AndroidManagement.Enterprises.Policies.Get

56 , Network.Google.Resource.AndroidManagement.Enterprises.Policies.List

56 , Network.Google.Resource.AndroidManagement.Enterprises.Policies.List

57 , Network.Google.Resource.AndroidManagement.Enterprises.Policies.Patch

57 , 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

63 , Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

58 , Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

64 , Network.Google.Resource.AndroidManagement.SignupURLs.Create

59 , Network.Google.Resource.AndroidManagement.SignupURLs.Create

65

60

gogol-appengine/gen/Network/Google/AppEngine.hs+20−8

@@ -171,6 +171,11 @@ module Network.Google.AppEngine

171 , sCode

171 , sCode

172 , sMessage

172 , sMessage

173

173

174+ -- ** OperationSchema

175+ , OperationSchema

176+ , operationSchema

177+ , osAddtional

178+

174 -- ** LocationSchema

179 -- ** LocationSchema

175 , LocationSchema

180 , LocationSchema

176 , locationSchema

181 , locationSchema

@@ -268,11 +273,6 @@ module Network.Google.AppEngine

268 , acExpireTime

273 , acExpireTime

269 , acVisibleDomainMAppings

274 , acVisibleDomainMAppings

270

275

271− -- ** VPCAccessConnector

272− , VPCAccessConnector

273− , vpcAccessConnector

274− , vacName

275−

276 -- ** APIConfigHandler

276 -- ** APIConfigHandler

277 , APIConfigHandler

277 , APIConfigHandler

278 , apiConfigHandler

278 , apiConfigHandler

@@ -432,6 +432,15 @@ module Network.Google.AppEngine

432 , asMaxPendingLatency

432 , asMaxPendingLatency

433 , asStandardSchedulerSettings

433 , asStandardSchedulerSettings

434

434

435+ -- ** OperationMetadataV1Beta5

436+ , OperationMetadataV1Beta5

437+ , operationMetadataV1Beta5

438+ , oInsertTime

439+ , oUser

440+ , oMethod

441+ , oEndTime

442+ , oTarget

443+

435 -- ** Volume

444 -- ** Volume

436 , Volume

445 , Volume

437 , volume

446 , volume

@@ -504,7 +513,6 @@ module Network.Google.AppEngine

504 -- ** FeatureSettings

513 -- ** FeatureSettings

505 , FeatureSettings

514 , FeatureSettings

506 , featureSettings

515 , featureSettings

507− , fsUseContainerOptimizedOS

508 , fsSplitHealthChecks

516 , fsSplitHealthChecks

509

517

510 -- ** CertificateRawData

518 -- ** CertificateRawData

@@ -593,7 +601,6 @@ module Network.Google.AppEngine

593 , verInstanceClass

601 , verInstanceClass

594 , verRuntimeChannel

602 , verRuntimeChannel

595 , verRuntimeMainExecutablePath

603 , verRuntimeMainExecutablePath

596− , verVPCAccessConnector

597 , verHealthCheck

604 , verHealthCheck

598 , verEndpointsAPIService

605 , verEndpointsAPIService

599 , verEnv

606 , verEnv

@@ -689,7 +696,12 @@ module Network.Google.AppEngine

689 -- ** OperationMetadata

696 -- ** OperationMetadata

690 , OperationMetadata

697 , OperationMetadata

691 , operationMetadata

698 , operationMetadata

692− , omAddtional

699+ , omInsertTime

700+ , omUser

701+ , omMethod

702+ , omEndTime

703+ , omOperationType

704+ , omTarget

693

705

694 -- ** URLMapAuthFailAction

706 -- ** URLMapAuthFailAction

695 , URLMapAuthFailAction (..)

707 , URLMapAuthFailAction (..)

gogol-appengine/gen/Network/Google/AppEngine/Types.hs+20−8

@@ -48,6 +48,11 @@ module Network.Google.AppEngine.Types

48 , sCode

48 , sCode

49 , sMessage

49 , sMessage

50

50

51+ -- * OperationSchema

52+ , OperationSchema

53+ , operationSchema

54+ , osAddtional

55+

51 -- * LocationSchema

56 -- * LocationSchema

52 , LocationSchema

57 , LocationSchema

53 , locationSchema

58 , locationSchema

@@ -145,11 +150,6 @@ module Network.Google.AppEngine.Types

145 , acExpireTime

150 , acExpireTime

146 , acVisibleDomainMAppings

151 , acVisibleDomainMAppings

147

152

148− -- * VPCAccessConnector

149− , VPCAccessConnector

150− , vpcAccessConnector

151− , vacName

152−

153 -- * APIConfigHandler

153 -- * APIConfigHandler

154 , APIConfigHandler

154 , APIConfigHandler

155 , apiConfigHandler

155 , apiConfigHandler

@@ -309,6 +309,15 @@ module Network.Google.AppEngine.Types

309 , asMaxPendingLatency

309 , asMaxPendingLatency

310 , asStandardSchedulerSettings

310 , asStandardSchedulerSettings

311

311

312+ -- * OperationMetadataV1Beta5

313+ , OperationMetadataV1Beta5

314+ , operationMetadataV1Beta5

315+ , oInsertTime

316+ , oUser

317+ , oMethod

318+ , oEndTime

319+ , oTarget

320+

312 -- * Volume

321 -- * Volume

313 , Volume

322 , Volume

314 , volume

323 , volume

@@ -381,7 +390,6 @@ module Network.Google.AppEngine.Types

381 -- * FeatureSettings

390 -- * FeatureSettings

382 , FeatureSettings

391 , FeatureSettings

383 , featureSettings

392 , featureSettings

384− , fsUseContainerOptimizedOS

385 , fsSplitHealthChecks

393 , fsSplitHealthChecks

386

394

387 -- * CertificateRawData

395 -- * CertificateRawData

@@ -470,7 +478,6 @@ module Network.Google.AppEngine.Types

470 , verInstanceClass

478 , verInstanceClass

471 , verRuntimeChannel

479 , verRuntimeChannel

472 , verRuntimeMainExecutablePath

480 , verRuntimeMainExecutablePath

473− , verVPCAccessConnector

474 , verHealthCheck

481 , verHealthCheck

475 , verEndpointsAPIService

482 , verEndpointsAPIService

476 , verEnv

483 , verEnv

@@ -566,7 +573,12 @@ module Network.Google.AppEngine.Types

566 -- * OperationMetadata

573 -- * OperationMetadata

567 , OperationMetadata

574 , OperationMetadata

568 , operationMetadata

575 , operationMetadata

569− , omAddtional

576+ , omInsertTime

577+ , omUser

578+ , omMethod

579+ , omEndTime

580+ , omOperationType

581+ , omTarget

570

582

571 -- * URLMapAuthFailAction

583 -- * URLMapAuthFailAction

572 , URLMapAuthFailAction (..)

584 , URLMapAuthFailAction (..)

gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+207−89

@@ -202,6 +202,45 @@ instance ToJSON Status where

202 ("code" .=) <$> _sCode,

202 ("code" .=) <$> _sCode,

203 ("message" .=) <$> _sMessage])

203 ("message" .=) <$> _sMessage])

204

204

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+

205-- | Service-specific metadata. For example the available capacity at the

244-- | Service-specific metadata. For example the available capacity at the

206-- given location.

245-- given location.

207--

246--

@@ -1145,40 +1184,6 @@ instance ToJSON AuthorizedCertificate where

1145 ("visibleDomainMappings" .=) <$>

1184 ("visibleDomainMappings" .=) <$>

1146 _acVisibleDomainMAppings])

1185 _acVisibleDomainMAppings])

1147

1186

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−

1182-- | Google Cloud Endpoints

1187-- | Google Cloud Endpoints

1183-- (https:\/\/cloud.google.com\/appengine\/docs\/python\/endpoints\/)

1188-- (https:\/\/cloud.google.com\/appengine\/docs\/python\/endpoints\/)

1184-- configuration for API handlers.

1189-- configuration for API handlers.

@@ -1787,7 +1792,7 @@ data Operation =

1787 , _oError :: !(Maybe Status)

1792 , _oError :: !(Maybe Status)

1788 , _oResponse :: !(Maybe OperationResponse)

1793 , _oResponse :: !(Maybe OperationResponse)

1789 , _oName :: !(Maybe Text)

1794 , _oName :: !(Maybe Text)

1790− , _oMetadata :: !(Maybe OperationMetadata)

1795+ , _oMetadata :: !(Maybe OperationSchema)

1791 }

1796 }

1792 deriving (Eq, Show, Data, Typeable, Generic)

1797 deriving (Eq, Show, Data, Typeable, Generic)

1793

1798

@@ -1848,7 +1853,7 @@ oName = lens _oName (\ s a -> s{_oName = a})

1848-- contains progress information and common metadata such as create time.

1853-- contains progress information and common metadata such as create time.

1849-- Some services might not provide such metadata. Any method that returns a

1854-- Some services might not provide such metadata. Any method that returns a

1850-- long-running operation should document the metadata type, if any.

1855-- long-running operation should document the metadata type, if any.

1851−oMetadata :: Lens' Operation (Maybe OperationMetadata)

1856+oMetadata :: Lens' Operation (Maybe OperationSchema)

1852oMetadata

1857oMetadata

1853 = lens _oMetadata (\ s a -> s{_oMetadata = a})

1858 = lens _oMetadata (\ s a -> s{_oMetadata = a})

1854

1859

@@ -2645,6 +2650,90 @@ instance ToJSON AutomaticScaling where

2645 ("standardSchedulerSettings" .=) <$>

2650 ("standardSchedulerSettings" .=) <$>

2646 _asStandardSchedulerSettings])

2651 _asStandardSchedulerSettings])

2647

2652

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+

2648-- | Volumes mounted within the app container. Only applicable in the App

2737-- | Volumes mounted within the app container. Only applicable in the App

2649-- Engine flexible environment.

2738-- Engine flexible environment.

2650--

2739--

@@ -3255,10 +3344,9 @@ instance ToJSON Resources where

3255-- define behaviors that are user configurable.

3344-- define behaviors that are user configurable.

3256--

3345--

3257-- /See:/ 'featureSettings' smart constructor.

3346-- /See:/ 'featureSettings' smart constructor.

3258−data FeatureSettings =

3347+newtype FeatureSettings =

3259 FeatureSettings'

3348 FeatureSettings'

3260− { _fsUseContainerOptimizedOS :: !(Maybe Bool)

3261− , _fsSplitHealthChecks :: !(Maybe Bool)

3349+ { _fsSplitHealthChecks :: Maybe Bool

3262 }

3350 }

3263 deriving (Eq, Show, Data, Typeable, Generic)

3351 deriving (Eq, Show, Data, Typeable, Generic)

3264

3352

@@ -3267,23 +3355,11 @@ data FeatureSettings =

3267--

3355--

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

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

3269--

3357--

3270−-- * 'fsUseContainerOptimizedOS'

3271−--

3272-- * 'fsSplitHealthChecks'

3358-- * 'fsSplitHealthChecks'

3273featureSettings

3359featureSettings

3274 :: FeatureSettings

3360 :: FeatureSettings

3275−featureSettings =

3276− FeatureSettings'

3277− {_fsUseContainerOptimizedOS = Nothing, _fsSplitHealthChecks = Nothing}

3361+featureSettings = FeatureSettings' {_fsSplitHealthChecks = Nothing}

3278−

3279

3362

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})

3287

3363

3288-- | Boolean value indicating if split health checks should be used instead

3364-- | Boolean value indicating if split health checks should be used instead

3289-- of the legacy health checks. At an app.yaml level, this means defaulting

3365-- of the legacy health checks. At an app.yaml level, this means defaulting

@@ -3299,17 +3375,13 @@ instance FromJSON FeatureSettings where

3299 parseJSON

3375 parseJSON

3300 = withObject "FeatureSettings"

3376 = withObject "FeatureSettings"

3301 (\ o ->

3377 (\ o ->

3302− FeatureSettings' <$>

3303− (o .:? "useContainerOptimizedOs") <*>

3304− (o .:? "splitHealthChecks"))

3378+ FeatureSettings' <$> (o .:? "splitHealthChecks"))

3305

3379

3306instance ToJSON FeatureSettings where

3380instance ToJSON FeatureSettings where

3307 toJSON FeatureSettings'{..}

3381 toJSON FeatureSettings'{..}

3308 = object

3382 = object

3309 (catMaybes

3383 (catMaybes

3310− [("useContainerOptimizedOs" .=) <$>

3311− _fsUseContainerOptimizedOS,

3312− ("splitHealthChecks" .=) <$> _fsSplitHealthChecks])

3384+ [("splitHealthChecks" .=) <$> _fsSplitHealthChecks])

3313

3385

3314-- | An SSL certificate obtained from a certificate authority.

3386-- | An SSL certificate obtained from a certificate authority.

3315--

3387--

@@ -3961,7 +4033,6 @@ data Version =

3961 , _verInstanceClass :: !(Maybe Text)

4033 , _verInstanceClass :: !(Maybe Text)

3962 , _verRuntimeChannel :: !(Maybe Text)

4034 , _verRuntimeChannel :: !(Maybe Text)

3963 , _verRuntimeMainExecutablePath :: !(Maybe Text)

4035 , _verRuntimeMainExecutablePath :: !(Maybe Text)

3964− , _verVPCAccessConnector :: !(Maybe VPCAccessConnector)

3965 , _verHealthCheck :: !(Maybe HealthCheck)

4036 , _verHealthCheck :: !(Maybe HealthCheck)

3966 , _verEndpointsAPIService :: !(Maybe EndpointsAPIService)

4037 , _verEndpointsAPIService :: !(Maybe EndpointsAPIService)

3967 , _verEnv :: !(Maybe Text)

4038 , _verEnv :: !(Maybe Text)

@@ -4011,8 +4082,6 @@ data Version =

4011--

4082--

4012-- * 'verRuntimeMainExecutablePath'

4083-- * 'verRuntimeMainExecutablePath'

4013--

4084--

4014−-- * 'verVPCAccessConnector'

4015−--

4016-- * 'verHealthCheck'

4085-- * 'verHealthCheck'

4017--

4086--

4018-- * 'verEndpointsAPIService'

4087-- * 'verEndpointsAPIService'

@@ -4083,7 +4152,6 @@ version =

4083 , _verInstanceClass = Nothing

4152 , _verInstanceClass = Nothing

4084 , _verRuntimeChannel = Nothing

4153 , _verRuntimeChannel = Nothing

4085 , _verRuntimeMainExecutablePath = Nothing

4154 , _verRuntimeMainExecutablePath = Nothing

4086− , _verVPCAccessConnector = Nothing

4087 , _verHealthCheck = Nothing

4155 , _verHealthCheck = Nothing

4088 , _verEndpointsAPIService = Nothing

4156 , _verEndpointsAPIService = Nothing

4089 , _verEnv = Nothing

4157 , _verEnv = Nothing

@@ -4153,12 +4221,6 @@ verRuntimeMainExecutablePath

4153 = lens _verRuntimeMainExecutablePath

4221 = lens _verRuntimeMainExecutablePath

4154 (\ s a -> s{_verRuntimeMainExecutablePath = a})

4222 (\ s a -> s{_verRuntimeMainExecutablePath = a})

4155

4223

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−

4162-- | Configures health checking for instances. Unhealthy instances are

4224-- | Configures health checking for instances. Unhealthy instances are

4163-- stopped and replaced with new instances. Only applicable in the App

4225-- stopped and replaced with new instances. Only applicable in the App

4164-- Engine flexible environment.Only returned in GET requests if view=FULL

4226-- Engine flexible environment.Only returned in GET requests if view=FULL

@@ -4181,7 +4243,7 @@ verEnv :: Lens' Version (Maybe Text)

4181verEnv = lens _verEnv (\ s a -> s{_verEnv = a})

4243verEnv = lens _verEnv (\ s a -> s{_verEnv = a})

4182

4244

4183-- | The Google Compute Engine zones that are supported by this version in

4245-- | 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.

4185verZones :: Lens' Version [Text]

4247verZones :: Lens' Version [Text]

4186verZones

4248verZones

4187 = lens _verZones (\ s a -> s{_verZones = a}) .

4249 = lens _verZones (\ s a -> s{_verZones = a}) .

@@ -4393,7 +4455,6 @@ instance FromJSON Version where

4393 (o .:? "instanceClass")

4455 (o .:? "instanceClass")

4394 <*> (o .:? "runtimeChannel")

4456 <*> (o .:? "runtimeChannel")

4395 <*> (o .:? "runtimeMainExecutablePath")

4457 <*> (o .:? "runtimeMainExecutablePath")

4396− <*> (o .:? "vpcAccessConnector")

4397 <*> (o .:? "healthCheck")

4458 <*> (o .:? "healthCheck")

4398 <*> (o .:? "endpointsApiService")

4459 <*> (o .:? "endpointsApiService")

4399 <*> (o .:? "env")

4460 <*> (o .:? "env")

@@ -4436,7 +4497,6 @@ instance ToJSON Version where

4436 ("runtimeChannel" .=) <$> _verRuntimeChannel,

4497 ("runtimeChannel" .=) <$> _verRuntimeChannel,

4437 ("runtimeMainExecutablePath" .=) <$>

4498 ("runtimeMainExecutablePath" .=) <$>

4438 _verRuntimeMainExecutablePath,

4499 _verRuntimeMainExecutablePath,

4439− ("vpcAccessConnector" .=) <$> _verVPCAccessConnector,

4440 ("healthCheck" .=) <$> _verHealthCheck,

4500 ("healthCheck" .=) <$> _verHealthCheck,

4441 ("endpointsApiService" .=) <$>

4501 ("endpointsApiService" .=) <$>

4442 _verEndpointsAPIService,

4502 _verEndpointsAPIService,

@@ -4978,15 +5038,17 @@ instance ToJSON LocationMetadata where

4978 ("flexibleEnvironmentAvailable" .=) <$>

5038 ("flexibleEnvironmentAvailable" .=) <$>

4979 _lmFlexibleEnvironmentAvailable])

5039 _lmFlexibleEnvironmentAvailable])

4980

5040

4981−-- | Service-specific metadata associated with the operation. It typically

5041+-- | Metadata for the given google.longrunning.Operation.

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.

4985--

5042--

4986-- /See:/ 'operationMetadata' smart constructor.

5043-- /See:/ 'operationMetadata' smart constructor.

4987−newtype OperationMetadata =

5044+data OperationMetadata =

4988 OperationMetadata'

5045 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)

4990 }

5052 }

4991 deriving (Eq, Show, Data, Typeable, Generic)

5053 deriving (Eq, Show, Data, Typeable, Generic)

4992

5054

@@ -4995,27 +5057,83 @@ newtype OperationMetadata =

4995--

5057--

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

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

4997--

5059--

4998−-- * 'omAddtional'

5060+-- * 'omInsertTime'

5061+--

5062+-- * 'omUser'

5063+--

5064+-- * 'omMethod'

5065+--

5066+-- * 'omEndTime'

5067+--

5068+-- * 'omOperationType'

5069+--

5070+-- * 'omTarget'

4999operationMetadata

5071operationMetadata

5000− :: HashMap Text JSONValue -- ^ 'omAddtional'

5001− -> OperationMetadata

5072+ :: OperationMetadata

5002−operationMetadata pOmAddtional_ =

5073+operationMetadata =

5003− OperationMetadata' {_omAddtional = _Coerce # pOmAddtional_}

5074+ OperationMetadata'

5075+ { _omInsertTime = Nothing

5076+ , _omUser = Nothing

5077+ , _omMethod = Nothing

5078+ , _omEndTime = Nothing

5079+ , _omOperationType = Nothing

5080+ , _omTarget = Nothing

5081+ }

5004

5082

5005

5083

5006−-- | Properties of the object. Contains field \'type with type URL.

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

5007−omAddtional :: Lens' OperationMetadata (HashMap Text JSONValue)

5107+omOperationType :: Lens' OperationMetadata (Maybe Text)

5008−omAddtional

5108+omOperationType

5009− = lens _omAddtional (\ s a -> s{_omAddtional = a}) .

5109+ = lens _omOperationType

5010− _Coerce

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})

5011

5116

5012instance FromJSON OperationMetadata where

5117instance FromJSON OperationMetadata where

5013 parseJSON

5118 parseJSON

5014 = withObject "OperationMetadata"

5119 = withObject "OperationMetadata"

5120+ (\ o ->

5015− (\ o -> OperationMetadata' <$> (parseJSONObject o))

5121+ OperationMetadata' <$>

5122+ (o .:? "insertTime") <*> (o .:? "user") <*>

5123+ (o .:? "method")

5124+ <*> (o .:? "endTime")

5125+ <*> (o .:? "operationType")

5126+ <*> (o .:? "target"))

5016

5127

5017instance ToJSON OperationMetadata where

5128instance 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])

5019

5137

5020-- | Response message for Instances.ListInstances.

5138-- | Response message for Instances.ListInstances.

5021--

5139--

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Repair.hs−12

@@ -24,12 +24,6 @@

24-- application, for example a Cloud Storage bucket or App Engine service

24-- application, for example a Cloud Storage bucket or App Engine service

25-- account. Use this method if you receive an error message about a missing

25-- account. Use this method if you receive an error message about a missing

26-- feature, for example, Error retrieving the App Engine service account.

26-- 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.

33--

27--

34-- /See:/ <https://cloud.google.com/appengine/docs/admin-api/ App Engine Admin API Reference> for @appengine.apps.repair@.

28-- /See:/ <https://cloud.google.com/appengine/docs/admin-api/ App Engine Admin API Reference> for @appengine.apps.repair@.

35module Network.Google.Resource.AppEngine.Apps.Repair

29module Network.Google.Resource.AppEngine.Apps.Repair

@@ -73,12 +67,6 @@ type AppsRepairResource =

73-- application, for example a Cloud Storage bucket or App Engine service

67-- application, for example a Cloud Storage bucket or App Engine service

74-- account. Use this method if you receive an error message about a missing

68-- account. Use this method if you receive an error message about a missing

75-- feature, for example, Error retrieving the App Engine service account.

69-- 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.

82--

70--

83-- /See:/ 'appsRepair' smart constructor.

71-- /See:/ 'appsRepair' smart constructor.

84data AppsRepair =

72data AppsRepair =

gogol-apps-activity/gen/Network/Google/Resource/AppsActivity/Activities/List.hs+4−5

@@ -21,7 +21,7 @@

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

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

22--

22--

23-- Returns a list of activities visible to the current logged in user.

23-- 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

25-- object that was acted on, e.g. Drive files a user can see. An activity

25-- object that was acted on, e.g. Drive files a user can see. An activity

26-- is a record of past events. Multiple events may be merged if they are

26-- is a record of past events. Multiple events may be merged if they are

27-- similar. A request is scoped to activities from a given Google service

27-- similar. A request is scoped to activities from a given Google service

@@ -69,7 +69,7 @@ type ActivitiesListResource =

69 Get '[JSON] ListActivitiesResponse

69 Get '[JSON] ListActivitiesResponse

70

70

71-- | Returns a list of activities visible to the current logged in user.

71-- | 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

73-- object that was acted on, e.g. Drive files a user can see. An activity

73-- object that was acted on, e.g. Drive files a user can see. An activity

74-- is a record of past events. Multiple events may be merged if they are

74-- is a record of past events. Multiple events may be merged if they are

75-- similar. A request is scoped to activities from a given Google service

75-- similar. A request is scoped to activities from a given Google service

@@ -140,9 +140,8 @@ alGroupingStrategy

140 = lens _alGroupingStrategy

140 = lens _alGroupingStrategy

141 (\ s a -> s{_alGroupingStrategy = a})

141 (\ s a -> s{_alGroupingStrategy = a})

142

142

143−-- | The ID used for ACL checks (does not filter the resulting event list by

143+-- | Indicates the user to return activity for. Use the special value me to

144−-- the assigned value). Use the special value me to indicate the currently

145−-- authenticated user.

144+-- indicate the currently authenticated user.

146alUserId :: Lens' ActivitiesList Text

145alUserId :: Lens' ActivitiesList Text

147alUserId = lens _alUserId (\ s a -> s{_alUserId = a})

146alUserId = lens _alUserId (\ s a -> s{_alUserId = a})

148

147

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/List.hs+11−11

@@ -205,12 +205,11 @@ elCalendarId :: Lens' EventsList Text

205elCalendarId

205elCalendarId

206 = lens _elCalendarId (\ s a -> s{_elCalendarId = a})

206 = lens _elCalendarId (\ s a -> s{_elCalendarId = a})

207

207

208−-- | Lower bound (inclusive) for an event\'s start time to filter by.

208+-- | Lower bound (inclusive) for an event\'s end time to filter by. Optional.

209−-- Optional. The default is not to filter by start time. Must be an RFC3339

209+-- The default is not to filter by end time. Must be an RFC3339 timestamp

210−-- timestamp with mandatory time zone offset, for example,

210+-- with mandatory time zone offset, e.g., 2011-06-03T10:00:00-07:00,

211−-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

211+-- 2011-06-03T10:00:00Z. Milliseconds may be provided but will be ignored.

212−-- provided but are ignored. If timeMax is set, timeMin must be smaller

212+-- If timeMax is set, timeMin must be smaller than timeMax.

213−-- than timeMax.

214elTimeMin :: Lens' EventsList (Maybe UTCTime)

213elTimeMin :: Lens' EventsList (Maybe UTCTime)

215elTimeMin

214elTimeMin

216 = lens _elTimeMin (\ s a -> s{_elTimeMin = a}) .

215 = lens _elTimeMin (\ s a -> s{_elTimeMin = a}) .

@@ -330,11 +329,12 @@ elAlwaysIncludeEmail

330 = lens _elAlwaysIncludeEmail

329 = lens _elAlwaysIncludeEmail

331 (\ s a -> s{_elAlwaysIncludeEmail = a})

330 (\ s a -> s{_elAlwaysIncludeEmail = a})

332

331

333−-- | Upper bound (exclusive) for an event\'s end time to filter by. Optional.

332+-- | Upper bound (exclusive) for an event\'s start time to filter by.

334−-- The default is not to filter by end time. Must be an RFC3339 timestamp

333+-- Optional. The default is not to filter by start time. Must be an RFC3339

335−-- with mandatory time zone offset, for example, 2011-06-03T10:00:00-07:00,

334+-- timestamp with mandatory time zone offset, e.g.,

336−-- 2011-06-03T10:00:00Z. Milliseconds may be provided but are ignored. If

335+-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

337−-- timeMin is set, timeMax must be greater than timeMin.

336+-- provided but will be ignored. If timeMin is set, timeMax must be greater

337+-- than timeMin.

338elTimeMax :: Lens' EventsList (Maybe UTCTime)

338elTimeMax :: Lens' EventsList (Maybe UTCTime)

339elTimeMax

339elTimeMax

340 = lens _elTimeMax (\ s a -> s{_elTimeMax = a}) .

340 = 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

215ewCalendarId

215ewCalendarId

216 = lens _ewCalendarId (\ s a -> s{_ewCalendarId = a})

216 = lens _ewCalendarId (\ s a -> s{_ewCalendarId = a})

217

217

218−-- | Lower bound (inclusive) for an event\'s start time to filter by.

218+-- | Lower bound (inclusive) for an event\'s end time to filter by. Optional.

219−-- Optional. The default is not to filter by start time. Must be an RFC3339

219+-- The default is not to filter by end time. Must be an RFC3339 timestamp

220−-- timestamp with mandatory time zone offset, for example,

220+-- with mandatory time zone offset, e.g., 2011-06-03T10:00:00-07:00,

221−-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

221+-- 2011-06-03T10:00:00Z. Milliseconds may be provided but will be ignored.

222−-- provided but are ignored. If timeMax is set, timeMin must be smaller

222+-- If timeMax is set, timeMin must be smaller than timeMax.

223−-- than timeMax.

224ewTimeMin :: Lens' EventsWatch (Maybe UTCTime)

223ewTimeMin :: Lens' EventsWatch (Maybe UTCTime)

225ewTimeMin

224ewTimeMin

226 = lens _ewTimeMin (\ s a -> s{_ewTimeMin = a}) .

225 = lens _ewTimeMin (\ s a -> s{_ewTimeMin = a}) .

@@ -345,11 +344,12 @@ ewAlwaysIncludeEmail

345 = lens _ewAlwaysIncludeEmail

344 = lens _ewAlwaysIncludeEmail

346 (\ s a -> s{_ewAlwaysIncludeEmail = a})

345 (\ s a -> s{_ewAlwaysIncludeEmail = a})

347

346

348−-- | Upper bound (exclusive) for an event\'s end time to filter by. Optional.

347+-- | Upper bound (exclusive) for an event\'s start time to filter by.

349−-- The default is not to filter by end time. Must be an RFC3339 timestamp

348+-- Optional. The default is not to filter by start time. Must be an RFC3339

350−-- with mandatory time zone offset, for example, 2011-06-03T10:00:00-07:00,

349+-- timestamp with mandatory time zone offset, e.g.,

351−-- 2011-06-03T10:00:00Z. Milliseconds may be provided but are ignored. If

350+-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

352−-- timeMin is set, timeMax must be greater than timeMin.

351+-- provided but will be ignored. If timeMin is set, timeMax must be greater

352+-- than timeMin.

353ewTimeMax :: Lens' EventsWatch (Maybe UTCTime)

353ewTimeMax :: Lens' EventsWatch (Maybe UTCTime)

354ewTimeMax

354ewTimeMax

355 = lens _ewTimeMax (\ s a -> s{_ewTimeMax = a}) .

355 = lens _ewTimeMax (\ s a -> s{_ewTimeMax = a}) .

gogol-apps-reseller/gen/Network/Google/AppsReseller/Types/Product.hs+49−41

@@ -407,11 +407,9 @@ cCustomerDomain

407 = lens _cCustomerDomain

407 = lens _cCustomerDomain

408 (\ s a -> s{_cCustomerDomain = a})

408 (\ s a -> s{_cCustomerDomain = a})

409

409

410−-- | Customer contact phone number. Must start with \"+\" followed by the

410+-- | Customer contact phone number. This can be continuous numbers, with

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

411+-- spaces, etc. But it must be a real phone number and not, for example,

414−-- invalid.

412+-- \"123\". See phone local format conventions.

415cPhoneNumber :: Lens' Customer (Maybe Text)

413cPhoneNumber :: Lens' Customer (Maybe Text)

416cPhoneNumber

414cPhoneNumber

417 = lens _cPhoneNumber (\ s a -> s{_cPhoneNumber = a})

415 = lens _cPhoneNumber (\ s a -> s{_cPhoneNumber = a})

@@ -510,9 +508,8 @@ cprDealCode

510-- | The planName property is required. This is the name of the

508-- | The planName property is required. This is the name of the

511-- subscription\'s payment plan. For more information about the Google

509-- subscription\'s payment plan. For more information about the Google

512-- payment plans, see API concepts. Possible values are: -

510-- payment plans, see API concepts. Possible values are: -

513−-- ANNUAL_MONTHLY_PAY - The annual commitment plan with monthly payments

511+-- 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 -

512+-- ANNUAL_YEARLY_PAY - The annual commitment plan with yearly payments -

516-- FLEXIBLE - The flexible plan - TRIAL - The 30-day free trial plan

513-- FLEXIBLE - The flexible plan - TRIAL - The 30-day free trial plan

517cprPlanName :: Lens' ChangePlanRequest (Maybe Text)

514cprPlanName :: Lens' ChangePlanRequest (Maybe Text)

518cprPlanName

515cprPlanName

@@ -554,8 +551,7 @@ instance ToJSON ChangePlanRequest where

554 ("seats" .=) <$> _cprSeats])

551 ("seats" .=) <$> _cprSeats])

555

552

556-- | In this version of the API, annual commitment plan\'s interval is one

553-- | In this version of the API, annual commitment plan\'s interval is one

557−-- year. Note: When billingMethod value is OFFLINE, the subscription

554+-- year.

558−-- property object plan.commitmentInterval is omitted in all API responses.

559--

555--

560-- /See:/ 'subscriptionPlanCommitmentInterval' smart constructor.

556-- /See:/ 'subscriptionPlanCommitmentInterval' smart constructor.

561data SubscriptionPlanCommitmentInterval =

557data SubscriptionPlanCommitmentInterval =

@@ -646,8 +642,7 @@ subscriptionPlan =

646

642

647

643

648-- | In this version of the API, annual commitment plan\'s interval is one

644-- | In this version of the API, annual commitment plan\'s interval is one

649−-- year. Note: When billingMethod value is OFFLINE, the subscription

645+-- year.

650−-- property object plan.commitmentInterval is omitted in all API responses.

651spCommitmentInterval :: Lens' SubscriptionPlan (Maybe SubscriptionPlanCommitmentInterval)

646spCommitmentInterval :: Lens' SubscriptionPlan (Maybe SubscriptionPlanCommitmentInterval)

652spCommitmentInterval

647spCommitmentInterval

653 = lens _spCommitmentInterval

648 = lens _spCommitmentInterval

@@ -664,16 +659,14 @@ spIsCommitmentPlan

664-- | The planName property is required. This is the name of the

659-- | The planName property is required. This is the name of the

665-- subscription\'s plan. For more information about the Google payment

660-- subscription\'s plan. For more information about the Google payment

666-- plans, see the API concepts. Possible values are: - ANNUAL_MONTHLY_PAY —

661-- plans, see the API concepts. Possible values are: - ANNUAL_MONTHLY_PAY —

667−-- The annual commitment plan with monthly payments. Caution:

662+-- The annual commitment plan with monthly payments - ANNUAL_YEARLY_PAY —

668−-- ANNUAL_MONTHLY_PAY is returned as ANNUAL in all API responses. -

669−-- ANNUAL_YEARLY_PAY — The annual commitment plan with yearly payments -

663+-- The annual commitment plan with yearly payments - FLEXIBLE — The

670−-- FLEXIBLE — The flexible plan - TRIAL — The 30-day free trial plan. A

664+-- flexible plan - TRIAL — The 30-day free trial plan. A subscription in

671−-- subscription in trial will be suspended after the 30th free day if no

665+-- trial will be suspended after the 30th free day if no payment plan is

672−-- payment plan is assigned. Calling changePlan will assign a payment plan

666+-- assigned. Calling changePlan will assign a payment plan to a trial but

673−-- to a trial but will not activate the plan. A trial will automatically

667+-- will not activate the plan. A trial will automatically begin its

674−-- begin its assigned payment plan after its 30th free day or immediately

668+-- assigned payment plan after its 30th free day or immediately after

675−-- after calling startPaidService. - FREE — The free plan is exclusive to

669+-- calling startPaidService.

676−-- the Cloud Identity SKU and does not incur any billing.

677spPlanName :: Lens' SubscriptionPlan (Maybe Text)

670spPlanName :: Lens' SubscriptionPlan (Maybe Text)

678spPlanName

671spPlanName

679 = lens _spPlanName (\ s a -> s{_spPlanName = a})

672 = lens _spPlanName (\ s a -> s{_spPlanName = a})

@@ -798,43 +791,58 @@ seats =

798 }

791 }

799

792

800

793

801−-- | This is a required property and is exclusive to subscriptions with

794+-- | The numberOfSeats property holds the customer\'s number of user

802−-- ANNUAL_MONTHLY_PAY and ANNUAL_YEARLY_PAY plans. This property sets the

795+-- licenses. How a user\'s licenses are managed depends on the

803−-- maximum number of licenses assignable to users on a subscription. 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

804−-- reseller can add more licenses, but once set, the numberOfSeats cannot

800+-- add more licenses, but once set, the numberOfSeats can not be reduced

805−-- be reduced until renewal. The reseller is invoiced based on the

801+-- until renewal. The reseller is invoiced based on the numberOfSeats value

806−-- numberOfSeats value regardless of how many of these user licenses are

802+-- regardless of how many of these user licenses are provisioned users. -

807−-- assigned. Note: G Suite subscriptions automatically assign a license to

803+-- flexible plan — For this plan, a reseller is invoiced on the actual

808−-- every user.

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.

809seaNumberOfSeats :: Lens' Seats (Maybe Int32)

809seaNumberOfSeats :: Lens' Seats (Maybe Int32)

810seaNumberOfSeats

810seaNumberOfSeats

811 = lens _seaNumberOfSeats

811 = lens _seaNumberOfSeats

812 (\ s a -> s{_seaNumberOfSeats = a})

812 (\ s a -> s{_seaNumberOfSeats = a})

813 . mapping _Coerce

813 . mapping _Coerce

814

814

815−-- | This is a required property and is exclusive to subscriptions with

815+-- | The maximumNumberOfSeats property is the maximum number of licenses that

816−-- FLEXIBLE or TRIAL plans. This property sets the maximum number of

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

817−-- licensed users allowed on a subscription. This quantity can be increased

825+-- provisioning. This quantity can be increased up to the maximum limit

818−-- up to the maximum limit defined in the reseller\'s contract. The minimum

826+-- defined in the reseller\'s contract. And the minimum quantity is the

819−-- quantity is the current number of users in the customer account. Note: G

827+-- current number of users in the customer account. - 30-day free trial

820−-- Suite subscriptions automatically assign a license to every user.

828+-- plan — A subscription in a 30-day free trial is restricted to maximum 10

829+-- seats.

821seaMaximumNumberOfSeats :: Lens' Seats (Maybe Int32)

830seaMaximumNumberOfSeats :: Lens' Seats (Maybe Int32)

822seaMaximumNumberOfSeats

831seaMaximumNumberOfSeats

823 = lens _seaMaximumNumberOfSeats

832 = lens _seaMaximumNumberOfSeats

824 (\ s a -> s{_seaMaximumNumberOfSeats = a})

833 (\ s a -> s{_seaMaximumNumberOfSeats = a})

825 . mapping _Coerce

834 . mapping _Coerce

826

835

827−-- | Read-only field containing the current number of users that are assigned

836+-- | Read-only field containing the current number of licensed seats for

828−-- a license for the product defined in skuId. This field\'s value is

837+-- FLEXIBLE Google-Apps subscriptions and secondary subscriptions such as

829−-- equivalent to the numerical count of users returned by the Enterprise

838+-- Google-Vault and Drive-storage.

830−-- License Manager API method: listForProductAndSku

831seaLicensedNumberOfSeats :: Lens' Seats (Maybe Int32)

839seaLicensedNumberOfSeats :: Lens' Seats (Maybe Int32)

832seaLicensedNumberOfSeats

840seaLicensedNumberOfSeats

833 = lens _seaLicensedNumberOfSeats

841 = lens _seaLicensedNumberOfSeats

834 (\ s a -> s{_seaLicensedNumberOfSeats = a})

842 (\ s a -> s{_seaLicensedNumberOfSeats = a})

835 . mapping _Coerce

843 . mapping _Coerce

836

844

837−-- | Identifies the resource as a subscription seat setting. Value:

845+-- | Identifies the resource as a subscription change plan request. Value:

838-- subscriptions#seats

846-- subscriptions#seats

839seaKind :: Lens' Seats Text

847seaKind :: Lens' Seats Text

840seaKind = lens _seaKind (\ s a -> s{_seaKind = a})

848seaKind = lens _seaKind (\ s a -> s{_seaKind = a})

gogol-apps-reseller/gen/Network/Google/AppsReseller/Types/Sum.hs+26

@@ -25,6 +25,28 @@ data SubscriptionsDeleteDeletionType

25 -- ^ @cancel@

25 -- ^ @cancel@

26 -- Cancels the subscription immediately. This does not apply to a G Suite

26 -- Cancels the subscription immediately. This does not apply to a G Suite

27 -- subscription.

27 -- 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.

28 | TransferToDirect

50 | TransferToDirect

29 -- ^ @transfer_to_direct@

51 -- ^ @transfer_to_direct@

30 -- Transfers a subscription directly to Google.  The customer is

52 -- Transfers a subscription directly to Google.  The customer is

@@ -39,12 +61,16 @@ instance Hashable SubscriptionsDeleteDeletionType

39instance FromHttpApiData SubscriptionsDeleteDeletionType where

61instance FromHttpApiData SubscriptionsDeleteDeletionType where

40 parseQueryParam = \case

62 parseQueryParam = \case

41 "cancel" -> Right Cancel

63 "cancel" -> Right Cancel

64+ "downgrade" -> Right Downgrade

65+ "suspend" -> Right Suspend

42 "transfer_to_direct" -> Right TransferToDirect

66 "transfer_to_direct" -> Right TransferToDirect

43 x -> Left ("Unable to parse SubscriptionsDeleteDeletionType from: " <> x)

67 x -> Left ("Unable to parse SubscriptionsDeleteDeletionType from: " <> x)

44

68

45instance ToHttpApiData SubscriptionsDeleteDeletionType where

69instance ToHttpApiData SubscriptionsDeleteDeletionType where

46 toQueryParam = \case

70 toQueryParam = \case

47 Cancel -> "cancel"

71 Cancel -> "cancel"

72+ Downgrade -> "downgrade"

73+ Suspend -> "suspend"

48 TransferToDirect -> "transfer_to_direct"

74 TransferToDirect -> "transfer_to_direct"

49

75

50instance FromJSON SubscriptionsDeleteDeletionType where

76instance FromJSON SubscriptionsDeleteDeletionType where

gogol-apps-reseller/gen/Network/Google/Resource/Reseller/Subscriptions/Delete.hs+2−2

@@ -20,7 +20,7 @@

20-- Stability : auto-generated

20-- Stability : auto-generated

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

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

22--

22--

23−-- Cancel or transfer a subscription to direct.

23+-- Cancel, suspend or transfer a subscription to direct.

24--

24--

25-- /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.delete@.

25-- /See:/ <https://developers.google.com/google-apps/reseller/ Enterprise Apps Reseller API Reference> for @reseller.subscriptions.delete@.

26module Network.Google.Resource.Reseller.Subscriptions.Delete

26module Network.Google.Resource.Reseller.Subscriptions.Delete

@@ -55,7 +55,7 @@ type SubscriptionsDeleteResource =

55 SubscriptionsDeleteDeletionType

55 SubscriptionsDeleteDeletionType

56 :> QueryParam "alt" AltJSON :> Delete '[JSON] ()

56 :> QueryParam "alt" AltJSON :> Delete '[JSON] ()

57

57

58−-- | Cancel or transfer a subscription to direct.

58+-- | Cancel, suspend or transfer a subscription to direct.

59--

59--

60-- /See:/ 'subscriptionsDelete' smart constructor.

60-- /See:/ 'subscriptionsDelete' smart constructor.

61data SubscriptionsDelete =

61data SubscriptionsDelete =

gogol-apps-tasks/gen/Network/Google/AppsTasks.hs+1−1

@@ -13,7 +13,7 @@

13-- Stability : auto-generated

13-- Stability : auto-generated

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

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

15--

15--

16−-- Manages your tasks and task lists.

16+-- Lets you manage your tasks and task lists.

17--

17--

18-- /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference>

18-- /See:/ <https://developers.google.com/google-apps/tasks/firstapp Tasks API Reference>

19module Network.Google.AppsTasks

19module Network.Google.AppsTasks

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/TaskLists/List.hs+1−1

@@ -82,7 +82,7 @@ tllPageToken

82 = lens _tllPageToken (\ s a -> s{_tllPageToken = a})

82 = lens _tllPageToken (\ s a -> s{_tllPageToken = a})

83

83

84-- | Maximum number of task lists returned on one page. Optional. The default

84-- | Maximum number of task lists returned on one page. Optional. The default

85−-- is 20 (max allowed: 100).

85+-- is 100.

86tllMaxResults :: Lens' TaskListsList (Maybe Int64)

86tllMaxResults :: Lens' TaskListsList (Maybe Int64)

87tllMaxResults

87tllMaxResults

88 = lens _tllMaxResults

88 = lens _tllMaxResults

gogol-apps-tasks/gen/Network/Google/Resource/Tasks/Tasks/List.hs+1−1

@@ -195,7 +195,7 @@ tlPageToken

195 = lens _tlPageToken (\ s a -> s{_tlPageToken = a})

195 = lens _tlPageToken (\ s a -> s{_tlPageToken = a})

196

196

197-- | Maximum number of task lists returned on one page. Optional. The default

197-- | Maximum number of task lists returned on one page. Optional. The default

198−-- is 20 (max allowed: 100).

198+-- is 100.

199tlMaxResults :: Lens' TasksList (Maybe Int64)

199tlMaxResults :: Lens' TasksList (Maybe Int64)

200tlMaxResults

200tlMaxResults

201 = lens _tlMaxResults (\ s a -> s{_tlMaxResults = a})

201 = lens _tlMaxResults (\ s a -> s{_tlMaxResults = a})

gogol-apps-tasks/gogol-apps-tasks.cabal+1−1

@@ -14,7 +14,7 @@ cabal-version: >= 1.10

14extra-source-files: README.md src/.gitkeep

14extra-source-files: README.md src/.gitkeep

15

15

16description:

16description:

17− Manages your tasks and task lists.

17+ Lets you manage your tasks and task lists.

18 .

18 .

19 /Warning:/ This is an experimental prototype/preview release which is still

19 /Warning:/ This is an experimental prototype/preview release which is still

20 under exploratory development and not intended for public use, caveat emptor!

20 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

214 , jsCreationTime

214 , jsCreationTime

215 , jsStartTime

215 , jsStartTime

216 , jsCompletionRatio

216 , jsCompletionRatio

217− , jsNumChildJobs

218 , jsTotalSlotMs

217 , jsTotalSlotMs

219 , jsLoad

218 , jsLoad

220 , jsTotalBytesProcessed

219 , jsTotalBytesProcessed

@@ -223,7 +222,6 @@ module Network.Google.BigQuery

223 , jsQuery

222 , jsQuery

224 , jsExtract

223 , jsExtract

225 , jsReservationUsage

224 , jsReservationUsage

226− , jsParentJobId

227

225

228 -- ** JobConfigurationLabels

226 -- ** JobConfigurationLabels

229 , JobConfigurationLabels

227 , JobConfigurationLabels

@@ -302,13 +300,6 @@ module Network.Google.BigQuery

302 , mdmoLabels

300 , mdmoLabels

303 , mdmoLossType

301 , mdmoLossType

304

302

305− -- ** RoutineReference

306− , RoutineReference

307− , routineReference

308− , rrDataSetId

309− , rrProjectId

310− , rrRoutineId

311−

312 -- ** RangePartitioning

303 -- ** RangePartitioning

313 , RangePartitioning

304 , RangePartitioning

314 , rangePartitioning

305 , rangePartitioning

@@ -368,19 +359,6 @@ module Network.Google.BigQuery

368 -- ** JobsListProjection

359 -- ** JobsListProjection

369 , JobsListProjection (..)

360 , JobsListProjection (..)

370

361

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−

384 -- ** QueryParameter

362 -- ** QueryParameter

385 , QueryParameter

363 , QueryParameter

386 , queryParameter

364 , queryParameter

@@ -388,10 +366,18 @@ module Network.Google.BigQuery

388 , qpParameterType

366 , qpParameterType

389 , qpName

367 , qpName

390

368

369+ -- ** IterationResult

370+ , IterationResult

371+ , iterationResult

372+ , irDurationMs

373+ , irLearnRate

374+ , irEvalLoss

375+ , irTrainingLoss

376+ , irIndex

377+

391 -- ** JobStatistics4

378 -- ** JobStatistics4

392 , JobStatistics4

379 , JobStatistics4

393 , jobStatistics4

380 , jobStatistics4

394− , jsInputBytes

395 , jsDestinationURIFileCounts

381 , jsDestinationURIFileCounts

396

382

397 -- ** ProjectReference

383 -- ** ProjectReference

@@ -432,6 +418,19 @@ module Network.Google.BigQuery

432 , eqsEndMs

418 , eqsEndMs

433 , eqsWaitMsMax

419 , eqsWaitMsMax

434

420

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+

435 -- ** BigQueryModelTraining

434 -- ** BigQueryModelTraining

436 , BigQueryModelTraining

435 , BigQueryModelTraining

437 , bigQueryModelTraining

436 , bigQueryModelTraining

@@ -508,15 +507,6 @@ module Network.Google.BigQuery

508 , plpiId

507 , plpiId

509 , plpiNumericId

508 , plpiNumericId

510

509

511− -- ** BqmlIterationResult

512− , BqmlIterationResult

513− , bqmlIterationResult

514− , birDurationMs

515− , birLearnRate

516− , birEvalLoss

517− , birTrainingLoss

518− , birIndex

519−

520 -- ** BigtableColumn

510 -- ** BigtableColumn

521 , BigtableColumn

511 , BigtableColumn

522 , bigtableColumn

512 , bigtableColumn

@@ -722,7 +712,6 @@ module Network.Google.BigQuery

722 , jModelTrainingExpectedTotalIteration

712 , jModelTrainingExpectedTotalIteration

723 , jModelTraining

713 , jModelTraining

724 , jTotalSlotMs

714 , jTotalSlotMs

725− , jDdlTargetRoutine

726 , jDdlTargetTable

715 , jDdlTargetTable

727 , jEstimatedBytesProcessed

716 , jEstimatedBytesProcessed

728 , jModelTrainingCurrentIteration

717 , jModelTrainingCurrentIteration

@@ -763,7 +752,6 @@ module Network.Google.BigQuery

763 , DestinationTableProperties

752 , DestinationTableProperties

764 , destinationTableProperties

753 , destinationTableProperties

765 , dtpFriendlyName

754 , dtpFriendlyName

766− , dtpLabels

767 , dtpDescription

755 , dtpDescription

768

756

769 -- ** DataSetAccessItem

757 -- ** DataSetAccessItem

@@ -777,14 +765,6 @@ module Network.Google.BigQuery

777 , dsaiView

765 , dsaiView

778 , dsaiUserByEmail

766 , dsaiUserByEmail

779

767

780− -- ** BqmlTrainingRun

781− , BqmlTrainingRun

782− , bqmlTrainingRun

783− , btrState

784− , btrStartTime

785− , btrIterationResults

786− , btrTrainingOptions

787−

788 -- ** TableDataInsertAllResponse

768 -- ** TableDataInsertAllResponse

789 , TableDataInsertAllResponse

769 , TableDataInsertAllResponse

790 , tableDataInsertAllResponse

770 , tableDataInsertAllResponse

@@ -848,11 +828,6 @@ module Network.Google.BigQuery

848 , coEncoding

828 , coEncoding

849 , coFieldDelimiter

829 , coFieldDelimiter

850

830

851− -- ** DestinationTablePropertiesLabels

852− , DestinationTablePropertiesLabels

853− , destinationTablePropertiesLabels

854− , dtplAddtional

855−

856 -- ** JobStatistics3

831 -- ** JobStatistics3

857 , JobStatistics3

832 , JobStatistics3

858 , jobStatistics3

833 , jobStatistics3

@@ -882,6 +857,14 @@ module Network.Google.BigQuery

882 , dataSetListDataSetsItemLabels

857 , dataSetListDataSetsItemLabels

883 , dsldsilAddtional

858 , dsldsilAddtional

884

859

860+ -- ** TrainingRun

861+ , TrainingRun

862+ , trainingRun

863+ , trState

864+ , trStartTime

865+ , trIterationResults

866+ , trTrainingOptions

867+

885 -- ** TableListTablesItemView

868 -- ** TableListTablesItemView

886 , TableListTablesItemView

869 , TableListTablesItemView

887 , tableListTablesItemView

870 , tableListTablesItemView

gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+30−47

@@ -139,7 +139,6 @@ module Network.Google.BigQuery.Types

139 , jsCreationTime

139 , jsCreationTime

140 , jsStartTime

140 , jsStartTime

141 , jsCompletionRatio

141 , jsCompletionRatio

142− , jsNumChildJobs

143 , jsTotalSlotMs

142 , jsTotalSlotMs

144 , jsLoad

143 , jsLoad

145 , jsTotalBytesProcessed

144 , jsTotalBytesProcessed

@@ -148,7 +147,6 @@ module Network.Google.BigQuery.Types

148 , jsQuery

147 , jsQuery

149 , jsExtract

148 , jsExtract

150 , jsReservationUsage

149 , jsReservationUsage

151− , jsParentJobId

152

150

153 -- * JobConfigurationLabels

151 -- * JobConfigurationLabels

154 , JobConfigurationLabels

152 , JobConfigurationLabels

@@ -227,13 +225,6 @@ module Network.Google.BigQuery.Types

227 , mdmoLabels

225 , mdmoLabels

228 , mdmoLossType

226 , mdmoLossType

229

227

230− -- * RoutineReference

231− , RoutineReference

232− , routineReference

233− , rrDataSetId

234− , rrProjectId

235− , rrRoutineId

236−

237 -- * RangePartitioning

228 -- * RangePartitioning

238 , RangePartitioning

229 , RangePartitioning

239 , rangePartitioning

230 , rangePartitioning

@@ -293,19 +284,6 @@ module Network.Google.BigQuery.Types

293 -- * JobsListProjection

284 -- * JobsListProjection

294 , JobsListProjection (..)

285 , JobsListProjection (..)

295

286

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−

309 -- * QueryParameter

287 -- * QueryParameter

310 , QueryParameter

288 , QueryParameter

311 , queryParameter

289 , queryParameter

@@ -313,10 +291,18 @@ module Network.Google.BigQuery.Types

313 , qpParameterType

291 , qpParameterType

314 , qpName

292 , qpName

315

293

294+ -- * IterationResult

295+ , IterationResult

296+ , iterationResult

297+ , irDurationMs

298+ , irLearnRate

299+ , irEvalLoss

300+ , irTrainingLoss

301+ , irIndex

302+

316 -- * JobStatistics4

303 -- * JobStatistics4

317 , JobStatistics4

304 , JobStatistics4

318 , jobStatistics4

305 , jobStatistics4

319− , jsInputBytes

320 , jsDestinationURIFileCounts

306 , jsDestinationURIFileCounts

321

307

322 -- * ProjectReference

308 -- * ProjectReference

@@ -357,6 +343,19 @@ module Network.Google.BigQuery.Types

357 , eqsEndMs

343 , eqsEndMs

358 , eqsWaitMsMax

344 , eqsWaitMsMax

359

345

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+

360 -- * BigQueryModelTraining

359 -- * BigQueryModelTraining

361 , BigQueryModelTraining

360 , BigQueryModelTraining

362 , bigQueryModelTraining

361 , bigQueryModelTraining

@@ -433,15 +432,6 @@ module Network.Google.BigQuery.Types

433 , plpiId

432 , plpiId

434 , plpiNumericId

433 , plpiNumericId

435

434

436− -- * BqmlIterationResult

437− , BqmlIterationResult

438− , bqmlIterationResult

439− , birDurationMs

440− , birLearnRate

441− , birEvalLoss

442− , birTrainingLoss

443− , birIndex

444−

445 -- * BigtableColumn

435 -- * BigtableColumn

446 , BigtableColumn

436 , BigtableColumn

447 , bigtableColumn

437 , bigtableColumn

@@ -647,7 +637,6 @@ module Network.Google.BigQuery.Types

647 , jModelTrainingExpectedTotalIteration

637 , jModelTrainingExpectedTotalIteration

648 , jModelTraining

638 , jModelTraining

649 , jTotalSlotMs

639 , jTotalSlotMs

650− , jDdlTargetRoutine

651 , jDdlTargetTable

640 , jDdlTargetTable

652 , jEstimatedBytesProcessed

641 , jEstimatedBytesProcessed

653 , jModelTrainingCurrentIteration

642 , jModelTrainingCurrentIteration

@@ -688,7 +677,6 @@ module Network.Google.BigQuery.Types

688 , DestinationTableProperties

677 , DestinationTableProperties

689 , destinationTableProperties

678 , destinationTableProperties

690 , dtpFriendlyName

679 , dtpFriendlyName

691− , dtpLabels

692 , dtpDescription

680 , dtpDescription

693

681

694 -- * DataSetAccessItem

682 -- * DataSetAccessItem

@@ -702,14 +690,6 @@ module Network.Google.BigQuery.Types

702 , dsaiView

690 , dsaiView

703 , dsaiUserByEmail

691 , dsaiUserByEmail

704

692

705− -- * BqmlTrainingRun

706− , BqmlTrainingRun

707− , bqmlTrainingRun

708− , btrState

709− , btrStartTime

710− , btrIterationResults

711− , btrTrainingOptions

712−

713 -- * TableDataInsertAllResponse

693 -- * TableDataInsertAllResponse

714 , TableDataInsertAllResponse

694 , TableDataInsertAllResponse

715 , tableDataInsertAllResponse

695 , tableDataInsertAllResponse

@@ -773,11 +753,6 @@ module Network.Google.BigQuery.Types

773 , coEncoding

753 , coEncoding

774 , coFieldDelimiter

754 , coFieldDelimiter

775

755

776− -- * DestinationTablePropertiesLabels

777− , DestinationTablePropertiesLabels

778− , destinationTablePropertiesLabels

779− , dtplAddtional

780−

781 -- * JobStatistics3

756 -- * JobStatistics3

782 , JobStatistics3

757 , JobStatistics3

783 , jobStatistics3

758 , jobStatistics3

@@ -807,6 +782,14 @@ module Network.Google.BigQuery.Types

807 , dataSetListDataSetsItemLabels

782 , dataSetListDataSetsItemLabels

808 , dsldsilAddtional

783 , dsldsilAddtional

809

784

785+ -- * TrainingRun

786+ , TrainingRun

787+ , trainingRun

788+ , trState

789+ , trStartTime

790+ , trIterationResults

791+ , trTrainingOptions

792+

810 -- * TableListTablesItemView

793 -- * TableListTablesItemView

811 , TableListTablesItemView

794 , TableListTablesItemView

812 , tableListTablesItemView

795 , tableListTablesItemView

gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+338−519

@@ -1053,7 +1053,6 @@ data JobStatistics =

1053 { _jsCreationTime :: !(Maybe (Textual Int64))

1053 { _jsCreationTime :: !(Maybe (Textual Int64))

1054 , _jsStartTime :: !(Maybe (Textual Int64))

1054 , _jsStartTime :: !(Maybe (Textual Int64))

1055 , _jsCompletionRatio :: !(Maybe (Textual Double))

1055 , _jsCompletionRatio :: !(Maybe (Textual Double))

1056− , _jsNumChildJobs :: !(Maybe (Textual Int64))

1057 , _jsTotalSlotMs :: !(Maybe (Textual Int64))

1056 , _jsTotalSlotMs :: !(Maybe (Textual Int64))

1058 , _jsLoad :: !(Maybe JobStatistics3)

1057 , _jsLoad :: !(Maybe JobStatistics3)

1059 , _jsTotalBytesProcessed :: !(Maybe (Textual Int64))

1058 , _jsTotalBytesProcessed :: !(Maybe (Textual Int64))

@@ -1062,7 +1061,6 @@ data JobStatistics =

1062 , _jsQuery :: !(Maybe JobStatistics2)

1061 , _jsQuery :: !(Maybe JobStatistics2)

1063 , _jsExtract :: !(Maybe JobStatistics4)

1062 , _jsExtract :: !(Maybe JobStatistics4)

1064 , _jsReservationUsage :: !(Maybe [JobStatisticsReservationUsageItem])

1063 , _jsReservationUsage :: !(Maybe [JobStatisticsReservationUsageItem])

1065− , _jsParentJobId :: !(Maybe Text)

1066 }

1064 }

1067 deriving (Eq, Show, Data, Typeable, Generic)

1065 deriving (Eq, Show, Data, Typeable, Generic)

1068

1066

@@ -1077,8 +1075,6 @@ data JobStatistics =

1077--

1075--

1078-- * 'jsCompletionRatio'

1076-- * 'jsCompletionRatio'

1079--

1077--

1080−-- * 'jsNumChildJobs'

1081−--

1082-- * 'jsTotalSlotMs'

1078-- * 'jsTotalSlotMs'

1083--

1079--

1084-- * 'jsLoad'

1080-- * 'jsLoad'

@@ -1094,8 +1090,6 @@ data JobStatistics =

1094-- * 'jsExtract'

1090-- * 'jsExtract'

1095--

1091--

1096-- * 'jsReservationUsage'

1092-- * 'jsReservationUsage'

1097−--

1098−-- * 'jsParentJobId'

1099jobStatistics

1093jobStatistics

1100 :: JobStatistics

1094 :: JobStatistics

1101jobStatistics =

1095jobStatistics =

@@ -1103,7 +1097,6 @@ jobStatistics =

1103 { _jsCreationTime = Nothing

1097 { _jsCreationTime = Nothing

1104 , _jsStartTime = Nothing

1098 , _jsStartTime = Nothing

1105 , _jsCompletionRatio = Nothing

1099 , _jsCompletionRatio = Nothing

1106− , _jsNumChildJobs = Nothing

1107 , _jsTotalSlotMs = Nothing

1100 , _jsTotalSlotMs = Nothing

1108 , _jsLoad = Nothing

1101 , _jsLoad = Nothing

1109 , _jsTotalBytesProcessed = Nothing

1102 , _jsTotalBytesProcessed = Nothing

@@ -1112,7 +1105,6 @@ jobStatistics =

1112 , _jsQuery = Nothing

1105 , _jsQuery = Nothing

1113 , _jsExtract = Nothing

1106 , _jsExtract = Nothing

1114 , _jsReservationUsage = Nothing

1107 , _jsReservationUsage = Nothing

1115− , _jsParentJobId = Nothing

1116 }

1108 }

1117

1109

1118

1110

@@ -1140,13 +1132,6 @@ jsCompletionRatio

1140 (\ s a -> s{_jsCompletionRatio = a})

1132 (\ s a -> s{_jsCompletionRatio = a})

1141 . mapping _Coerce

1133 . mapping _Coerce

1142

1134

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−

1150-- | [Output-only] Slot-milliseconds for the job.

1135-- | [Output-only] Slot-milliseconds for the job.

1151jsTotalSlotMs :: Lens' JobStatistics (Maybe Int64)

1136jsTotalSlotMs :: Lens' JobStatistics (Maybe Int64)

1152jsTotalSlotMs

1137jsTotalSlotMs

@@ -1198,12 +1183,6 @@ jsReservationUsage

1198 . _Default

1183 . _Default

1199 . _Coerce

1184 . _Coerce

1200

1185

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−

1207instance FromJSON JobStatistics where

1186instance FromJSON JobStatistics where

1208 parseJSON

1187 parseJSON

1209 = withObject "JobStatistics"

1188 = withObject "JobStatistics"

@@ -1211,7 +1190,6 @@ instance FromJSON JobStatistics where

1211 JobStatistics' <$>

1190 JobStatistics' <$>

1212 (o .:? "creationTime") <*> (o .:? "startTime") <*>

1191 (o .:? "creationTime") <*> (o .:? "startTime") <*>

1213 (o .:? "completionRatio")

1192 (o .:? "completionRatio")

1214− <*> (o .:? "numChildJobs")

1215 <*> (o .:? "totalSlotMs")

1193 <*> (o .:? "totalSlotMs")

1216 <*> (o .:? "load")

1194 <*> (o .:? "load")

1217 <*> (o .:? "totalBytesProcessed")

1195 <*> (o .:? "totalBytesProcessed")

@@ -1219,8 +1197,7 @@ instance FromJSON JobStatistics where

1219 <*> (o .:? "endTime")

1197 <*> (o .:? "endTime")

1220 <*> (o .:? "query")

1198 <*> (o .:? "query")

1221 <*> (o .:? "extract")

1199 <*> (o .:? "extract")

1222− <*> (o .:? "reservationUsage" .!= mempty)

1200+ <*> (o .:? "reservationUsage" .!= mempty))

1223− <*> (o .:? "parentJobId"))

1224

1201

1225instance ToJSON JobStatistics where

1202instance ToJSON JobStatistics where

1226 toJSON JobStatistics'{..}

1203 toJSON JobStatistics'{..}

@@ -1229,7 +1206,6 @@ instance ToJSON JobStatistics where

1229 [("creationTime" .=) <$> _jsCreationTime,

1206 [("creationTime" .=) <$> _jsCreationTime,

1230 ("startTime" .=) <$> _jsStartTime,

1207 ("startTime" .=) <$> _jsStartTime,

1231 ("completionRatio" .=) <$> _jsCompletionRatio,

1208 ("completionRatio" .=) <$> _jsCompletionRatio,

1232− ("numChildJobs" .=) <$> _jsNumChildJobs,

1233 ("totalSlotMs" .=) <$> _jsTotalSlotMs,

1209 ("totalSlotMs" .=) <$> _jsTotalSlotMs,

1234 ("load" .=) <$> _jsLoad,

1210 ("load" .=) <$> _jsLoad,

1235 ("totalBytesProcessed" .=) <$>

1211 ("totalBytesProcessed" .=) <$>

@@ -1238,8 +1214,7 @@ instance ToJSON JobStatistics where

1238 ("endTime" .=) <$> _jsEndTime,

1214 ("endTime" .=) <$> _jsEndTime,

1239 ("query" .=) <$> _jsQuery,

1215 ("query" .=) <$> _jsQuery,

1240 ("extract" .=) <$> _jsExtract,

1216 ("extract" .=) <$> _jsExtract,

1241− ("reservationUsage" .=) <$> _jsReservationUsage,

1217+ ("reservationUsage" .=) <$> _jsReservationUsage])

1242− ("parentJobId" .=) <$> _jsParentJobId])

1243

1218

1244-- | The labels associated with this job. You can use these to organize and

1219-- | The labels associated with this job. You can use these to organize and

1245-- group your jobs. Label keys and values can be no longer than 63

1220-- group your jobs. Label keys and values can be no longer than 63

@@ -2067,66 +2042,6 @@ instance ToJSON ModelDefinitionModelOptions where

2067 ("labels" .=) <$> _mdmoLabels,

2042 ("labels" .=) <$> _mdmoLabels,

2068 ("lossType" .=) <$> _mdmoLossType])

2043 ("lossType" .=) <$> _mdmoLossType])

2069

2044

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−

2130--

2045--

2131-- /See:/ 'rangePartitioning' smart constructor.

2046-- /See:/ 'rangePartitioning' smart constructor.

2132data RangePartitioning =

2047data RangePartitioning =

@@ -2742,146 +2657,6 @@ instance ToJSON QueryRequest where

2742 ("maxResults" .=) <$> _qrMaxResults,

2657 ("maxResults" .=) <$> _qrMaxResults,

2743 ("defaultDataset" .=) <$> _qrDefaultDataSet])

2658 ("defaultDataset" .=) <$> _qrDefaultDataSet])

2744

2659

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−

2885--

2660--

2886-- /See:/ 'queryParameter' smart constructor.

2661-- /See:/ 'queryParameter' smart constructor.

2887data QueryParameter =

2662data QueryParameter =

@@ -2942,12 +2717,109 @@ instance ToJSON QueryParameter where

2942 ("parameterType" .=) <$> _qpParameterType,

2717 ("parameterType" .=) <$> _qpParameterType,

2943 ("name" .=) <$> _qpName])

2718 ("name" .=) <$> _qpName])

2944

2719

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+

2945--

2818--

2946-- /See:/ 'jobStatistics4' smart constructor.

2819-- /See:/ 'jobStatistics4' smart constructor.

2947−data JobStatistics4 =

2820+newtype JobStatistics4 =

2948 JobStatistics4'

2821 JobStatistics4'

2949− { _jsInputBytes :: !(Maybe (Textual Int64))

2950− , _jsDestinationURIFileCounts :: !(Maybe [Textual Int64])

2822+ { _jsDestinationURIFileCounts :: Maybe [Textual Int64]

2951 }

2823 }

2952 deriving (Eq, Show, Data, Typeable, Generic)

2824 deriving (Eq, Show, Data, Typeable, Generic)

2953

2825

@@ -2956,22 +2828,11 @@ data JobStatistics4 =

2956--

2828--

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

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

2958--

2830--

2959−-- * 'jsInputBytes'

2960−--

2961-- * 'jsDestinationURIFileCounts'

2831-- * 'jsDestinationURIFileCounts'

2962jobStatistics4

2832jobStatistics4

2963 :: JobStatistics4

2833 :: JobStatistics4

2964−jobStatistics4 =

2965− JobStatistics4'

2966− {_jsInputBytes = Nothing, _jsDestinationURIFileCounts = Nothing}

2834+jobStatistics4 = JobStatistics4' {_jsDestinationURIFileCounts = Nothing}

2967−

2968

2835

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

2975

2836

2976-- | [Output-only] Number of files per destination URI or URI pattern

2837-- | [Output-only] Number of files per destination URI or URI pattern

2977-- specified in the extract configuration. These values will be in the same

2838-- specified in the extract configuration. These values will be in the same

@@ -2988,15 +2849,13 @@ instance FromJSON JobStatistics4 where

2988 = withObject "JobStatistics4"

2849 = withObject "JobStatistics4"

2989 (\ o ->

2850 (\ o ->

2990 JobStatistics4' <$>

2851 JobStatistics4' <$>

2991− (o .:? "inputBytes") <*>

2992− (o .:? "destinationUriFileCounts" .!= mempty))

2852+ (o .:? "destinationUriFileCounts" .!= mempty))

2993

2853

2994instance ToJSON JobStatistics4 where

2854instance ToJSON JobStatistics4 where

2995 toJSON JobStatistics4'{..}

2855 toJSON JobStatistics4'{..}

2996 = object

2856 = object

2997 (catMaybes

2857 (catMaybes

2998− [("inputBytes" .=) <$> _jsInputBytes,

2999− ("destinationUriFileCounts" .=) <$>

2858+ [("destinationUriFileCounts" .=) <$>

3000 _jsDestinationURIFileCounts])

2859 _jsDestinationURIFileCounts])

3001

2860

3002--

2861--

@@ -3431,6 +3290,145 @@ instance ToJSON ExplainQueryStage where

3431 ("endMs" .=) <$> _eqsEndMs,

3290 ("endMs" .=) <$> _eqsEndMs,

3432 ("waitMsMax" .=) <$> _eqsWaitMsMax])

3291 ("waitMsMax" .=) <$> _eqsWaitMsMax])

3433

3292

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+

3434--

3432--

3435-- /See:/ 'bigQueryModelTraining' smart constructor.

3433-- /See:/ 'bigQueryModelTraining' smart constructor.

3436data BigQueryModelTraining =

3434data BigQueryModelTraining =

@@ -4281,105 +4279,6 @@ instance ToJSON ProjectListProjectsItem where

4281 ("id" .=) <$> _plpiId,

4279 ("id" .=) <$> _plpiId,

4282 ("numericId" .=) <$> _plpiNumericId])

4280 ("numericId" .=) <$> _plpiNumericId])

4283

4281

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−

4383--

4282--

4384-- /See:/ 'bigtableColumn' smart constructor.

4283-- /See:/ 'bigtableColumn' smart constructor.

4385data BigtableColumn =

4284data BigtableColumn =

@@ -5368,7 +5267,7 @@ instance ToJSON JobConfigurationExtract where

5368data ModelDefinition =

5267data ModelDefinition =

5369 ModelDefinition'

5268 ModelDefinition'

5370 { _mdModelOptions :: !(Maybe ModelDefinitionModelOptions)

5269 { _mdModelOptions :: !(Maybe ModelDefinitionModelOptions)

5371− , _mdTrainingRuns :: !(Maybe [BqmlTrainingRun])

5270+ , _mdTrainingRuns :: !(Maybe [TrainingRun])

5372 }

5271 }

5373 deriving (Eq, Show, Data, Typeable, Generic)

5272 deriving (Eq, Show, Data, Typeable, Generic)

5374

5273

@@ -5398,7 +5297,7 @@ mdModelOptions

5398-- run comprises of multiple iterations and there may be multiple training

5297-- run comprises of multiple iterations and there may be multiple training

5399-- runs for the model if warm start is used or if a user decides to

5298-- runs for the model if warm start is used or if a user decides to

5400-- continue a previously cancelled query.

5299-- continue a previously cancelled query.

5401−mdTrainingRuns :: Lens' ModelDefinition [BqmlTrainingRun]

5300+mdTrainingRuns :: Lens' ModelDefinition [TrainingRun]

5402mdTrainingRuns

5301mdTrainingRuns

5403 = lens _mdTrainingRuns

5302 = lens _mdTrainingRuns

5404 (\ s a -> s{_mdTrainingRuns = a})

5303 (\ s a -> s{_mdTrainingRuns = a})

@@ -6363,7 +6262,6 @@ data JobStatistics2 =

6363 { _jModelTrainingExpectedTotalIteration :: !(Maybe (Textual Int64))

6262 { _jModelTrainingExpectedTotalIteration :: !(Maybe (Textual Int64))

6364 , _jModelTraining :: !(Maybe BigQueryModelTraining)

6263 , _jModelTraining :: !(Maybe BigQueryModelTraining)

6365 , _jTotalSlotMs :: !(Maybe (Textual Int64))

6264 , _jTotalSlotMs :: !(Maybe (Textual Int64))

6366− , _jDdlTargetRoutine :: !(Maybe RoutineReference)

6367 , _jDdlTargetTable :: !(Maybe TableReference)

6265 , _jDdlTargetTable :: !(Maybe TableReference)

6368 , _jEstimatedBytesProcessed :: !(Maybe (Textual Int64))

6266 , _jEstimatedBytesProcessed :: !(Maybe (Textual Int64))

6369 , _jModelTrainingCurrentIteration :: !(Maybe (Textual Int32))

6267 , _jModelTrainingCurrentIteration :: !(Maybe (Textual Int32))

@@ -6396,8 +6294,6 @@ data JobStatistics2 =

6396--

6294--

6397-- * 'jTotalSlotMs'

6295-- * 'jTotalSlotMs'

6398--

6296--

6399−-- * 'jDdlTargetRoutine'

6400−--

6401-- * 'jDdlTargetTable'

6297-- * 'jDdlTargetTable'

6402--

6298--

6403-- * 'jEstimatedBytesProcessed'

6299-- * 'jEstimatedBytesProcessed'

@@ -6440,7 +6336,6 @@ jobStatistics2 =

6440 { _jModelTrainingExpectedTotalIteration = Nothing

6336 { _jModelTrainingExpectedTotalIteration = Nothing

6441 , _jModelTraining = Nothing

6337 , _jModelTraining = Nothing

6442 , _jTotalSlotMs = Nothing

6338 , _jTotalSlotMs = Nothing

6443− , _jDdlTargetRoutine = Nothing

6444 , _jDdlTargetTable = Nothing

6339 , _jDdlTargetTable = Nothing

6445 , _jEstimatedBytesProcessed = Nothing

6340 , _jEstimatedBytesProcessed = Nothing

6446 , _jModelTrainingCurrentIteration = Nothing

6341 , _jModelTrainingCurrentIteration = Nothing

@@ -6482,13 +6377,6 @@ jTotalSlotMs

6482 = lens _jTotalSlotMs (\ s a -> s{_jTotalSlotMs = a})

6377 = lens _jTotalSlotMs (\ s a -> s{_jTotalSlotMs = a})

6483 . mapping _Coerce

6378 . mapping _Coerce

6484

6379

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−

6492-- | The DDL target table. Present only for CREATE\/DROP TABLE\/VIEW queries.

6380-- | The DDL target table. Present only for CREATE\/DROP TABLE\/VIEW queries.

6493jDdlTargetTable :: Lens' JobStatistics2 (Maybe TableReference)

6381jDdlTargetTable :: Lens' JobStatistics2 (Maybe TableReference)

6494jDdlTargetTable

6382jDdlTargetTable

@@ -6531,7 +6419,7 @@ jBillingTier

6531-- this field specifies the accuracy of the estimate. Possible values can

6419-- this field specifies the accuracy of the estimate. Possible values can

6532-- be: UNKNOWN: accuracy of the estimate is unknown. PRECISE: estimate is

6420-- be: UNKNOWN: accuracy of the estimate is unknown. PRECISE: estimate is

6533-- precise. LOWER_BOUND: estimate is lower bound of what the query would

6421-- 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.

6535jTotalBytesProcessedAccuracy :: Lens' JobStatistics2 (Maybe Text)

6423jTotalBytesProcessedAccuracy :: Lens' JobStatistics2 (Maybe Text)

6536jTotalBytesProcessedAccuracy

6424jTotalBytesProcessedAccuracy

6537 = lens _jTotalBytesProcessedAccuracy

6425 = lens _jTotalBytesProcessedAccuracy

@@ -6569,9 +6457,7 @@ jReferencedTables

6569-- \"CREATE_TABLE_AS_SELECT\": CREATE [OR REPLACE] TABLE ... AS SELECT ...

6457-- \"CREATE_TABLE_AS_SELECT\": CREATE [OR REPLACE] TABLE ... AS SELECT ...

6570-- . \"DROP_TABLE\": DROP TABLE query. \"CREATE_VIEW\": CREATE [OR REPLACE]

6458-- . \"DROP_TABLE\": DROP TABLE query. \"CREATE_VIEW\": CREATE [OR REPLACE]

6571-- VIEW ... AS SELECT ... . \"DROP_VIEW\": DROP VIEW query.

6459-- 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\":

6460+-- \"ALTER_TABLE\": ALTER TABLE query. \"ALTER_VIEW\": ALTER VIEW query.

6574−-- ALTER VIEW query.

6575jStatementType :: Lens' JobStatistics2 (Maybe Text)

6461jStatementType :: Lens' JobStatistics2 (Maybe Text)

6576jStatementType

6462jStatementType

6577 = lens _jStatementType

6463 = lens _jStatementType

@@ -6648,7 +6534,6 @@ instance FromJSON JobStatistics2 where

6648 (o .:? "modelTrainingExpectedTotalIteration") <*>

6534 (o .:? "modelTrainingExpectedTotalIteration") <*>

6649 (o .:? "modelTraining")

6535 (o .:? "modelTraining")

6650 <*> (o .:? "totalSlotMs")

6536 <*> (o .:? "totalSlotMs")

6651− <*> (o .:? "ddlTargetRoutine")

6652 <*> (o .:? "ddlTargetTable")

6537 <*> (o .:? "ddlTargetTable")

6653 <*> (o .:? "estimatedBytesProcessed")

6538 <*> (o .:? "estimatedBytesProcessed")

6654 <*> (o .:? "modelTrainingCurrentIteration")

6539 <*> (o .:? "modelTrainingCurrentIteration")

@@ -6676,7 +6561,6 @@ instance ToJSON JobStatistics2 where

6676 _jModelTrainingExpectedTotalIteration,

6561 _jModelTrainingExpectedTotalIteration,

6677 ("modelTraining" .=) <$> _jModelTraining,

6562 ("modelTraining" .=) <$> _jModelTraining,

6678 ("totalSlotMs" .=) <$> _jTotalSlotMs,

6563 ("totalSlotMs" .=) <$> _jTotalSlotMs,

6679− ("ddlTargetRoutine" .=) <$> _jDdlTargetRoutine,

6680 ("ddlTargetTable" .=) <$> _jDdlTargetTable,

6564 ("ddlTargetTable" .=) <$> _jDdlTargetTable,

6681 ("estimatedBytesProcessed" .=) <$>

6565 ("estimatedBytesProcessed" .=) <$>

6682 _jEstimatedBytesProcessed,

6566 _jEstimatedBytesProcessed,

@@ -6851,7 +6735,6 @@ instance ToJSON TableLabels where

6851data DestinationTableProperties =

6735data DestinationTableProperties =

6852 DestinationTableProperties'

6736 DestinationTableProperties'

6853 { _dtpFriendlyName :: !(Maybe Text)

6737 { _dtpFriendlyName :: !(Maybe Text)

6854− , _dtpLabels :: !(Maybe DestinationTablePropertiesLabels)

6855 , _dtpDescription :: !(Maybe Text)

6738 , _dtpDescription :: !(Maybe Text)

6856 }

6739 }

6857 deriving (Eq, Show, Data, Typeable, Generic)

6740 deriving (Eq, Show, Data, Typeable, Generic)

@@ -6863,17 +6746,12 @@ data DestinationTableProperties =

6863--

6746--

6864-- * 'dtpFriendlyName'

6747-- * 'dtpFriendlyName'

6865--

6748--

6866−-- * 'dtpLabels'

6867−--

6868-- * 'dtpDescription'

6749-- * 'dtpDescription'

6869destinationTableProperties

6750destinationTableProperties

6870 :: DestinationTableProperties

6751 :: DestinationTableProperties

6871destinationTableProperties =

6752destinationTableProperties =

6872 DestinationTableProperties'

6753 DestinationTableProperties'

6873− { _dtpFriendlyName = Nothing

6754+ {_dtpFriendlyName = Nothing, _dtpDescription = Nothing}

6874− , _dtpLabels = Nothing

6875− , _dtpDescription = Nothing

6876− }

6877

6755

6878

6756

6879-- | [Optional] The friendly name for the destination table. This will only

6757-- | [Optional] The friendly name for the destination table. This will only

@@ -6885,15 +6763,6 @@ dtpFriendlyName

6885 = lens _dtpFriendlyName

6763 = lens _dtpFriendlyName

6886 (\ s a -> s{_dtpFriendlyName = a})

6764 (\ s a -> s{_dtpFriendlyName = a})

6887

6765

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−

6897-- | [Optional] The description for the destination table. This will only be

6766-- | [Optional] The description for the destination table. This will only be

6898-- used if the destination table is newly created. If the table already

6767-- used if the destination table is newly created. If the table already

6899-- exists and a value different than the current description is provided,

6768-- exists and a value different than the current description is provided,

@@ -6908,15 +6777,13 @@ instance FromJSON DestinationTableProperties where

6908 = withObject "DestinationTableProperties"

6777 = withObject "DestinationTableProperties"

6909 (\ o ->

6778 (\ o ->

6910 DestinationTableProperties' <$>

6779 DestinationTableProperties' <$>

6911− (o .:? "friendlyName") <*> (o .:? "labels") <*>

6780+ (o .:? "friendlyName") <*> (o .:? "description"))

6912− (o .:? "description"))

6913

6781

6914instance ToJSON DestinationTableProperties where

6782instance ToJSON DestinationTableProperties where

6915 toJSON DestinationTableProperties'{..}

6783 toJSON DestinationTableProperties'{..}

6916 = object

6784 = object

6917 (catMaybes

6785 (catMaybes

6918 [("friendlyName" .=) <$> _dtpFriendlyName,

6786 [("friendlyName" .=) <$> _dtpFriendlyName,

6919− ("labels" .=) <$> _dtpLabels,

6920 ("description" .=) <$> _dtpDescription])

6787 ("description" .=) <$> _dtpDescription])

6921

6788

6922--

6789--

@@ -6989,13 +6856,9 @@ dsaiSpecialGroup

6989 = lens _dsaiSpecialGroup

6856 = lens _dsaiSpecialGroup

6990 (\ s a -> s{_dsaiSpecialGroup = a})

6857 (\ s a -> s{_dsaiSpecialGroup = a})

6991

6858

6992−-- | [Required] An IAM role ID that should be granted to the user, group, or

6859+-- | [Required] Describes the rights granted to the user specified by the

6993−-- domain specified in this access entry. The following legacy mappings

6860+-- other member of the access object. The following string values are

6994−-- will be applied: OWNER roles\/bigquery.dataOwner WRITER

6861+-- supported: READER, WRITER, OWNER.

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\".

6999dsaiRole :: Lens' DataSetAccessItem (Maybe Text)

6862dsaiRole :: Lens' DataSetAccessItem (Maybe Text)

7000dsaiRole = lens _dsaiRole (\ s a -> s{_dsaiRole = a})

6863dsaiRole = lens _dsaiRole (\ s a -> s{_dsaiRole = a})

7001

6864

@@ -7046,91 +6909,6 @@ instance ToJSON DataSetAccessItem where

7046 ("view" .=) <$> _dsaiView,

6909 ("view" .=) <$> _dsaiView,

7047 ("userByEmail" .=) <$> _dsaiUserByEmail])

6910 ("userByEmail" .=) <$> _dsaiUserByEmail])

7048

6911

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−

7134--

6912--

7135-- /See:/ 'tableDataInsertAllResponse' smart constructor.

6913-- /See:/ 'tableDataInsertAllResponse' smart constructor.

7136data TableDataInsertAllResponse =

6914data TableDataInsertAllResponse =

@@ -7828,50 +7606,6 @@ instance ToJSON CSVOptions where

7828 ("encoding" .=) <$> _coEncoding,

7606 ("encoding" .=) <$> _coEncoding,

7829 ("fieldDelimiter" .=) <$> _coFieldDelimiter])

7607 ("fieldDelimiter" .=) <$> _coFieldDelimiter])

7830

7608

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−

7875--

7609--

7876-- /See:/ 'jobStatistics3' smart constructor.

7610-- /See:/ 'jobStatistics3' smart constructor.

7877data JobStatistics3 =

7611data JobStatistics3 =

@@ -8179,6 +7913,91 @@ instance FromJSON DataSetListDataSetsItemLabels where

8179instance ToJSON DataSetListDataSetsItemLabels where

7913instance ToJSON DataSetListDataSetsItemLabels where

8180 toJSON = toJSON . _dsldsilAddtional

7914 toJSON = toJSON . _dsldsilAddtional

8181

7915

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+

8182-- | Additional details for a view.

8001-- | Additional details for a view.

8183--

8002--

8184-- /See:/ 'tableListTablesItemView' smart constructor.

8003-- /See:/ 'tableListTablesItemView' smart constructor.

gogol-bigquerydatatransfer/gen/Network/Google/BigQueryDataTransfer.hs+15−43

@@ -13,8 +13,8 @@

13-- Stability : auto-generated

13-- Stability : auto-generated

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

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

15--

15--

16−-- Schedule queries or transfer external data from SaaS applications to

16+-- Transfers data from partner SaaS applications to Google BigQuery on a

17−-- Google BigQuery on a regular basis.

17+-- scheduled, managed basis.

18--

18--

19-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference>

19-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference>

20module Network.Google.BigQueryDataTransfer

20module Network.Google.BigQueryDataTransfer

@@ -86,9 +86,6 @@ module Network.Google.BigQueryDataTransfer

86 -- ** bigquerydatatransfer.projects.locations.transferConfigs.scheduleRuns

86 -- ** bigquerydatatransfer.projects.locations.transferConfigs.scheduleRuns

87 , module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

87 , module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

88

88

89− -- ** bigquerydatatransfer.projects.locations.transferConfigs.startManualRuns

90− , module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns

91−

92 -- ** bigquerydatatransfer.projects.transferConfigs.create

89 -- ** bigquerydatatransfer.projects.transferConfigs.create

93 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

90 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

94

91

@@ -119,9 +116,6 @@ module Network.Google.BigQueryDataTransfer

119 -- ** bigquerydatatransfer.projects.transferConfigs.scheduleRuns

116 -- ** bigquerydatatransfer.projects.transferConfigs.scheduleRuns

120 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

117 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

121

118

122− -- ** bigquerydatatransfer.projects.transferConfigs.startManualRuns

123− , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

124−

125 -- * Types

119 -- * Types

126

120

127 -- ** DataSourceParameterType

121 -- ** DataSourceParameterType

@@ -140,28 +134,22 @@ module Network.Google.BigQueryDataTransfer

140 , llrNextPageToken

134 , llrNextPageToken

141 , llrLocations

135 , llrLocations

142

136

143− -- ** TimeRange

144− , TimeRange

145− , timeRange

146− , trStartTime

147− , trEndTime

148−

149 -- ** TransferRun

137 -- ** TransferRun

150 , TransferRun

138 , TransferRun

151 , transferRun

139 , transferRun

152− , tRunTime

140+ , trRunTime

153− , tErrorStatus

141+ , trErrorStatus

154− , tState

142+ , trState

155− , tSchedule

143+ , trSchedule

156− , tStartTime

144+ , trStartTime

157− , tScheduleTime

145+ , trScheduleTime

158− , tDataSourceId

146+ , trDataSourceId

159− , tParams

147+ , trParams

160− , tUserId

148+ , trUserId

161− , tUpdateTime

149+ , trUpdateTime

162− , tName

150+ , trName

163− , tEndTime

151+ , trEndTime

164− , tDestinationDataSetId

152+ , trDestinationDataSetId

165

153

166 -- ** CheckValidCredsRequest

154 -- ** CheckValidCredsRequest

167 , CheckValidCredsRequest

155 , CheckValidCredsRequest

@@ -258,12 +246,6 @@ module Network.Google.BigQueryDataTransfer

258 , ldsrNextPageToken

246 , ldsrNextPageToken

259 , ldsrDataSources

247 , ldsrDataSources

260

248

261− -- ** StartManualTransferRunsRequest

262− , StartManualTransferRunsRequest

263− , startManualTransferRunsRequest

264− , smtrrRequestedRunTime

265− , smtrrRequestedTimeRange

266−

267 -- ** Xgafv

249 -- ** Xgafv

268 , Xgafv (..)

250 , Xgafv (..)

269

251

@@ -310,11 +292,6 @@ module Network.Google.BigQueryDataTransfer

310 , locationLabels

292 , locationLabels

311 , llAddtional

293 , llAddtional

312

294

313− -- ** StartManualTransferRunsResponse

314− , StartManualTransferRunsResponse

315− , startManualTransferRunsResponse

316− , smtrrRuns

317−

318 -- ** LocationMetadata

295 -- ** LocationMetadata

319 , LocationMetadata

296 , LocationMetadata

320 , locationMetadata

297 , locationMetadata

@@ -371,7 +348,6 @@ import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations

371import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List

348import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List

372import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List

349import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List

373import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

350import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

374−import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns

375import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

351import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

376import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

352import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

377import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

353import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

@@ -382,7 +358,6 @@ import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferC

382import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

358import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

383import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

359import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

384import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

360import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

385−import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

386

361

387{- $resources

362{- $resources

388TODO

363TODO

@@ -400,7 +375,6 @@ type BigQueryDataTransferAPI =

400 :<|> ProjectsTransferConfigsRunsDeleteResource

375 :<|> ProjectsTransferConfigsRunsDeleteResource

401 :<|> ProjectsTransferConfigsScheduleRunsResource

376 :<|> ProjectsTransferConfigsScheduleRunsResource

402 :<|> ProjectsTransferConfigsListResource

377 :<|> ProjectsTransferConfigsListResource

403− :<|> ProjectsTransferConfigsStartManualRunsResource

404 :<|> ProjectsTransferConfigsPatchResource

378 :<|> ProjectsTransferConfigsPatchResource

405 :<|> ProjectsTransferConfigsGetResource

379 :<|> ProjectsTransferConfigsGetResource

406 :<|> ProjectsTransferConfigsCreateResource

380 :<|> ProjectsTransferConfigsCreateResource

@@ -418,8 +392,6 @@ type BigQueryDataTransferAPI =

418 :<|>

392 :<|>

419 ProjectsLocationsTransferConfigsScheduleRunsResource

393 ProjectsLocationsTransferConfigsScheduleRunsResource

420 :<|> ProjectsLocationsTransferConfigsListResource

394 :<|> ProjectsLocationsTransferConfigsListResource

421− :<|>

422− ProjectsLocationsTransferConfigsStartManualRunsResource

423 :<|> ProjectsLocationsTransferConfigsPatchResource

395 :<|> ProjectsLocationsTransferConfigsPatchResource

424 :<|> ProjectsLocationsTransferConfigsGetResource

396 :<|> ProjectsLocationsTransferConfigsGetResource

425 :<|> ProjectsLocationsTransferConfigsCreateResource

397 :<|> ProjectsLocationsTransferConfigsCreateResource

gogol-bigquerydatatransfer/gen/Network/Google/BigQueryDataTransfer/Types.hs+13−30

@@ -40,28 +40,22 @@ module Network.Google.BigQueryDataTransfer.Types

40 , llrNextPageToken

40 , llrNextPageToken

41 , llrLocations

41 , llrLocations

42

42

43− -- * TimeRange

44− , TimeRange

45− , timeRange

46− , trStartTime

47− , trEndTime

48−

49 -- * TransferRun

43 -- * TransferRun

50 , TransferRun

44 , TransferRun

51 , transferRun

45 , transferRun

52− , tRunTime

46+ , trRunTime

53− , tErrorStatus

47+ , trErrorStatus

54− , tState

48+ , trState

55− , tSchedule

49+ , trSchedule

56− , tStartTime

50+ , trStartTime

57− , tScheduleTime

51+ , trScheduleTime

58− , tDataSourceId

52+ , trDataSourceId

59− , tParams

53+ , trParams

60− , tUserId

54+ , trUserId

61− , tUpdateTime

55+ , trUpdateTime

62− , tName

56+ , trName

63− , tEndTime

57+ , trEndTime

64− , tDestinationDataSetId

58+ , trDestinationDataSetId

65

59

66 -- * CheckValidCredsRequest

60 -- * CheckValidCredsRequest

67 , CheckValidCredsRequest

61 , CheckValidCredsRequest

@@ -158,12 +152,6 @@ module Network.Google.BigQueryDataTransfer.Types

158 , ldsrNextPageToken

152 , ldsrNextPageToken

159 , ldsrDataSources

153 , ldsrDataSources

160

154

161− -- * StartManualTransferRunsRequest

162− , StartManualTransferRunsRequest

163− , startManualTransferRunsRequest

164− , smtrrRequestedRunTime

165− , smtrrRequestedTimeRange

166−

167 -- * Xgafv

155 -- * Xgafv

168 , Xgafv (..)

156 , Xgafv (..)

169

157

@@ -210,11 +198,6 @@ module Network.Google.BigQueryDataTransfer.Types

210 , locationLabels

198 , locationLabels

211 , llAddtional

199 , llAddtional

212

200

213− -- * StartManualTransferRunsResponse

214− , StartManualTransferRunsResponse

215− , startManualTransferRunsResponse

216− , smtrrRuns

217−

218 -- * LocationMetadata

201 -- * LocationMetadata

219 , LocationMetadata

202 , LocationMetadata

220 , locationMetadata

203 , locationMetadata

gogol-bigquerydatatransfer/gen/Network/Google/BigQueryDataTransfer/Types/Product.hs+93−243

@@ -168,80 +168,24 @@ instance ToJSON ListLocationsResponse where

168 [("nextPageToken" .=) <$> _llrNextPageToken,

168 [("nextPageToken" .=) <$> _llrNextPageToken,

169 ("locations" .=) <$> _llrLocations])

169 ("locations" .=) <$> _llrLocations])

170

170

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−

227-- | Represents a data transfer run.

171-- | Represents a data transfer run.

228--

172--

229-- /See:/ 'transferRun' smart constructor.

173-- /See:/ 'transferRun' smart constructor.

230data TransferRun =

174data TransferRun =

231 TransferRun'

175 TransferRun'

232− { _tRunTime :: !(Maybe DateTime')

176+ { _trRunTime :: !(Maybe DateTime')

233− , _tErrorStatus :: !(Maybe Status)

177+ , _trErrorStatus :: !(Maybe Status)

234− , _tState :: !(Maybe TransferRunState)

178+ , _trState :: !(Maybe TransferRunState)

235− , _tSchedule :: !(Maybe Text)

179+ , _trSchedule :: !(Maybe Text)

236− , _tStartTime :: !(Maybe DateTime')

180+ , _trStartTime :: !(Maybe DateTime')

237− , _tScheduleTime :: !(Maybe DateTime')

181+ , _trScheduleTime :: !(Maybe DateTime')

238− , _tDataSourceId :: !(Maybe Text)

182+ , _trDataSourceId :: !(Maybe Text)

239− , _tParams :: !(Maybe TransferRunParams)

183+ , _trParams :: !(Maybe TransferRunParams)

240− , _tUserId :: !(Maybe (Textual Int64))

184+ , _trUserId :: !(Maybe (Textual Int64))

241− , _tUpdateTime :: !(Maybe DateTime')

185+ , _trUpdateTime :: !(Maybe DateTime')

242− , _tName :: !(Maybe Text)

186+ , _trName :: !(Maybe Text)

243− , _tEndTime :: !(Maybe DateTime')

187+ , _trEndTime :: !(Maybe DateTime')

244− , _tDestinationDataSetId :: !(Maybe Text)

188+ , _trDestinationDataSetId :: !(Maybe Text)

245 }

189 }

246 deriving (Eq, Show, Data, Typeable, Generic)

190 deriving (Eq, Show, Data, Typeable, Generic)

247

191

@@ -250,130 +194,131 @@ data TransferRun =

250--

194--

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

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

252--

196--

253−-- * 'tRunTime'

197+-- * 'trRunTime'

254--

198--

255−-- * 'tErrorStatus'

199+-- * 'trErrorStatus'

256--

200--

257−-- * 'tState'

201+-- * 'trState'

258--

202--

259−-- * 'tSchedule'

203+-- * 'trSchedule'

260--

204--

261−-- * 'tStartTime'

205+-- * 'trStartTime'

262--

206--

263−-- * 'tScheduleTime'

207+-- * 'trScheduleTime'

264--

208--

265−-- * 'tDataSourceId'

209+-- * 'trDataSourceId'

266--

210--

267−-- * 'tParams'

211+-- * 'trParams'

268--

212--

269−-- * 'tUserId'

213+-- * 'trUserId'

270--

214--

271−-- * 'tUpdateTime'

215+-- * 'trUpdateTime'

272--

216--

273−-- * 'tName'

217+-- * 'trName'

274--

218--

275−-- * 'tEndTime'

219+-- * 'trEndTime'

276--

220--

277−-- * 'tDestinationDataSetId'

221+-- * 'trDestinationDataSetId'

278transferRun

222transferRun

279 :: TransferRun

223 :: TransferRun

280transferRun =

224transferRun =

281 TransferRun'

225 TransferRun'

282− { _tRunTime = Nothing

226+ { _trRunTime = Nothing

283− , _tErrorStatus = Nothing

227+ , _trErrorStatus = Nothing

284− , _tState = Nothing

228+ , _trState = Nothing

285− , _tSchedule = Nothing

229+ , _trSchedule = Nothing

286− , _tStartTime = Nothing

230+ , _trStartTime = Nothing

287− , _tScheduleTime = Nothing

231+ , _trScheduleTime = Nothing

288− , _tDataSourceId = Nothing

232+ , _trDataSourceId = Nothing

289− , _tParams = Nothing

233+ , _trParams = Nothing

290− , _tUserId = Nothing

234+ , _trUserId = Nothing

291− , _tUpdateTime = Nothing

235+ , _trUpdateTime = Nothing

292− , _tName = Nothing

236+ , _trName = Nothing

293− , _tEndTime = Nothing

237+ , _trEndTime = Nothing

294− , _tDestinationDataSetId = Nothing

238+ , _trDestinationDataSetId = Nothing

295 }

239 }

296

240

297

241

298-- | For batch transfer runs, specifies the date and time that data should be

242-- | For batch transfer runs, specifies the date and time that data should be

299-- ingested.

243-- ingested.

300−tRunTime :: Lens' TransferRun (Maybe UTCTime)

244+trRunTime :: Lens' TransferRun (Maybe UTCTime)

301−tRunTime

245+trRunTime

302− = lens _tRunTime (\ s a -> s{_tRunTime = a}) .

246+ = lens _trRunTime (\ s a -> s{_trRunTime = a}) .

303 mapping _DateTime

247 mapping _DateTime

304

248

305-- | Status of the transfer run.

249-- | Status of the transfer run.

306−tErrorStatus :: Lens' TransferRun (Maybe Status)

250+trErrorStatus :: Lens' TransferRun (Maybe Status)

307−tErrorStatus

251+trErrorStatus

308− = lens _tErrorStatus (\ s a -> s{_tErrorStatus = a})

252+ = lens _trErrorStatus

253+ (\ s a -> s{_trErrorStatus = a})

309

254

310-- | Data transfer run state. Ignored for input requests.

255-- | Data transfer run state. Ignored for input requests.

311−tState :: Lens' TransferRun (Maybe TransferRunState)

256+trState :: Lens' TransferRun (Maybe TransferRunState)

312−tState = lens _tState (\ s a -> s{_tState = a})

257+trState = lens _trState (\ s a -> s{_trState = a})

313

258

314-- | Output only. Describes the schedule of this transfer run if it was

259-- | Output only. Describes the schedule of this transfer run if it was

315-- created as part of a regular schedule. For batch transfer runs that are

260-- created as part of a regular schedule. For batch transfer runs that are

316-- scheduled manually, this is empty. NOTE: the system might choose to

261-- scheduled manually, this is empty. NOTE: the system might choose to

317-- delay the schedule depending on the current load, so \`schedule_time\`

262-- delay the schedule depending on the current load, so \`schedule_time\`

318-- doesn\'t always match this.

263-- doesn\'t always match this.

319−tSchedule :: Lens' TransferRun (Maybe Text)

264+trSchedule :: Lens' TransferRun (Maybe Text)

320−tSchedule

265+trSchedule

321− = lens _tSchedule (\ s a -> s{_tSchedule = a})

266+ = lens _trSchedule (\ s a -> s{_trSchedule = a})

322

267

323-- | Output only. Time when transfer run was started. Parameter ignored by

268-- | Output only. Time when transfer run was started. Parameter ignored by

324-- server for input requests.

269-- server for input requests.

325−tStartTime :: Lens' TransferRun (Maybe UTCTime)

270+trStartTime :: Lens' TransferRun (Maybe UTCTime)

326−tStartTime

271+trStartTime

327− = lens _tStartTime (\ s a -> s{_tStartTime = a}) .

272+ = lens _trStartTime (\ s a -> s{_trStartTime = a}) .

328 mapping _DateTime

273 mapping _DateTime

329

274

330-- | Minimum time after which a transfer run can be started.

275-- | Minimum time after which a transfer run can be started.

331−tScheduleTime :: Lens' TransferRun (Maybe UTCTime)

276+trScheduleTime :: Lens' TransferRun (Maybe UTCTime)

332−tScheduleTime

277+trScheduleTime

333− = lens _tScheduleTime

278+ = lens _trScheduleTime

334− (\ s a -> s{_tScheduleTime = a})

279+ (\ s a -> s{_trScheduleTime = a})

335 . mapping _DateTime

280 . mapping _DateTime

336

281

337-- | Output only. Data source id.

282-- | Output only. Data source id.

338−tDataSourceId :: Lens' TransferRun (Maybe Text)

283+trDataSourceId :: Lens' TransferRun (Maybe Text)

339−tDataSourceId

284+trDataSourceId

340− = lens _tDataSourceId

285+ = lens _trDataSourceId

341− (\ s a -> s{_tDataSourceId = a})

286+ (\ s a -> s{_trDataSourceId = a})

342

287

343-- | Output only. Data transfer specific parameters.

288-- | Output only. Data transfer specific parameters.

344−tParams :: Lens' TransferRun (Maybe TransferRunParams)

289+trParams :: Lens' TransferRun (Maybe TransferRunParams)

345−tParams = lens _tParams (\ s a -> s{_tParams = a})

290+trParams = lens _trParams (\ s a -> s{_trParams = a})

346

291

347-- | Deprecated. Unique ID of the user on whose behalf transfer is done.

292-- | Deprecated. Unique ID of the user on whose behalf transfer is done.

348−tUserId :: Lens' TransferRun (Maybe Int64)

293+trUserId :: Lens' TransferRun (Maybe Int64)

349−tUserId

294+trUserId

350− = lens _tUserId (\ s a -> s{_tUserId = a}) .

295+ = lens _trUserId (\ s a -> s{_trUserId = a}) .

351 mapping _Coerce

296 mapping _Coerce

352

297

353-- | Output only. Last time the data transfer run state was updated.

298-- | Output only. Last time the data transfer run state was updated.

354−tUpdateTime :: Lens' TransferRun (Maybe UTCTime)

299+trUpdateTime :: Lens' TransferRun (Maybe UTCTime)

355−tUpdateTime

300+trUpdateTime

356− = lens _tUpdateTime (\ s a -> s{_tUpdateTime = a}) .

301+ = lens _trUpdateTime (\ s a -> s{_trUpdateTime = a})

357− mapping _DateTime

302+ . mapping _DateTime

358

303

359-- | The resource name of the transfer run. Transfer run names have the form

304-- | The resource name of the transfer run. Transfer run names have the form

360-- \`projects\/{project_id}\/locations\/{location}\/transferConfigs\/{config_id}\/runs\/{run_id}\`.

305-- \`projects\/{project_id}\/locations\/{location}\/transferConfigs\/{config_id}\/runs\/{run_id}\`.

361-- The name is ignored when creating a transfer run.

306-- The name is ignored when creating a transfer run.

362−tName :: Lens' TransferRun (Maybe Text)

307+trName :: Lens' TransferRun (Maybe Text)

363−tName = lens _tName (\ s a -> s{_tName = a})

308+trName = lens _trName (\ s a -> s{_trName = a})

364

309

365-- | Output only. Time when transfer run ended. Parameter ignored by server

310-- | Output only. Time when transfer run ended. Parameter ignored by server

366-- for input requests.

311-- for input requests.

367−tEndTime :: Lens' TransferRun (Maybe UTCTime)

312+trEndTime :: Lens' TransferRun (Maybe UTCTime)

368−tEndTime

313+trEndTime

369− = lens _tEndTime (\ s a -> s{_tEndTime = a}) .

314+ = lens _trEndTime (\ s a -> s{_trEndTime = a}) .

370 mapping _DateTime

315 mapping _DateTime

371

316

372-- | Output only. The BigQuery target dataset id.

317-- | Output only. The BigQuery target dataset id.

373−tDestinationDataSetId :: Lens' TransferRun (Maybe Text)

318+trDestinationDataSetId :: Lens' TransferRun (Maybe Text)

374−tDestinationDataSetId

319+trDestinationDataSetId

375− = lens _tDestinationDataSetId

320+ = lens _trDestinationDataSetId

376− (\ s a -> s{_tDestinationDataSetId = a})

321+ (\ s a -> s{_trDestinationDataSetId = a})

377

322

378instance FromJSON TransferRun where

323instance FromJSON TransferRun where

379 parseJSON

324 parseJSON

@@ -397,19 +342,20 @@ instance ToJSON TransferRun where

397 toJSON TransferRun'{..}

342 toJSON TransferRun'{..}

398 = object

343 = object

399 (catMaybes

344 (catMaybes

400− [("runTime" .=) <$> _tRunTime,

345+ [("runTime" .=) <$> _trRunTime,

401− ("errorStatus" .=) <$> _tErrorStatus,

346+ ("errorStatus" .=) <$> _trErrorStatus,

402− ("state" .=) <$> _tState,

347+ ("state" .=) <$> _trState,

403− ("schedule" .=) <$> _tSchedule,

348+ ("schedule" .=) <$> _trSchedule,

404− ("startTime" .=) <$> _tStartTime,

349+ ("startTime" .=) <$> _trStartTime,

405− ("scheduleTime" .=) <$> _tScheduleTime,

350+ ("scheduleTime" .=) <$> _trScheduleTime,

406− ("dataSourceId" .=) <$> _tDataSourceId,

351+ ("dataSourceId" .=) <$> _trDataSourceId,

407− ("params" .=) <$> _tParams,

352+ ("params" .=) <$> _trParams,

408− ("userId" .=) <$> _tUserId,

353+ ("userId" .=) <$> _trUserId,

409− ("updateTime" .=) <$> _tUpdateTime,

354+ ("updateTime" .=) <$> _trUpdateTime,

410− ("name" .=) <$> _tName, ("endTime" .=) <$> _tEndTime,

355+ ("name" .=) <$> _trName,

356+ ("endTime" .=) <$> _trEndTime,

411 ("destinationDatasetId" .=) <$>

357 ("destinationDatasetId" .=) <$>

412− _tDestinationDataSetId])

358+ _trDestinationDataSetId])

413

359

414-- | A request to determine whether the user has valid credentials. This

360-- | A request to determine whether the user has valid credentials. This

415-- method is used to limit the number of OAuth popups in the user

361-- method is used to limit the number of OAuth popups in the user

@@ -1190,62 +1136,6 @@ instance ToJSON ListDataSourcesResponse where

1190 [("nextPageToken" .=) <$> _ldsrNextPageToken,

1136 [("nextPageToken" .=) <$> _ldsrNextPageToken,

1191 ("dataSources" .=) <$> _ldsrDataSources])

1137 ("dataSources" .=) <$> _ldsrDataSources])

1192

1138

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−

1249-- | Represents data source metadata. Metadata is sufficient to render UI and

1139-- | Represents data source metadata. Metadata is sufficient to render UI and

1250-- request proper OAuth tokens.

1140-- request proper OAuth tokens.

1251--

1141--

@@ -1664,46 +1554,6 @@ instance FromJSON LocationLabels where

1664instance ToJSON LocationLabels where

1554instance ToJSON LocationLabels where

1665 toJSON = toJSON . _llAddtional

1555 toJSON = toJSON . _llAddtional

1666

1556

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−

1707-- | Service-specific metadata. For example the available capacity at the

1557-- | Service-specific metadata. For example the available capacity at the

1708-- given location.

1558-- given location.

1709--

1559--

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

40 , pltccUploadType

40 , pltccUploadType

41 , pltccAuthorizationCode

41 , pltccAuthorizationCode

42 , pltccPayload

42 , pltccPayload

43− , pltccVersionInfo

44 , pltccCallback

43 , pltccCallback

45 ) where

44 ) where

46

45

@@ -58,11 +57,10 @@ type ProjectsLocationsTransferConfigsCreateResource =

58 QueryParam "access_token" Text :>

57 QueryParam "access_token" Text :>

59 QueryParam "uploadType" Text :>

58 QueryParam "uploadType" Text :>

60 QueryParam "authorizationCode" Text :>

59 QueryParam "authorizationCode" Text :>

61− QueryParam "versionInfo" Text :>

62− QueryParam "callback" Text :>

60+ QueryParam "callback" Text :>

63− QueryParam "alt" AltJSON :>

61+ QueryParam "alt" AltJSON :>

64− ReqBody '[JSON] TransferConfig :>

62+ ReqBody '[JSON] TransferConfig :>

65− Post '[JSON] TransferConfig

63+ Post '[JSON] TransferConfig

66

64

67-- | Creates a new data transfer configuration.

65-- | Creates a new data transfer configuration.

68--

66--

@@ -76,7 +74,6 @@ data ProjectsLocationsTransferConfigsCreate =

76 , _pltccUploadType :: !(Maybe Text)

74 , _pltccUploadType :: !(Maybe Text)

77 , _pltccAuthorizationCode :: !(Maybe Text)

75 , _pltccAuthorizationCode :: !(Maybe Text)

78 , _pltccPayload :: !TransferConfig

76 , _pltccPayload :: !TransferConfig

79− , _pltccVersionInfo :: !(Maybe Text)

80 , _pltccCallback :: !(Maybe Text)

77 , _pltccCallback :: !(Maybe Text)

81 }

78 }

82 deriving (Eq, Show, Data, Typeable, Generic)

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

@@ -100,8 +97,6 @@ data ProjectsLocationsTransferConfigsCreate =

100--

97--

101-- * 'pltccPayload'

98-- * 'pltccPayload'

102--

99--

103−-- * 'pltccVersionInfo'

104−--

105-- * 'pltccCallback'

100-- * 'pltccCallback'

106projectsLocationsTransferConfigsCreate

101projectsLocationsTransferConfigsCreate

107 :: Text -- ^ 'pltccParent'

102 :: Text -- ^ 'pltccParent'

@@ -116,7 +111,6 @@ projectsLocationsTransferConfigsCreate pPltccParent_ pPltccPayload_ =

116 , _pltccUploadType = Nothing

111 , _pltccUploadType = Nothing

117 , _pltccAuthorizationCode = Nothing

112 , _pltccAuthorizationCode = Nothing

118 , _pltccPayload = pPltccPayload_

113 , _pltccPayload = pPltccPayload_

119− , _pltccVersionInfo = Nothing

120 , _pltccCallback = Nothing

114 , _pltccCallback = Nothing

121 }

115 }

122

116

@@ -177,17 +171,6 @@ pltccPayload :: Lens' ProjectsLocationsTransferConfigsCreate TransferConfig

177pltccPayload

171pltccPayload

178 = lens _pltccPayload (\ s a -> s{_pltccPayload = a})

172 = lens _pltccPayload (\ s a -> s{_pltccPayload = a})

179

173

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−

191-- | JSONP

174-- | JSONP

192pltccCallback :: Lens' ProjectsLocationsTransferConfigsCreate (Maybe Text)

175pltccCallback :: Lens' ProjectsLocationsTransferConfigsCreate (Maybe Text)

193pltccCallback

176pltccCallback

@@ -207,7 +190,6 @@ instance GoogleRequest

207 _pltccAccessToken

190 _pltccAccessToken

208 _pltccUploadType

191 _pltccUploadType

209 _pltccAuthorizationCode

192 _pltccAuthorizationCode

210− _pltccVersionInfo

211 _pltccCallback

193 _pltccCallback

212 (Just AltJSON)

194 (Just AltJSON)

213 _pltccPayload

195 _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

41 , pltcpUploadType

41 , pltcpUploadType

42 , pltcpAuthorizationCode

42 , pltcpAuthorizationCode

43 , pltcpPayload

43 , pltcpPayload

44− , pltcpVersionInfo

45 , pltcpName

44 , pltcpName

46 , pltcpCallback

45 , pltcpCallback

47 ) where

46 ) where

@@ -60,11 +59,10 @@ type ProjectsLocationsTransferConfigsPatchResource =

60 QueryParam "access_token" Text :>

59 QueryParam "access_token" Text :>

61 QueryParam "uploadType" Text :>

60 QueryParam "uploadType" Text :>

62 QueryParam "authorizationCode" Text :>

61 QueryParam "authorizationCode" Text :>

63− QueryParam "versionInfo" Text :>

64− QueryParam "callback" Text :>

62+ QueryParam "callback" Text :>

65− QueryParam "alt" AltJSON :>

63+ QueryParam "alt" AltJSON :>

66− ReqBody '[JSON] TransferConfig :>

64+ ReqBody '[JSON] TransferConfig :>

67− Patch '[JSON] TransferConfig

65+ Patch '[JSON] TransferConfig

68

66

69-- | Updates a data transfer configuration. All fields must be set, even if

67-- | Updates a data transfer configuration. All fields must be set, even if

70-- they are not updated.

68-- they are not updated.

@@ -79,7 +77,6 @@ data ProjectsLocationsTransferConfigsPatch =

79 , _pltcpUploadType :: !(Maybe Text)

77 , _pltcpUploadType :: !(Maybe Text)

80 , _pltcpAuthorizationCode :: !(Maybe Text)

78 , _pltcpAuthorizationCode :: !(Maybe Text)

81 , _pltcpPayload :: !TransferConfig

79 , _pltcpPayload :: !TransferConfig

82− , _pltcpVersionInfo :: !(Maybe Text)

83 , _pltcpName :: !Text

80 , _pltcpName :: !Text

84 , _pltcpCallback :: !(Maybe Text)

81 , _pltcpCallback :: !(Maybe Text)

85 }

82 }

@@ -104,8 +101,6 @@ data ProjectsLocationsTransferConfigsPatch =

104--

101--

105-- * 'pltcpPayload'

102-- * 'pltcpPayload'

106--

103--

107−-- * 'pltcpVersionInfo'

108−--

109-- * 'pltcpName'

104-- * 'pltcpName'

110--

105--

111-- * 'pltcpCallback'

106-- * 'pltcpCallback'

@@ -122,7 +117,6 @@ projectsLocationsTransferConfigsPatch pPltcpPayload_ pPltcpName_ =

122 , _pltcpUploadType = Nothing

117 , _pltcpUploadType = Nothing

123 , _pltcpAuthorizationCode = Nothing

118 , _pltcpAuthorizationCode = Nothing

124 , _pltcpPayload = pPltcpPayload_

119 , _pltcpPayload = pPltcpPayload_

125− , _pltcpVersionInfo = Nothing

126 , _pltcpName = pPltcpName_

120 , _pltcpName = pPltcpName_

127 , _pltcpCallback = Nothing

121 , _pltcpCallback = Nothing

128 }

122 }

@@ -181,17 +175,6 @@ pltcpPayload :: Lens' ProjectsLocationsTransferConfigsPatch TransferConfig

181pltcpPayload

175pltcpPayload

182 = lens _pltcpPayload (\ s a -> s{_pltcpPayload = a})

176 = lens _pltcpPayload (\ s a -> s{_pltcpPayload = a})

183

177

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−

195-- | The resource name of the transfer config. Transfer config names have the

178-- | The resource name of the transfer config. Transfer config names have the

196-- form of

179-- form of

197-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

180-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

@@ -223,7 +206,6 @@ instance GoogleRequest

223 _pltcpAccessToken

206 _pltcpAccessToken

224 _pltcpUploadType

207 _pltcpUploadType

225 _pltcpAuthorizationCode

208 _pltcpAuthorizationCode

226− _pltcpVersionInfo

227 _pltcpCallback

209 _pltcpCallback

228 (Just AltJSON)

210 (Just AltJSON)

229 _pltcpPayload

211 _pltcpPayload

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/ScheduleRuns.hs+2−2

@@ -23,7 +23,7 @@

23-- Creates transfer runs for a time range [start_time, end_time]. For each

23-- Creates transfer runs for a time range [start_time, end_time]. For each

24-- date - or whatever granularity the data source supports - in the range,

24-- date - or whatever granularity the data source supports - in the range,

25-- one transfer run is created. Note that runs are created per UTC time in

25-- 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.

27--

27--

28-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.locations.transferConfigs.scheduleRuns@.

28-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.locations.transferConfigs.scheduleRuns@.

29module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

29module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

@@ -66,7 +66,7 @@ type ProjectsLocationsTransferConfigsScheduleRunsResource

66-- | Creates transfer runs for a time range [start_time, end_time]. For each

66-- | Creates transfer runs for a time range [start_time, end_time]. For each

67-- date - or whatever granularity the data source supports - in the range,

67-- date - or whatever granularity the data source supports - in the range,

68-- one transfer run is created. Note that runs are created per UTC time in

68-- 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.

70--

70--

71-- /See:/ 'projectsLocationsTransferConfigsScheduleRuns' smart constructor.

71-- /See:/ 'projectsLocationsTransferConfigsScheduleRuns' smart constructor.

72data ProjectsLocationsTransferConfigsScheduleRuns =

72data 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

40 , ptccUploadType

40 , ptccUploadType

41 , ptccAuthorizationCode

41 , ptccAuthorizationCode

42 , ptccPayload

42 , ptccPayload

43− , ptccVersionInfo

44 , ptccCallback

43 , ptccCallback

45 ) where

44 ) where

46

45

@@ -58,11 +57,10 @@ type ProjectsTransferConfigsCreateResource =

58 QueryParam "access_token" Text :>

57 QueryParam "access_token" Text :>

59 QueryParam "uploadType" Text :>

58 QueryParam "uploadType" Text :>

60 QueryParam "authorizationCode" Text :>

59 QueryParam "authorizationCode" Text :>

61− QueryParam "versionInfo" Text :>

62− QueryParam "callback" Text :>

60+ QueryParam "callback" Text :>

63− QueryParam "alt" AltJSON :>

61+ QueryParam "alt" AltJSON :>

64− ReqBody '[JSON] TransferConfig :>

62+ ReqBody '[JSON] TransferConfig :>

65− Post '[JSON] TransferConfig

63+ Post '[JSON] TransferConfig

66

64

67-- | Creates a new data transfer configuration.

65-- | Creates a new data transfer configuration.

68--

66--

@@ -76,7 +74,6 @@ data ProjectsTransferConfigsCreate =

76 , _ptccUploadType :: !(Maybe Text)

74 , _ptccUploadType :: !(Maybe Text)

77 , _ptccAuthorizationCode :: !(Maybe Text)

75 , _ptccAuthorizationCode :: !(Maybe Text)

78 , _ptccPayload :: !TransferConfig

76 , _ptccPayload :: !TransferConfig

79− , _ptccVersionInfo :: !(Maybe Text)

80 , _ptccCallback :: !(Maybe Text)

77 , _ptccCallback :: !(Maybe Text)

81 }

78 }

82 deriving (Eq, Show, Data, Typeable, Generic)

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

@@ -100,8 +97,6 @@ data ProjectsTransferConfigsCreate =

100--

97--

101-- * 'ptccPayload'

98-- * 'ptccPayload'

102--

99--

103−-- * 'ptccVersionInfo'

104−--

105-- * 'ptccCallback'

100-- * 'ptccCallback'

106projectsTransferConfigsCreate

101projectsTransferConfigsCreate

107 :: Text -- ^ 'ptccParent'

102 :: Text -- ^ 'ptccParent'

@@ -116,7 +111,6 @@ projectsTransferConfigsCreate pPtccParent_ pPtccPayload_ =

116 , _ptccUploadType = Nothing

111 , _ptccUploadType = Nothing

117 , _ptccAuthorizationCode = Nothing

112 , _ptccAuthorizationCode = Nothing

118 , _ptccPayload = pPtccPayload_

113 , _ptccPayload = pPtccPayload_

119− , _ptccVersionInfo = Nothing

120 , _ptccCallback = Nothing

114 , _ptccCallback = Nothing

121 }

115 }

122

116

@@ -177,17 +171,6 @@ ptccPayload :: Lens' ProjectsTransferConfigsCreate TransferConfig

177ptccPayload

171ptccPayload

178 = lens _ptccPayload (\ s a -> s{_ptccPayload = a})

172 = lens _ptccPayload (\ s a -> s{_ptccPayload = a})

179

173

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−

191-- | JSONP

174-- | JSONP

192ptccCallback :: Lens' ProjectsTransferConfigsCreate (Maybe Text)

175ptccCallback :: Lens' ProjectsTransferConfigsCreate (Maybe Text)

193ptccCallback

176ptccCallback

@@ -204,7 +187,6 @@ instance GoogleRequest ProjectsTransferConfigsCreate

204 _ptccAccessToken

187 _ptccAccessToken

205 _ptccUploadType

188 _ptccUploadType

206 _ptccAuthorizationCode

189 _ptccAuthorizationCode

207− _ptccVersionInfo

208 _ptccCallback

190 _ptccCallback

209 (Just AltJSON)

191 (Just AltJSON)

210 _ptccPayload

192 _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

41 , ptcpUploadType

41 , ptcpUploadType

42 , ptcpAuthorizationCode

42 , ptcpAuthorizationCode

43 , ptcpPayload

43 , ptcpPayload

44− , ptcpVersionInfo

45 , ptcpName

44 , ptcpName

46 , ptcpCallback

45 , ptcpCallback

47 ) where

46 ) where

@@ -60,11 +59,10 @@ type ProjectsTransferConfigsPatchResource =

60 QueryParam "access_token" Text :>

59 QueryParam "access_token" Text :>

61 QueryParam "uploadType" Text :>

60 QueryParam "uploadType" Text :>

62 QueryParam "authorizationCode" Text :>

61 QueryParam "authorizationCode" Text :>

63− QueryParam "versionInfo" Text :>

64− QueryParam "callback" Text :>

62+ QueryParam "callback" Text :>

65− QueryParam "alt" AltJSON :>

63+ QueryParam "alt" AltJSON :>

66− ReqBody '[JSON] TransferConfig :>

64+ ReqBody '[JSON] TransferConfig :>

67− Patch '[JSON] TransferConfig

65+ Patch '[JSON] TransferConfig

68

66

69-- | Updates a data transfer configuration. All fields must be set, even if

67-- | Updates a data transfer configuration. All fields must be set, even if

70-- they are not updated.

68-- they are not updated.

@@ -79,7 +77,6 @@ data ProjectsTransferConfigsPatch =

79 , _ptcpUploadType :: !(Maybe Text)

77 , _ptcpUploadType :: !(Maybe Text)

80 , _ptcpAuthorizationCode :: !(Maybe Text)

78 , _ptcpAuthorizationCode :: !(Maybe Text)

81 , _ptcpPayload :: !TransferConfig

79 , _ptcpPayload :: !TransferConfig

82− , _ptcpVersionInfo :: !(Maybe Text)

83 , _ptcpName :: !Text

80 , _ptcpName :: !Text

84 , _ptcpCallback :: !(Maybe Text)

81 , _ptcpCallback :: !(Maybe Text)

85 }

82 }

@@ -104,8 +101,6 @@ data ProjectsTransferConfigsPatch =

104--

101--

105-- * 'ptcpPayload'

102-- * 'ptcpPayload'

106--

103--

107−-- * 'ptcpVersionInfo'

108−--

109-- * 'ptcpName'

104-- * 'ptcpName'

110--

105--

111-- * 'ptcpCallback'

106-- * 'ptcpCallback'

@@ -122,7 +117,6 @@ projectsTransferConfigsPatch pPtcpPayload_ pPtcpName_ =

122 , _ptcpUploadType = Nothing

117 , _ptcpUploadType = Nothing

123 , _ptcpAuthorizationCode = Nothing

118 , _ptcpAuthorizationCode = Nothing

124 , _ptcpPayload = pPtcpPayload_

119 , _ptcpPayload = pPtcpPayload_

125− , _ptcpVersionInfo = Nothing

126 , _ptcpName = pPtcpName_

120 , _ptcpName = pPtcpName_

127 , _ptcpCallback = Nothing

121 , _ptcpCallback = Nothing

128 }

122 }

@@ -181,17 +175,6 @@ ptcpPayload :: Lens' ProjectsTransferConfigsPatch TransferConfig

181ptcpPayload

175ptcpPayload

182 = lens _ptcpPayload (\ s a -> s{_ptcpPayload = a})

176 = lens _ptcpPayload (\ s a -> s{_ptcpPayload = a})

183

177

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−

195-- | The resource name of the transfer config. Transfer config names have the

178-- | The resource name of the transfer config. Transfer config names have the

196-- form of

179-- form of

197-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

180-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

@@ -218,7 +201,6 @@ instance GoogleRequest ProjectsTransferConfigsPatch

218 _ptcpAccessToken

201 _ptcpAccessToken

219 _ptcpUploadType

202 _ptcpUploadType

220 _ptcpAuthorizationCode

203 _ptcpAuthorizationCode

221− _ptcpVersionInfo

222 _ptcpCallback

204 _ptcpCallback

223 (Just AltJSON)

205 (Just AltJSON)

224 _ptcpPayload

206 _ptcpPayload

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/ScheduleRuns.hs+2−2

@@ -23,7 +23,7 @@

23-- Creates transfer runs for a time range [start_time, end_time]. For each

23-- Creates transfer runs for a time range [start_time, end_time]. For each

24-- date - or whatever granularity the data source supports - in the range,

24-- date - or whatever granularity the data source supports - in the range,

25-- one transfer run is created. Note that runs are created per UTC time in

25-- 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.

27--

27--

28-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.transferConfigs.scheduleRuns@.

28-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.transferConfigs.scheduleRuns@.

29module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

29module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

@@ -65,7 +65,7 @@ type ProjectsTransferConfigsScheduleRunsResource =

65-- | Creates transfer runs for a time range [start_time, end_time]. For each

65-- | Creates transfer runs for a time range [start_time, end_time]. For each

66-- date - or whatever granularity the data source supports - in the range,

66-- date - or whatever granularity the data source supports - in the range,

67-- one transfer run is created. Note that runs are created per UTC time in

67-- 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.

69--

69--

70-- /See:/ 'projectsTransferConfigsScheduleRuns' smart constructor.

70-- /See:/ 'projectsTransferConfigsScheduleRuns' smart constructor.

71data ProjectsTransferConfigsScheduleRuns =

71data 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

14extra-source-files: README.md src/.gitkeep

14extra-source-files: README.md src/.gitkeep

15

15

16description:

16description:

17− Schedule queries or transfer external data from SaaS applications to

17+ Transfers data from partner SaaS applications to Google BigQuery on a

18− Google BigQuery on a regular basis.

18+ scheduled, managed basis.

19 .

19 .

20 /Warning:/ This is an experimental prototype/preview release which is still

20 /Warning:/ This is an experimental prototype/preview release which is still

21 under exploratory development and not intended for public use, caveat emptor!

21 under exploratory development and not intended for public use, caveat emptor!

@@ -54,7 +54,6 @@ library

54 , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List

54 , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List

55 , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List

55 , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List

56 , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

56 , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

57− , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns

58 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

57 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

59 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

58 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

60 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

59 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

@@ -65,7 +64,6 @@ library

65 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

64 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

66 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

65 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

67 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

66 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

68− , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

69

67

70 other-modules:

68 other-modules:

71 Network.Google.BigQueryDataTransfer.Types.Product

69 Network.Google.BigQueryDataTransfer.Types.Product

gogol-bigtableadmin/gen/Network/Google/BigtableAdmin.hs+1−17

@@ -13,7 +13,7 @@

13-- Stability : auto-generated

13-- Stability : auto-generated

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

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

15--

15--

16−-- Administer your Cloud Bigtable tables and instances.

16+-- -- |

17--

17--

18-- /See:/ <https://cloud.google.com/bigtable/ Cloud Bigtable Admin API Reference>

18-- /See:/ <https://cloud.google.com/bigtable/ Cloud Bigtable Admin API Reference>

19module Network.Google.BigtableAdmin

19module Network.Google.BigtableAdmin

@@ -118,21 +118,12 @@ module Network.Google.BigtableAdmin

118 -- ** bigtableadmin.projects.instances.tables.get

118 -- ** bigtableadmin.projects.instances.tables.get

119 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

119 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

120

120

121− -- ** bigtableadmin.projects.instances.tables.getIamPolicy

122− , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GetIAMPolicy

123−

124 -- ** bigtableadmin.projects.instances.tables.list

121 -- ** bigtableadmin.projects.instances.tables.list

125 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

122 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

126

123

127 -- ** bigtableadmin.projects.instances.tables.modifyColumnFamilies

124 -- ** bigtableadmin.projects.instances.tables.modifyColumnFamilies

128 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

125 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

129

126

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−

136 -- ** bigtableadmin.projects.instances.testIamPermissions

127 -- ** bigtableadmin.projects.instances.testIamPermissions

137 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

128 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

138

129

@@ -530,11 +521,8 @@ import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables

530import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.DropRowRange

521import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.DropRowRange

531import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GenerateConsistencyToken

522import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GenerateConsistencyToken

532import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

523import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

533−import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GetIAMPolicy

534import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

524import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

535import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

525import 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

538import Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

526import Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

539import Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

527import Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

540

528

@@ -555,17 +543,13 @@ type BigtableAdminAPI =

555 :<|> ProjectsInstancesAppProFilesDeleteResource

543 :<|> ProjectsInstancesAppProFilesDeleteResource

556 :<|> ProjectsInstancesTablesDropRowRangeResource

544 :<|> ProjectsInstancesTablesDropRowRangeResource

557 :<|> ProjectsInstancesTablesListResource

545 :<|> ProjectsInstancesTablesListResource

558− :<|> ProjectsInstancesTablesGetIAMPolicyResource

559 :<|>

546 :<|>

560 ProjectsInstancesTablesGenerateConsistencyTokenResource

547 ProjectsInstancesTablesGenerateConsistencyTokenResource

561 :<|> ProjectsInstancesTablesGetResource

548 :<|> ProjectsInstancesTablesGetResource

562 :<|>

549 :<|>

563 ProjectsInstancesTablesModifyColumnFamiliesResource

550 ProjectsInstancesTablesModifyColumnFamiliesResource

564 :<|> ProjectsInstancesTablesCreateResource

551 :<|> ProjectsInstancesTablesCreateResource

565− :<|> ProjectsInstancesTablesSetIAMPolicyResource

566 :<|> ProjectsInstancesTablesCheckConsistencyResource

552 :<|> ProjectsInstancesTablesCheckConsistencyResource

567− :<|>

568− ProjectsInstancesTablesTestIAMPermissionsResource

569 :<|> ProjectsInstancesTablesDeleteResource

553 :<|> ProjectsInstancesTablesDeleteResource

570 :<|> ProjectsInstancesClustersListResource

554 :<|> ProjectsInstancesClustersListResource

571 :<|> ProjectsInstancesClustersGetResource

555 :<|> ProjectsInstancesClustersGetResource

gogol-bigtableadmin/gen/Network/Google/BigtableAdmin/Types/Product.hs+19−18

@@ -827,7 +827,7 @@ clusterState

827clusterState = ClusterState' {_csReplicationState = Nothing}

827clusterState = ClusterState' {_csReplicationState = Nothing}

828

828

829

829

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.

831csReplicationState :: Lens' ClusterState (Maybe ClusterStateReplicationState)

831csReplicationState :: Lens' ClusterState (Maybe ClusterStateReplicationState)

832csReplicationState

832csReplicationState

833 = lens _csReplicationState

833 = lens _csReplicationState

@@ -1039,11 +1039,11 @@ instance ToJSON ListAppProFilesResponse where

1039 ("failedLocations" .=) <$> _lapfrFailedLocations,

1039 ("failedLocations" .=) <$> _lapfrFailedLocations,

1040 ("appProfiles" .=) <$> _lapfrAppProFiles])

1040 ("appProfiles" .=) <$> _lapfrAppProFiles])

1041

1041

1042−-- | Output only. Map from cluster ID to per-cluster table state. If it could

1042+-- | (\`OutputOnly\`) Map from cluster ID to per-cluster table state. If it

1043−-- not be determined whether or not the table has data in a particular

1043+-- could not be determined whether or not the table has data in a

1044−-- cluster (for example, if its zone is unavailable), then there will be an

1044+-- particular cluster (for example, if its zone is unavailable), then there

1045−-- entry for the cluster with UNKNOWN \`replication_status\`. Views:

1045+-- will be an entry for the cluster with UNKNOWN \`replication_status\`.

1046−-- \`REPLICATION_VIEW\`, \`FULL\`

1046+-- Views: \`REPLICATION_VIEW\`, \`FULL\`

1047--

1047--

1048-- /See:/ 'tableClusterStates' smart constructor.

1048-- /See:/ 'tableClusterStates' smart constructor.

1049newtype TableClusterStates =

1049newtype TableClusterStates =

@@ -2842,22 +2842,22 @@ table =

2842-- | (\`CreationOnly\`) The granularity (i.e. \`MILLIS\`) at which timestamps

2842-- | (\`CreationOnly\`) The granularity (i.e. \`MILLIS\`) at which timestamps

2843-- are stored in this table. Timestamps not matching the granularity will

2843-- are stored in this table. Timestamps not matching the granularity will

2844-- be rejected. If unspecified at creation time, the value will be set to

2844-- 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\`

2846tGranularity :: Lens' Table (Maybe TableGranularity)

2846tGranularity :: Lens' Table (Maybe TableGranularity)

2847tGranularity

2847tGranularity

2848 = lens _tGranularity (\ s a -> s{_tGranularity = a})

2848 = lens _tGranularity (\ s a -> s{_tGranularity = a})

2849

2849

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

2851-- \`projects\/\/instances\/\/tables\/_a-zA-Z0-9*\`. Views: \`NAME_ONLY\`,

2851-- \`projects\/\/instances\/\/tables\/_a-zA-Z0-9*\`. Views: \`NAME_ONLY\`,

2852-- \`SCHEMA_VIEW\`, \`REPLICATION_VIEW\`, \`FULL\`

2852-- \`SCHEMA_VIEW\`, \`REPLICATION_VIEW\`, \`FULL\`

2853tName :: Lens' Table (Maybe Text)

2853tName :: Lens' Table (Maybe Text)

2854tName = lens _tName (\ s a -> s{_tName = a})

2854tName = lens _tName (\ s a -> s{_tName = a})

2855

2855

2856−-- | Output only. Map from cluster ID to per-cluster table state. If it could

2856+-- | (\`OutputOnly\`) Map from cluster ID to per-cluster table state. If it

2857−-- not be determined whether or not the table has data in a particular

2857+-- could not be determined whether or not the table has data in a

2858−-- cluster (for example, if its zone is unavailable), then there will be an

2858+-- particular cluster (for example, if its zone is unavailable), then there

2859−-- entry for the cluster with UNKNOWN \`replication_status\`. Views:

2859+-- will be an entry for the cluster with UNKNOWN \`replication_status\`.

2860−-- \`REPLICATION_VIEW\`, \`FULL\`

2860+-- Views: \`REPLICATION_VIEW\`, \`FULL\`

2861tClusterStates :: Lens' Table (Maybe TableClusterStates)

2861tClusterStates :: Lens' Table (Maybe TableClusterStates)

2862tClusterStates

2862tClusterStates

2863 = lens _tClusterStates

2863 = lens _tClusterStates

@@ -2969,8 +2969,8 @@ binding =

2969-- that represents a service account. For example,

2969-- that represents a service account. For example,

2970-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

2970-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

2971-- email address that represents a Google group. For example,

2971-- email address that represents a Google group. For example,

2972−-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

2972+-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

2973−-- (primary) that represents all the users of that domain. For example,

2973+-- name that represents all the users of that domain. For example,

2974-- \`google.com\` or \`example.com\`.

2974-- \`google.com\` or \`example.com\`.

2975bMembers :: Lens' Binding [Text]

2975bMembers :: Lens' Binding [Text]

2976bMembers

2976bMembers

@@ -2983,9 +2983,10 @@ bMembers

2983bRole :: Lens' Binding (Maybe Text)

2983bRole :: Lens' Binding (Maybe Text)

2984bRole = lens _bRole (\ s a -> s{_bRole = a})

2984bRole = lens _bRole (\ s a -> s{_bRole = a})

2985

2985

2986−-- | The condition that is associated with this binding. NOTE: An unsatisfied

2986+-- | Unimplemented. The condition that is associated with this binding. NOTE:

2987−-- condition will not allow user access via current binding. Different

2987+-- an unsatisfied condition will not allow user access via current binding.

2988−-- bindings, including their conditions, are examined independently.

2988+-- Different bindings, including their conditions, are examined

2989+-- independently.

2989bCondition :: Lens' Binding (Maybe Expr)

2990bCondition :: Lens' Binding (Maybe Expr)

2990bCondition

2991bCondition

2991 = lens _bCondition (\ s a -> s{_bCondition = a})

2992 = 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

53instance ToJSON ClusterDefaultStorageType where

53instance ToJSON ClusterDefaultStorageType where

54 toJSON = toJSONText

54 toJSON = toJSONText

55

55

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.

57data ClusterStateReplicationState

57data ClusterStateReplicationState

58 = StateNotKnown

58 = StateNotKnown

59 -- ^ @STATE_NOT_KNOWN@

59 -- ^ @STATE_NOT_KNOWN@

@@ -260,7 +260,7 @@ instance ToJSON Xgafv where

260-- | (\`CreationOnly\`) The granularity (i.e. \`MILLIS\`) at which timestamps

260-- | (\`CreationOnly\`) The granularity (i.e. \`MILLIS\`) at which timestamps

261-- are stored in this table. Timestamps not matching the granularity will

261-- are stored in this table. Timestamps not matching the granularity will

262-- be rejected. If unspecified at creation time, the value will be set to

262-- 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\`

264data TableGranularity

264data TableGranularity

265 = TimestampGranularityUnspecified

265 = TimestampGranularityUnspecified

266 -- ^ @TIMESTAMP_GRANULARITY_UNSPECIFIED@

266 -- ^ @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

160 = lens _pitlPageToken

160 = lens _pitlPageToken

161 (\ s a -> s{_pitlPageToken = a})

161 (\ s a -> s{_pitlPageToken = a})

162

162

163−-- | Maximum number of results per page. A page_size of zero lets the server

163+-- | Maximum number of results per page. CURRENTLY UNIMPLEMENTED AND IGNORED.

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.

170pitlPageSize :: Lens' ProjectsInstancesTablesList (Maybe Int32)

164pitlPageSize :: Lens' ProjectsInstancesTablesList (Maybe Int32)

171pitlPageSize

165pitlPageSize

172 = lens _pitlPageSize (\ s a -> s{_pitlPageSize = a})

166 = 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

14extra-source-files: README.md src/.gitkeep

14extra-source-files: README.md src/.gitkeep

15

15

16description:

16description:

17− Administer your Cloud Bigtable tables and instances.

17+

18 .

18 .

19 /Warning:/ This is an experimental prototype/preview release which is still

19 /Warning:/ This is an experimental prototype/preview release which is still

20 under exploratory development and not intended for public use, caveat emptor!

20 under exploratory development and not intended for public use, caveat emptor!

@@ -62,11 +62,8 @@ library

62 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.DropRowRange

62 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.DropRowRange

63 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GenerateConsistencyToken

63 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GenerateConsistencyToken

64 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

64 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

65− , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GetIAMPolicy

66 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

65 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

67 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

66 , 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

70 , Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

67 , Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

71 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

68 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

72

69

gogol-billing/gen/Network/Google/Billing/Types/Product.hs+6−5

@@ -1602,8 +1602,8 @@ binding =

1602-- that represents a service account. For example,

1602-- that represents a service account. For example,

1603-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

1603-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

1604-- email address that represents a Google group. For example,

1604-- email address that represents a Google group. For example,

1605−-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

1605+-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

1606−-- (primary) that represents all the users of that domain. For example,

1606+-- name that represents all the users of that domain. For example,

1607-- \`google.com\` or \`example.com\`.

1607-- \`google.com\` or \`example.com\`.

1608bMembers :: Lens' Binding [Text]

1608bMembers :: Lens' Binding [Text]

1609bMembers

1609bMembers

@@ -1616,9 +1616,10 @@ bMembers

1616bRole :: Lens' Binding (Maybe Text)

1616bRole :: Lens' Binding (Maybe Text)

1617bRole = lens _bRole (\ s a -> s{_bRole = a})

1617bRole = lens _bRole (\ s a -> s{_bRole = a})

1618

1618

1619−-- | The condition that is associated with this binding. NOTE: An unsatisfied

1619+-- | Unimplemented. The condition that is associated with this binding. NOTE:

1620−-- condition will not allow user access via current binding. Different

1620+-- an unsatisfied condition will not allow user access via current binding.

1621−-- bindings, including their conditions, are examined independently.

1621+-- Different bindings, including their conditions, are examined

1622+-- independently.

1622bCondition :: Lens' Binding (Maybe Expr)

1623bCondition :: Lens' Binding (Maybe Expr)

1623bCondition

1624bCondition

1624 = lens _bCondition (\ s a -> s{_bCondition = a})

1625 = lens _bCondition (\ s a -> s{_bCondition = a})

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization.hs−14

@@ -71,12 +71,6 @@ module Network.Google.BinaryAuthorization

71

71

72 -- * Types

72 -- * Types

73

73

74− -- ** PkixPublicKey

75− , PkixPublicKey

76− , pkixPublicKey

77− , ppkPublicKeyPem

78− , ppkSignatureAlgorithm

79−

80 -- ** Expr

74 -- ** Expr

81 , Expr

75 , Expr

82 , expr

76 , expr

@@ -99,9 +93,6 @@ module Network.Google.BinaryAuthorization

99 -- ** AdmissionRuleEnforcementMode

93 -- ** AdmissionRuleEnforcementMode

100 , AdmissionRuleEnforcementMode (..)

94 , AdmissionRuleEnforcementMode (..)

101

95

102− -- ** PolicyGlobalPolicyEvaluationMode

103− , PolicyGlobalPolicyEvaluationMode (..)

104−

105 -- ** SetIAMPolicyRequest

96 -- ** SetIAMPolicyRequest

106 , SetIAMPolicyRequest

97 , SetIAMPolicyRequest

107 , setIAMPolicyRequest

98 , setIAMPolicyRequest

@@ -118,9 +109,6 @@ module Network.Google.BinaryAuthorization

118 , admissionWhiteListPattern

109 , admissionWhiteListPattern

119 , awlpNamePattern

110 , awlpNamePattern

120

111

121− -- ** PkixPublicKeySignatureAlgorithm

122− , PkixPublicKeySignatureAlgorithm (..)

123−

124 -- ** AdmissionRule

112 -- ** AdmissionRule

125 , AdmissionRule

113 , AdmissionRule

126 , admissionRule

114 , admissionRule

@@ -149,7 +137,6 @@ module Network.Google.BinaryAuthorization

149 -- ** AttestorPublicKey

137 -- ** AttestorPublicKey

150 , AttestorPublicKey

138 , AttestorPublicKey

151 , attestorPublicKey

139 , attestorPublicKey

152− , apkPkixPublicKey

153 , apkAsciiArmoredPgpPublicKey

140 , apkAsciiArmoredPgpPublicKey

154 , apkId

141 , apkId

155 , apkComment

142 , apkComment

@@ -167,7 +154,6 @@ module Network.Google.BinaryAuthorization

167 , pClusterAdmissionRules

154 , pClusterAdmissionRules

168 , pUpdateTime

155 , pUpdateTime

169 , pName

156 , pName

170− , pGlobalPolicyEvaluationMode

171 , pDescription

157 , pDescription

172

158

173 -- ** PolicyClusterAdmissionRules

159 -- ** PolicyClusterAdmissionRules

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization/Types.hs−14

@@ -22,12 +22,6 @@ module Network.Google.BinaryAuthorization.Types

22 -- * OAuth Scopes

22 -- * OAuth Scopes

23 , cloudPlatformScope

23 , cloudPlatformScope

24

24

25− -- * PkixPublicKey

26− , PkixPublicKey

27− , pkixPublicKey

28− , ppkPublicKeyPem

29− , ppkSignatureAlgorithm

30−

31 -- * Expr

25 -- * Expr

32 , Expr

26 , Expr

33 , expr

27 , expr

@@ -50,9 +44,6 @@ module Network.Google.BinaryAuthorization.Types

50 -- * AdmissionRuleEnforcementMode

44 -- * AdmissionRuleEnforcementMode

51 , AdmissionRuleEnforcementMode (..)

45 , AdmissionRuleEnforcementMode (..)

52

46

53− -- * PolicyGlobalPolicyEvaluationMode

54− , PolicyGlobalPolicyEvaluationMode (..)

55−

56 -- * SetIAMPolicyRequest

47 -- * SetIAMPolicyRequest

57 , SetIAMPolicyRequest

48 , SetIAMPolicyRequest

58 , setIAMPolicyRequest

49 , setIAMPolicyRequest

@@ -69,9 +60,6 @@ module Network.Google.BinaryAuthorization.Types

69 , admissionWhiteListPattern

60 , admissionWhiteListPattern

70 , awlpNamePattern

61 , awlpNamePattern

71

62

72− -- * PkixPublicKeySignatureAlgorithm

73− , PkixPublicKeySignatureAlgorithm (..)

74−

75 -- * AdmissionRule

63 -- * AdmissionRule

76 , AdmissionRule

64 , AdmissionRule

77 , admissionRule

65 , admissionRule

@@ -100,7 +88,6 @@ module Network.Google.BinaryAuthorization.Types

100 -- * AttestorPublicKey

88 -- * AttestorPublicKey

101 , AttestorPublicKey

89 , AttestorPublicKey

102 , attestorPublicKey

90 , attestorPublicKey

103− , apkPkixPublicKey

104 , apkAsciiArmoredPgpPublicKey

91 , apkAsciiArmoredPgpPublicKey

105 , apkId

92 , apkId

106 , apkComment

93 , apkComment

@@ -118,7 +105,6 @@ module Network.Google.BinaryAuthorization.Types

118 , pClusterAdmissionRules

105 , pClusterAdmissionRules

119 , pUpdateTime

106 , pUpdateTime

120 , pName

107 , pName

121− , pGlobalPolicyEvaluationMode

122 , pDescription

108 , pDescription

123

109

124 -- * PolicyClusterAdmissionRules

110 -- * PolicyClusterAdmissionRules

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization/Types/Product.hs+17−116

@@ -20,65 +20,6 @@ module Network.Google.BinaryAuthorization.Types.Product where

20import Network.Google.BinaryAuthorization.Types.Sum

20import Network.Google.BinaryAuthorization.Types.Sum

21import Network.Google.Prelude

21import Network.Google.Prelude

22

22

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−

82-- | Represents an expression text. Example: title: \"User account presence\"

23-- | Represents an expression text. Example: title: \"User account presence\"

83-- description: \"Determines whether the request has a user account\"

24-- description: \"Determines whether the request has a user account\"

84-- expression: \"size(request.user) > 0\"

25-- expression: \"size(request.user) > 0\"

@@ -615,14 +556,13 @@ instance ToJSON IAMPolicy where

615 ("version" .=) <$> _ipVersion,

556 ("version" .=) <$> _ipVersion,

616 ("bindings" .=) <$> _ipBindings])

557 ("bindings" .=) <$> _ipBindings])

617

558

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

619-- by this attestor.

560-- by this attestor.

620--

561--

621-- /See:/ 'attestorPublicKey' smart constructor.

562-- /See:/ 'attestorPublicKey' smart constructor.

622data AttestorPublicKey =

563data AttestorPublicKey =

623 AttestorPublicKey'

564 AttestorPublicKey'

624− { _apkPkixPublicKey :: !(Maybe PkixPublicKey)

625− , _apkAsciiArmoredPgpPublicKey :: !(Maybe Text)

565+ { _apkAsciiArmoredPgpPublicKey :: !(Maybe Text)

626 , _apkId :: !(Maybe Text)

566 , _apkId :: !(Maybe Text)

627 , _apkComment :: !(Maybe Text)

567 , _apkComment :: !(Maybe Text)

628 }

568 }

@@ -633,8 +573,6 @@ data AttestorPublicKey =

633--

573--

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

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

635--

575--

636−-- * 'apkPkixPublicKey'

637−--

638-- * 'apkAsciiArmoredPgpPublicKey'

576-- * 'apkAsciiArmoredPgpPublicKey'

639--

577--

640-- * 'apkId'

578-- * 'apkId'

@@ -644,41 +582,23 @@ attestorPublicKey

644 :: AttestorPublicKey

582 :: AttestorPublicKey

645attestorPublicKey =

583attestorPublicKey =

646 AttestorPublicKey'

584 AttestorPublicKey'

647− { _apkPkixPublicKey = Nothing

648− , _apkAsciiArmoredPgpPublicKey = Nothing

585+ { _apkAsciiArmoredPgpPublicKey = Nothing

649 , _apkId = Nothing

586 , _apkId = Nothing

650 , _apkComment = Nothing

587 , _apkComment = Nothing

651 }

588 }

652

589

653

590

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−

664-- | ASCII-armored representation of a PGP public key, as the entire output

591-- | ASCII-armored representation of a PGP public key, as the entire output

665-- by the command \`gpg --export --armor foo\'example.com\` (either LF or

592-- 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.

593+-- CRLF line endings).

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.

671apkAsciiArmoredPgpPublicKey :: Lens' AttestorPublicKey (Maybe Text)

594apkAsciiArmoredPgpPublicKey :: Lens' AttestorPublicKey (Maybe Text)

672apkAsciiArmoredPgpPublicKey

595apkAsciiArmoredPgpPublicKey

673 = lens _apkAsciiArmoredPgpPublicKey

596 = lens _apkAsciiArmoredPgpPublicKey

674 (\ s a -> s{_apkAsciiArmoredPgpPublicKey = a})

597 (\ s a -> s{_apkAsciiArmoredPgpPublicKey = a})

675

598

676−-- | The ID of this public key. Signatures verified by BinAuthz must include

599+-- | Output only. This field will be overwritten with key ID information, for

677−-- the ID of the public key that can be used to verify them, and that ID

600+-- example, an identifier extracted from a PGP public key. This field may

678−-- must match the contents of this field exactly. Additional restrictions

601+-- not be updated.

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.

682apkId :: Lens' AttestorPublicKey (Maybe Text)

602apkId :: Lens' AttestorPublicKey (Maybe Text)

683apkId = lens _apkId (\ s a -> s{_apkId = a})

603apkId = lens _apkId (\ s a -> s{_apkId = a})

684

604

@@ -692,17 +612,14 @@ instance FromJSON AttestorPublicKey where

692 = withObject "AttestorPublicKey"

612 = withObject "AttestorPublicKey"

693 (\ o ->

613 (\ o ->

694 AttestorPublicKey' <$>

614 AttestorPublicKey' <$>

695− (o .:? "pkixPublicKey") <*>

696− (o .:? "asciiArmoredPgpPublicKey")

615+ (o .:? "asciiArmoredPgpPublicKey") <*> (o .:? "id")

697− <*> (o .:? "id")

698 <*> (o .:? "comment"))

616 <*> (o .:? "comment"))

699

617

700instance ToJSON AttestorPublicKey where

618instance ToJSON AttestorPublicKey where

701 toJSON AttestorPublicKey'{..}

619 toJSON AttestorPublicKey'{..}

702 = object

620 = object

703 (catMaybes

621 (catMaybes

704− [("pkixPublicKey" .=) <$> _apkPkixPublicKey,

705− ("asciiArmoredPgpPublicKey" .=) <$>

622+ [("asciiArmoredPgpPublicKey" .=) <$>

706 _apkAsciiArmoredPgpPublicKey,

623 _apkAsciiArmoredPgpPublicKey,

707 ("id" .=) <$> _apkId,

624 ("id" .=) <$> _apkId,

708 ("comment" .=) <$> _apkComment])

625 ("comment" .=) <$> _apkComment])

@@ -760,7 +677,6 @@ data Policy =

760 , _pClusterAdmissionRules :: !(Maybe PolicyClusterAdmissionRules)

677 , _pClusterAdmissionRules :: !(Maybe PolicyClusterAdmissionRules)

761 , _pUpdateTime :: !(Maybe DateTime')

678 , _pUpdateTime :: !(Maybe DateTime')

762 , _pName :: !(Maybe Text)

679 , _pName :: !(Maybe Text)

763− , _pGlobalPolicyEvaluationMode :: !(Maybe PolicyGlobalPolicyEvaluationMode)

764 , _pDescription :: !(Maybe Text)

680 , _pDescription :: !(Maybe Text)

765 }

681 }

766 deriving (Eq, Show, Data, Typeable, Generic)

682 deriving (Eq, Show, Data, Typeable, Generic)

@@ -780,8 +696,6 @@ data Policy =

780--

696--

781-- * 'pName'

697-- * 'pName'

782--

698--

783−-- * 'pGlobalPolicyEvaluationMode'

784−--

785-- * 'pDescription'

699-- * 'pDescription'

786policy

700policy

787 :: Policy

701 :: Policy

@@ -792,14 +706,12 @@ policy =

792 , _pClusterAdmissionRules = Nothing

706 , _pClusterAdmissionRules = Nothing

793 , _pUpdateTime = Nothing

707 , _pUpdateTime = Nothing

794 , _pName = Nothing

708 , _pName = Nothing

795− , _pGlobalPolicyEvaluationMode = Nothing

796 , _pDescription = Nothing

709 , _pDescription = Nothing

797 }

710 }

798

711

799

712

800−-- | Required. Default admission rule for a cluster without a per-cluster,

713+-- | Required. Default admission rule for a cluster without a per-cluster

801−-- per- kubernetes-service-account, or per-istio-service-identity admission

802−-- rule.

714+-- admission rule.

803pDefaultAdmissionRule :: Lens' Policy (Maybe AdmissionRule)

715pDefaultAdmissionRule :: Lens' Policy (Maybe AdmissionRule)

804pDefaultAdmissionRule

716pDefaultAdmissionRule

805 = lens _pDefaultAdmissionRule

717 = lens _pDefaultAdmissionRule

@@ -838,15 +750,6 @@ pUpdateTime

838pName :: Lens' Policy (Maybe Text)

750pName :: Lens' Policy (Maybe Text)

839pName = lens _pName (\ s a -> s{_pName = a})

751pName = lens _pName (\ s a -> s{_pName = a})

840

752

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−

850-- | Optional. A descriptive comment.

753-- | Optional. A descriptive comment.

851pDescription :: Lens' Policy (Maybe Text)

754pDescription :: Lens' Policy (Maybe Text)

852pDescription

755pDescription

@@ -862,7 +765,6 @@ instance FromJSON Policy where

862 <*> (o .:? "clusterAdmissionRules")

765 <*> (o .:? "clusterAdmissionRules")

863 <*> (o .:? "updateTime")

766 <*> (o .:? "updateTime")

864 <*> (o .:? "name")

767 <*> (o .:? "name")

865− <*> (o .:? "globalPolicyEvaluationMode")

866 <*> (o .:? "description"))

768 <*> (o .:? "description"))

867

769

868instance ToJSON Policy where

770instance ToJSON Policy where

@@ -877,8 +779,6 @@ instance ToJSON Policy where

877 _pClusterAdmissionRules,

779 _pClusterAdmissionRules,

878 ("updateTime" .=) <$> _pUpdateTime,

780 ("updateTime" .=) <$> _pUpdateTime,

879 ("name" .=) <$> _pName,

781 ("name" .=) <$> _pName,

880− ("globalPolicyEvaluationMode" .=) <$>

881− _pGlobalPolicyEvaluationMode,

882 ("description" .=) <$> _pDescription])

782 ("description" .=) <$> _pDescription])

883

783

884-- | Optional. Per-cluster admission rules. Cluster spec format:

784-- | Optional. Per-cluster admission rules. Cluster spec format:

@@ -1040,8 +940,8 @@ binding =

1040-- that represents a service account. For example,

940-- that represents a service account. For example,

1041-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

941-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

1042-- email address that represents a Google group. For example,

942-- email address that represents a Google group. For example,

1043−-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

943+-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

1044−-- (primary) that represents all the users of that domain. For example,

944+-- name that represents all the users of that domain. For example,

1045-- \`google.com\` or \`example.com\`.

945-- \`google.com\` or \`example.com\`.

1046bMembers :: Lens' Binding [Text]

946bMembers :: Lens' Binding [Text]

1047bMembers

947bMembers

@@ -1054,9 +954,10 @@ bMembers

1054bRole :: Lens' Binding (Maybe Text)

954bRole :: Lens' Binding (Maybe Text)

1055bRole = lens _bRole (\ s a -> s{_bRole = a})

955bRole = lens _bRole (\ s a -> s{_bRole = a})

1056

956

1057−-- | The condition that is associated with this binding. NOTE: An unsatisfied

957+-- | Unimplemented. The condition that is associated with this binding. NOTE:

1058−-- condition will not allow user access via current binding. Different

958+-- an unsatisfied condition will not allow user access via current binding.

1059−-- bindings, including their conditions, are examined independently.

959+-- Different bindings, including their conditions, are examined

960+-- independently.

1060bCondition :: Lens' Binding (Maybe Expr)

961bCondition :: Lens' Binding (Maybe Expr)

1061bCondition

962bCondition

1062 = lens _bCondition (\ s a -> s{_bCondition = a})

963 = 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)

23data AdmissionRuleEnforcementMode

23data AdmissionRuleEnforcementMode

24 = EnforcementModeUnspecified

24 = EnforcementModeUnspecified

25 -- ^ @ENFORCEMENT_MODE_UNSPECIFIED@

25 -- ^ @ENFORCEMENT_MODE_UNSPECIFIED@

26− -- Do not use.

26+ -- Mandatory.

27 | EnforcedBlockAndAuditLog

27 | EnforcedBlockAndAuditLog

28 -- ^ @ENFORCED_BLOCK_AND_AUDIT_LOG@

28 -- ^ @ENFORCED_BLOCK_AND_AUDIT_LOG@

29 -- Enforce the admission rule by blocking the pod creation.

29 -- 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.

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

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

35

31

36instance Hashable AdmissionRuleEnforcementMode

32instance Hashable AdmissionRuleEnforcementMode

@@ -39,14 +35,12 @@ instance FromHttpApiData AdmissionRuleEnforcementMode where

39 parseQueryParam = \case

35 parseQueryParam = \case

40 "ENFORCEMENT_MODE_UNSPECIFIED" -> Right EnforcementModeUnspecified

36 "ENFORCEMENT_MODE_UNSPECIFIED" -> Right EnforcementModeUnspecified

41 "ENFORCED_BLOCK_AND_AUDIT_LOG" -> Right EnforcedBlockAndAuditLog

37 "ENFORCED_BLOCK_AND_AUDIT_LOG" -> Right EnforcedBlockAndAuditLog

42− "DRYRUN_AUDIT_LOG_ONLY" -> Right DryrunAuditLogOnly

43 x -> Left ("Unable to parse AdmissionRuleEnforcementMode from: " <> x)

38 x -> Left ("Unable to parse AdmissionRuleEnforcementMode from: " <> x)

44

39

45instance ToHttpApiData AdmissionRuleEnforcementMode where

40instance ToHttpApiData AdmissionRuleEnforcementMode where

46 toQueryParam = \case

41 toQueryParam = \case

47 EnforcementModeUnspecified -> "ENFORCEMENT_MODE_UNSPECIFIED"

42 EnforcementModeUnspecified -> "ENFORCEMENT_MODE_UNSPECIFIED"

48 EnforcedBlockAndAuditLog -> "ENFORCED_BLOCK_AND_AUDIT_LOG"

43 EnforcedBlockAndAuditLog -> "ENFORCED_BLOCK_AND_AUDIT_LOG"

49− DryrunAuditLogOnly -> "DRYRUN_AUDIT_LOG_ONLY"

50

44

51instance FromJSON AdmissionRuleEnforcementMode where

45instance FromJSON AdmissionRuleEnforcementMode where

52 parseJSON = parseJSONText "AdmissionRuleEnforcementMode"

46 parseJSON = parseJSONText "AdmissionRuleEnforcementMode"

@@ -54,130 +48,11 @@ instance FromJSON AdmissionRuleEnforcementMode where

54instance ToJSON AdmissionRuleEnforcementMode where

48instance ToJSON AdmissionRuleEnforcementMode where

55 toJSON = toJSONText

49 toJSON = toJSONText

56

50

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−

176-- | Required. How this admission rule will be evaluated.

51-- | Required. How this admission rule will be evaluated.

177data AdmissionRuleEvaluationMode

52data AdmissionRuleEvaluationMode

178 = EvaluationModeUnspecified

53 = EvaluationModeUnspecified

179 -- ^ @EVALUATION_MODE_UNSPECIFIED@

54 -- ^ @EVALUATION_MODE_UNSPECIFIED@

180− -- Do not use.

55+ -- Mandatory.

181 | AlwaysAllow

56 | AlwaysAllow

182 -- ^ @ALWAYS_ALLOW@

57 -- ^ @ALWAYS_ALLOW@

183 -- This rule allows all all pod creations.

58 -- This rule allows all all pod creations.

gogol-classroom/gen/Network/Google/Classroom.hs+5−47

@@ -26,7 +26,6 @@ module Network.Google.Classroom

26 , classroomCoursesScope

26 , classroomCoursesScope

27 , classroomPushNotificationsScope

27 , classroomPushNotificationsScope

28 , classroomCourseworkStudentsReadOnlyScope

28 , classroomCourseworkStudentsReadOnlyScope

29− , classroomTopicsReadOnlyScope

30 , classroomProFileEmailsScope

29 , classroomProFileEmailsScope

31 , classroomProFilePhotosScope

30 , classroomProFilePhotosScope

32 , classroomCourseworkMeScope

31 , classroomCourseworkMeScope

@@ -37,7 +36,6 @@ module Network.Google.Classroom

37 , classroomRostersScope

36 , classroomRostersScope

38 , classroomCoursesReadOnlyScope

37 , classroomCoursesReadOnlyScope

39 , classroomCourseworkStudentsScope

38 , classroomCourseworkStudentsScope

40− , classroomTopicsScope

41 , classroomAnnouncementsScope

39 , classroomAnnouncementsScope

42 , classroomCourseworkMeReadOnlyScope

40 , classroomCourseworkMeReadOnlyScope

43 , classroomStudentSubmissionsMeReadOnlyScope

41 , classroomStudentSubmissionsMeReadOnlyScope

@@ -153,21 +151,6 @@ module Network.Google.Classroom

153 -- ** classroom.courses.teachers.list

151 -- ** classroom.courses.teachers.list

154 , module Network.Google.Resource.Classroom.Courses.Teachers.List

152 , module Network.Google.Resource.Classroom.Courses.Teachers.List

155

153

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−

171 -- ** classroom.courses.update

154 -- ** classroom.courses.update

172 , module Network.Google.Resource.Classroom.Courses.Update

155 , module Network.Google.Resource.Classroom.Courses.Update

173

156

@@ -239,7 +222,6 @@ module Network.Google.Classroom

239 , cwDueTime

222 , cwDueTime

240 , cwAssociatedWithDeveloper

223 , cwAssociatedWithDeveloper

241 , cwUpdateTime

224 , cwUpdateTime

242− , cwTopicId

243 , cwMultipleChoiceQuestion

225 , cwMultipleChoiceQuestion

244 , cwId

226 , cwId

245 , cwSubmissionModificationMode

227 , cwSubmissionModificationMode

@@ -344,12 +326,6 @@ module Network.Google.Classroom

344 , globalPermission

326 , globalPermission

345 , gpPermission

327 , gpPermission

346

328

347− -- ** ListTopicResponse

348− , ListTopicResponse

349− , listTopicResponse

350− , ltrNextPageToken

351− , ltrTopic

352−

353 -- ** Link

329 -- ** Link

354 , Link

330 , Link

355 , link

331 , link

@@ -455,14 +431,6 @@ module Network.Google.Classroom

455 , aYouTubeVideo

431 , aYouTubeVideo

456 , aForm

432 , aForm

457

433

458− -- ** Topic

459− , Topic

460− , topic

461− , tCourseId

462− , tUpdateTime

463− , tTopicId

464− , tName

465−

466 -- ** Announcement

434 -- ** Announcement

467 , Announcement

435 , Announcement

468 , announcement

436 , announcement

@@ -524,9 +492,9 @@ module Network.Google.Classroom

524 -- ** Teacher

492 -- ** Teacher

525 , Teacher

493 , Teacher

526 , teacher

494 , teacher

527− , teaCourseId

495+ , tCourseId

528− , teaProFile

496+ , tProFile

529− , teaUserId

497+ , tUserId

530

498

531 -- ** CourseMaterialSet

499 -- ** CourseMaterialSet

532 , CourseMaterialSet

500 , CourseMaterialSet

@@ -689,8 +657,8 @@ module Network.Google.Classroom

689 -- ** ListTeachersResponse

657 -- ** ListTeachersResponse

690 , ListTeachersResponse

658 , ListTeachersResponse

691 , listTeachersResponse

659 , listTeachersResponse

692− , lNextPageToken

660+ , ltrNextPageToken

693− , lTeachers

661+ , ltrTeachers

694

662

695 -- ** Student

663 -- ** Student

696 , Student

664 , Student

@@ -749,11 +717,6 @@ import Network.Google.Resource.Classroom.Courses.Teachers.Create

749import Network.Google.Resource.Classroom.Courses.Teachers.Delete

717import Network.Google.Resource.Classroom.Courses.Teachers.Delete

750import Network.Google.Resource.Classroom.Courses.Teachers.Get

718import Network.Google.Resource.Classroom.Courses.Teachers.Get

751import Network.Google.Resource.Classroom.Courses.Teachers.List

719import 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

757import Network.Google.Resource.Classroom.Courses.Update

720import Network.Google.Resource.Classroom.Courses.Update

758import Network.Google.Resource.Classroom.Invitations.Accept

721import Network.Google.Resource.Classroom.Invitations.Accept

759import Network.Google.Resource.Classroom.Invitations.Create

722import Network.Google.Resource.Classroom.Invitations.Create

@@ -809,11 +772,6 @@ type ClassroomAPI =

809 :<|> CoursesAnnouncementsCreateResource

772 :<|> CoursesAnnouncementsCreateResource

810 :<|> CoursesAnnouncementsModifyAssigneesResource

773 :<|> CoursesAnnouncementsModifyAssigneesResource

811 :<|> CoursesAnnouncementsDeleteResource

774 :<|> CoursesAnnouncementsDeleteResource

812− :<|> CoursesTopicsListResource

813− :<|> CoursesTopicsPatchResource

814− :<|> CoursesTopicsGetResource

815− :<|> CoursesTopicsCreateResource

816− :<|> CoursesTopicsDeleteResource

817 :<|> CoursesAliasesListResource

775 :<|> CoursesAliasesListResource

818 :<|> CoursesAliasesCreateResource

776 :<|> CoursesAliasesCreateResource

819 :<|> CoursesAliasesDeleteResource

777 :<|> CoursesAliasesDeleteResource

gogol-classroom/gen/Network/Google/Classroom/Types.hs+5−30

@@ -24,7 +24,6 @@ module Network.Google.Classroom.Types

24 , classroomCoursesScope

24 , classroomCoursesScope

25 , classroomPushNotificationsScope

25 , classroomPushNotificationsScope

26 , classroomCourseworkStudentsReadOnlyScope

26 , classroomCourseworkStudentsReadOnlyScope

27− , classroomTopicsReadOnlyScope

28 , classroomProFileEmailsScope

27 , classroomProFileEmailsScope

29 , classroomProFilePhotosScope

28 , classroomProFilePhotosScope

30 , classroomCourseworkMeScope

29 , classroomCourseworkMeScope

@@ -35,7 +34,6 @@ module Network.Google.Classroom.Types

35 , classroomRostersScope

34 , classroomRostersScope

36 , classroomCoursesReadOnlyScope

35 , classroomCoursesReadOnlyScope

37 , classroomCourseworkStudentsScope

36 , classroomCourseworkStudentsScope

38− , classroomTopicsScope

39 , classroomAnnouncementsScope

37 , classroomAnnouncementsScope

40 , classroomCourseworkMeReadOnlyScope

38 , classroomCourseworkMeReadOnlyScope

41 , classroomStudentSubmissionsMeReadOnlyScope

39 , classroomStudentSubmissionsMeReadOnlyScope

@@ -62,7 +60,6 @@ module Network.Google.Classroom.Types

62 , cwDueTime

60 , cwDueTime

63 , cwAssociatedWithDeveloper

61 , cwAssociatedWithDeveloper

64 , cwUpdateTime

62 , cwUpdateTime

65− , cwTopicId

66 , cwMultipleChoiceQuestion

63 , cwMultipleChoiceQuestion

67 , cwId

64 , cwId

68 , cwSubmissionModificationMode

65 , cwSubmissionModificationMode

@@ -167,12 +164,6 @@ module Network.Google.Classroom.Types

167 , globalPermission

164 , globalPermission

168 , gpPermission

165 , gpPermission

169

166

170− -- * ListTopicResponse

171− , ListTopicResponse

172− , listTopicResponse

173− , ltrNextPageToken

174− , ltrTopic

175−

176 -- * Link

167 -- * Link

177 , Link

168 , Link

178 , link

169 , link

@@ -278,14 +269,6 @@ module Network.Google.Classroom.Types

278 , aYouTubeVideo

269 , aYouTubeVideo

279 , aForm

270 , aForm

280

271

281− -- * Topic

282− , Topic

283− , topic

284− , tCourseId

285− , tUpdateTime

286− , tTopicId

287− , tName

288−

289 -- * Announcement

272 -- * Announcement

290 , Announcement

273 , Announcement

291 , announcement

274 , announcement

@@ -347,9 +330,9 @@ module Network.Google.Classroom.Types

347 -- * Teacher

330 -- * Teacher

348 , Teacher

331 , Teacher

349 , teacher

332 , teacher

350− , teaCourseId

333+ , tCourseId

351− , teaProFile

334+ , tProFile

352− , teaUserId

335+ , tUserId

353

336

354 -- * CourseMaterialSet

337 -- * CourseMaterialSet

355 , CourseMaterialSet

338 , CourseMaterialSet

@@ -512,8 +495,8 @@ module Network.Google.Classroom.Types

512 -- * ListTeachersResponse

495 -- * ListTeachersResponse

513 , ListTeachersResponse

496 , ListTeachersResponse

514 , listTeachersResponse

497 , listTeachersResponse

515− , lNextPageToken

498+ , ltrNextPageToken

516− , lTeachers

499+ , ltrTeachers

517

500

518 -- * Student

501 -- * Student

519 , Student

502 , Student

@@ -562,10 +545,6 @@ classroomPushNotificationsScope = Proxy

562classroomCourseworkStudentsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students.readonly"]

545classroomCourseworkStudentsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students.readonly"]

563classroomCourseworkStudentsReadOnlyScope = Proxy

546classroomCourseworkStudentsReadOnlyScope = Proxy

564

547

565−-- | View topics in Google Classroom

566−classroomTopicsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.topics.readonly"]

567−classroomTopicsReadOnlyScope = Proxy

568−

569-- | View the email addresses of people in your classes

548-- | View the email addresses of people in your classes

570classroomProFileEmailsScope :: Proxy '["https://www.googleapis.com/auth/classroom.profile.emails"]

549classroomProFileEmailsScope :: Proxy '["https://www.googleapis.com/auth/classroom.profile.emails"]

571classroomProFileEmailsScope = Proxy

550classroomProFileEmailsScope = Proxy

@@ -609,10 +588,6 @@ classroomCoursesReadOnlyScope = Proxy

609classroomCourseworkStudentsScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students"]

588classroomCourseworkStudentsScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students"]

610classroomCourseworkStudentsScope = Proxy

589classroomCourseworkStudentsScope = Proxy

611

590

612−-- | See, create, and edit topics in Google Classroom

613−classroomTopicsScope :: Proxy '["https://www.googleapis.com/auth/classroom.topics"]

614−classroomTopicsScope = Proxy

615−

616-- | View and manage announcements in Google Classroom

591-- | View and manage announcements in Google Classroom

617classroomAnnouncementsScope :: Proxy '["https://www.googleapis.com/auth/classroom.announcements"]

592classroomAnnouncementsScope :: Proxy '["https://www.googleapis.com/auth/classroom.announcements"]

618classroomAnnouncementsScope = Proxy

593classroomAnnouncementsScope = Proxy

gogol-classroom/gen/Network/Google/Classroom/Types/Product.hs+31−174

@@ -91,7 +91,6 @@ data CourseWork =

91 , _cwDueTime :: !(Maybe TimeOfDay')

91 , _cwDueTime :: !(Maybe TimeOfDay')

92 , _cwAssociatedWithDeveloper :: !(Maybe Bool)

92 , _cwAssociatedWithDeveloper :: !(Maybe Bool)

93 , _cwUpdateTime :: !(Maybe DateTime')

93 , _cwUpdateTime :: !(Maybe DateTime')

94− , _cwTopicId :: !(Maybe Text)

95 , _cwMultipleChoiceQuestion :: !(Maybe MultipleChoiceQuestion)

94 , _cwMultipleChoiceQuestion :: !(Maybe MultipleChoiceQuestion)

96 , _cwId :: !(Maybe Text)

95 , _cwId :: !(Maybe Text)

97 , _cwSubmissionModificationMode :: !(Maybe CourseWorkSubmissionModificationMode)

96 , _cwSubmissionModificationMode :: !(Maybe CourseWorkSubmissionModificationMode)

@@ -133,8 +132,6 @@ data CourseWork =

133--

132--

134-- * 'cwUpdateTime'

133-- * 'cwUpdateTime'

135--

134--

136−-- * 'cwTopicId'

137−--

138-- * 'cwMultipleChoiceQuestion'

135-- * 'cwMultipleChoiceQuestion'

139--

136--

140-- * 'cwId'

137-- * 'cwId'

@@ -168,7 +165,6 @@ courseWork =

168 , _cwDueTime = Nothing

165 , _cwDueTime = Nothing

169 , _cwAssociatedWithDeveloper = Nothing

166 , _cwAssociatedWithDeveloper = Nothing

170 , _cwUpdateTime = Nothing

167 , _cwUpdateTime = Nothing

171− , _cwTopicId = Nothing

172 , _cwMultipleChoiceQuestion = Nothing

168 , _cwMultipleChoiceQuestion = Nothing

173 , _cwId = Nothing

169 , _cwId = Nothing

174 , _cwSubmissionModificationMode = Nothing

170 , _cwSubmissionModificationMode = Nothing

@@ -263,12 +259,6 @@ cwUpdateTime

263 = lens _cwUpdateTime (\ s a -> s{_cwUpdateTime = a})

259 = lens _cwUpdateTime (\ s a -> s{_cwUpdateTime = a})

264 . mapping _DateTime

260 . mapping _DateTime

265

261

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−

272-- | Multiple choice question details. For read operations, this field is

262-- | Multiple choice question details. For read operations, this field is

273-- populated only when \`work_type\` is \`MULTIPLE_CHOICE_QUESTION\`. For

263-- populated only when \`work_type\` is \`MULTIPLE_CHOICE_QUESTION\`. For

274-- write operations, this field must be specified when creating course work

264-- write operations, this field must be specified when creating course work

@@ -344,7 +334,6 @@ instance FromJSON CourseWork where

344 <*> (o .:? "dueTime")

334 <*> (o .:? "dueTime")

345 <*> (o .:? "associatedWithDeveloper")

335 <*> (o .:? "associatedWithDeveloper")

346 <*> (o .:? "updateTime")

336 <*> (o .:? "updateTime")

347− <*> (o .:? "topicId")

348 <*> (o .:? "multipleChoiceQuestion")

337 <*> (o .:? "multipleChoiceQuestion")

349 <*> (o .:? "id")

338 <*> (o .:? "id")

350 <*> (o .:? "submissionModificationMode")

339 <*> (o .:? "submissionModificationMode")

@@ -373,7 +362,6 @@ instance ToJSON CourseWork where

373 ("associatedWithDeveloper" .=) <$>

362 ("associatedWithDeveloper" .=) <$>

374 _cwAssociatedWithDeveloper,

363 _cwAssociatedWithDeveloper,

375 ("updateTime" .=) <$> _cwUpdateTime,

364 ("updateTime" .=) <$> _cwUpdateTime,

376− ("topicId" .=) <$> _cwTopicId,

377 ("multipleChoiceQuestion" .=) <$>

365 ("multipleChoiceQuestion" .=) <$>

378 _cwMultipleChoiceQuestion,

366 _cwMultipleChoiceQuestion,

379 ("id" .=) <$> _cwId,

367 ("id" .=) <$> _cwId,

@@ -1032,59 +1020,6 @@ instance ToJSON GlobalPermission where

1032 = object

1020 = object

1033 (catMaybes [("permission" .=) <$> _gpPermission])

1021 (catMaybes [("permission" .=) <$> _gpPermission])

1034

1022

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−

1088-- | URL item.

1023-- | URL item.

1089--

1024--

1090-- /See:/ 'link' smart constructor.

1025-- /See:/ 'link' smart constructor.

@@ -1873,82 +1808,6 @@ instance ToJSON Attachment where

1873 ("youTubeVideo" .=) <$> _aYouTubeVideo,

1808 ("youTubeVideo" .=) <$> _aYouTubeVideo,

1874 ("form" .=) <$> _aForm])

1809 ("form" .=) <$> _aForm])

1875

1810

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−

1952-- | Announcement created by a teacher for students of the course

1811-- | Announcement created by a teacher for students of the course

1953--

1812--

1954-- /See:/ 'announcement' smart constructor.

1813-- /See:/ 'announcement' smart constructor.

@@ -2575,9 +2434,9 @@ instance ToJSON YouTubeVideo where

2575-- /See:/ 'teacher' smart constructor.

2434-- /See:/ 'teacher' smart constructor.

2576data Teacher =

2435data Teacher =

2577 Teacher'

2436 Teacher'

2578− { _teaCourseId :: !(Maybe Text)

2437+ { _tCourseId :: !(Maybe Text)

2579− , _teaProFile :: !(Maybe UserProFile)

2438+ , _tProFile :: !(Maybe UserProFile)

2580− , _teaUserId :: !(Maybe Text)

2439+ , _tUserId :: !(Maybe Text)

2581 }

2440 }

2582 deriving (Eq, Show, Data, Typeable, Generic)

2441 deriving (Eq, Show, Data, Typeable, Generic)

2583

2442

@@ -2586,34 +2445,32 @@ data Teacher =

2586--

2445--

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

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

2588--

2447--

2589−-- * 'teaCourseId'

2448+-- * 'tCourseId'

2590--

2449--

2591−-- * 'teaProFile'

2450+-- * 'tProFile'

2592--

2451--

2593−-- * 'teaUserId'

2452+-- * 'tUserId'

2594teacher

2453teacher

2595 :: Teacher

2454 :: Teacher

2596teacher =

2455teacher =

2597− Teacher' {_teaCourseId = Nothing, _teaProFile = Nothing, _teaUserId = Nothing}

2456+ Teacher' {_tCourseId = Nothing, _tProFile = Nothing, _tUserId = Nothing}

2598

2457

2599

2458

2600-- | Identifier of the course. Read-only.

2459-- | Identifier of the course. Read-only.

2601−teaCourseId :: Lens' Teacher (Maybe Text)

2460+tCourseId :: Lens' Teacher (Maybe Text)

2602−teaCourseId

2461+tCourseId

2603− = lens _teaCourseId (\ s a -> s{_teaCourseId = a})

2462+ = lens _tCourseId (\ s a -> s{_tCourseId = a})

2604

2463

2605-- | Global user information for the teacher. Read-only.

2464-- | Global user information for the teacher. Read-only.

2606−teaProFile :: Lens' Teacher (Maybe UserProFile)

2465+tProFile :: Lens' Teacher (Maybe UserProFile)

2607−teaProFile

2466+tProFile = lens _tProFile (\ s a -> s{_tProFile = a})

2608− = lens _teaProFile (\ s a -> s{_teaProFile = a})

2609

2467

2610-- | Identifier of the user. When specified as a parameter of a request, this

2468-- | Identifier of the user. When specified as a parameter of a request, this

2611-- identifier can be one of the following: * the numeric identifier for the

2469-- identifier can be one of the following: * the numeric identifier for the

2612-- user * the email address of the user * the string literal \`\"me\"\`,

2470-- user * the email address of the user * the string literal \`\"me\"\`,

2613-- indicating the requesting user

2471-- indicating the requesting user

2614−teaUserId :: Lens' Teacher (Maybe Text)

2472+tUserId :: Lens' Teacher (Maybe Text)

2615−teaUserId

2473+tUserId = lens _tUserId (\ s a -> s{_tUserId = a})

2616− = lens _teaUserId (\ s a -> s{_teaUserId = a})

2617

2474

2618instance FromJSON Teacher where

2475instance FromJSON Teacher where

2619 parseJSON

2476 parseJSON

@@ -2627,9 +2484,9 @@ instance ToJSON Teacher where

2627 toJSON Teacher'{..}

2484 toJSON Teacher'{..}

2628 = object

2485 = object

2629 (catMaybes

2486 (catMaybes

2630− [("courseId" .=) <$> _teaCourseId,

2487+ [("courseId" .=) <$> _tCourseId,

2631− ("profile" .=) <$> _teaProFile,

2488+ ("profile" .=) <$> _tProFile,

2632− ("userId" .=) <$> _teaUserId])

2489+ ("userId" .=) <$> _tUserId])

2633

2490

2634-- | A set of materials that appears on the \"About\" page of the course.

2491-- | A set of materials that appears on the \"About\" page of the course.

2635-- These materials might include a syllabus, schedule, or other background

2492-- These materials might include a syllabus, schedule, or other background

@@ -3940,8 +3797,8 @@ instance ToJSON Form where

3940-- /See:/ 'listTeachersResponse' smart constructor.

3797-- /See:/ 'listTeachersResponse' smart constructor.

3941data ListTeachersResponse =

3798data ListTeachersResponse =

3942 ListTeachersResponse'

3799 ListTeachersResponse'

3943− { _lNextPageToken :: !(Maybe Text)

3800+ { _ltrNextPageToken :: !(Maybe Text)

3944− , _lTeachers :: !(Maybe [Teacher])

3801+ , _ltrTeachers :: !(Maybe [Teacher])

3945 }

3802 }

3946 deriving (Eq, Show, Data, Typeable, Generic)

3803 deriving (Eq, Show, Data, Typeable, Generic)

3947

3804

@@ -3950,26 +3807,26 @@ data ListTeachersResponse =

3950--

3807--

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

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

3952--

3809--

3953−-- * 'lNextPageToken'

3810+-- * 'ltrNextPageToken'

3954--

3811--

3955−-- * 'lTeachers'

3812+-- * 'ltrTeachers'

3956listTeachersResponse

3813listTeachersResponse

3957 :: ListTeachersResponse

3814 :: ListTeachersResponse

3958listTeachersResponse =

3815listTeachersResponse =

3959− ListTeachersResponse' {_lNextPageToken = Nothing, _lTeachers = Nothing}

3816+ ListTeachersResponse' {_ltrNextPageToken = Nothing, _ltrTeachers = Nothing}

3960

3817

3961

3818

3962-- | Token identifying the next page of results to return. If empty, no

3819-- | Token identifying the next page of results to return. If empty, no

3963-- further results are available.

3820-- further results are available.

3964−lNextPageToken :: Lens' ListTeachersResponse (Maybe Text)

3821+ltrNextPageToken :: Lens' ListTeachersResponse (Maybe Text)

3965−lNextPageToken

3822+ltrNextPageToken

3966− = lens _lNextPageToken

3823+ = lens _ltrNextPageToken

3967− (\ s a -> s{_lNextPageToken = a})

3824+ (\ s a -> s{_ltrNextPageToken = a})

3968

3825

3969-- | Teachers who match the list request.

3826-- | Teachers who match the list request.

3970−lTeachers :: Lens' ListTeachersResponse [Teacher]

3827+ltrTeachers :: Lens' ListTeachersResponse [Teacher]

3971−lTeachers

3828+ltrTeachers

3972− = lens _lTeachers (\ s a -> s{_lTeachers = a}) .

3829+ = lens _ltrTeachers (\ s a -> s{_ltrTeachers = a}) .

3973 _Default

3830 _Default

3974 . _Coerce

3831 . _Coerce

3975

3832

@@ -3985,8 +3842,8 @@ instance ToJSON ListTeachersResponse where

3985 toJSON ListTeachersResponse'{..}

3842 toJSON ListTeachersResponse'{..}

3986 = object

3843 = object

3987 (catMaybes

3844 (catMaybes

3988− [("nextPageToken" .=) <$> _lNextPageToken,

3845+ [("nextPageToken" .=) <$> _ltrNextPageToken,

3989− ("teachers" .=) <$> _lTeachers])

3846+ ("teachers" .=) <$> _ltrTeachers])

3990

3847

3991-- | Student in a course.

3848-- | Student in a course.

3992--

3849--

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

38 , CoursesTeachersDelete

38 , CoursesTeachersDelete

39

39

40 -- * Request Lenses

40 -- * Request Lenses

41− , ctdtXgafv

41+ , ctdXgafv

42− , ctdtUploadProtocol

42+ , ctdUploadProtocol

43− , ctdtCourseId

43+ , ctdCourseId

44− , ctdtAccessToken

44+ , ctdAccessToken

45− , ctdtUploadType

45+ , ctdUploadType

46− , ctdtUserId

46+ , ctdUserId

47− , ctdtCallback

47+ , ctdCallback

48 ) where

48 ) where

49

49

50import Network.Google.Classroom.Types

50import Network.Google.Classroom.Types

@@ -75,13 +75,13 @@ type CoursesTeachersDeleteResource =

75-- /See:/ 'coursesTeachersDelete' smart constructor.

75-- /See:/ 'coursesTeachersDelete' smart constructor.

76data CoursesTeachersDelete =

76data CoursesTeachersDelete =

77 CoursesTeachersDelete'

77 CoursesTeachersDelete'

78− { _ctdtXgafv :: !(Maybe Xgafv)

78+ { _ctdXgafv :: !(Maybe Xgafv)

79− , _ctdtUploadProtocol :: !(Maybe Text)

79+ , _ctdUploadProtocol :: !(Maybe Text)

80− , _ctdtCourseId :: !Text

80+ , _ctdCourseId :: !Text

81− , _ctdtAccessToken :: !(Maybe Text)

81+ , _ctdAccessToken :: !(Maybe Text)

82− , _ctdtUploadType :: !(Maybe Text)

82+ , _ctdUploadType :: !(Maybe Text)

83− , _ctdtUserId :: !Text

83+ , _ctdUserId :: !Text

84− , _ctdtCallback :: !(Maybe Text)

84+ , _ctdCallback :: !(Maybe Text)

85 }

85 }

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

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

87

87

@@ -90,86 +90,85 @@ data CoursesTeachersDelete =

90--

90--

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

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

92--

92--

93−-- * 'ctdtXgafv'

93+-- * 'ctdXgafv'

94--

94--

95−-- * 'ctdtUploadProtocol'

95+-- * 'ctdUploadProtocol'

96--

96--

97−-- * 'ctdtCourseId'

97+-- * 'ctdCourseId'

98--

98--

99−-- * 'ctdtAccessToken'

99+-- * 'ctdAccessToken'

100--

100--

101−-- * 'ctdtUploadType'

101+-- * 'ctdUploadType'

102--

102--

103−-- * 'ctdtUserId'

103+-- * 'ctdUserId'

104--

104--

105−-- * 'ctdtCallback'

105+-- * 'ctdCallback'

106coursesTeachersDelete

106coursesTeachersDelete

107− :: Text -- ^ 'ctdtCourseId'

107+ :: Text -- ^ 'ctdCourseId'

108− -> Text -- ^ 'ctdtUserId'

108+ -> Text -- ^ 'ctdUserId'

109 -> CoursesTeachersDelete

109 -> CoursesTeachersDelete

110−coursesTeachersDelete pCtdtCourseId_ pCtdtUserId_ =

110+coursesTeachersDelete pCtdCourseId_ pCtdUserId_ =

111 CoursesTeachersDelete'

111 CoursesTeachersDelete'

112− { _ctdtXgafv = Nothing

112+ { _ctdXgafv = Nothing

113− , _ctdtUploadProtocol = Nothing

113+ , _ctdUploadProtocol = Nothing

114− , _ctdtCourseId = pCtdtCourseId_

114+ , _ctdCourseId = pCtdCourseId_

115− , _ctdtAccessToken = Nothing

115+ , _ctdAccessToken = Nothing

116− , _ctdtUploadType = Nothing

116+ , _ctdUploadType = Nothing

117− , _ctdtUserId = pCtdtUserId_

117+ , _ctdUserId = pCtdUserId_

118− , _ctdtCallback = Nothing

118+ , _ctdCallback = Nothing

119 }

119 }

120

120

121

121

122-- | V1 error format.

122-- | V1 error format.

123−ctdtXgafv :: Lens' CoursesTeachersDelete (Maybe Xgafv)

123+ctdXgafv :: Lens' CoursesTeachersDelete (Maybe Xgafv)

124−ctdtXgafv

124+ctdXgafv = lens _ctdXgafv (\ s a -> s{_ctdXgafv = a})

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

126

125

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

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

128−ctdtUploadProtocol :: Lens' CoursesTeachersDelete (Maybe Text)

127+ctdUploadProtocol :: Lens' CoursesTeachersDelete (Maybe Text)

129−ctdtUploadProtocol

128+ctdUploadProtocol

130− = lens _ctdtUploadProtocol

129+ = lens _ctdUploadProtocol

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

130+ (\ s a -> s{_ctdUploadProtocol = a})

132

131

133-- | Identifier of the course. This identifier can be either the

132-- | Identifier of the course. This identifier can be either the

134-- Classroom-assigned identifier or an alias.

133-- Classroom-assigned identifier or an alias.

135−ctdtCourseId :: Lens' CoursesTeachersDelete Text

134+ctdCourseId :: Lens' CoursesTeachersDelete Text

136−ctdtCourseId

135+ctdCourseId

137− = lens _ctdtCourseId (\ s a -> s{_ctdtCourseId = a})

136+ = lens _ctdCourseId (\ s a -> s{_ctdCourseId = a})

138

137

139-- | OAuth access token.

138-- | OAuth access token.

140−ctdtAccessToken :: Lens' CoursesTeachersDelete (Maybe Text)

139+ctdAccessToken :: Lens' CoursesTeachersDelete (Maybe Text)

141−ctdtAccessToken

140+ctdAccessToken

142− = lens _ctdtAccessToken

141+ = lens _ctdAccessToken

143− (\ s a -> s{_ctdtAccessToken = a})

142+ (\ s a -> s{_ctdAccessToken = a})

144

143

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

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

146−ctdtUploadType :: Lens' CoursesTeachersDelete (Maybe Text)

145+ctdUploadType :: Lens' CoursesTeachersDelete (Maybe Text)

147−ctdtUploadType

146+ctdUploadType

148− = lens _ctdtUploadType

147+ = lens _ctdUploadType

149− (\ s a -> s{_ctdtUploadType = a})

148+ (\ s a -> s{_ctdUploadType = a})

150

149

151-- | Identifier of the teacher to delete. The identifier can be one of the

150-- | Identifier of the teacher to delete. The identifier can be one of the

152-- following: * the numeric identifier for the user * the email address of

151-- following: * the numeric identifier for the user * the email address of

153-- the user * the string literal \`\"me\"\`, indicating the requesting user

152-- the user * the string literal \`\"me\"\`, indicating the requesting user

154−ctdtUserId :: Lens' CoursesTeachersDelete Text

153+ctdUserId :: Lens' CoursesTeachersDelete Text

155−ctdtUserId

154+ctdUserId

156− = lens _ctdtUserId (\ s a -> s{_ctdtUserId = a})

155+ = lens _ctdUserId (\ s a -> s{_ctdUserId = a})

157

156

158-- | JSONP

157-- | JSONP

159−ctdtCallback :: Lens' CoursesTeachersDelete (Maybe Text)

158+ctdCallback :: Lens' CoursesTeachersDelete (Maybe Text)

160−ctdtCallback

159+ctdCallback

161− = lens _ctdtCallback (\ s a -> s{_ctdtCallback = a})

160+ = lens _ctdCallback (\ s a -> s{_ctdCallback = a})

162

161

163instance GoogleRequest CoursesTeachersDelete where

162instance GoogleRequest CoursesTeachersDelete where

164 type Rs CoursesTeachersDelete = Empty

163 type Rs CoursesTeachersDelete = Empty

165 type Scopes CoursesTeachersDelete =

164 type Scopes CoursesTeachersDelete =

166 '["https://www.googleapis.com/auth/classroom.rosters"]

165 '["https://www.googleapis.com/auth/classroom.rosters"]

167 requestClient CoursesTeachersDelete'{..}

166 requestClient CoursesTeachersDelete'{..}

168− = go _ctdtCourseId _ctdtUserId _ctdtXgafv

167+ = go _ctdCourseId _ctdUserId _ctdXgafv

169− _ctdtUploadProtocol

168+ _ctdUploadProtocol

170− _ctdtAccessToken

169+ _ctdAccessToken

171− _ctdtUploadType

170+ _ctdUploadType

172− _ctdtCallback

171+ _ctdCallback

173 (Just AltJSON)

172 (Just AltJSON)

174 classroomService

173 classroomService

175 where go

174 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

37 , CoursesTeachersGet

37 , CoursesTeachersGet

38

38

39 -- * Request Lenses

39 -- * Request Lenses

40− , ctgtXgafv

40+ , ctgXgafv

41− , ctgtUploadProtocol

41+ , ctgUploadProtocol

42− , ctgtCourseId

42+ , ctgCourseId

43− , ctgtAccessToken

43+ , ctgAccessToken

44− , ctgtUploadType

44+ , ctgUploadType

45− , ctgtUserId

45+ , ctgUserId

46− , ctgtCallback

46+ , ctgCallback

47 ) where

47 ) where

48

48

49import Network.Google.Classroom.Types

49import Network.Google.Classroom.Types

@@ -73,13 +73,13 @@ type CoursesTeachersGetResource =

73-- /See:/ 'coursesTeachersGet' smart constructor.

73-- /See:/ 'coursesTeachersGet' smart constructor.

74data CoursesTeachersGet =

74data CoursesTeachersGet =

75 CoursesTeachersGet'

75 CoursesTeachersGet'

76− { _ctgtXgafv :: !(Maybe Xgafv)

76+ { _ctgXgafv :: !(Maybe Xgafv)

77− , _ctgtUploadProtocol :: !(Maybe Text)

77+ , _ctgUploadProtocol :: !(Maybe Text)

78− , _ctgtCourseId :: !Text

78+ , _ctgCourseId :: !Text

79− , _ctgtAccessToken :: !(Maybe Text)

79+ , _ctgAccessToken :: !(Maybe Text)

80− , _ctgtUploadType :: !(Maybe Text)

80+ , _ctgUploadType :: !(Maybe Text)

81− , _ctgtUserId :: !Text

81+ , _ctgUserId :: !Text

82− , _ctgtCallback :: !(Maybe Text)

82+ , _ctgCallback :: !(Maybe Text)

83 }

83 }

84 deriving (Eq, Show, Data, Typeable, Generic)

84 deriving (Eq, Show, Data, Typeable, Generic)

85

85

@@ -88,75 +88,74 @@ data CoursesTeachersGet =

88--

88--

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

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

90--

90--

91−-- * 'ctgtXgafv'

91+-- * 'ctgXgafv'

92--

92--

93−-- * 'ctgtUploadProtocol'

93+-- * 'ctgUploadProtocol'

94--

94--

95−-- * 'ctgtCourseId'

95+-- * 'ctgCourseId'

96--

96--

97−-- * 'ctgtAccessToken'

97+-- * 'ctgAccessToken'

98--

98--

99−-- * 'ctgtUploadType'

99+-- * 'ctgUploadType'

100--

100--

101−-- * 'ctgtUserId'

101+-- * 'ctgUserId'

102--

102--

103−-- * 'ctgtCallback'

103+-- * 'ctgCallback'

104coursesTeachersGet

104coursesTeachersGet

105− :: Text -- ^ 'ctgtCourseId'

105+ :: Text -- ^ 'ctgCourseId'

106− -> Text -- ^ 'ctgtUserId'

106+ -> Text -- ^ 'ctgUserId'

107 -> CoursesTeachersGet

107 -> CoursesTeachersGet

108−coursesTeachersGet pCtgtCourseId_ pCtgtUserId_ =

108+coursesTeachersGet pCtgCourseId_ pCtgUserId_ =

109 CoursesTeachersGet'

109 CoursesTeachersGet'

110− { _ctgtXgafv = Nothing

110+ { _ctgXgafv = Nothing

111− , _ctgtUploadProtocol = Nothing

111+ , _ctgUploadProtocol = Nothing

112− , _ctgtCourseId = pCtgtCourseId_

112+ , _ctgCourseId = pCtgCourseId_

113− , _ctgtAccessToken = Nothing

113+ , _ctgAccessToken = Nothing

114− , _ctgtUploadType = Nothing

114+ , _ctgUploadType = Nothing

115− , _ctgtUserId = pCtgtUserId_

115+ , _ctgUserId = pCtgUserId_

116− , _ctgtCallback = Nothing

116+ , _ctgCallback = Nothing

117 }

117 }

118

118

119

119

120-- | V1 error format.

120-- | V1 error format.

121−ctgtXgafv :: Lens' CoursesTeachersGet (Maybe Xgafv)

121+ctgXgafv :: Lens' CoursesTeachersGet (Maybe Xgafv)

122−ctgtXgafv

122+ctgXgafv = lens _ctgXgafv (\ s a -> s{_ctgXgafv = a})

123− = lens _ctgtXgafv (\ s a -> s{_ctgtXgafv = a})

124

123

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

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

126−ctgtUploadProtocol :: Lens' CoursesTeachersGet (Maybe Text)

125+ctgUploadProtocol :: Lens' CoursesTeachersGet (Maybe Text)

127−ctgtUploadProtocol

126+ctgUploadProtocol

128− = lens _ctgtUploadProtocol

127+ = lens _ctgUploadProtocol

129− (\ s a -> s{_ctgtUploadProtocol = a})

128+ (\ s a -> s{_ctgUploadProtocol = a})

130

129

131-- | Identifier of the course. This identifier can be either the

130-- | Identifier of the course. This identifier can be either the

132-- Classroom-assigned identifier or an alias.

131-- Classroom-assigned identifier or an alias.

133−ctgtCourseId :: Lens' CoursesTeachersGet Text

132+ctgCourseId :: Lens' CoursesTeachersGet Text

134−ctgtCourseId

133+ctgCourseId

135− = lens _ctgtCourseId (\ s a -> s{_ctgtCourseId = a})

134+ = lens _ctgCourseId (\ s a -> s{_ctgCourseId = a})

136

135

137-- | OAuth access token.

136-- | OAuth access token.

138−ctgtAccessToken :: Lens' CoursesTeachersGet (Maybe Text)

137+ctgAccessToken :: Lens' CoursesTeachersGet (Maybe Text)

139−ctgtAccessToken

138+ctgAccessToken

140− = lens _ctgtAccessToken

139+ = lens _ctgAccessToken

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

140+ (\ s a -> s{_ctgAccessToken = a})

142

141

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

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

144−ctgtUploadType :: Lens' CoursesTeachersGet (Maybe Text)

143+ctgUploadType :: Lens' CoursesTeachersGet (Maybe Text)

145−ctgtUploadType

144+ctgUploadType

146− = lens _ctgtUploadType

145+ = lens _ctgUploadType

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

146+ (\ s a -> s{_ctgUploadType = a})

148

147

149-- | Identifier of the teacher to return. The identifier can be one of the

148-- | Identifier of the teacher to return. The identifier can be one of the

150-- following: * the numeric identifier for the user * the email address of

149-- following: * the numeric identifier for the user * the email address of

151-- the user * the string literal \`\"me\"\`, indicating the requesting user

150-- the user * the string literal \`\"me\"\`, indicating the requesting user

152−ctgtUserId :: Lens' CoursesTeachersGet Text

151+ctgUserId :: Lens' CoursesTeachersGet Text

153−ctgtUserId

152+ctgUserId

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

153+ = lens _ctgUserId (\ s a -> s{_ctgUserId = a})

155

154

156-- | JSONP

155-- | JSONP

157−ctgtCallback :: Lens' CoursesTeachersGet (Maybe Text)

156+ctgCallback :: Lens' CoursesTeachersGet (Maybe Text)

158−ctgtCallback

157+ctgCallback

159− = lens _ctgtCallback (\ s a -> s{_ctgtCallback = a})

158+ = lens _ctgCallback (\ s a -> s{_ctgCallback = a})

160

159

161instance GoogleRequest CoursesTeachersGet where

160instance GoogleRequest CoursesTeachersGet where

162 type Rs CoursesTeachersGet = Teacher

161 type Rs CoursesTeachersGet = Teacher

@@ -166,11 +165,11 @@ instance GoogleRequest CoursesTeachersGet where

166 "https://www.googleapis.com/auth/classroom.rosters",

165 "https://www.googleapis.com/auth/classroom.rosters",

167 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

166 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

168 requestClient CoursesTeachersGet'{..}

167 requestClient CoursesTeachersGet'{..}

169− = go _ctgtCourseId _ctgtUserId _ctgtXgafv

168+ = go _ctgCourseId _ctgUserId _ctgXgafv

170− _ctgtUploadProtocol

169+ _ctgUploadProtocol

171− _ctgtAccessToken

170+ _ctgAccessToken

172− _ctgtUploadType

171+ _ctgUploadType

173− _ctgtCallback

172+ _ctgCallback

174 (Just AltJSON)

173 (Just AltJSON)

175 classroomService

174 classroomService

176 where go

175 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

36 , CoursesTeachersList

36 , CoursesTeachersList

37

37

38 -- * Request Lenses

38 -- * Request Lenses

39− , ctltXgafv

39+ , ctlXgafv

40− , ctltUploadProtocol

40+ , ctlUploadProtocol

41− , ctltCourseId

41+ , ctlCourseId

42− , ctltAccessToken

42+ , ctlAccessToken

43− , ctltUploadType

43+ , ctlUploadType

44− , ctltPageToken

44+ , ctlPageToken

45− , ctltPageSize

45+ , ctlPageSize

46− , ctltCallback

46+ , ctlCallback

47 ) where

47 ) where

48

48

49import Network.Google.Classroom.Types

49import Network.Google.Classroom.Types

@@ -74,14 +74,14 @@ type CoursesTeachersListResource =

74-- /See:/ 'coursesTeachersList' smart constructor.

74-- /See:/ 'coursesTeachersList' smart constructor.

75data CoursesTeachersList =

75data CoursesTeachersList =

76 CoursesTeachersList'

76 CoursesTeachersList'

77− { _ctltXgafv :: !(Maybe Xgafv)

77+ { _ctlXgafv :: !(Maybe Xgafv)

78− , _ctltUploadProtocol :: !(Maybe Text)

78+ , _ctlUploadProtocol :: !(Maybe Text)

79− , _ctltCourseId :: !Text

79+ , _ctlCourseId :: !Text

80− , _ctltAccessToken :: !(Maybe Text)

80+ , _ctlAccessToken :: !(Maybe Text)

81− , _ctltUploadType :: !(Maybe Text)

81+ , _ctlUploadType :: !(Maybe Text)

82− , _ctltPageToken :: !(Maybe Text)

82+ , _ctlPageToken :: !(Maybe Text)

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

83+ , _ctlPageSize :: !(Maybe (Textual Int32))

84− , _ctltCallback :: !(Maybe Text)

84+ , _ctlCallback :: !(Maybe Text)

85 }

85 }

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

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

87

87

@@ -90,85 +90,83 @@ data CoursesTeachersList =

90--

90--

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

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

92--

92--

93−-- * 'ctltXgafv'

93+-- * 'ctlXgafv'

94--

94--

95−-- * 'ctltUploadProtocol'

95+-- * 'ctlUploadProtocol'

96--

96--

97−-- * 'ctltCourseId'

97+-- * 'ctlCourseId'

98--

98--

99−-- * 'ctltAccessToken'

99+-- * 'ctlAccessToken'

100--

100--

101−-- * 'ctltUploadType'

101+-- * 'ctlUploadType'

102--

102--

103−-- * 'ctltPageToken'

103+-- * 'ctlPageToken'

104--

104--

105−-- * 'ctltPageSize'

105+-- * 'ctlPageSize'

106--

106--

107−-- * 'ctltCallback'

107+-- * 'ctlCallback'

108coursesTeachersList

108coursesTeachersList

109− :: Text -- ^ 'ctltCourseId'

109+ :: Text -- ^ 'ctlCourseId'

110 -> CoursesTeachersList

110 -> CoursesTeachersList

111−coursesTeachersList pCtltCourseId_ =

111+coursesTeachersList pCtlCourseId_ =

112 CoursesTeachersList'

112 CoursesTeachersList'

113− { _ctltXgafv = Nothing

113+ { _ctlXgafv = Nothing

114− , _ctltUploadProtocol = Nothing

114+ , _ctlUploadProtocol = Nothing

115− , _ctltCourseId = pCtltCourseId_

115+ , _ctlCourseId = pCtlCourseId_

116− , _ctltAccessToken = Nothing

116+ , _ctlAccessToken = Nothing

117− , _ctltUploadType = Nothing

117+ , _ctlUploadType = Nothing

118− , _ctltPageToken = Nothing

118+ , _ctlPageToken = Nothing

119− , _ctltPageSize = Nothing

119+ , _ctlPageSize = Nothing

120− , _ctltCallback = Nothing

120+ , _ctlCallback = Nothing

121 }

121 }

122

122

123

123

124-- | V1 error format.

124-- | V1 error format.

125−ctltXgafv :: Lens' CoursesTeachersList (Maybe Xgafv)

125+ctlXgafv :: Lens' CoursesTeachersList (Maybe Xgafv)

126−ctltXgafv

126+ctlXgafv = lens _ctlXgafv (\ s a -> s{_ctlXgafv = a})

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

128

127

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

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

130−ctltUploadProtocol :: Lens' CoursesTeachersList (Maybe Text)

129+ctlUploadProtocol :: Lens' CoursesTeachersList (Maybe Text)

131−ctltUploadProtocol

130+ctlUploadProtocol

132− = lens _ctltUploadProtocol

131+ = lens _ctlUploadProtocol

133− (\ s a -> s{_ctltUploadProtocol = a})

132+ (\ s a -> s{_ctlUploadProtocol = a})

134

133

135-- | Identifier of the course. This identifier can be either the

134-- | Identifier of the course. This identifier can be either the

136-- Classroom-assigned identifier or an alias.

135-- Classroom-assigned identifier or an alias.

137−ctltCourseId :: Lens' CoursesTeachersList Text

136+ctlCourseId :: Lens' CoursesTeachersList Text

138−ctltCourseId

137+ctlCourseId

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

138+ = lens _ctlCourseId (\ s a -> s{_ctlCourseId = a})

140

139

141-- | OAuth access token.

140-- | OAuth access token.

142−ctltAccessToken :: Lens' CoursesTeachersList (Maybe Text)

141+ctlAccessToken :: Lens' CoursesTeachersList (Maybe Text)

143−ctltAccessToken

142+ctlAccessToken

144− = lens _ctltAccessToken

143+ = lens _ctlAccessToken

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

144+ (\ s a -> s{_ctlAccessToken = a})

146

145

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

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

148−ctltUploadType :: Lens' CoursesTeachersList (Maybe Text)

147+ctlUploadType :: Lens' CoursesTeachersList (Maybe Text)

149−ctltUploadType

148+ctlUploadType

150− = lens _ctltUploadType

149+ = lens _ctlUploadType

151− (\ s a -> s{_ctltUploadType = a})

150+ (\ s a -> s{_ctlUploadType = a})

152

151

153-- | nextPageToken value returned from a previous list call, indicating that

152-- | nextPageToken value returned from a previous list call, indicating that

154-- the subsequent page of results should be returned. The list request must

153-- the subsequent page of results should be returned. The list request must

155-- be otherwise identical to the one that resulted in this token.

154-- be otherwise identical to the one that resulted in this token.

156−ctltPageToken :: Lens' CoursesTeachersList (Maybe Text)

155+ctlPageToken :: Lens' CoursesTeachersList (Maybe Text)

157−ctltPageToken

156+ctlPageToken

158− = lens _ctltPageToken

157+ = lens _ctlPageToken (\ s a -> s{_ctlPageToken = a})

159− (\ s a -> s{_ctltPageToken = a})

160

158

161-- | Maximum number of items to return. Zero means no maximum. The server may

159-- | Maximum number of items to return. Zero means no maximum. The server may

162-- return fewer than the specified number of results.

160-- return fewer than the specified number of results.

163−ctltPageSize :: Lens' CoursesTeachersList (Maybe Int32)

161+ctlPageSize :: Lens' CoursesTeachersList (Maybe Int32)

164−ctltPageSize

162+ctlPageSize

165− = lens _ctltPageSize (\ s a -> s{_ctltPageSize = a})

163+ = lens _ctlPageSize (\ s a -> s{_ctlPageSize = a}) .

166− . mapping _Coerce

164+ mapping _Coerce

167

165

168-- | JSONP

166-- | JSONP

169−ctltCallback :: Lens' CoursesTeachersList (Maybe Text)

167+ctlCallback :: Lens' CoursesTeachersList (Maybe Text)

170−ctltCallback

168+ctlCallback

171− = lens _ctltCallback (\ s a -> s{_ctltCallback = a})

169+ = lens _ctlCallback (\ s a -> s{_ctlCallback = a})

172

170

173instance GoogleRequest CoursesTeachersList where

171instance GoogleRequest CoursesTeachersList where

174 type Rs CoursesTeachersList = ListTeachersResponse

172 type Rs CoursesTeachersList = ListTeachersResponse

@@ -178,12 +176,12 @@ instance GoogleRequest CoursesTeachersList where

178 "https://www.googleapis.com/auth/classroom.rosters",

176 "https://www.googleapis.com/auth/classroom.rosters",

179 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

177 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

180 requestClient CoursesTeachersList'{..}

178 requestClient CoursesTeachersList'{..}

181− = go _ctltCourseId _ctltXgafv _ctltUploadProtocol

179+ = go _ctlCourseId _ctlXgafv _ctlUploadProtocol

182− _ctltAccessToken

180+ _ctlAccessToken

183− _ctltUploadType

181+ _ctlUploadType

184− _ctltPageToken

182+ _ctlPageToken

185− _ctltPageSize

183+ _ctlPageSize

186− _ctltCallback

184+ _ctlCallback

187 (Just AltJSON)

185 (Just AltJSON)

188 classroomService

186 classroomService

189 where go

187 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

70 , Network.Google.Resource.Classroom.Courses.Teachers.Delete

70 , Network.Google.Resource.Classroom.Courses.Teachers.Delete

71 , Network.Google.Resource.Classroom.Courses.Teachers.Get

71 , Network.Google.Resource.Classroom.Courses.Teachers.Get

72 , Network.Google.Resource.Classroom.Courses.Teachers.List

72 , 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

78 , Network.Google.Resource.Classroom.Courses.Update

73 , Network.Google.Resource.Classroom.Courses.Update

79 , Network.Google.Resource.Classroom.Invitations.Accept

74 , Network.Google.Resource.Classroom.Invitations.Accept

80 , Network.Google.Resource.Classroom.Invitations.Create

75 , Network.Google.Resource.Classroom.Invitations.Create

gogol-cloudasset/gen/Network/Google/CloudAsset.hs+38−14

@@ -16,7 +16,7 @@

16-- The cloud asset API manages the history and inventory of cloud

16-- The cloud asset API manages the history and inventory of cloud

17-- resources.

17-- resources.

18--

18--

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>

20module Network.Google.CloudAsset

20module Network.Google.CloudAsset

21 (

21 (

22 -- * Service Configuration

22 -- * Service Configuration

@@ -30,14 +30,29 @@ module Network.Google.CloudAsset

30

30

31 -- * Resources

31 -- * Resources

32

32

33− -- ** cloudasset.batchGetAssetsHistory

33+ -- ** cloudasset.folders.exportAssets

34− , module Network.Google.Resource.CloudAsset.BatchGetAssetsHistory

34+ , module Network.Google.Resource.CloudAsset.Folders.ExportAssets

35

35

36− -- ** cloudasset.exportAssets

36+ -- ** cloudasset.folders.operations.get

37− , module Network.Google.Resource.CloudAsset.ExportAssets

37+ , module Network.Google.Resource.CloudAsset.Folders.Operations.Get

38

38

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+

39− -- ** cloudasset.operations.get

45+ -- ** cloudasset.organizations.operations.get

40− , module Network.Google.Resource.CloudAsset.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

41

56

42 -- * Types

57 -- * Types

43

58

@@ -85,7 +100,6 @@ module Network.Google.CloudAsset

85 -- ** GcsDestination

100 -- ** GcsDestination

86 , GcsDestination

101 , GcsDestination

87 , gcsDestination

102 , gcsDestination

88− , gdURIPrefix

89 , gdURI

103 , gdURI

90

104

91 -- ** StatusDetailsItem

105 -- ** StatusDetailsItem

@@ -179,9 +193,14 @@ module Network.Google.CloudAsset

179

193

180import Network.Google.CloudAsset.Types

194import Network.Google.CloudAsset.Types

181import Network.Google.Prelude

195import Network.Google.Prelude

182−import Network.Google.Resource.CloudAsset.BatchGetAssetsHistory

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

183−import Network.Google.Resource.CloudAsset.ExportAssets

202+import Network.Google.Resource.CloudAsset.Projects.ExportAssets

184−import Network.Google.Resource.CloudAsset.Operations.Get

203+import Network.Google.Resource.CloudAsset.Projects.Operations.Get

185

204

186{- $resources

205{- $resources

187TODO

206TODO

@@ -189,6 +208,11 @@ TODO

189

208

190-- | Represents the entirety of the methods and resources available for the Cloud Asset API service.

209-- | Represents the entirety of the methods and resources available for the Cloud Asset API service.

191type CloudAssetAPI =

210type CloudAssetAPI =

192− ExportAssetsResource :<|>

211+ FoldersOperationsGetResource :<|>

193− BatchGetAssetsHistoryResource

212+ FoldersExportAssetsResource

194− :<|> OperationsGetResource

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

66 -- * GcsDestination

66 -- * GcsDestination

67 , GcsDestination

67 , GcsDestination

68 , gcsDestination

68 , gcsDestination

69− , gdURIPrefix

70 , gdURI

69 , gdURI

71

70

72 -- * StatusDetailsItem

71 -- * StatusDetailsItem

@@ -162,10 +161,10 @@ import Network.Google.CloudAsset.Types.Product

162import Network.Google.CloudAsset.Types.Sum

161import Network.Google.CloudAsset.Types.Sum

163import Network.Google.Prelude

162import Network.Google.Prelude

164

163

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.

166cloudAssetService :: ServiceConfig

165cloudAssetService :: ServiceConfig

167cloudAssetService

166cloudAssetService

168− = defaultService (ServiceId "cloudasset:v1")

167+ = defaultService (ServiceId "cloudasset:v1beta1")

169 "cloudasset.googleapis.com"

168 "cloudasset.googleapis.com"

170

169

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

170-- | 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)

415aIAMPolicy

415aIAMPolicy

416 = lens _aIAMPolicy (\ s a -> s{_aIAMPolicy = a})

416 = lens _aIAMPolicy (\ s a -> s{_aIAMPolicy = a})

417

417

418−-- | Type of the asset. Example: \"compute.googleapis.com\/Disk\".

418+-- | Type of the asset. Example: \"google.compute.Disk\".

419aAssetType :: Lens' Asset (Maybe Text)

419aAssetType :: Lens' Asset (Maybe Text)

420aAssetType

420aAssetType

421 = lens _aAssetType (\ s a -> s{_aAssetType = a})

421 = lens _aAssetType (\ s a -> s{_aAssetType = a})

@@ -441,10 +441,9 @@ instance ToJSON Asset where

441-- | A Cloud Storage location.

441-- | A Cloud Storage location.

442--

442--

443-- /See:/ 'gcsDestination' smart constructor.

443-- /See:/ 'gcsDestination' smart constructor.

444−data GcsDestination =

444+newtype GcsDestination =

445 GcsDestination'

445 GcsDestination'

446− { _gdURIPrefix :: !(Maybe Text)

447− , _gdURI :: !(Maybe Text)

446+ { _gdURI :: Maybe Text

448 }

447 }

449 deriving (Eq, Show, Data, Typeable, Generic)

448 deriving (Eq, Show, Data, Typeable, Generic)

450

449

@@ -453,26 +452,11 @@ data GcsDestination =

453--

452--

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

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

455--

454--

456−-- * 'gdURIPrefix'

457−--

458-- * 'gdURI'

455-- * 'gdURI'

459gcsDestination

456gcsDestination

460 :: GcsDestination

457 :: GcsDestination

461−gcsDestination = GcsDestination' {_gdURIPrefix = Nothing, _gdURI = Nothing}

458+gcsDestination = GcsDestination' {_gdURI = Nothing}

462−

459+

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})

476

460

477-- | The uri of the Cloud Storage object. It\'s the same uri that is used by

461-- | The uri of the Cloud Storage object. It\'s the same uri that is used by

478-- gsutil. For example: \"gs:\/\/bucket_name\/object_name\". See [Viewing

462-- gsutil. For example: \"gs:\/\/bucket_name\/object_name\". See [Viewing

@@ -485,16 +469,11 @@ gdURI = lens _gdURI (\ s a -> s{_gdURI = a})

485instance FromJSON GcsDestination where

469instance FromJSON GcsDestination where

486 parseJSON

470 parseJSON

487 = withObject "GcsDestination"

471 = withObject "GcsDestination"

488− (\ o ->

489− GcsDestination' <$>

472+ (\ o -> GcsDestination' <$> (o .:? "uri"))

490− (o .:? "uriPrefix") <*> (o .:? "uri"))

491

473

492instance ToJSON GcsDestination where

474instance ToJSON GcsDestination where

493 toJSON GcsDestination'{..}

475 toJSON GcsDestination'{..}

494− = object

495− (catMaybes

476+ = object (catMaybes [("uri" .=) <$> _gdURI])

496− [("uriPrefix" .=) <$> _gdURIPrefix,

497− ("uri" .=) <$> _gdURI])

498

477

499--

478--

500-- /See:/ 'statusDetailsItem' smart constructor.

479-- /See:/ 'statusDetailsItem' smart constructor.

@@ -577,8 +556,8 @@ earReadTime

577 mapping _DateTime

556 mapping _DateTime

578

557

579-- | A list of asset types of which to take a snapshot for. For example:

558-- | A list of asset types of which to take a snapshot for. For example:

580−-- \"compute.googleapis.com\/Disk\". If specified, only matching assets

559+-- \"google.compute.Disk\". If specified, only matching assets will be

581−-- will be returned. See [Introduction to Cloud Asset

560+-- returned. See [Introduction to Cloud Asset

582-- Inventory](https:\/\/cloud.google.com\/resource-manager\/docs\/cloud-asset-inventory\/overview)

561-- Inventory](https:\/\/cloud.google.com\/resource-manager\/docs\/cloud-asset-inventory\/overview)

583-- for all supported asset types.

562-- for all supported asset types.

584earAssetTypes :: Lens' ExportAssetsRequest [Text]

563earAssetTypes :: Lens' ExportAssetsRequest [Text]

@@ -1233,8 +1212,8 @@ binding =

1233-- that represents a service account. For example,

1212-- that represents a service account. For example,

1234-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

1213-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

1235-- email address that represents a Google group. For example,

1214-- email address that represents a Google group. For example,

1236−-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

1215+-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

1237−-- (primary) that represents all the users of that domain. For example,

1216+-- name that represents all the users of that domain. For example,

1238-- \`google.com\` or \`example.com\`.

1217-- \`google.com\` or \`example.com\`.

1239bMembers :: Lens' Binding [Text]

1218bMembers :: Lens' Binding [Text]

1240bMembers

1219bMembers

@@ -1247,9 +1226,10 @@ bMembers

1247bRole :: Lens' Binding (Maybe Text)

1226bRole :: Lens' Binding (Maybe Text)

1248bRole = lens _bRole (\ s a -> s{_bRole = a})

1227bRole = lens _bRole (\ s a -> s{_bRole = a})

1249

1228

1250−-- | The condition that is associated with this binding. NOTE: An unsatisfied

1229+-- | Unimplemented. The condition that is associated with this binding. NOTE:

1251−-- condition will not allow user access via current binding. Different

1230+-- an unsatisfied condition will not allow user access via current binding.

1252−-- bindings, including their conditions, are examined independently.

1231+-- Different bindings, including their conditions, are examined

1232+-- independently.

1253bCondition :: Lens' Binding (Maybe Expr)

1233bCondition :: Lens' Binding (Maybe Expr)

1254bCondition

1234bCondition

1255 = lens _bCondition (\ s a -> s{_bCondition = a})

1235 = 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 @@

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

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

14

14

15-- |

15-- |

16−-- Module : Network.Google.Resource.SecurityCenter.Organizations.Operations.Get

16+-- Module : Network.Google.Resource.CloudAsset.Organizations.Operations.Get

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

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

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

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

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

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

@@ -24,8 +24,8 @@

24-- method to poll the operation result at intervals as recommended by the

24-- method to poll the operation result at intervals as recommended by the

25-- API service.

25-- API service.

26--

26--

27−-- /See:/ <https://console.cloud.google.com/apis/api/securitycenter.googleapis.com/overview Cloud Security Command Center API Reference> for @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.SecurityCenter.Organizations.Operations.Get

28+module Network.Google.Resource.CloudAsset.Organizations.Operations.Get

29 (

29 (

30 -- * REST Resource

30 -- * REST Resource

31 OrganizationsOperationsGetResource

31 OrganizationsOperationsGetResource

@@ -43,13 +43,13 @@ module Network.Google.Resource.SecurityCenter.Organizations.Operations.Get

43 , oogCallback

43 , oogCallback

44 ) where

44 ) where

45

45

46+import Network.Google.CloudAsset.Types

46import Network.Google.Prelude

47import Network.Google.Prelude

47−import Network.Google.SecurityCenter.Types

48

48

49−-- | A resource alias for @securitycenter.organizations.operations.get@ method which the

49+-- | A resource alias for @cloudasset.organizations.operations.get@ method which the

50-- 'OrganizationsOperationsGet' request conforms to.

50-- 'OrganizationsOperationsGet' request conforms to.

51type OrganizationsOperationsGetResource =

51type OrganizationsOperationsGetResource =

52− "v1" :>

52+ "v1beta1" :>

53 Capture "name" Text :>

53 Capture "name" Text :>

54 QueryParam "$.xgafv" Xgafv :>

54 QueryParam "$.xgafv" Xgafv :>

55 QueryParam "upload_protocol" Text :>

55 QueryParam "upload_protocol" Text :>

@@ -146,7 +146,7 @@ instance GoogleRequest OrganizationsOperationsGet

146 _oogUploadType

146 _oogUploadType

147 _oogCallback

147 _oogCallback

148 (Just AltJSON)

148 (Just AltJSON)

149− securityCenterService

149+ cloudAssetService

150 where go

150 where go

151 = buildClient

151 = buildClient

152 (Proxy :: Proxy OrganizationsOperationsGetResource)

152 (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.