git.iko.soy/gogol

on develop help sign in

from

swap

to801f00b8 ahead, 1 behind

compare

.travis.yml+16−2

since splitsnapshots

unifiedsplit

@@ -93,6 +93,8 @@ 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] } }

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

350 - 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.4.4

64+ , servant >= 0.14.1

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.Utils.Links as Export hiding (Link)

31+import Servant.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/Makefile+1−1

@@ -38,7 +38,7 @@ format:

38 -exec stylish-haskell -i {} \;

38 -exec stylish-haskell -i {} \;

39

39

40$(BIN)/gogol-gen: $(BIN)

40$(BIN)/gogol-gen: $(BIN)

41− stack build gogol-gen --copy-bins --local-bin-path $(BIN)

41+ stack build gogol-gen --nix --copy-bins --local-bin-path $(BIN)

42

42

43$(BIN):

43$(BIN):

44 mkdir $@

44 mkdir $@

gen/stack.yaml+1−1

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

1−resolver: lts-13.7

1+resolver: lts-13.19

2

2

3nix:

3nix:

4 enable: false

4 enable: false

gen/stack.yaml.locknew file+49

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

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-photoslibrary/LICENSE → gogol-accessapproval/LICENSErenamed

The content is the same.

gogol-photoslibrary/Makefile → gogol-accessapproval/Makefilerenamed

The content is the same.

gogol-accessapproval/README.mdnew file+28

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

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-photoslibrary/Setup.hs → gogol-accessapproval/Setup.hsrenamed

The content is the same.

gogol-accessapproval/gen/Network/Google/AccessApproval.hsnew file+196

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

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.hsnew file+100

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

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.hsnew file+546

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

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.hsnew file+100

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

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.hsnew file+170

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

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.hsnew file+174

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

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.hsnew file+153

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

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.hsnew file+204

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

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.hsnew file+156

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

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.hsnew file+175

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

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.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.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.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.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.hsnew file+156

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

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.hsnew file+206

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

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.hsnew file+157

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

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.hsnew file+177

@@ -0,0 +1,177 @@

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.hsnew file+171

@@ -0,0 +1,171 @@

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.hsnew file+175

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

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.hsnew file+153

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

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.hsnew file+204

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

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.hsnew file+156

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

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.hsnew file+175

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

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.cabalnew file+63

@@ -0,0 +1,63 @@

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-photoslibrary/src/.gitkeep → gogol-accessapproval/src/.gitkeeprenamed

The content is the same.

gogol-accesscontextmanager/gen/Network/Google/AccessContextManager.hs+33−1

@@ -75,9 +75,18 @@ 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+

78 -- ** accesscontextmanager.operations.get

84 -- ** accesscontextmanager.operations.get

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

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

80

86

87+ -- ** accesscontextmanager.operations.list

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

89+

81 -- * Types

90 -- * Types

82

91

83 -- ** Status

92 -- ** Status

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

93 , blConditions

102 , blConditions

94 , blCombiningFunction

103 , blCombiningFunction

95

104

105+ -- ** ListOperationsResponse

106+ , ListOperationsResponse

107+ , listOperationsResponse

108+ , lorNextPageToken

109+ , lorOperations

110+

111+ -- ** CancelOperationRequest

112+ , CancelOperationRequest

113+ , cancelOperationRequest

114+

96 -- ** AccessLevel

115 -- ** AccessLevel

97 , AccessLevel

116 , AccessLevel

98 , accessLevel

117 , accessLevel

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

109 -- ** ServicePerimeterConfig

128 -- ** ServicePerimeterConfig

110 , ServicePerimeterConfig

129 , ServicePerimeterConfig

111 , servicePerimeterConfig

130 , servicePerimeterConfig

112− , spcUnrestrictedServices

113 , spcResources

131 , spcResources

114 , spcRestrictedServices

132 , spcRestrictedServices

115 , spcAccessLevels

133 , spcAccessLevels

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

126 -- ** ServicePerimeterPerimeterType

144 -- ** ServicePerimeterPerimeterType

127 , ServicePerimeterPerimeterType (..)

145 , ServicePerimeterPerimeterType (..)

128

146

147+ -- ** Empty

148+ , Empty

149+ , empty

150+

129 -- ** OSConstraintOSType

151 -- ** OSConstraintOSType

130 , OSConstraintOSType (..)

152 , OSConstraintOSType (..)

131

153

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

156 , osConstraint

178 , osConstraint

157 , ocOSType

179 , ocOSType

158 , ocMinimumVersion

180 , ocMinimumVersion

181+ , ocRequireVerifiedChromeOS

159

182

160 -- ** AccessPolicy

183 -- ** AccessPolicy

161 , AccessPolicy

184 , AccessPolicy

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

190 , DevicePolicy

213 , DevicePolicy

191 , devicePolicy

214 , devicePolicy

192 , dpOSConstraints

215 , dpOSConstraints

216+ , dpRequireAdminApproval

217+ , dpRequireCorpOwned

193 , dpRequireScreenlock

218 , dpRequireScreenlock

194 , dpAllowedEncryptionStatuses

219 , dpAllowedEncryptionStatuses

195 , dpAllowedDeviceManagementLevels

220 , dpAllowedDeviceManagementLevels

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

198 , Condition

223 , Condition

199 , condition

224 , condition

200 , cMembers

225 , cMembers

226+ , cRegions

201 , cNegate

227 , cNegate

202 , cIPSubnetworks

228 , cIPSubnetworks

203 , cDevicePolicy

229 , cDevicePolicy

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

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

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

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

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

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

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

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

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

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

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

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

230

259

231{- $resources

260{- $resources

232TODO

261TODO

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

249 :<|> AccessPoliciesGetResource

278 :<|> AccessPoliciesGetResource

250 :<|> AccessPoliciesCreateResource

279 :<|> AccessPoliciesCreateResource

251 :<|> AccessPoliciesDeleteResource

280 :<|> AccessPoliciesDeleteResource

281+ :<|> OperationsListResource

252 :<|> OperationsGetResource

282 :<|> OperationsGetResource

283+ :<|> OperationsCancelResource

284+ :<|> OperationsDeleteResource

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

@@ -35,6 +35,16 @@ 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+

38 -- * AccessLevel

48 -- * AccessLevel

39 , AccessLevel

49 , AccessLevel

40 , accessLevel

50 , accessLevel

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

51 -- * ServicePerimeterConfig

61 -- * ServicePerimeterConfig

52 , ServicePerimeterConfig

62 , ServicePerimeterConfig

53 , servicePerimeterConfig

63 , servicePerimeterConfig

54− , spcUnrestrictedServices

55 , spcResources

64 , spcResources

56 , spcRestrictedServices

65 , spcRestrictedServices

57 , spcAccessLevels

66 , spcAccessLevels

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

68 -- * ServicePerimeterPerimeterType

77 -- * ServicePerimeterPerimeterType

69 , ServicePerimeterPerimeterType (..)

78 , ServicePerimeterPerimeterType (..)

70

79

80+ -- * Empty

81+ , Empty

82+ , empty

83+

71 -- * OSConstraintOSType

84 -- * OSConstraintOSType

72 , OSConstraintOSType (..)

85 , OSConstraintOSType (..)

73

86

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

98 , osConstraint

111 , osConstraint

99 , ocOSType

112 , ocOSType

100 , ocMinimumVersion

113 , ocMinimumVersion

114+ , ocRequireVerifiedChromeOS

101

115

102 -- * AccessPolicy

116 -- * AccessPolicy

103 , AccessPolicy

117 , AccessPolicy

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

132 , DevicePolicy

146 , DevicePolicy

133 , devicePolicy

147 , devicePolicy

134 , dpOSConstraints

148 , dpOSConstraints

149+ , dpRequireAdminApproval

150+ , dpRequireCorpOwned

135 , dpRequireScreenlock

151 , dpRequireScreenlock

136 , dpAllowedEncryptionStatuses

152 , dpAllowedEncryptionStatuses

137 , dpAllowedDeviceManagementLevels

153 , dpAllowedDeviceManagementLevels

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

140 , Condition

156 , Condition

141 , condition

157 , condition

142 , cMembers

158 , cMembers

159+ , cRegions

143 , cNegate

160 , cNegate

144 , cIPSubnetworks

161 , cIPSubnetworks

145 , cDevicePolicy

162 , cDevicePolicy

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

155import Network.Google.AccessContextManager.Types.Sum

172import Network.Google.AccessContextManager.Types.Sum

156import Network.Google.Prelude

173import Network.Google.Prelude

157

174

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.

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.

159accessContextManagerService :: ServiceConfig

176accessContextManagerService :: ServiceConfig

160accessContextManagerService

177accessContextManagerService

161 = defaultService

178 = defaultService

162− (ServiceId "accesscontextmanager:v1beta")

179+ (ServiceId "accesscontextmanager:v1")

163 "accesscontextmanager.googleapis.com"

180 "accesscontextmanager.googleapis.com"

164

181

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

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

gogol-accesscontextmanager/gen/Network/Google/AccessContextManager/Types/Product.hs+185−57

@@ -174,6 +174,83 @@ 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+

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

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

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

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

179-- be applied.

256-- be applied.

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

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

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

281data ServicePerimeterConfig =

358data ServicePerimeterConfig =

282 ServicePerimeterConfig'

359 ServicePerimeterConfig'

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

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

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

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

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

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

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

287 }

363 }

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

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

289

365

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

292--

368--

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

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

294--

370--

295−-- * 'spcUnrestrictedServices'

296−--

297-- * 'spcResources'

371-- * 'spcResources'

298--

372--

299-- * 'spcRestrictedServices'

373-- * 'spcRestrictedServices'

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

303 :: ServicePerimeterConfig

377 :: ServicePerimeterConfig

304servicePerimeterConfig =

378servicePerimeterConfig =

305 ServicePerimeterConfig'

379 ServicePerimeterConfig'

306− { _spcUnrestrictedServices = Nothing

307− , _spcResources = Nothing

380+ { _spcResources = Nothing

308 , _spcRestrictedServices = Nothing

381 , _spcRestrictedServices = Nothing

309 , _spcAccessLevels = Nothing

382 , _spcAccessLevels = Nothing

310 }

383 }

311

384

312

385

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−

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

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

333-- Currently only projects are allowed. Format:

387-- Currently only projects are allowed. Format:

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

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

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

338 . _Default

392 . _Default

339 . _Coerce

393 . _Coerce

340

394

341−-- | GCP services that are subject to the Service Perimeter restrictions. May

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

342−-- contain a list of services or a single wildcard \"*\". For example, if

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

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

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

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

345−-- Wildcard means that unless explicitly specified by

398+-- restrictions.

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.

352spcRestrictedServices :: Lens' ServicePerimeterConfig [Text]

399spcRestrictedServices :: Lens' ServicePerimeterConfig [Text]

353spcRestrictedServices

400spcRestrictedServices

354 = lens _spcRestrictedServices

401 = lens _spcRestrictedServices

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

377 = withObject "ServicePerimeterConfig"

424 = withObject "ServicePerimeterConfig"

378 (\ o ->

425 (\ o ->

379 ServicePerimeterConfig' <$>

426 ServicePerimeterConfig' <$>

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

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

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

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

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

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

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

384

430

385instance ToJSON ServicePerimeterConfig where

431instance ToJSON ServicePerimeterConfig where

386 toJSON ServicePerimeterConfig'{..}

432 toJSON ServicePerimeterConfig'{..}

387 = object

433 = object

388 (catMaybes

434 (catMaybes

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

390− _spcUnrestrictedServices,

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

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

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

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

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

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

394

438

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

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

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

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

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

489

533

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+

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

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

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

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

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

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

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

544

613

545

614

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

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

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

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

548−-- perimeter content and boundaries.

617+-- and boundaries.

549spStatus :: Lens' ServicePerimeter (Maybe ServicePerimeterConfig)

618spStatus :: Lens' ServicePerimeter (Maybe ServicePerimeterConfig)

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

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

551

620

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

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

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

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

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

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

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

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

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

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

557−-- empty.

558spPerimeterType :: Lens' ServicePerimeter (Maybe ServicePerimeterPerimeterType)

626spPerimeterType :: Lens' ServicePerimeter (Maybe ServicePerimeterPerimeterType)

559spPerimeterType

627spPerimeterType

560 = lens _spPerimeterType

628 = lens _spPerimeterType

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

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

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

709data OSConstraint =

777data OSConstraint =

710 OSConstraint'

778 OSConstraint'

711− { _ocOSType :: !(Maybe OSConstraintOSType)

779+ { _ocOSType :: !(Maybe OSConstraintOSType)

712− , _ocMinimumVersion :: !(Maybe Text)

780+ , _ocMinimumVersion :: !(Maybe Text)

781+ , _ocRequireVerifiedChromeOS :: !(Maybe Bool)

713 }

782 }

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

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

715

784

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

721-- * 'ocOSType'

790-- * 'ocOSType'

722--

791--

723-- * 'ocMinimumVersion'

792-- * 'ocMinimumVersion'

793+--

794+-- * 'ocRequireVerifiedChromeOS'

724osConstraint

795osConstraint

725 :: OSConstraint

796 :: OSConstraint

797+osConstraint =

798+ OSConstraint'

799+ { _ocOSType = Nothing

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

800+ , _ocMinimumVersion = Nothing

801+ , _ocRequireVerifiedChromeOS = Nothing

802+ }

727

803

728

804

729-- | Required. The allowed OS type.

805-- | Required. The allowed OS type.

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

738 = lens _ocMinimumVersion

814 = lens _ocMinimumVersion

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

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

740

816

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+

741instance FromJSON OSConstraint where

826instance FromJSON OSConstraint where

742 parseJSON

827 parseJSON

743 = withObject "OSConstraint"

828 = withObject "OSConstraint"

744 (\ o ->

829 (\ o ->

745 OSConstraint' <$>

830 OSConstraint' <$>

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

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

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

747

833

748instance ToJSON OSConstraint where

834instance ToJSON OSConstraint where

749 toJSON OSConstraint'{..}

835 toJSON OSConstraint'{..}

750 = object

836 = object

751 (catMaybes

837 (catMaybes

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

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

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

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

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

841+ _ocRequireVerifiedChromeOS])

754

842

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

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

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

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

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

1005data DevicePolicy =

1093data DevicePolicy =

1006 DevicePolicy'

1094 DevicePolicy'

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

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

1096+ , _dpRequireAdminApproval :: !(Maybe Bool)

1097+ , _dpRequireCorpOwned :: !(Maybe Bool)

1008 , _dpRequireScreenlock :: !(Maybe Bool)

1098 , _dpRequireScreenlock :: !(Maybe Bool)

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

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

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

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

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

1018--

1108--

1019-- * 'dpOSConstraints'

1109-- * 'dpOSConstraints'

1020--

1110--

1111+-- * 'dpRequireAdminApproval'

1112+--

1113+-- * 'dpRequireCorpOwned'

1114+--

1021-- * 'dpRequireScreenlock'

1115-- * 'dpRequireScreenlock'

1022--

1116--

1023-- * 'dpAllowedEncryptionStatuses'

1117-- * 'dpAllowedEncryptionStatuses'

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

1028devicePolicy =

1122devicePolicy =

1029 DevicePolicy'

1123 DevicePolicy'

1030 { _dpOSConstraints = Nothing

1124 { _dpOSConstraints = Nothing

1125+ , _dpRequireAdminApproval = Nothing

1126+ , _dpRequireCorpOwned = Nothing

1031 , _dpRequireScreenlock = Nothing

1127 , _dpRequireScreenlock = Nothing

1032 , _dpAllowedEncryptionStatuses = Nothing

1128 , _dpAllowedEncryptionStatuses = Nothing

1033 , _dpAllowedDeviceManagementLevels = Nothing

1129 , _dpAllowedDeviceManagementLevels = Nothing

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

1042 . _Default

1138 . _Default

1043 . _Coerce

1139 . _Coerce

1044

1140

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+

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

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

1046-- Defaults to \`false\`.

1154-- Defaults to \`false\`.

1047dpRequireScreenlock :: Lens' DevicePolicy (Maybe Bool)

1155dpRequireScreenlock :: Lens' DevicePolicy (Maybe Bool)

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

1072 (\ o ->

1180 (\ o ->

1073 DevicePolicy' <$>

1181 DevicePolicy' <$>

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

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

1183+ (o .:? "requireAdminApproval")

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

1075− (o .:? "requireScreenlock")

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

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

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

1077 <*>

1187 <*>

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

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

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

1082 = object

1192 = object

1083 (catMaybes

1193 (catMaybes

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

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

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

1196+ _dpRequireAdminApproval,

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

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

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

1086 ("allowedEncryptionStatuses" .=) <$>

1199 ("allowedEncryptionStatuses" .=) <$>

1087 _dpAllowedEncryptionStatuses,

1200 _dpAllowedEncryptionStatuses,

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

1099data Condition =

1212data Condition =

1100 Condition'

1213 Condition'

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

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

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

1102 , _cNegate :: !(Maybe Bool)

1216 , _cNegate :: !(Maybe Bool)

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

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

1104 , _cDevicePolicy :: !(Maybe DevicePolicy)

1218 , _cDevicePolicy :: !(Maybe DevicePolicy)

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

1113--

1227--

1114-- * 'cMembers'

1228-- * 'cMembers'

1115--

1229--

1230+-- * 'cRegions'

1231+--

1116-- * 'cNegate'

1232-- * 'cNegate'

1117--

1233--

1118-- * 'cIPSubnetworks'

1234-- * 'cIPSubnetworks'

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

1125condition =

1241condition =

1126 Condition'

1242 Condition'

1127 { _cMembers = Nothing

1243 { _cMembers = Nothing

1244+ , _cRegions = Nothing

1128 , _cNegate = Nothing

1245 , _cNegate = Nothing

1129 , _cIPSubnetworks = Nothing

1246 , _cIPSubnetworks = Nothing

1130 , _cDevicePolicy = Nothing

1247 , _cDevicePolicy = Nothing

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

1142 _Default

1259 _Default

1143 . _Coerce

1260 . _Coerce

1144

1261

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+

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

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

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

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

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

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

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

1187 = withObject "Condition"

1312 = withObject "Condition"

1188 (\ o ->

1313 (\ o ->

1189 Condition' <$>

1314 Condition' <$>

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

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

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

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

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

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

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

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

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

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

1194

1321

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

1197 = object

1324 = object

1198 (catMaybes

1325 (catMaybes

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

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

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

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

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

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

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

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

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

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

@@ -55,9 +55,8 @@ 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,

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

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

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

60−-- empty.

61data ServicePerimeterPerimeterType

60data ServicePerimeterPerimeterType

62 = PerimeterTypeRegular

61 = PerimeterTypeRegular

63 -- ^ @PERIMETER_TYPE_REGULAR@

62 -- ^ @PERIMETER_TYPE_REGULAR@

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

103 | DesktopChromeOS

102 | DesktopChromeOS

104 -- ^ @DESKTOP_CHROME_OS@

103 -- ^ @DESKTOP_CHROME_OS@

105 -- A desktop ChromeOS operating system.

104 -- A desktop ChromeOS operating system.

106− | Android

107− -- ^ @ANDROID@

108− -- An Android operating system.

109− | Ios

110− -- ^ @IOS@

111− -- An iOS operating system.

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

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

113

106

114instance Hashable OSConstraintOSType

107instance Hashable OSConstraintOSType

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

120 "DESKTOP_WINDOWS" -> Right DesktopWindows

113 "DESKTOP_WINDOWS" -> Right DesktopWindows

121 "DESKTOP_LINUX" -> Right DesktopLinux

114 "DESKTOP_LINUX" -> Right DesktopLinux

122 "DESKTOP_CHROME_OS" -> Right DesktopChromeOS

115 "DESKTOP_CHROME_OS" -> Right DesktopChromeOS

123− "ANDROID" -> Right Android

124− "IOS" -> Right Ios

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

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

126

117

127instance ToHttpApiData OSConstraintOSType where

118instance ToHttpApiData OSConstraintOSType where

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

131 DesktopWindows -> "DESKTOP_WINDOWS"

122 DesktopWindows -> "DESKTOP_WINDOWS"

132 DesktopLinux -> "DESKTOP_LINUX"

123 DesktopLinux -> "DESKTOP_LINUX"

133 DesktopChromeOS -> "DESKTOP_CHROME_OS"

124 DesktopChromeOS -> "DESKTOP_CHROME_OS"

134− Android -> "ANDROID"

135− Ios -> "IOS"

136

125

137instance FromJSON OSConstraintOSType where

126instance FromJSON OSConstraintOSType where

138 parseJSON = parseJSONText "OSConstraintOSType"

127 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− "v1beta" :>

54+ "v1" :>

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− "v1beta" :>

52+ "v1" :>

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− "v1beta" :>

51+ "v1" :>

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− "v1beta" :>

53+ "v1" :>

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− "v1beta" :>

55+ "v1" :>

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− "v1beta" :>

54+ "v1" :>

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− "v1beta" :>

52+ "v1" :>

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− "v1beta" :>

50+ "v1" :>

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− "v1beta" :>

52+ "v1" :>

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− "v1beta" :>

55+ "v1" :>

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− "v1beta" :>

54+ "v1" :>

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− "v1beta" :>

52+ "v1" :>

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− "v1beta" :>

50+ "v1" :>

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− "v1beta" :>

52+ "v1" :>

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− "v1beta" :>

55+ "v1" :>

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.hsnew file+177

@@ -0,0 +1,177 @@

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.hsnew file+153

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

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− "v1beta" :>

52+ "v1" :>

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.hsnew file+201

@@ -0,0 +1,201 @@

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+4−1

@@ -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 @v1beta@

23+ This library is compatible with version @v1@

24 of the API.

24 of the API.

25

25

26source-repository head

26source-repository head

@@ -51,7 +51,10 @@ 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

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

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

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

55

58

56 other-modules:

59 other-modules:

57 Network.Google.AccessContextManager.Types.Product

60 Network.Google.AccessContextManager.Types.Product

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

@@ -133,9 +133,6 @@ 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−

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

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

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

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

141

138

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1203

1199

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

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

1205type AdExchangeBuyer2API =

1201type AdExchangeBuyer2API =

1206− BiddersAccountsCreativesDeleteResource :<|>

1207− BiddersAccountsFilterSetsFilteredBidRequestsListResource

1202+ BiddersAccountsFilterSetsFilteredBidRequestsListResource

1208 :<|>

1203 :<|>

1209 BiddersAccountsFilterSetsBidResponsesWithoutBidsListResource

1204 BiddersAccountsFilterSetsBidResponsesWithoutBidsListResource

1210 :<|>

1205 :<|>

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

@@ -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. Next ID: 40

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

2228--

2228--

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

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

2230data Creative =

2230data Creative =

@@ -2531,7 +2531,9 @@ 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.

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

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

2536+-- instead.

2535cFilteringStats :: Lens' Creative (Maybe FilteringStats)

2537cFilteringStats :: Lens' Creative (Maybe FilteringStats)

2536cFilteringStats

2538cFilteringStats

2537 = lens _cFilteringStats

2539 = lens _cFilteringStats

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

@@ -1631,6 +1631,10 @@ 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.

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

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

1635

1639

1636instance Hashable ClientEntityType

1640instance Hashable ClientEntityType

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

1641 "ADVERTISER" -> Right CETAdvertiser

1645 "ADVERTISER" -> Right CETAdvertiser

1642 "BRAND" -> Right CETBrand

1646 "BRAND" -> Right CETBrand

1643 "AGENCY" -> Right CETAgency

1647 "AGENCY" -> Right CETAgency

1648+ "ENTITY_TYPE_UNCLASSIFIED" -> Right CETEntityTypeUnclassified

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

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

1645

1650

1646instance ToHttpApiData ClientEntityType where

1651instance ToHttpApiData ClientEntityType where

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

1649 CETAdvertiser -> "ADVERTISER"

1654 CETAdvertiser -> "ADVERTISER"

1650 CETBrand -> "BRAND"

1655 CETBrand -> "BRAND"

1651 CETAgency -> "AGENCY"

1656 CETAgency -> "AGENCY"

1657+ CETEntityTypeUnclassified -> "ENTITY_TYPE_UNCLASSIFIED"

1652

1658

1653instance FromJSON ClientEntityType where

1659instance FromJSON ClientEntityType where

1654 parseJSON = parseJSONText "ClientEntityType"

1660 parseJSON = parseJSONText "ClientEntityType"

gogol-adexchangebuyer2/gen/Network/Google/Resource/AdExchangeBuyer2/Bidders/Accounts/Creatives/Delete.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.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,7 +71,6 @@ 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

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

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

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

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

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

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

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

@@ -899,11 +899,9 @@ module Network.Google.Directory

899 , useIncludeInGlobalAddressList

899 , useIncludeInGlobalAddressList

900 , useGender

900 , useGender

901 , usePhones

901 , usePhones

902− , useRecoveryEmail

903 , useName

902 , useName

904 , usePassword

903 , usePassword

905 , useEmails

904 , useEmails

906− , useRecoveryPhone

907 , useIms

905 , useIms

908 , useKeywords

906 , useKeywords

909 , useIsAdmin

907 , useIsAdmin

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

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

550 , useIncludeInGlobalAddressList

550 , useIncludeInGlobalAddressList

551 , useGender

551 , useGender

552 , usePhones

552 , usePhones

553− , useRecoveryEmail

554 , useName

553 , useName

555 , usePassword

554 , usePassword

556 , useEmails

555 , useEmails

557− , useRecoveryPhone

558 , useIms

556 , useIms

559 , useKeywords

557 , useKeywords

560 , useIsAdmin

558 , useIsAdmin

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

@@ -2552,38 +2552,24 @@ 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). This is often the UI language of the input form or is expected

2555+-- known).

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

2563baLanguageCode :: Lens' BuildingAddress (Maybe Text)

2556baLanguageCode :: Lens' BuildingAddress (Maybe Text)

2564baLanguageCode

2557baLanguageCode

2565 = lens _baLanguageCode

2558 = lens _baLanguageCode

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

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

2567

2560

2568−-- | Required. CLDR region code of the country\/region of the address. This

2561+-- | Required. CLDR region code of the country\/region of the address.

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

2572baRegionCode :: Lens' BuildingAddress (Maybe Text)

2562baRegionCode :: Lens' BuildingAddress (Maybe Text)

2573baRegionCode

2563baRegionCode

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

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

2575

2565

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

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

2577−-- neighborhoods, boroughs, districts.

2578baSublocality :: Lens' BuildingAddress (Maybe Text)

2567baSublocality :: Lens' BuildingAddress (Maybe Text)

2579baSublocality

2568baSublocality

2580 = lens _baSublocality

2569 = lens _baSublocality

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

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

2582

2571

2583−-- | Optional. Postal code of the address. Not all countries use or require

2572+-- | Optional. Postal code of the address.

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

2587baPostalCode :: Lens' BuildingAddress (Maybe Text)

2573baPostalCode :: Lens' BuildingAddress (Maybe Text)

2588baPostalCode

2574baPostalCode

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

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

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

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

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

2598

2584

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

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

2600−-- addresses of a country or region. For example, this can be a state, a

2586+-- addresses of a country or region.

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.

2605baAdministrativeArea :: Lens' BuildingAddress (Maybe Text)

2587baAdministrativeArea :: Lens' BuildingAddress (Maybe Text)

2606baAdministrativeArea

2588baAdministrativeArea

2607 = lens _baAdministrativeArea

2589 = lens _baAdministrativeArea

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

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

2609

2591

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

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

2628baAddressLines :: Lens' BuildingAddress [Text]

2593baAddressLines :: Lens' BuildingAddress [Text]

2629baAddressLines

2594baAddressLines

2630 = lens _baAddressLines

2595 = lens _baAddressLines

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

4231 , _useIncludeInGlobalAddressList :: !(Maybe Bool)

4196 , _useIncludeInGlobalAddressList :: !(Maybe Bool)

4232 , _useGender :: !(Maybe JSONValue)

4197 , _useGender :: !(Maybe JSONValue)

4233 , _usePhones :: !(Maybe JSONValue)

4198 , _usePhones :: !(Maybe JSONValue)

4234− , _useRecoveryEmail :: !(Maybe Text)

4235 , _useName :: !(Maybe UserName)

4199 , _useName :: !(Maybe UserName)

4236 , _usePassword :: !(Maybe Text)

4200 , _usePassword :: !(Maybe Text)

4237 , _useEmails :: !(Maybe JSONValue)

4201 , _useEmails :: !(Maybe JSONValue)

4238− , _useRecoveryPhone :: !(Maybe Text)

4239 , _useIms :: !(Maybe JSONValue)

4202 , _useIms :: !(Maybe JSONValue)

4240 , _useKeywords :: !(Maybe JSONValue)

4203 , _useKeywords :: !(Maybe JSONValue)

4241 , _useIsAdmin :: !(Maybe Bool)

4204 , _useIsAdmin :: !(Maybe Bool)

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

4311--

4274--

4312-- * 'usePhones'

4275-- * 'usePhones'

4313--

4276--

4314−-- * 'useRecoveryEmail'

4315−--

4316-- * 'useName'

4277-- * 'useName'

4317--

4278--

4318-- * 'usePassword'

4279-- * 'usePassword'

4319--

4280--

4320-- * 'useEmails'

4281-- * 'useEmails'

4321--

4282--

4322−-- * 'useRecoveryPhone'

4323−--

4324-- * 'useIms'

4283-- * 'useIms'

4325--

4284--

4326-- * 'useKeywords'

4285-- * 'useKeywords'

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

4380 , _useIncludeInGlobalAddressList = Nothing

4339 , _useIncludeInGlobalAddressList = Nothing

4381 , _useGender = Nothing

4340 , _useGender = Nothing

4382 , _usePhones = Nothing

4341 , _usePhones = Nothing

4383− , _useRecoveryEmail = Nothing

4384 , _useName = Nothing

4342 , _useName = Nothing

4385 , _usePassword = Nothing

4343 , _usePassword = Nothing

4386 , _useEmails = Nothing

4344 , _useEmails = Nothing

4387− , _useRecoveryPhone = Nothing

4388 , _useIms = Nothing

4345 , _useIms = Nothing

4389 , _useKeywords = Nothing

4346 , _useKeywords = Nothing

4390 , _useIsAdmin = Nothing

4347 , _useIsAdmin = Nothing

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

4544usePhones

4501usePhones

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

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

4546

4503

4547−-- | Recovery email of the user.

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

4549−useRecoveryEmail

4550− = lens _useRecoveryEmail

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

4552−

4553-- | User\'s name

4504-- | User\'s name

4554useName :: Lens' User (Maybe UserName)

4505useName :: Lens' User (Maybe UserName)

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

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

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

4563useEmails

4514useEmails

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

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

4565

4516

4566−-- | Recovery phone of the user.

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

4568−useRecoveryPhone

4569− = lens _useRecoveryPhone

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

4571−

4572useIms :: Lens' User (Maybe JSONValue)

4517useIms :: Lens' User (Maybe JSONValue)

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

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

4574

4519

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

4727 _useIncludeInGlobalAddressList,

4670 _useIncludeInGlobalAddressList,

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

@@ -127,6 +127,22 @@ 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+

130 -- ** AccountWarning

146 -- ** AccountWarning

131 , AccountWarning

147 , AccountWarning

132 , accountWarning

148 , accountWarning

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

183 , aAlertId

199 , aAlertId

184 , aSecurityInvestigationToolLink

200 , aSecurityInvestigationToolLink

185 , aCustomerId

201 , aCustomerId

202+ , aUpdateTime

186 , aEndTime

203 , aEndTime

187 , aSource

204 , aSource

188 , aDeleted

205 , aDeleted

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

194 , attachment

211 , attachment

195 , aCSV

212 , aCSV

196

213

197− -- ** RequestInfo

198− , RequestInfo

199− , requestInfo

200− , riNumberOfRequests

201− , riAppDeveloperEmail

202− , riAppName

203−

204 -- ** GoogleOperations

214 -- ** GoogleOperations

205 , GoogleOperations

215 , GoogleOperations

206 , googleOperations

216 , googleOperations

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

221 -- ** Xgafv

231 -- ** Xgafv

222 , Xgafv (..)

232 , Xgafv (..)

223

233

224− -- ** AppMakerSQLSetupNotification

225− , AppMakerSQLSetupNotification

226− , appMakerSQLSetupNotification

227− , amsqlsnRequestInfo

228−

229 -- ** DomainWideTakeoutInitiated

234 -- ** DomainWideTakeoutInitiated

230 , DomainWideTakeoutInitiated

235 , DomainWideTakeoutInitiated

231 , domainWideTakeoutInitiated

236 , domainWideTakeoutInitiated

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

@@ -94,6 +94,22 @@ 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+

97 -- * AccountWarning

113 -- * AccountWarning

98 , AccountWarning

114 , AccountWarning

99 , accountWarning

115 , accountWarning

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

150 , aAlertId

166 , aAlertId

151 , aSecurityInvestigationToolLink

167 , aSecurityInvestigationToolLink

152 , aCustomerId

168 , aCustomerId

169+ , aUpdateTime

153 , aEndTime

170 , aEndTime

154 , aSource

171 , aSource

155 , aDeleted

172 , aDeleted

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

161 , attachment

178 , attachment

162 , aCSV

179 , aCSV

163

180

164− -- * RequestInfo

165− , RequestInfo

166− , requestInfo

167− , riNumberOfRequests

168− , riAppDeveloperEmail

169− , riAppName

170−

171 -- * GoogleOperations

181 -- * GoogleOperations

172 , GoogleOperations

182 , GoogleOperations

173 , googleOperations

183 , googleOperations

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

188 -- * Xgafv

198 -- * Xgafv

189 , Xgafv (..)

199 , Xgafv (..)

190

200

191− -- * AppMakerSQLSetupNotification

192− , AppMakerSQLSetupNotification

193− , appMakerSQLSetupNotification

194− , amsqlsnRequestInfo

195−

196 -- * DomainWideTakeoutInitiated

201 -- * DomainWideTakeoutInitiated

197 , DomainWideTakeoutInitiated

202 , DomainWideTakeoutInitiated

198 , domainWideTakeoutInitiated

203 , domainWideTakeoutInitiated

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

@@ -644,6 +644,184 @@ 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+

647-- | Alerts for user account warning events.

825-- | Alerts for user account warning events.

648--

826--

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

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

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

1079 , _aAlertId :: !(Maybe Text)

1257 , _aAlertId :: !(Maybe Text)

1080 , _aSecurityInvestigationToolLink :: !(Maybe Text)

1258 , _aSecurityInvestigationToolLink :: !(Maybe Text)

1081 , _aCustomerId :: !(Maybe Text)

1259 , _aCustomerId :: !(Maybe Text)

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

1082 , _aEndTime :: !(Maybe DateTime')

1261 , _aEndTime :: !(Maybe DateTime')

1083 , _aSource :: !(Maybe Text)

1262 , _aSource :: !(Maybe Text)

1084 , _aDeleted :: !(Maybe Bool)

1263 , _aDeleted :: !(Maybe Bool)

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

1102--

1281--

1103-- * 'aCustomerId'

1282-- * 'aCustomerId'

1104--

1283--

1284+-- * 'aUpdateTime'

1285+--

1105-- * 'aEndTime'

1286-- * 'aEndTime'

1106--

1287--

1107-- * 'aSource'

1288-- * 'aSource'

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

1120 , _aAlertId = Nothing

1301 , _aAlertId = Nothing

1121 , _aSecurityInvestigationToolLink = Nothing

1302 , _aSecurityInvestigationToolLink = Nothing

1122 , _aCustomerId = Nothing

1303 , _aCustomerId = Nothing

1304+ , _aUpdateTime = Nothing

1123 , _aEndTime = Nothing

1305 , _aEndTime = Nothing

1124 , _aSource = Nothing

1306 , _aSource = Nothing

1125 , _aDeleted = Nothing

1307 , _aDeleted = Nothing

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

1158aCustomerId

1340aCustomerId

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

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

1160

1342

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+

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

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

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

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

1163−-- not provided, the end time defaults to the start time.

1351+-- not provided, it indicates an ongoing alert.

1164aEndTime :: Lens' Alert (Maybe UTCTime)

1352aEndTime :: Lens' Alert (Maybe UTCTime)

1165aEndTime

1353aEndTime

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

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

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

1199 (o .:? "alertId")

1387 (o .:? "alertId")

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

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

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

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

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

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

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

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

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

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

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

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

1214 ("securityInvestigationToolLink" .=) <$>

1403 ("securityInvestigationToolLink" .=) <$>

1215 _aSecurityInvestigationToolLink,

1404 _aSecurityInvestigationToolLink,

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

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

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

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

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

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

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

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

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

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

1252 toJSON Attachment'{..}

1442 toJSON Attachment'{..}

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

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

1254

1444

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−

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

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

1326--

1446--

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

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

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

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

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

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

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

1454

1574

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−

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

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

1498-- Derived from audit logs.

1576-- Derived from audit logs.

1499--

1577--

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, only sorting by

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

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

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

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+142−1

@@ -33,6 +33,9 @@ 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+

36 -- * Types

39 -- * Types

37

40

38 -- ** MetricFilter

41 -- ** MetricFilter

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

43 , mfMetricName

46 , mfMetricName

44 , mfComparisonValue

47 , mfComparisonValue

45

48

49+ -- ** EventData

50+ , EventData

51+ , eventData

52+ , edEventCategory

53+ , edEventCount

54+ , edEventValue

55+ , edEventLabel

56+ , edEventAction

57+

46 -- ** MetricFilterOperator

58 -- ** MetricFilterOperator

47 , MetricFilterOperator (..)

59 , MetricFilterOperator (..)

48

60

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

91 , mheName

103 , mheName

92 , mheType

104 , mheType

93

105

106+ -- ** GoalSetData

107+ , GoalSetData

108+ , goalSetData

109+ , gsdGoals

110+

94 -- ** CohortGroup

111 -- ** CohortGroup

95 , CohortGroup

112 , CohortGroup

96 , cohortGroup

113 , cohortGroup

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

139 , phTotalPivotGroupsCount

156 , phTotalPivotGroupsCount

140 , phPivotHeaderEntries

157 , phPivotHeaderEntries

141

158

159+ -- ** SearchUserActivityRequest

160+ , SearchUserActivityRequest

161+ , searchUserActivityRequest

162+ , suarViewId

163+ , suarDateRange

164+ , suarUser

165+ , suarPageToken

166+ , suarPageSize

167+ , suarActivityTypes

168+

142 -- ** MetricHeader

169 -- ** MetricHeader

143 , MetricHeader

170 , MetricHeader

144 , metricHeader

171 , metricHeader

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

168 , rData

195 , rData

169 , rColumnHeader

196 , rColumnHeader

170

197

198+ -- ** PageviewData

199+ , PageviewData

200+ , pageviewData

201+ , pdPageTitle

202+ , pdPagePath

203+

204+ -- ** EcommerceDataActionType

205+ , EcommerceDataActionType (..)

206+

171 -- ** ReportData

207 -- ** ReportData

172 , ReportData

208 , ReportData

173 , reportData

209 , reportData

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

207 -- ** OrderBySortOrder

243 -- ** OrderBySortOrder

208 , OrderBySortOrder (..)

244 , OrderBySortOrder (..)

209

245

246+ -- ** User

247+ , User

248+ , user

249+ , uUserId

250+ , uType

251+

210 -- ** Pivot

252 -- ** Pivot

211 , Pivot

253 , Pivot

212 , pivot

254 , pivot

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

216 , pDimensions

258 , pDimensions

217 , pDimensionFilterClauses

259 , pDimensionFilterClauses

218

260

261+ -- ** TransactionData

262+ , TransactionData

263+ , transactionData

264+ , tdTransactionId

265+ , tdTransactionTax

266+ , tdTransactionShipping

267+ , tdTransactionRevenue

268+

219 -- ** SequenceSegment

269 -- ** SequenceSegment

220 , SequenceSegment

270 , SequenceSegment

221 , sequenceSegment

271 , sequenceSegment

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

256 , grrUseResourceQuotas

306 , grrUseResourceQuotas

257 , grrReportRequests

307 , grrReportRequests

258

308

309+ -- ** UserActivitySession

310+ , UserActivitySession

311+ , userActivitySession

312+ , uasPlatform

313+ , uasDeviceCategory

314+ , uasActivities

315+ , uasSessionDate

316+ , uasDataSource

317+ , uasSessionId

318+

259 -- ** SegmentSequenceStepMatchType

319 -- ** SegmentSequenceStepMatchType

260 , SegmentSequenceStepMatchType (..)

320 , SegmentSequenceStepMatchType (..)

261

321

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+

262 -- ** Cohort

353 -- ** Cohort

263 , Cohort

354 , Cohort

264 , cohort

355 , cohort

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

269 -- ** SegmentMetricFilterScope

360 -- ** SegmentMetricFilterScope

270 , SegmentMetricFilterScope (..)

361 , SegmentMetricFilterScope (..)

271

362

363+ -- ** EcommerceData

364+ , EcommerceData

365+ , ecommerceData

366+ , edEcommerceType

367+ , edTransaction

368+ , edProducts

369+ , edActionType

370+

371+ -- ** EcommerceDataEcommerceType

372+ , EcommerceDataEcommerceType (..)

373+

272 -- ** DimensionFilter

374 -- ** DimensionFilter

273 , DimensionFilter

375 , DimensionFilter

274 , dimensionFilter

376 , dimensionFilter

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

288 -- ** DimensionFilterOperator

390 -- ** DimensionFilterOperator

289 , DimensionFilterOperator (..)

391 , DimensionFilterOperator (..)

290

392

393+ -- ** ActivityActivityType

394+ , ActivityActivityType (..)

395+

291 -- ** MetricFormattingType

396 -- ** MetricFormattingType

292 , MetricFormattingType (..)

397 , MetricFormattingType (..)

293

398

399+ -- ** CustomDimension

400+ , CustomDimension

401+ , customDimension

402+ , cdValue

403+ , cdIndex

404+

294 -- ** Segment

405 -- ** Segment

295 , Segment

406 , Segment

296 , segment

407 , segment

297 , sDynamicSegment

408 , sDynamicSegment

298 , sSegmentId

409 , sSegmentId

299

410

411+ -- ** ProductData

412+ , ProductData

413+ , productData

414+ , pdProductName

415+ , pdProductSKU

416+ , pdItemRevenue

417+ , pdProductQuantity

418+

300 -- ** SegmentDimensionFilterOperator

419 -- ** SegmentDimensionFilterOperator

301 , SegmentDimensionFilterOperator (..)

420 , SegmentDimensionFilterOperator (..)

302

421

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

332 -- ** MetricFilterClauseOperator

451 -- ** MetricFilterClauseOperator

333 , MetricFilterClauseOperator (..)

452 , MetricFilterClauseOperator (..)

334

453

454+ -- ** UserType

455+ , UserType (..)

456+

335 -- ** ColumnHeader

457 -- ** ColumnHeader

336 , ColumnHeader

458 , ColumnHeader

337 , columnHeader

459 , columnHeader

338 , chMetricHeader

460 , chMetricHeader

339 , chDimensions

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

340 ) where

478 ) where

341

479

342import Network.Google.AnalyticsReporting.Types

480import Network.Google.AnalyticsReporting.Types

343import Network.Google.Prelude

481import Network.Google.Prelude

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

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

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

345

484

346{- $resources

485{- $resources

347TODO

486TODO

348-}

487-}

349

488

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

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

351−type AnalyticsReportingAPI = ReportsBatchGetResource

490+type AnalyticsReportingAPI =

491+ ReportsBatchGetResource :<|>

492+ UserActivitySearchResource

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

@@ -31,6 +31,15 @@ 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+

34 -- * MetricFilterOperator

43 -- * MetricFilterOperator

35 , MetricFilterOperator (..)

44 , MetricFilterOperator (..)

36

45

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

79 , mheName

88 , mheName

80 , mheType

89 , mheType

81

90

91+ -- * GoalSetData

92+ , GoalSetData

93+ , goalSetData

94+ , gsdGoals

95+

82 -- * CohortGroup

96 -- * CohortGroup

83 , CohortGroup

97 , CohortGroup

84 , cohortGroup

98 , cohortGroup

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

127 , phTotalPivotGroupsCount

141 , phTotalPivotGroupsCount

128 , phPivotHeaderEntries

142 , phPivotHeaderEntries

129

143

144+ -- * SearchUserActivityRequest

145+ , SearchUserActivityRequest

146+ , searchUserActivityRequest

147+ , suarViewId

148+ , suarDateRange

149+ , suarUser

150+ , suarPageToken

151+ , suarPageSize

152+ , suarActivityTypes

153+

130 -- * MetricHeader

154 -- * MetricHeader

131 , MetricHeader

155 , MetricHeader

132 , metricHeader

156 , metricHeader

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

156 , rData

180 , rData

157 , rColumnHeader

181 , rColumnHeader

158

182

183+ -- * PageviewData

184+ , PageviewData

185+ , pageviewData

186+ , pdPageTitle

187+ , pdPagePath

188+

189+ -- * EcommerceDataActionType

190+ , EcommerceDataActionType (..)

191+

159 -- * ReportData

192 -- * ReportData

160 , ReportData

193 , ReportData

161 , reportData

194 , reportData

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

195 -- * OrderBySortOrder

228 -- * OrderBySortOrder

196 , OrderBySortOrder (..)

229 , OrderBySortOrder (..)

197

230

231+ -- * User

232+ , User

233+ , user

234+ , uUserId

235+ , uType

236+

198 -- * Pivot

237 -- * Pivot

199 , Pivot

238 , Pivot

200 , pivot

239 , pivot

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

204 , pDimensions

243 , pDimensions

205 , pDimensionFilterClauses

244 , pDimensionFilterClauses

206

245

246+ -- * TransactionData

247+ , TransactionData

248+ , transactionData

249+ , tdTransactionId

250+ , tdTransactionTax

251+ , tdTransactionShipping

252+ , tdTransactionRevenue

253+

207 -- * SequenceSegment

254 -- * SequenceSegment

208 , SequenceSegment

255 , SequenceSegment

209 , sequenceSegment

256 , sequenceSegment

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

244 , grrUseResourceQuotas

291 , grrUseResourceQuotas

245 , grrReportRequests

292 , grrReportRequests

246

293

294+ -- * UserActivitySession

295+ , UserActivitySession

296+ , userActivitySession

297+ , uasPlatform

298+ , uasDeviceCategory

299+ , uasActivities

300+ , uasSessionDate

301+ , uasDataSource

302+ , uasSessionId

303+

247 -- * SegmentSequenceStepMatchType

304 -- * SegmentSequenceStepMatchType

248 , SegmentSequenceStepMatchType (..)

305 , SegmentSequenceStepMatchType (..)

249

306

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+

250 -- * Cohort

338 -- * Cohort

251 , Cohort

339 , Cohort

252 , cohort

340 , cohort

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

257 -- * SegmentMetricFilterScope

345 -- * SegmentMetricFilterScope

258 , SegmentMetricFilterScope (..)

346 , SegmentMetricFilterScope (..)

259

347

348+ -- * EcommerceData

349+ , EcommerceData

350+ , ecommerceData

351+ , edEcommerceType

352+ , edTransaction

353+ , edProducts

354+ , edActionType

355+

356+ -- * EcommerceDataEcommerceType

357+ , EcommerceDataEcommerceType (..)

358+

260 -- * DimensionFilter

359 -- * DimensionFilter

261 , DimensionFilter

360 , DimensionFilter

262 , dimensionFilter

361 , dimensionFilter

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

276 -- * DimensionFilterOperator

375 -- * DimensionFilterOperator

277 , DimensionFilterOperator (..)

376 , DimensionFilterOperator (..)

278

377

378+ -- * ActivityActivityType

379+ , ActivityActivityType (..)

380+

279 -- * MetricFormattingType

381 -- * MetricFormattingType

280 , MetricFormattingType (..)

382 , MetricFormattingType (..)

281

383

384+ -- * CustomDimension

385+ , CustomDimension

386+ , customDimension

387+ , cdValue

388+ , cdIndex

389+

282 -- * Segment

390 -- * Segment

283 , Segment

391 , Segment

284 , segment

392 , segment

285 , sDynamicSegment

393 , sDynamicSegment

286 , sSegmentId

394 , sSegmentId

287

395

396+ -- * ProductData

397+ , ProductData

398+ , productData

399+ , pdProductName

400+ , pdProductSKU

401+ , pdItemRevenue

402+ , pdProductQuantity

403+

288 -- * SegmentDimensionFilterOperator

404 -- * SegmentDimensionFilterOperator

289 , SegmentDimensionFilterOperator (..)

405 , SegmentDimensionFilterOperator (..)

290

406

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

320 -- * MetricFilterClauseOperator

436 -- * MetricFilterClauseOperator

321 , MetricFilterClauseOperator (..)

437 , MetricFilterClauseOperator (..)

322

438

439+ -- * UserType

440+ , UserType (..)

441+

323 -- * ColumnHeader

442 -- * ColumnHeader

324 , ColumnHeader

443 , ColumnHeader

325 , columnHeader

444 , columnHeader

326 , chMetricHeader

445 , chMetricHeader

327 , chDimensions

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

328 ) where

463 ) where

329

464

330import Network.Google.AnalyticsReporting.Types.Product

465import Network.Google.AnalyticsReporting.Types.Product

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

@@ -100,6 +100,94 @@ 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+

103-- | A row in the report.

191-- | A row in the report.

104--

192--

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

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

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

598 (catMaybes

686 (catMaybes

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

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

600

688

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+

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

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

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

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

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

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

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

1016 _phTotalPivotGroupsCount,

1140 _phTotalPivotGroupsCount,

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

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

1018

1142

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+

1019-- | The headers for the metrics.

1260-- | The headers for the metrics.

1020--

1261--

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

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

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

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

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

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

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

1256

1497

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+

1257-- | The data part of the report.

1545-- | The data part of the report.

1258--

1546--

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

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

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

1631 (catMaybes

1919 (catMaybes

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

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

1633

1921

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+

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

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

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

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

1636-- your data on a second dimension.

1968-- your data on a second dimension.

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

1749 ("dimensionFilterClauses" .=) <$>

2081 ("dimensionFilterClauses" .=) <$>

1750 _pDimensionFilterClauses])

2082 _pDimensionFilterClauses])

1751

2083

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+

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

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

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

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

1754-- be combined with special sequence operators.

2169-- be combined with special sequence operators.

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

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

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

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

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

2040

2455

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+

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

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

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

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

2043-- belong to the same cohort.

2914-- belong to the same cohort.

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

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

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

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

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

2108

2979

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+

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

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

2110--

3058--

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

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

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

2269 _grrResourceQuotasRemaining,

3217 _grrResourceQuotasRemaining,

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

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

2271

3219

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+

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

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

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

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

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

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

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

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

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

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

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

2322

3318

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+

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

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

2324-- is completed.

3399-- is completed.

2325--

3400--

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

2647 (catMaybes

3722 (catMaybes

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

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

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

3724 ("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+201−15

@@ -190,6 +190,70 @@ 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+

193-- | The sorting order for the field.

257-- | The sorting order for the field.

194data OrderBySortOrder

258data OrderBySortOrder

195 = SortOrderUnspecified

259 = SortOrderUnspecified

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

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

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

438-- the segment is selecting users or sessions.

502-- the segment is selecting users or sessions.

439data SegmentMetricFilterScope

503data SegmentMetricFilterScope

440− = UnspecifiedScope

504+ = SMFSUnspecifiedScope

441 -- ^ @UNSPECIFIED_SCOPE@

505 -- ^ @UNSPECIFIED_SCOPE@

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

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

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

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

444 -- users or sessions.

508 -- users or sessions.

445− | Product

509+ | SMFSProduct

446 -- ^ @PRODUCT@

510 -- ^ @PRODUCT@

447 -- Product scope.

511 -- Product scope.

448− | Hit

512+ | SMFSHit

449 -- ^ @HIT@

513 -- ^ @HIT@

450 -- Hit scope.

514 -- Hit scope.

451− | Session

515+ | SMFSSession

452 -- ^ @SESSION@

516 -- ^ @SESSION@

453 -- Session scope.

517 -- Session scope.

454− | User

518+ | SMFSUser

455 -- ^ @USER@

519 -- ^ @USER@

456 -- User scope.

520 -- User scope.

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

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

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

460

524

461instance FromHttpApiData SegmentMetricFilterScope where

525instance FromHttpApiData SegmentMetricFilterScope where

462 parseQueryParam = \case

526 parseQueryParam = \case

463− "UNSPECIFIED_SCOPE" -> Right UnspecifiedScope

527+ "UNSPECIFIED_SCOPE" -> Right SMFSUnspecifiedScope

464− "PRODUCT" -> Right Product

528+ "PRODUCT" -> Right SMFSProduct

465− "HIT" -> Right Hit

529+ "HIT" -> Right SMFSHit

466− "SESSION" -> Right Session

530+ "SESSION" -> Right SMFSSession

467− "USER" -> Right User

531+ "USER" -> Right SMFSUser

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

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

469

533

470instance ToHttpApiData SegmentMetricFilterScope where

534instance ToHttpApiData SegmentMetricFilterScope where

471 toQueryParam = \case

535 toQueryParam = \case

472− UnspecifiedScope -> "UNSPECIFIED_SCOPE"

536+ SMFSUnspecifiedScope -> "UNSPECIFIED_SCOPE"

473− Product -> "PRODUCT"

537+ SMFSProduct -> "PRODUCT"

474− Hit -> "HIT"

538+ SMFSHit -> "HIT"

475− Session -> "SESSION"

539+ SMFSSession -> "SESSION"

476− User -> "USER"

540+ SMFSUser -> "USER"

477

541

478instance FromJSON SegmentMetricFilterScope where

542instance FromJSON SegmentMetricFilterScope where

479 parseJSON = parseJSONText "SegmentMetricFilterScope"

543 parseJSON = parseJSONText "SegmentMetricFilterScope"

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

481instance ToJSON SegmentMetricFilterScope where

545instance ToJSON SegmentMetricFilterScope where

482 toJSON = toJSONText

546 toJSON = toJSONText

483

547

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+

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

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

485data DimensionFilterOperator

583data DimensionFilterOperator

486 = DFOOperatorUnspecified

584 = DFOOperatorUnspecified

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

563instance ToJSON DimensionFilterOperator where

661instance ToJSON DimensionFilterOperator where

564 toJSON = toJSONText

662 toJSON = toJSONText

565

663

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+

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

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

567-- \`INTEGER\`.

716-- \`INTEGER\`.

568data MetricFormattingType

717data MetricFormattingType

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

729

878

730instance ToJSON MetricFilterClauseOperator where

879instance ToJSON MetricFilterClauseOperator where

731 toJSON = toJSONText

880 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.hsnew file+153

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

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,6 +36,7 @@ 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

39

40

40 other-modules:

41 other-modules:

41 Network.Google.AnalyticsReporting.Types.Product

42 Network.Google.AnalyticsReporting.Types.Product

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

@@ -83,9 +83,6 @@ 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−

89 -- ** androidenterprise.enterprises.setStoreLayout

86 -- ** androidenterprise.enterprises.setStoreLayout

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

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

91

88

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

507 , ProductPolicy

504 , ProductPolicy

508 , productPolicy

505 , productPolicy

509 , ppTracks

506 , ppTracks

507+ , ppManagedConfiguration

510 , ppTrackIds

508 , ppTrackIds

511 , ppAutoInstallPolicy

509 , ppAutoInstallPolicy

512 , ppProductId

510 , ppProductId

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

565 , gllrGroupLicense

563 , gllrGroupLicense

566 , gllrKind

564 , gllrKind

567

565

568− -- ** AndroidDevicePolicyConfig

569− , AndroidDevicePolicyConfig

570− , androidDevicePolicyConfig

571− , adpcState

572− , adpcKind

573−

574 -- ** ProductSet

566 -- ** ProductSet

575 , ProductSet

567 , ProductSet

576 , productSet

568 , productSet

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1023 :<|> EnterprisesListResource

1014 :<|> EnterprisesListResource

1024 :<|> EnterprisesUnenrollResource

1015 :<|> EnterprisesUnenrollResource

1025 :<|> EnterprisesGetStoreLayoutResource

1016 :<|> EnterprisesGetStoreLayoutResource

1026− :<|> EnterprisesSetAndroidDevicePolicyConfigResource

1027 :<|> EnterprisesSetAccountResource

1017 :<|> EnterprisesSetAccountResource

1028 :<|> EnterprisesEnrollResource

1018 :<|> EnterprisesEnrollResource

1029 :<|> EnterprisesGetResource

1019 :<|> EnterprisesGetResource

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

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

240 , ProductPolicy

240 , ProductPolicy

241 , productPolicy

241 , productPolicy

242 , ppTracks

242 , ppTracks

243+ , ppManagedConfiguration

243 , ppTrackIds

244 , ppTrackIds

244 , ppAutoInstallPolicy

245 , ppAutoInstallPolicy

245 , ppProductId

246 , ppProductId

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

298 , gllrGroupLicense

299 , gllrGroupLicense

299 , gllrKind

300 , gllrKind

300

301

301− -- * AndroidDevicePolicyConfig

302− , AndroidDevicePolicyConfig

303− , androidDevicePolicyConfig

304− , adpcState

305− , adpcKind

306−

307 -- * ProductSet

302 -- * ProductSet

308 , ProductSet

303 , ProductSet

309 , productSet

304 , productSet

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

@@ -2196,10 +2196,11 @@ 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)

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

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

2201− , _ppAutoInstallPolicy :: !(Maybe AutoInstallPolicy)

2202+ , _ppAutoInstallPolicy :: !(Maybe AutoInstallPolicy)

2202− , _ppProductId :: !(Maybe Text)

2203+ , _ppProductId :: !(Maybe Text)

2203 }

2204 }

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

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

2205

2206

@@ -2210,6 +2211,8 @@ data ProductPolicy =

2210--

2211--

2211-- * 'ppTracks'

2212-- * 'ppTracks'

2212--

2213--

2214+-- * 'ppManagedConfiguration'

2215+--

2213-- * 'ppTrackIds'

2216-- * 'ppTrackIds'

2214--

2217--

2215-- * 'ppAutoInstallPolicy'

2218-- * 'ppAutoInstallPolicy'

@@ -2220,6 +2223,7 @@ productPolicy

2220productPolicy =

2223productPolicy =

2221 ProductPolicy'

2224 ProductPolicy'

2222 { _ppTracks = Nothing

2225 { _ppTracks = Nothing

2226+ , _ppManagedConfiguration = Nothing

2223 , _ppTrackIds = Nothing

2227 , _ppTrackIds = Nothing

2224 , _ppAutoInstallPolicy = Nothing

2228 , _ppAutoInstallPolicy = Nothing

2225 , _ppProductId = Nothing

2229 , _ppProductId = Nothing

@@ -2233,6 +2237,12 @@ ppTracks

2233 _Default

2237 _Default

2234 . _Coerce

2238 . _Coerce

2235

2239

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+

2236-- | Grants the device visibility to the specified product release track(s),

2246-- | Grants the device visibility to the specified product release track(s),

2237-- identified by trackIds. The list of release tracks of a product can be

2247-- identified by trackIds. The list of release tracks of a product can be

2238-- obtained by calling Products.Get.

2248-- obtained by calling Products.Get.

@@ -2259,7 +2269,8 @@ instance FromJSON ProductPolicy where

2259 (\ o ->

2269 (\ o ->

2260 ProductPolicy' <$>

2270 ProductPolicy' <$>

2261 (o .:? "tracks" .!= mempty) <*>

2271 (o .:? "tracks" .!= mempty) <*>

2272+ (o .:? "managedConfiguration")

2262− (o .:? "trackIds" .!= mempty)

2273+ <*> (o .:? "trackIds" .!= mempty)

2263 <*> (o .:? "autoInstallPolicy")

2274 <*> (o .:? "autoInstallPolicy")

2264 <*> (o .:? "productId"))

2275 <*> (o .:? "productId"))

2265

2276

@@ -2268,6 +2279,8 @@ instance ToJSON ProductPolicy where

2268 = object

2279 = object

2269 (catMaybes

2280 (catMaybes

2270 [("tracks" .=) <$> _ppTracks,

2281 [("tracks" .=) <$> _ppTracks,

2282+ ("managedConfiguration" .=) <$>

2283+ _ppManagedConfiguration,

2271 ("trackIds" .=) <$> _ppTrackIds,

2284 ("trackIds" .=) <$> _ppTrackIds,

2272 ("autoInstallPolicy" .=) <$> _ppAutoInstallPolicy,

2285 ("autoInstallPolicy" .=) <$> _ppAutoInstallPolicy,

2273 ("productId" .=) <$> _ppProductId])

2286 ("productId" .=) <$> _ppProductId])

@@ -2737,59 +2750,6 @@ instance ToJSON GroupLicensesListResponse where

2737 [("groupLicense" .=) <$> _gllrGroupLicense,

2750 [("groupLicense" .=) <$> _gllrGroupLicense,

2738 Just ("kind" .= _gllrKind)])

2751 Just ("kind" .= _gllrKind)])

2739

2752

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−

2793-- | A set of products.

2753-- | A set of products.

2794--

2754--

2795-- /See:/ 'productSet' smart constructor.

2755-- /See:/ 'productSet' smart constructor.

@@ -5845,7 +5805,10 @@ instance ToJSON ProductsListResponse where

5845 Just ("kind" .= _plrKind),

5805 Just ("kind" .= _plrKind),

5846 ("product" .=) <$> _plrProduct])

5806 ("product" .=) <$> _plrProduct])

5847

5807

5848−-- | WebApp resource info.

5808+-- | A WebApps resource represents a web app created for an enterprise. Web

5809+-- apps are published to managed Google Play and can be distributed like

5810+-- other Android apps. On a user\'s device, a web app opens its specified

5811+-- URL.

5849--

5812--

5850-- /See:/ 'webApp' smart constructor.

5813-- /See:/ 'webApp' smart constructor.

5851data WebApp =

5814data WebApp =

@@ -5892,7 +5855,9 @@ webApp =

5892 }

5855 }

5893

5856

5894

5857

5895−-- | The ID of the application.

5858+-- | The ID of the application. A string of the form \"app:\" where the

5859+-- package name always starts with the prefix

5860+-- \"com.google.enterprise.webapp.\" followed by a random id.

5896waWebAppId :: Lens' WebApp (Maybe Text)

5861waWebAppId :: Lens' WebApp (Maybe Text)

5897waWebAppId

5862waWebAppId

5898 = lens _waWebAppId (\ s a -> s{_waWebAppId = a})

5863 = lens _waWebAppId (\ s a -> s{_waWebAppId = a})

@@ -5919,7 +5884,15 @@ waStartURL :: Lens' WebApp (Maybe Text)

5919waStartURL

5884waStartURL

5920 = lens _waStartURL (\ s a -> s{_waStartURL = a})

5885 = lens _waStartURL (\ s a -> s{_waStartURL = a})

5921

5886

5922−-- | The display mode of the web app.

5887+-- | The display mode of the web app. Possible values include: -

5888+-- \"minimalUi\", the device\'s status bar, navigation bar, the app\'s URL,

5889+-- and a refresh button are visible when the app is open. For HTTP URLs,

5890+-- you can only select this option. - \"standalone\", the device\'s status

5891+-- bar and navigation bar are visible when the app is open. -

5892+-- \"fullScreen\", the app opens in full screen mode, hiding the device\'s

5893+-- status and navigation bars. All browser UI elements, page URL, system

5894+-- status bar and back button are not visible, and the web app takes up the

5895+-- entirety of the available display area.

5923waDisplayMode :: Lens' WebApp (Maybe Text)

5896waDisplayMode :: Lens' WebApp (Maybe Text)

5924waDisplayMode

5897waDisplayMode

5925 = lens _waDisplayMode

5898 = lens _waDisplayMode

@@ -5931,8 +5904,8 @@ waIsPublished

5931 = lens _waIsPublished

5904 = lens _waIsPublished

5932 (\ s a -> s{_waIsPublished = a})

5905 (\ s a -> s{_waIsPublished = a})

5933

5906

5934−-- | The title of the web application as displayed to the user (e.g., amongst

5907+-- | The title of the web app as displayed to the user (e.g., amongst a list

5935−-- a list of other applications, or as a label for an icon).

5908+-- of other applications, or as a label for an icon).

5936waTitle :: Lens' WebApp (Maybe Text)

5909waTitle :: Lens' WebApp (Maybe Text)

5937waTitle = lens _waTitle (\ s a -> s{_waTitle = a})

5910waTitle = lens _waTitle (\ s a -> s{_waTitle = a})

5938

5911

gogol-android-enterprise/gen/Network/Google/Resource/AndroidEnterprise/Enterprises/SetAndroidDevicePolicyConfig.hsdeleted−114

@@ -1,114 +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.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,7 +53,6 @@ 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

57 , Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

56 , Network.Google.Resource.AndroidEnterprise.Enterprises.SetStoreLayout

58 , Network.Google.Resource.AndroidEnterprise.Enterprises.Unenroll

57 , Network.Google.Resource.AndroidEnterprise.Enterprises.Unenroll

59 , Network.Google.Resource.AndroidEnterprise.Entitlements.Delete

58 , Network.Google.Resource.AndroidEnterprise.Entitlements.Delete

gogol-android-publisher/gen/Network/Google/AndroidPublisher.hs+7

@@ -410,11 +410,18 @@ module Network.Google.AndroidPublisher

410 , trStatus

410 , trStatus

411 , trReleaseNotes

411 , trReleaseNotes

412 , trUserFraction

412 , trUserFraction

413+ , trCountryTargeting

413 , trName

414 , trName

414

415

415 -- ** EditsImagesListImageType

416 -- ** EditsImagesListImageType

416 , EditsImagesListImageType (..)

417 , EditsImagesListImageType (..)

417

418

419+ -- ** CountryTargeting

420+ , CountryTargeting

421+ , countryTargeting

422+ , ctIncludeRestOfWorld

423+ , ctCountries

424+

418 -- ** Bundle

425 -- ** Bundle

419 , Bundle

426 , Bundle

420 , bundle

427 , bundle

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs+7

@@ -245,11 +245,18 @@ module Network.Google.AndroidPublisher.Types

245 , trStatus

245 , trStatus

246 , trReleaseNotes

246 , trReleaseNotes

247 , trUserFraction

247 , trUserFraction

248+ , trCountryTargeting

248 , trName

249 , trName

249

250

250 -- * EditsImagesListImageType

251 -- * EditsImagesListImageType

251 , EditsImagesListImageType (..)

252 , EditsImagesListImageType (..)

252

253

254+ -- * CountryTargeting

255+ , CountryTargeting

256+ , countryTargeting

257+ , ctIncludeRestOfWorld

258+ , ctCountries

259+

253 -- * Bundle

260 -- * Bundle

254 , Bundle

261 , Bundle

255 , bundle

262 , bundle

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+65−5

@@ -2088,11 +2088,12 @@ 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)

2095− , _trName :: !(Maybe Text)

2096+ , _trName :: !(Maybe Text)

2096 }

2097 }

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

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

2098

2099

@@ -2109,6 +2110,8 @@ data TrackRelease =

2109--

2110--

2110-- * 'trUserFraction'

2111-- * 'trUserFraction'

2111--

2112--

2113+-- * 'trCountryTargeting'

2114+--

2112-- * 'trName'

2115-- * 'trName'

2113trackRelease

2116trackRelease

2114 :: TrackRelease

2117 :: TrackRelease

@@ -2118,6 +2121,7 @@ trackRelease =

2118 , _trStatus = Nothing

2121 , _trStatus = Nothing

2119 , _trReleaseNotes = Nothing

2122 , _trReleaseNotes = Nothing

2120 , _trUserFraction = Nothing

2123 , _trUserFraction = Nothing

2124+ , _trCountryTargeting = Nothing

2121 , _trName = Nothing

2125 , _trName = Nothing

2122 }

2126 }

2123

2127

@@ -2153,6 +2157,11 @@ trUserFraction

2153 (\ s a -> s{_trUserFraction = a})

2157 (\ s a -> s{_trUserFraction = a})

2154 . mapping _Coerce

2158 . mapping _Coerce

2155

2159

2160+trCountryTargeting :: Lens' TrackRelease (Maybe CountryTargeting)

2161+trCountryTargeting

2162+ = lens _trCountryTargeting

2163+ (\ s a -> s{_trCountryTargeting = a})

2164+

2156-- | The release name, used to identify this release in the Play Console UI.

2165-- | The release name, used to identify this release in the Play Console UI.

2157-- Not required to be unique. This is optional, if not set it will be

2166-- Not required to be unique. This is optional, if not set it will be

2158-- generated from the version_name in the APKs.

2167-- generated from the version_name in the APKs.

@@ -2168,6 +2177,7 @@ instance FromJSON TrackRelease where

2168 (o .:? "status")

2177 (o .:? "status")

2169 <*> (o .:? "releaseNotes" .!= mempty)

2178 <*> (o .:? "releaseNotes" .!= mempty)

2170 <*> (o .:? "userFraction")

2179 <*> (o .:? "userFraction")

2180+ <*> (o .:? "countryTargeting")

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

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

2172

2182

2173instance ToJSON TrackRelease where

2183instance ToJSON TrackRelease where

@@ -2178,8 +2188,58 @@ instance ToJSON TrackRelease where

2178 ("status" .=) <$> _trStatus,

2188 ("status" .=) <$> _trStatus,

2179 ("releaseNotes" .=) <$> _trReleaseNotes,

2189 ("releaseNotes" .=) <$> _trReleaseNotes,

2180 ("userFraction" .=) <$> _trUserFraction,

2190 ("userFraction" .=) <$> _trUserFraction,

2191+ ("countryTargeting" .=) <$> _trCountryTargeting,

2181 ("name" .=) <$> _trName])

2192 ("name" .=) <$> _trName])

2182

2193

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+

2183--

2243--

2184-- /See:/ 'bundle' smart constructor.

2244-- /See:/ 'bundle' smart constructor.

2185data Bundle =

2245data Bundle =

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Get.hs+1−2

@@ -85,8 +85,7 @@ editsTestersGet pEtgTrack_ pEtgPackageName_ pEtgEditId_ =

85 }

85 }

86

86

87

87

88−-- | The track to read or modify. Acceptable values are: \"alpha\", \"beta\",

88+-- | The track to read or modify.

89−-- \"production\", \"rollout\" or \"internal\".

90etgTrack :: Lens' EditsTestersGet Text

89etgTrack :: Lens' EditsTestersGet Text

91etgTrack = lens _etgTrack (\ s a -> s{_etgTrack = a})

90etgTrack = lens _etgTrack (\ s a -> s{_etgTrack = a})

92

91

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Patch.hs+1−2

@@ -92,8 +92,7 @@ editsTestersPatch pEtpTrack_ pEtpPackageName_ pEtpPayload_ pEtpEditId_ =

92 }

92 }

93

93

94

94

95−-- | The track to read or modify. Acceptable values are: \"alpha\", \"beta\",

95+-- | The track to read or modify.

96−-- \"production\", \"rollout\" or \"internal\".

97etpTrack :: Lens' EditsTestersPatch Text

96etpTrack :: Lens' EditsTestersPatch Text

98etpTrack = lens _etpTrack (\ s a -> s{_etpTrack = a})

97etpTrack = lens _etpTrack (\ s a -> s{_etpTrack = a})

99

98

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Testers/Update.hs+1−2

@@ -92,8 +92,7 @@ editsTestersUpdate pEtutTrack_ pEtutPackageName_ pEtutPayload_ pEtutEditId_ =

92 }

92 }

93

93

94

94

95−-- | The track to read or modify. Acceptable values are: \"alpha\", \"beta\",

95+-- | The track to read or modify.

96−-- \"production\", \"rollout\" or \"internal\".

97etutTrack :: Lens' EditsTestersUpdate Text

96etutTrack :: Lens' EditsTestersUpdate Text

98etutTrack

97etutTrack

99 = lens _etutTrack (\ s a -> s{_etutTrack = a})

98 = lens _etutTrack (\ s a -> s{_etutTrack = a})

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Patch.hs+4−8

@@ -20,10 +20,8 @@

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

23+-- Updates the track configuration for the specified track type. This

24−-- halted, the rollout track cannot be updated without adding new APKs, and

25−-- adding new APKs will cause it to resume. This method supports patch

26−-- semantics.

24+-- method supports patch semantics.

27--

25--

28-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.patch@.

26-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.patch@.

29module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Patch

27module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Patch

@@ -59,10 +57,8 @@ type EditsTracksPatchResource =

59 QueryParam "alt" AltJSON :>

57 QueryParam "alt" AltJSON :>

60 ReqBody '[JSON] Track :> Patch '[JSON] Track

58 ReqBody '[JSON] Track :> Patch '[JSON] Track

61

59

62−-- | Updates the track configuration for the specified track type. When

60+-- | Updates the track configuration for the specified track type. This

63−-- halted, the rollout track cannot be updated without adding new APKs, and

64−-- adding new APKs will cause it to resume. This method supports patch

65−-- semantics.

61+-- method supports patch semantics.

66--

62--

67-- /See:/ 'editsTracksPatch' smart constructor.

63-- /See:/ 'editsTracksPatch' smart constructor.

68data EditsTracksPatch =

64data EditsTracksPatch =

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Tracks/Update.hs+2−6

@@ -20,9 +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−-- Updates the track configuration for the specified track type. When

23+-- Updates the track configuration for the specified track type.

24−-- halted, the rollout track cannot be updated without adding new APKs, and

25−-- adding new APKs will cause it to resume.

26--

24--

27-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.update@.

25-- /See:/ <https://developers.google.com/android-publisher Google Play Developer API Reference> for @androidpublisher.edits.tracks.update@.

28module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Update

26module Network.Google.Resource.AndroidPublisher.Edits.Tracks.Update

@@ -58,9 +56,7 @@ type EditsTracksUpdateResource =

58 QueryParam "alt" AltJSON :>

56 QueryParam "alt" AltJSON :>

59 ReqBody '[JSON] Track :> Put '[JSON] Track

57 ReqBody '[JSON] Track :> Put '[JSON] Track

60

58

61−-- | Updates the track configuration for the specified track type. When

59+-- | Updates the track configuration for the specified track type.

62−-- halted, the rollout track cannot be updated without adding new APKs, and

63−-- adding new APKs will cause it to resume.

64--

60--

65-- /See:/ 'editsTracksUpdate' smart constructor.

61-- /See:/ 'editsTracksUpdate' smart constructor.

66data EditsTracksUpdate =

62data EditsTracksUpdate =

gogol-androiddeviceprovisioning/gen/Network/Google/AndroidDeviceProvisioning.hs+6

@@ -164,6 +164,8 @@ module Network.Google.AndroidDeviceProvisioning

164 , partnerUnclaim

164 , partnerUnclaim

165 , puDeviceIdentifier

165 , puDeviceIdentifier

166 , puSectionType

166 , puSectionType

167+ , puVacationModeExpireTime

168+ , puVacationModeDays

167 , puDeviceId

169 , puDeviceId

168

170

169 -- ** Dpc

171 -- ** Dpc

@@ -312,6 +314,8 @@ module Network.Google.AndroidDeviceProvisioning

312 , DeviceClaim

314 , DeviceClaim

313 , deviceClaim

315 , deviceClaim

314 , dcSectionType

316 , dcSectionType

317+ , dcVacationModeExpireTime

318+ , dcVacationModeStartTime

315 , dcOwnerCompanyId

319 , dcOwnerCompanyId

316 , dcResellerId

320 , dcResellerId

317

321

@@ -345,6 +349,8 @@ module Network.Google.AndroidDeviceProvisioning

345 , unclaimDeviceRequest

349 , unclaimDeviceRequest

346 , udrDeviceIdentifier

350 , udrDeviceIdentifier

347 , udrSectionType

351 , udrSectionType

352+ , udrVacationModeExpireTime

353+ , udrVacationModeDays

348 , udrDeviceId

354 , udrDeviceId

349

355

350 -- ** DevicesLongRunningOperationResponse

356 -- ** DevicesLongRunningOperationResponse

gogol-androiddeviceprovisioning/gen/Network/Google/AndroidDeviceProvisioning/Types.hs+6

@@ -76,6 +76,8 @@ module Network.Google.AndroidDeviceProvisioning.Types

76 , partnerUnclaim

76 , partnerUnclaim

77 , puDeviceIdentifier

77 , puDeviceIdentifier

78 , puSectionType

78 , puSectionType

79+ , puVacationModeExpireTime

80+ , puVacationModeDays

79 , puDeviceId

81 , puDeviceId

80

82

81 -- * Dpc

83 -- * Dpc

@@ -224,6 +226,8 @@ module Network.Google.AndroidDeviceProvisioning.Types

224 , DeviceClaim

226 , DeviceClaim

225 , deviceClaim

227 , deviceClaim

226 , dcSectionType

228 , dcSectionType

229+ , dcVacationModeExpireTime

230+ , dcVacationModeStartTime

227 , dcOwnerCompanyId

231 , dcOwnerCompanyId

228 , dcResellerId

232 , dcResellerId

229

233

@@ -257,6 +261,8 @@ module Network.Google.AndroidDeviceProvisioning.Types

257 , unclaimDeviceRequest

261 , unclaimDeviceRequest

258 , udrDeviceIdentifier

262 , udrDeviceIdentifier

259 , udrSectionType

263 , udrSectionType

264+ , udrVacationModeExpireTime

265+ , udrVacationModeDays

260 , udrDeviceId

266 , udrDeviceId

261

267

262 -- * DevicesLongRunningOperationResponse

268 -- * DevicesLongRunningOperationResponse

gogol-androiddeviceprovisioning/gen/Network/Google/AndroidDeviceProvisioning/Types/Product.hs+97−10

@@ -472,9 +472,11 @@ 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))

477− , _puDeviceId :: !(Maybe (Textual Int64))

479+ , _puDeviceId :: !(Maybe (Textual Int64))

478 }

480 }

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

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

480

482

@@ -487,6 +489,10 @@ data PartnerUnclaim =

487--

489--

488-- * 'puSectionType'

490-- * 'puSectionType'

489--

491--

492+-- * 'puVacationModeExpireTime'

493+--

494+-- * 'puVacationModeDays'

495+--

490-- * 'puDeviceId'

496-- * 'puDeviceId'

491partnerUnclaim

497partnerUnclaim

492 :: PartnerUnclaim

498 :: PartnerUnclaim

@@ -494,6 +500,8 @@ partnerUnclaim =

494 PartnerUnclaim'

500 PartnerUnclaim'

495 { _puDeviceIdentifier = Nothing

501 { _puDeviceIdentifier = Nothing

496 , _puSectionType = Nothing

502 , _puSectionType = Nothing

503+ , _puVacationModeExpireTime = Nothing

504+ , _puVacationModeDays = Nothing

497 , _puDeviceId = Nothing

505 , _puDeviceId = Nothing

498 }

506 }

499

507

@@ -510,6 +518,21 @@ puSectionType

510 = lens _puSectionType

518 = lens _puSectionType

511 (\ s a -> s{_puSectionType = a})

519 (\ s a -> s{_puSectionType = a})

512

520

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+

513-- | Device ID of the device.

536-- | Device ID of the device.

514puDeviceId :: Lens' PartnerUnclaim (Maybe Int64)

537puDeviceId :: Lens' PartnerUnclaim (Maybe Int64)

515puDeviceId

538puDeviceId

@@ -522,6 +545,8 @@ instance FromJSON PartnerUnclaim where

522 (\ o ->

545 (\ o ->

523 PartnerUnclaim' <$>

546 PartnerUnclaim' <$>

524 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

547 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

548+ <*> (o .:? "vacationModeExpireTime")

549+ <*> (o .:? "vacationModeDays")

525 <*> (o .:? "deviceId"))

550 <*> (o .:? "deviceId"))

526

551

527instance ToJSON PartnerUnclaim where

552instance ToJSON PartnerUnclaim where

@@ -530,6 +555,9 @@ instance ToJSON PartnerUnclaim where

530 (catMaybes

555 (catMaybes

531 [("deviceIdentifier" .=) <$> _puDeviceIdentifier,

556 [("deviceIdentifier" .=) <$> _puDeviceIdentifier,

532 ("sectionType" .=) <$> _puSectionType,

557 ("sectionType" .=) <$> _puSectionType,

558+ ("vacationModeExpireTime" .=) <$>

559+ _puVacationModeExpireTime,

560+ ("vacationModeDays" .=) <$> _puVacationModeDays,

533 ("deviceId" .=) <$> _puDeviceId])

561 ("deviceId" .=) <$> _puDeviceId])

534

562

535-- | An EMM\'s DPC ([device policy

563-- | An EMM\'s DPC ([device policy

@@ -1760,9 +1788,11 @@ instance ToJSON CustomerListCustomersResponse where

1760-- /See:/ 'deviceClaim' smart constructor.

1788-- /See:/ 'deviceClaim' smart constructor.

1761data DeviceClaim =

1789data DeviceClaim =

1762 DeviceClaim'

1790 DeviceClaim'

1763− { _dcSectionType :: !(Maybe DeviceClaimSectionType)

1791+ { _dcSectionType :: !(Maybe DeviceClaimSectionType)

1792+ , _dcVacationModeExpireTime :: !(Maybe DateTime')

1793+ , _dcVacationModeStartTime :: !(Maybe DateTime')

1764− , _dcOwnerCompanyId :: !(Maybe (Textual Int64))

1794+ , _dcOwnerCompanyId :: !(Maybe (Textual Int64))

1765− , _dcResellerId :: !(Maybe (Textual Int64))

1795+ , _dcResellerId :: !(Maybe (Textual Int64))

1766 }

1796 }

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

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

1768

1798

@@ -1773,6 +1803,10 @@ data DeviceClaim =

1773--

1803--

1774-- * 'dcSectionType'

1804-- * 'dcSectionType'

1775--

1805--

1806+-- * 'dcVacationModeExpireTime'

1807+--

1808+-- * 'dcVacationModeStartTime'

1809+--

1776-- * 'dcOwnerCompanyId'

1810-- * 'dcOwnerCompanyId'

1777--

1811--

1778-- * 'dcResellerId'

1812-- * 'dcResellerId'

@@ -1781,6 +1815,8 @@ deviceClaim

1781deviceClaim =

1815deviceClaim =

1782 DeviceClaim'

1816 DeviceClaim'

1783 { _dcSectionType = Nothing

1817 { _dcSectionType = Nothing

1818+ , _dcVacationModeExpireTime = Nothing

1819+ , _dcVacationModeStartTime = Nothing

1784 , _dcOwnerCompanyId = Nothing

1820 , _dcOwnerCompanyId = Nothing

1785 , _dcResellerId = Nothing

1821 , _dcResellerId = Nothing

1786 }

1822 }

@@ -1792,6 +1828,22 @@ dcSectionType

1792 = lens _dcSectionType

1828 = lens _dcSectionType

1793 (\ s a -> s{_dcSectionType = a})

1829 (\ s a -> s{_dcSectionType = a})

1794

1830

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+

1795-- | The ID of the Customer that purchased the device.

1847-- | The ID of the Customer that purchased the device.

1796dcOwnerCompanyId :: Lens' DeviceClaim (Maybe Int64)

1848dcOwnerCompanyId :: Lens' DeviceClaim (Maybe Int64)

1797dcOwnerCompanyId

1849dcOwnerCompanyId

@@ -1810,7 +1862,10 @@ instance FromJSON DeviceClaim where

1810 = withObject "DeviceClaim"

1862 = withObject "DeviceClaim"

1811 (\ o ->

1863 (\ o ->

1812 DeviceClaim' <$>

1864 DeviceClaim' <$>

1865+ (o .:? "sectionType") <*>

1866+ (o .:? "vacationModeExpireTime")

1867+ <*> (o .:? "vacationModeStartTime")

1813− (o .:? "sectionType") <*> (o .:? "ownerCompanyId")

1868+ <*> (o .:? "ownerCompanyId")

1814 <*> (o .:? "resellerId"))

1869 <*> (o .:? "resellerId"))

1815

1870

1816instance ToJSON DeviceClaim where

1871instance ToJSON DeviceClaim where

@@ -1818,6 +1873,10 @@ instance ToJSON DeviceClaim where

1818 = object

1873 = object

1819 (catMaybes

1874 (catMaybes

1820 [("sectionType" .=) <$> _dcSectionType,

1875 [("sectionType" .=) <$> _dcSectionType,

1876+ ("vacationModeExpireTime" .=) <$>

1877+ _dcVacationModeExpireTime,

1878+ ("vacationModeStartTime" .=) <$>

1879+ _dcVacationModeStartTime,

1821 ("ownerCompanyId" .=) <$> _dcOwnerCompanyId,

1880 ("ownerCompanyId" .=) <$> _dcOwnerCompanyId,

1822 ("resellerId" .=) <$> _dcResellerId])

1881 ("resellerId" .=) <$> _dcResellerId])

1823

1882

@@ -2054,9 +2113,11 @@ instance ToJSON FindDevicesByDeviceIdentifierResponse

2054-- /See:/ 'unclaimDeviceRequest' smart constructor.

2113-- /See:/ 'unclaimDeviceRequest' smart constructor.

2055data UnclaimDeviceRequest =

2114data UnclaimDeviceRequest =

2056 UnclaimDeviceRequest'

2115 UnclaimDeviceRequest'

2057− { _udrDeviceIdentifier :: !(Maybe DeviceIdentifier)

2116+ { _udrDeviceIdentifier :: !(Maybe DeviceIdentifier)

2058− , _udrSectionType :: !(Maybe UnclaimDeviceRequestSectionType)

2117+ , _udrSectionType :: !(Maybe UnclaimDeviceRequestSectionType)

2118+ , _udrVacationModeExpireTime :: !(Maybe DateTime')

2119+ , _udrVacationModeDays :: !(Maybe (Textual Int32))

2059− , _udrDeviceId :: !(Maybe (Textual Int64))

2120+ , _udrDeviceId :: !(Maybe (Textual Int64))

2060 }

2121 }

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

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

2062

2123

@@ -2069,6 +2130,10 @@ data UnclaimDeviceRequest =

2069--

2130--

2070-- * 'udrSectionType'

2131-- * 'udrSectionType'

2071--

2132--

2133+-- * 'udrVacationModeExpireTime'

2134+--

2135+-- * 'udrVacationModeDays'

2136+--

2072-- * 'udrDeviceId'

2137-- * 'udrDeviceId'

2073unclaimDeviceRequest

2138unclaimDeviceRequest

2074 :: UnclaimDeviceRequest

2139 :: UnclaimDeviceRequest

@@ -2076,6 +2141,8 @@ unclaimDeviceRequest =

2076 UnclaimDeviceRequest'

2141 UnclaimDeviceRequest'

2077 { _udrDeviceIdentifier = Nothing

2142 { _udrDeviceIdentifier = Nothing

2078 , _udrSectionType = Nothing

2143 , _udrSectionType = Nothing

2144+ , _udrVacationModeExpireTime = Nothing

2145+ , _udrVacationModeDays = Nothing

2079 , _udrDeviceId = Nothing

2146 , _udrDeviceId = Nothing

2080 }

2147 }

2081

2148

@@ -2092,6 +2159,21 @@ udrSectionType

2092 = lens _udrSectionType

2159 = lens _udrSectionType

2093 (\ s a -> s{_udrSectionType = a})

2160 (\ s a -> s{_udrSectionType = a})

2094

2161

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+

2095-- | The device ID returned by \`ClaimDevice\`.

2177-- | The device ID returned by \`ClaimDevice\`.

2096udrDeviceId :: Lens' UnclaimDeviceRequest (Maybe Int64)

2178udrDeviceId :: Lens' UnclaimDeviceRequest (Maybe Int64)

2097udrDeviceId

2179udrDeviceId

@@ -2104,6 +2186,8 @@ instance FromJSON UnclaimDeviceRequest where

2104 (\ o ->

2186 (\ o ->

2105 UnclaimDeviceRequest' <$>

2187 UnclaimDeviceRequest' <$>

2106 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

2188 (o .:? "deviceIdentifier") <*> (o .:? "sectionType")

2189+ <*> (o .:? "vacationModeExpireTime")

2190+ <*> (o .:? "vacationModeDays")

2107 <*> (o .:? "deviceId"))

2191 <*> (o .:? "deviceId"))

2108

2192

2109instance ToJSON UnclaimDeviceRequest where

2193instance ToJSON UnclaimDeviceRequest where

@@ -2112,6 +2196,9 @@ instance ToJSON UnclaimDeviceRequest where

2112 (catMaybes

2196 (catMaybes

2113 [("deviceIdentifier" .=) <$> _udrDeviceIdentifier,

2197 [("deviceIdentifier" .=) <$> _udrDeviceIdentifier,

2114 ("sectionType" .=) <$> _udrSectionType,

2198 ("sectionType" .=) <$> _udrSectionType,

2199+ ("vacationModeExpireTime" .=) <$>

2200+ _udrVacationModeExpireTime,

2201+ ("vacationModeDays" .=) <$> _udrVacationModeDays,

2115 ("deviceId" .=) <$> _udrDeviceId])

2202 ("deviceId" .=) <$> _udrDeviceId])

2116

2203

2117-- | Tracks the status of a long-running operation to claim, unclaim, or

2204-- | Tracks the status of a long-running operation to claim, unclaim, or

gogol-androidmanagement/gen/Network/Google/AndroidManagement.hs+69

@@ -87,6 +87,21 @@ 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+

90 -- ** androidmanagement.enterprises.webTokens.create

105 -- ** androidmanagement.enterprises.webTokens.create

91 , module Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

106 , module Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

92

107

@@ -324,6 +339,9 @@ module Network.Google.AndroidManagement

324 , devEnrollmentTime

339 , devEnrollmentTime

325 , devDisplays

340 , devDisplays

326

341

342+ -- ** WebAppDisplayMode

343+ , WebAppDisplayMode (..)

344+

327 -- ** ApplicationReportApplicationSource

345 -- ** ApplicationReportApplicationSource

328 , ApplicationReportApplicationSource (..)

346 , ApplicationReportApplicationSource (..)

329

347

@@ -386,6 +404,7 @@ module Network.Google.AndroidManagement

386 , arVersionName

404 , arVersionName

387 , arPackageName

405 , arPackageName

388 , arPackageSha256Hash

406 , arPackageSha256Hash

407+ , arKeyedAppStates

389 , arApplicationSource

408 , arApplicationSource

390 , arEvents

409 , arEvents

391 , arDisplayName

410 , arDisplayName

@@ -426,6 +445,7 @@ module Network.Google.AndroidManagement

426 , srsMemoryInfoEnabled

445 , srsMemoryInfoEnabled

427 , srsNetworkInfoEnabled

446 , srsNetworkInfoEnabled

428 , srsDeviceSettingsEnabled

447 , srsDeviceSettingsEnabled

448+ , srsApplicationReportingSettings

429

449

430 -- ** CommandType

450 -- ** CommandType

431 , CommandType (..)

451 , CommandType (..)

@@ -433,6 +453,11 @@ module Network.Google.AndroidManagement

433 -- ** ApplicationPolicyDefaultPermissionPolicy

453 -- ** ApplicationPolicyDefaultPermissionPolicy

434 , ApplicationPolicyDefaultPermissionPolicy (..)

454 , ApplicationPolicyDefaultPermissionPolicy (..)

435

455

456+ -- ** WebAppIcon

457+ , WebAppIcon

458+ , webAppIcon

459+ , waiImageData

460+

436 -- ** Xgafv

461 -- ** Xgafv

437 , Xgafv (..)

462 , Xgafv (..)

438

463

@@ -617,6 +642,16 @@ module Network.Google.AndroidManagement

617 , ncdcNonComplianceReason

642 , ncdcNonComplianceReason

618 , ncdcSettingName

643 , ncdcSettingName

619

644

645+ -- ** KeyedAppState

646+ , KeyedAppState

647+ , keyedAppState

648+ , kasData

649+ , kasSeverity

650+ , kasKey

651+ , kasMessage

652+ , kasLastUpdateTime

653+ , kasCreateTime

654+

620 -- ** OperationMetadata

655 -- ** OperationMetadata

621 , OperationMetadata

656 , OperationMetadata

622 , operationMetadata

657 , operationMetadata

@@ -630,6 +665,9 @@ module Network.Google.AndroidManagement

630 , wtName

665 , wtName

631 , wtPermissions

666 , wtPermissions

632

667

668+ -- ** KeyedAppStateSeverity

669+ , KeyedAppStateSeverity (..)

670+

633 -- ** ComplianceRule

671 -- ** ComplianceRule

634 , ComplianceRule

672 , ComplianceRule

635 , complianceRule

673 , complianceRule

@@ -638,6 +676,12 @@ module Network.Google.AndroidManagement

638 , crPackageNamesToDisable

676 , crPackageNamesToDisable

639 , crNonComplianceDetailCondition

677 , crNonComplianceDetailCondition

640

678

679+ -- ** ListWebAppsResponse

680+ , ListWebAppsResponse

681+ , listWebAppsResponse

682+ , lwarNextPageToken

683+ , lwarWebApps

684+

641 -- ** PasswordRequirements

685 -- ** PasswordRequirements

642 , PasswordRequirements

686 , PasswordRequirements

643 , passwordRequirements

687 , passwordRequirements

@@ -707,6 +751,11 @@ module Network.Google.AndroidManagement

707 , siAndroidBuildNumber

751 , siAndroidBuildNumber

708 , siAndroidVersion

752 , siAndroidVersion

709

753

754+ -- ** ApplicationReportingSettings

755+ , ApplicationReportingSettings

756+ , applicationReportingSettings

757+ , arsIncludeRemovedApps

758+

710 -- ** MemoryEventEventType

759 -- ** MemoryEventEventType

711 , MemoryEventEventType (..)

760 , MemoryEventEventType (..)

712

761

@@ -724,6 +773,16 @@ module Network.Google.AndroidManagement

724 , saTitle

773 , saTitle

725 , saDescription

774 , saDescription

726

775

776+ -- ** WebApp

777+ , WebApp

778+ , webApp

779+ , waVersionCode

780+ , waIcons

781+ , waStartURL

782+ , waDisplayMode

783+ , waName

784+ , waTitle

785+

727 -- ** PasswordRequirementsPasswordQuality

786 -- ** PasswordRequirementsPasswordQuality

728 , PasswordRequirementsPasswordQuality (..)

787 , PasswordRequirementsPasswordQuality (..)

729 ) where

788 ) where

@@ -749,6 +808,11 @@ import Network.Google.Resource.AndroidManagement.Enterprises.Policies.

749import Network.Google.Resource.AndroidManagement.Enterprises.Policies.Get

808import Network.Google.Resource.AndroidManagement.Enterprises.Policies.Get

750import Network.Google.Resource.AndroidManagement.Enterprises.Policies.List

809import Network.Google.Resource.AndroidManagement.Enterprises.Policies.List

751import Network.Google.Resource.AndroidManagement.Enterprises.Policies.Patch

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

752import Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

816import Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

753import Network.Google.Resource.AndroidManagement.SignupURLs.Create

817import Network.Google.Resource.AndroidManagement.SignupURLs.Create

754

818

@@ -760,6 +824,11 @@ TODO

760type AndroidManagementAPI =

824type AndroidManagementAPI =

761 EnterprisesEnrollmentTokensCreateResource :<|>

825 EnterprisesEnrollmentTokensCreateResource :<|>

762 EnterprisesEnrollmentTokensDeleteResource

826 EnterprisesEnrollmentTokensDeleteResource

827+ :<|> EnterprisesWebAppsListResource

828+ :<|> EnterprisesWebAppsPatchResource

829+ :<|> EnterprisesWebAppsGetResource

830+ :<|> EnterprisesWebAppsCreateResource

831+ :<|> EnterprisesWebAppsDeleteResource

763 :<|> EnterprisesWebTokensCreateResource

832 :<|> EnterprisesWebTokensCreateResource

764 :<|> EnterprisesDevicesOperationsListResource

833 :<|> EnterprisesDevicesOperationsListResource

765 :<|> EnterprisesDevicesOperationsGetResource

834 :<|> EnterprisesDevicesOperationsGetResource

gogol-androidmanagement/gen/Network/Google/AndroidManagement/Types.hs+44

@@ -251,6 +251,9 @@ module Network.Google.AndroidManagement.Types

251 , devEnrollmentTime

251 , devEnrollmentTime

252 , devDisplays

252 , devDisplays

253

253

254+ -- * WebAppDisplayMode

255+ , WebAppDisplayMode (..)

256+

254 -- * ApplicationReportApplicationSource

257 -- * ApplicationReportApplicationSource

255 , ApplicationReportApplicationSource (..)

258 , ApplicationReportApplicationSource (..)

256

259

@@ -313,6 +316,7 @@ module Network.Google.AndroidManagement.Types

313 , arVersionName

316 , arVersionName

314 , arPackageName

317 , arPackageName

315 , arPackageSha256Hash

318 , arPackageSha256Hash

319+ , arKeyedAppStates

316 , arApplicationSource

320 , arApplicationSource

317 , arEvents

321 , arEvents

318 , arDisplayName

322 , arDisplayName

@@ -353,6 +357,7 @@ module Network.Google.AndroidManagement.Types

353 , srsMemoryInfoEnabled

357 , srsMemoryInfoEnabled

354 , srsNetworkInfoEnabled

358 , srsNetworkInfoEnabled

355 , srsDeviceSettingsEnabled

359 , srsDeviceSettingsEnabled

360+ , srsApplicationReportingSettings

356

361

357 -- * CommandType

362 -- * CommandType

358 , CommandType (..)

363 , CommandType (..)

@@ -360,6 +365,11 @@ module Network.Google.AndroidManagement.Types

360 -- * ApplicationPolicyDefaultPermissionPolicy

365 -- * ApplicationPolicyDefaultPermissionPolicy

361 , ApplicationPolicyDefaultPermissionPolicy (..)

366 , ApplicationPolicyDefaultPermissionPolicy (..)

362

367

368+ -- * WebAppIcon

369+ , WebAppIcon

370+ , webAppIcon

371+ , waiImageData

372+

363 -- * Xgafv

373 -- * Xgafv

364 , Xgafv (..)

374 , Xgafv (..)

365

375

@@ -544,6 +554,16 @@ module Network.Google.AndroidManagement.Types

544 , ncdcNonComplianceReason

554 , ncdcNonComplianceReason

545 , ncdcSettingName

555 , ncdcSettingName

546

556

557+ -- * KeyedAppState

558+ , KeyedAppState

559+ , keyedAppState

560+ , kasData

561+ , kasSeverity

562+ , kasKey

563+ , kasMessage

564+ , kasLastUpdateTime

565+ , kasCreateTime

566+

547 -- * OperationMetadata

567 -- * OperationMetadata

548 , OperationMetadata

568 , OperationMetadata

549 , operationMetadata

569 , operationMetadata

@@ -557,6 +577,9 @@ module Network.Google.AndroidManagement.Types

557 , wtName

577 , wtName

558 , wtPermissions

578 , wtPermissions

559

579

580+ -- * KeyedAppStateSeverity

581+ , KeyedAppStateSeverity (..)

582+

560 -- * ComplianceRule

583 -- * ComplianceRule

561 , ComplianceRule

584 , ComplianceRule

562 , complianceRule

585 , complianceRule

@@ -565,6 +588,12 @@ module Network.Google.AndroidManagement.Types

565 , crPackageNamesToDisable

588 , crPackageNamesToDisable

566 , crNonComplianceDetailCondition

589 , crNonComplianceDetailCondition

567

590

591+ -- * ListWebAppsResponse

592+ , ListWebAppsResponse

593+ , listWebAppsResponse

594+ , lwarNextPageToken

595+ , lwarWebApps

596+

568 -- * PasswordRequirements

597 -- * PasswordRequirements

569 , PasswordRequirements

598 , PasswordRequirements

570 , passwordRequirements

599 , passwordRequirements

@@ -634,6 +663,11 @@ module Network.Google.AndroidManagement.Types

634 , siAndroidBuildNumber

663 , siAndroidBuildNumber

635 , siAndroidVersion

664 , siAndroidVersion

636

665

666+ -- * ApplicationReportingSettings

667+ , ApplicationReportingSettings

668+ , applicationReportingSettings

669+ , arsIncludeRemovedApps

670+

637 -- * MemoryEventEventType

671 -- * MemoryEventEventType

638 , MemoryEventEventType (..)

672 , MemoryEventEventType (..)

639

673

@@ -651,6 +685,16 @@ module Network.Google.AndroidManagement.Types

651 , saTitle

685 , saTitle

652 , saDescription

686 , saDescription

653

687

688+ -- * WebApp

689+ , WebApp

690+ , webApp

691+ , waVersionCode

692+ , waIcons

693+ , waStartURL

694+ , waDisplayMode

695+ , waName

696+ , waTitle

697+

654 -- * PasswordRequirementsPasswordQuality

698 -- * PasswordRequirementsPasswordQuality

655 , PasswordRequirementsPasswordQuality (..)

699 , PasswordRequirementsPasswordQuality (..)

656 ) where

700 ) where

gogol-androidmanagement/gen/Network/Google/AndroidManagement/Types/Product.hs+371−2

@@ -2511,6 +2511,7 @@ 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])

2514 , _arApplicationSource :: !(Maybe ApplicationReportApplicationSource)

2515 , _arApplicationSource :: !(Maybe ApplicationReportApplicationSource)

2515 , _arEvents :: !(Maybe [ApplicationEvent])

2516 , _arEvents :: !(Maybe [ApplicationEvent])

2516 , _arDisplayName :: !(Maybe Text)

2517 , _arDisplayName :: !(Maybe Text)

@@ -2535,6 +2536,8 @@ data ApplicationReport =

2535--

2536--

2536-- * 'arPackageSha256Hash'

2537-- * 'arPackageSha256Hash'

2537--

2538--

2539+-- * 'arKeyedAppStates'

2540+--

2538-- * 'arApplicationSource'

2541-- * 'arApplicationSource'

2539--

2542--

2540-- * 'arEvents'

2543-- * 'arEvents'

@@ -2552,6 +2555,7 @@ applicationReport =

2552 , _arVersionName = Nothing

2555 , _arVersionName = Nothing

2553 , _arPackageName = Nothing

2556 , _arPackageName = Nothing

2554 , _arPackageSha256Hash = Nothing

2557 , _arPackageSha256Hash = Nothing

2558+ , _arKeyedAppStates = Nothing

2555 , _arApplicationSource = Nothing

2559 , _arApplicationSource = Nothing

2556 , _arEvents = Nothing

2560 , _arEvents = Nothing

2557 , _arDisplayName = Nothing

2561 , _arDisplayName = Nothing

@@ -2602,6 +2606,14 @@ arPackageSha256Hash

2602 = lens _arPackageSha256Hash

2606 = lens _arPackageSha256Hash

2603 (\ s a -> s{_arPackageSha256Hash = a})

2607 (\ s a -> s{_arPackageSha256Hash = a})

2604

2608

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+

2605-- | The source of the package.

2617-- | The source of the package.

2606arApplicationSource :: Lens' ApplicationReport (Maybe ApplicationReportApplicationSource)

2618arApplicationSource :: Lens' ApplicationReport (Maybe ApplicationReportApplicationSource)

2607arApplicationSource

2619arApplicationSource

@@ -2638,6 +2650,7 @@ instance FromJSON ApplicationReport where

2638 <*> (o .:? "versionName")

2650 <*> (o .:? "versionName")

2639 <*> (o .:? "packageName")

2651 <*> (o .:? "packageName")

2640 <*> (o .:? "packageSha256Hash")

2652 <*> (o .:? "packageSha256Hash")

2653+ <*> (o .:? "keyedAppStates" .!= mempty)

2641 <*> (o .:? "applicationSource")

2654 <*> (o .:? "applicationSource")

2642 <*> (o .:? "events" .!= mempty)

2655 <*> (o .:? "events" .!= mempty)

2643 <*> (o .:? "displayName")

2656 <*> (o .:? "displayName")

@@ -2654,6 +2667,7 @@ instance ToJSON ApplicationReport where

2654 ("versionName" .=) <$> _arVersionName,

2667 ("versionName" .=) <$> _arVersionName,

2655 ("packageName" .=) <$> _arPackageName,

2668 ("packageName" .=) <$> _arPackageName,

2656 ("packageSha256Hash" .=) <$> _arPackageSha256Hash,

2669 ("packageSha256Hash" .=) <$> _arPackageSha256Hash,

2670+ ("keyedAppStates" .=) <$> _arKeyedAppStates,

2657 ("applicationSource" .=) <$> _arApplicationSource,

2671 ("applicationSource" .=) <$> _arApplicationSource,

2658 ("events" .=) <$> _arEvents,

2672 ("events" .=) <$> _arEvents,

2659 ("displayName" .=) <$> _arDisplayName,

2673 ("displayName" .=) <$> _arDisplayName,

@@ -2890,6 +2904,7 @@ data StatusReportingSettings =

2890 , _srsMemoryInfoEnabled :: !(Maybe Bool)

2904 , _srsMemoryInfoEnabled :: !(Maybe Bool)

2891 , _srsNetworkInfoEnabled :: !(Maybe Bool)

2905 , _srsNetworkInfoEnabled :: !(Maybe Bool)

2892 , _srsDeviceSettingsEnabled :: !(Maybe Bool)

2906 , _srsDeviceSettingsEnabled :: !(Maybe Bool)

2907+ , _srsApplicationReportingSettings :: !(Maybe ApplicationReportingSettings)

2893 }

2908 }

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

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

2895

2910

@@ -2913,6 +2928,8 @@ data StatusReportingSettings =

2913-- * 'srsNetworkInfoEnabled'

2928-- * 'srsNetworkInfoEnabled'

2914--

2929--

2915-- * 'srsDeviceSettingsEnabled'

2930-- * 'srsDeviceSettingsEnabled'

2931+--

2932+-- * 'srsApplicationReportingSettings'

2916statusReportingSettings

2933statusReportingSettings

2917 :: StatusReportingSettings

2934 :: StatusReportingSettings

2918statusReportingSettings =

2935statusReportingSettings =

@@ -2925,6 +2942,7 @@ statusReportingSettings =

2925 , _srsMemoryInfoEnabled = Nothing

2942 , _srsMemoryInfoEnabled = Nothing

2926 , _srsNetworkInfoEnabled = Nothing

2943 , _srsNetworkInfoEnabled = Nothing

2927 , _srsDeviceSettingsEnabled = Nothing

2944 , _srsDeviceSettingsEnabled = Nothing

2945+ , _srsApplicationReportingSettings = Nothing

2928 }

2946 }

2929

2947

2930

2948

@@ -2976,6 +2994,13 @@ srsDeviceSettingsEnabled

2976 = lens _srsDeviceSettingsEnabled

2994 = lens _srsDeviceSettingsEnabled

2977 (\ s a -> s{_srsDeviceSettingsEnabled = a})

2995 (\ s a -> s{_srsDeviceSettingsEnabled = a})

2978

2996

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+

2979instance FromJSON StatusReportingSettings where

3004instance FromJSON StatusReportingSettings where

2980 parseJSON

3005 parseJSON

2981 = withObject "StatusReportingSettings"

3006 = withObject "StatusReportingSettings"

@@ -2988,7 +3013,8 @@ instance FromJSON StatusReportingSettings where

2988 <*> (o .:? "applicationReportsEnabled")

3013 <*> (o .:? "applicationReportsEnabled")

2989 <*> (o .:? "memoryInfoEnabled")

3014 <*> (o .:? "memoryInfoEnabled")

2990 <*> (o .:? "networkInfoEnabled")

3015 <*> (o .:? "networkInfoEnabled")

2991− <*> (o .:? "deviceSettingsEnabled"))

3016+ <*> (o .:? "deviceSettingsEnabled")

3017+ <*> (o .:? "applicationReportingSettings"))

2992

3018

2993instance ToJSON StatusReportingSettings where

3019instance ToJSON StatusReportingSettings where

2994 toJSON StatusReportingSettings'{..}

3020 toJSON StatusReportingSettings'{..}

@@ -3006,7 +3032,50 @@ instance ToJSON StatusReportingSettings where

3006 ("memoryInfoEnabled" .=) <$> _srsMemoryInfoEnabled,

3032 ("memoryInfoEnabled" .=) <$> _srsMemoryInfoEnabled,

3007 ("networkInfoEnabled" .=) <$> _srsNetworkInfoEnabled,

3033 ("networkInfoEnabled" .=) <$> _srsNetworkInfoEnabled,

3008 ("deviceSettingsEnabled" .=) <$>

3034 ("deviceSettingsEnabled" .=) <$>

3009− _srsDeviceSettingsEnabled])

3035+ _srsDeviceSettingsEnabled,

3036+ ("applicationReportingSettings" .=) <$>

3037+ _srsApplicationReportingSettings])

3038+

3039+-- | An icon for a web app. Supported formats are: png, jpg and webp.

3040+--

3041+-- /See:/ 'webAppIcon' smart constructor.

3042+newtype WebAppIcon =

3043+ WebAppIcon'

3044+ { _waiImageData :: Maybe Text

3045+ }

3046+ deriving (Eq, Show, Data, Typeable, Generic)

3047+

3048+

3049+-- | Creates a value of 'WebAppIcon' with the minimum fields required to make a request.

3050+--

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

3052+--

3053+-- * 'waiImageData'

3054+webAppIcon

3055+ :: WebAppIcon

3056+webAppIcon = WebAppIcon' {_waiImageData = Nothing}

3057+

3058+

3059+-- | The actual bytes of the image in a base64url encoded string (c.f.

3060+-- RFC4648, section 5 \"Base 64 Encoding with URL and Filename Safe

3061+-- Alphabet\").

3062+--

3063+-- - The image type can be png or jpg.

3064+-- - The image should ideally be square.

3065+-- - The image should ideally have a size of 512x512.

3066+waiImageData :: Lens' WebAppIcon (Maybe Text)

3067+waiImageData

3068+ = lens _waiImageData (\ s a -> s{_waiImageData = a})

3069+

3070+instance FromJSON WebAppIcon where

3071+ parseJSON

3072+ = withObject "WebAppIcon"

3073+ (\ o -> WebAppIcon' <$> (o .:? "imageData"))

3074+

3075+instance ToJSON WebAppIcon where

3076+ toJSON WebAppIcon'{..}

3077+ = object

3078+ (catMaybes [("imageData" .=) <$> _waiImageData])

3010

3079

3011-- | Policy for an individual app.

3080-- | Policy for an individual app.

3012--

3081--

@@ -4966,6 +5035,109 @@ instance ToJSON NonComplianceDetailCondition where

4966 _ncdcNonComplianceReason,

5035 _ncdcNonComplianceReason,

4967 ("settingName" .=) <$> _ncdcSettingName])

5036 ("settingName" .=) <$> _ncdcSettingName])

4968

5037

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+

4969-- | Service-specific metadata associated with the operation. It typically

5141-- | Service-specific metadata associated with the operation. It typically

4970-- contains progress information and common metadata such as create time.

5142-- contains progress information and common metadata such as create time.

4971-- Some services might not provide such metadata. Any method that returns a

5143-- Some services might not provide such metadata. Any method that returns a

@@ -5177,6 +5349,58 @@ instance ToJSON ComplianceRule where

5177 ("nonComplianceDetailCondition" .=) <$>

5349 ("nonComplianceDetailCondition" .=) <$>

5178 _crNonComplianceDetailCondition])

5350 _crNonComplianceDetailCondition])

5179

5351

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+

5180-- | Requirements for the password used to unlock a device.

5404-- | Requirements for the password used to unlock a device.

5181--

5405--

5182-- /See:/ 'passwordRequirements' smart constructor.

5406-- /See:/ 'passwordRequirements' smart constructor.

@@ -5856,6 +6080,47 @@ instance ToJSON SoftwareInfo where

5856 ("androidBuildNumber" .=) <$> _siAndroidBuildNumber,

6080 ("androidBuildNumber" .=) <$> _siAndroidBuildNumber,

5857 ("androidVersion" .=) <$> _siAndroidVersion])

6081 ("androidVersion" .=) <$> _siAndroidVersion])

5858

6082

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+

5859-- | A permission required by the app.

6124-- | A permission required by the app.

5860--

6125--

5861-- /See:/ 'applicationPermission' smart constructor.

6126-- /See:/ 'applicationPermission' smart constructor.

@@ -5975,3 +6240,107 @@ instance ToJSON SetupAction where

5975 [("launchApp" .=) <$> _saLaunchApp,

6240 [("launchApp" .=) <$> _saLaunchApp,

5976 ("title" .=) <$> _saTitle,

6241 ("title" .=) <$> _saTitle,

5977 ("description" .=) <$> _saDescription])

6242 ("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,6 +380,51 @@ 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+

383-- | The source of the package.

428-- | The source of the package.

384data ApplicationReportApplicationSource

429data ApplicationReportApplicationSource

385 = ApplicationSourceUnspecified

430 = ApplicationSourceUnspecified

@@ -1169,6 +1214,41 @@ instance FromJSON PolicyDefaultPermissionPolicy where

1169instance ToJSON PolicyDefaultPermissionPolicy where

1214instance ToJSON PolicyDefaultPermissionPolicy where

1170 toJSON = toJSONText

1215 toJSON = toJSONText

1171

1216

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+

1172-- | Application state.

1252-- | Application state.

1173data ApplicationReportState

1253data ApplicationReportState

1174 = ARSInstalled

1254 = ARSInstalled

gogol-androidmanagement/gen/Network/Google/Resource/AndroidManagement/Enterprises/WebApps/Create.hsnew file+164

@@ -0,0 +1,164 @@

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.hsnew file+150

@@ -0,0 +1,150 @@

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.hsnew file+150

@@ -0,0 +1,150 @@

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.hsnew file+179

@@ -0,0 +1,179 @@

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.hsnew file+177

@@ -0,0 +1,177 @@

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,6 +55,11 @@ 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

58 , Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

63 , Network.Google.Resource.AndroidManagement.Enterprises.WebTokens.Create

59 , Network.Google.Resource.AndroidManagement.SignupURLs.Create

64 , Network.Google.Resource.AndroidManagement.SignupURLs.Create

60

65

gogol-appengine/gen/Network/Google/AppEngine.hs+8−20

@@ -171,11 +171,6 @@ module Network.Google.AppEngine

171 , sCode

171 , sCode

172 , sMessage

172 , sMessage

173

173

174− -- ** OperationSchema

175− , OperationSchema

176− , operationSchema

177− , osAddtional

178−

179 -- ** LocationSchema

174 -- ** LocationSchema

180 , LocationSchema

175 , LocationSchema

181 , locationSchema

176 , locationSchema

@@ -273,6 +268,11 @@ module Network.Google.AppEngine

273 , acExpireTime

268 , acExpireTime

274 , acVisibleDomainMAppings

269 , acVisibleDomainMAppings

275

270

271+ -- ** VPCAccessConnector

272+ , VPCAccessConnector

273+ , vpcAccessConnector

274+ , vacName

275+

276 -- ** APIConfigHandler

276 -- ** APIConfigHandler

277 , APIConfigHandler

277 , APIConfigHandler

278 , apiConfigHandler

278 , apiConfigHandler

@@ -432,15 +432,6 @@ 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−

444 -- ** Volume

435 -- ** Volume

445 , Volume

436 , Volume

446 , volume

437 , volume

@@ -513,6 +504,7 @@ module Network.Google.AppEngine

513 -- ** FeatureSettings

504 -- ** FeatureSettings

514 , FeatureSettings

505 , FeatureSettings

515 , featureSettings

506 , featureSettings

507+ , fsUseContainerOptimizedOS

516 , fsSplitHealthChecks

508 , fsSplitHealthChecks

517

509

518 -- ** CertificateRawData

510 -- ** CertificateRawData

@@ -601,6 +593,7 @@ module Network.Google.AppEngine

601 , verInstanceClass

593 , verInstanceClass

602 , verRuntimeChannel

594 , verRuntimeChannel

603 , verRuntimeMainExecutablePath

595 , verRuntimeMainExecutablePath

596+ , verVPCAccessConnector

604 , verHealthCheck

597 , verHealthCheck

605 , verEndpointsAPIService

598 , verEndpointsAPIService

606 , verEnv

599 , verEnv

@@ -696,12 +689,7 @@ module Network.Google.AppEngine

696 -- ** OperationMetadata

689 -- ** OperationMetadata

697 , OperationMetadata

690 , OperationMetadata

698 , operationMetadata

691 , operationMetadata

699− , omInsertTime

692+ , omAddtional

700− , omUser

701− , omMethod

702− , omEndTime

703− , omOperationType

704− , omTarget

705

693

706 -- ** URLMapAuthFailAction

694 -- ** URLMapAuthFailAction

707 , URLMapAuthFailAction (..)

695 , URLMapAuthFailAction (..)

gogol-appengine/gen/Network/Google/AppEngine/Types.hs+8−20

@@ -48,11 +48,6 @@ module Network.Google.AppEngine.Types

48 , sCode

48 , sCode

49 , sMessage

49 , sMessage

50

50

51− -- * OperationSchema

52− , OperationSchema

53− , operationSchema

54− , osAddtional

55−

56 -- * LocationSchema

51 -- * LocationSchema

57 , LocationSchema

52 , LocationSchema

58 , locationSchema

53 , locationSchema

@@ -150,6 +145,11 @@ module Network.Google.AppEngine.Types

150 , acExpireTime

145 , acExpireTime

151 , acVisibleDomainMAppings

146 , acVisibleDomainMAppings

152

147

148+ -- * VPCAccessConnector

149+ , VPCAccessConnector

150+ , vpcAccessConnector

151+ , vacName

152+

153 -- * APIConfigHandler

153 -- * APIConfigHandler

154 , APIConfigHandler

154 , APIConfigHandler

155 , apiConfigHandler

155 , apiConfigHandler

@@ -309,15 +309,6 @@ 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−

321 -- * Volume

312 -- * Volume

322 , Volume

313 , Volume

323 , volume

314 , volume

@@ -390,6 +381,7 @@ module Network.Google.AppEngine.Types

390 -- * FeatureSettings

381 -- * FeatureSettings

391 , FeatureSettings

382 , FeatureSettings

392 , featureSettings

383 , featureSettings

384+ , fsUseContainerOptimizedOS

393 , fsSplitHealthChecks

385 , fsSplitHealthChecks

394

386

395 -- * CertificateRawData

387 -- * CertificateRawData

@@ -478,6 +470,7 @@ module Network.Google.AppEngine.Types

478 , verInstanceClass

470 , verInstanceClass

479 , verRuntimeChannel

471 , verRuntimeChannel

480 , verRuntimeMainExecutablePath

472 , verRuntimeMainExecutablePath

473+ , verVPCAccessConnector

481 , verHealthCheck

474 , verHealthCheck

482 , verEndpointsAPIService

475 , verEndpointsAPIService

483 , verEnv

476 , verEnv

@@ -573,12 +566,7 @@ module Network.Google.AppEngine.Types

573 -- * OperationMetadata

566 -- * OperationMetadata

574 , OperationMetadata

567 , OperationMetadata

575 , operationMetadata

568 , operationMetadata

576− , omInsertTime

569+ , omAddtional

577− , omUser

578− , omMethod

579− , omEndTime

580− , omOperationType

581− , omTarget

582

570

583 -- * URLMapAuthFailAction

571 -- * URLMapAuthFailAction

584 , URLMapAuthFailAction (..)

572 , URLMapAuthFailAction (..)

gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+89−207

@@ -202,45 +202,6 @@ 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−

244-- | Service-specific metadata. For example the available capacity at the

205-- | Service-specific metadata. For example the available capacity at the

245-- given location.

206-- given location.

246--

207--

@@ -1184,6 +1145,40 @@ instance ToJSON AuthorizedCertificate where

1184 ("visibleDomainMappings" .=) <$>

1145 ("visibleDomainMappings" .=) <$>

1185 _acVisibleDomainMAppings])

1146 _acVisibleDomainMAppings])

1186

1147

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+

1187-- | Google Cloud Endpoints

1182-- | Google Cloud Endpoints

1188-- (https:\/\/cloud.google.com\/appengine\/docs\/python\/endpoints\/)

1183-- (https:\/\/cloud.google.com\/appengine\/docs\/python\/endpoints\/)

1189-- configuration for API handlers.

1184-- configuration for API handlers.

@@ -1792,7 +1787,7 @@ data Operation =

1792 , _oError :: !(Maybe Status)

1787 , _oError :: !(Maybe Status)

1793 , _oResponse :: !(Maybe OperationResponse)

1788 , _oResponse :: !(Maybe OperationResponse)

1794 , _oName :: !(Maybe Text)

1789 , _oName :: !(Maybe Text)

1795− , _oMetadata :: !(Maybe OperationSchema)

1790+ , _oMetadata :: !(Maybe OperationMetadata)

1796 }

1791 }

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

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

1798

1793

@@ -1853,7 +1848,7 @@ oName = lens _oName (\ s a -> s{_oName = a})

1853-- contains progress information and common metadata such as create time.

1848-- contains progress information and common metadata such as create time.

1854-- Some services might not provide such metadata. Any method that returns a

1849-- Some services might not provide such metadata. Any method that returns a

1855-- long-running operation should document the metadata type, if any.

1850-- long-running operation should document the metadata type, if any.

1856−oMetadata :: Lens' Operation (Maybe OperationSchema)

1851+oMetadata :: Lens' Operation (Maybe OperationMetadata)

1857oMetadata

1852oMetadata

1858 = lens _oMetadata (\ s a -> s{_oMetadata = a})

1853 = lens _oMetadata (\ s a -> s{_oMetadata = a})

1859

1854

@@ -2650,90 +2645,6 @@ instance ToJSON AutomaticScaling where

2650 ("standardSchedulerSettings" .=) <$>

2645 ("standardSchedulerSettings" .=) <$>

2651 _asStandardSchedulerSettings])

2646 _asStandardSchedulerSettings])

2652

2647

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−

2737-- | Volumes mounted within the app container. Only applicable in the App

2648-- | Volumes mounted within the app container. Only applicable in the App

2738-- Engine flexible environment.

2649-- Engine flexible environment.

2739--

2650--

@@ -3344,9 +3255,10 @@ instance ToJSON Resources where

3344-- define behaviors that are user configurable.

3255-- define behaviors that are user configurable.

3345--

3256--

3346-- /See:/ 'featureSettings' smart constructor.

3257-- /See:/ 'featureSettings' smart constructor.

3347−newtype FeatureSettings =

3258+data FeatureSettings =

3348 FeatureSettings'

3259 FeatureSettings'

3260+ { _fsUseContainerOptimizedOS :: !(Maybe Bool)

3349− { _fsSplitHealthChecks :: Maybe Bool

3261+ , _fsSplitHealthChecks :: !(Maybe Bool)

3350 }

3262 }

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

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

3352

3264

@@ -3355,11 +3267,23 @@ newtype FeatureSettings =

3355--

3267--

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

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

3357--

3269--

3270+-- * 'fsUseContainerOptimizedOS'

3271+--

3358-- * 'fsSplitHealthChecks'

3272-- * 'fsSplitHealthChecks'

3359featureSettings

3273featureSettings

3360 :: FeatureSettings

3274 :: FeatureSettings

3275+featureSettings =

3276+ FeatureSettings'

3361−featureSettings = FeatureSettings' {_fsSplitHealthChecks = Nothing}

3277+ {_fsUseContainerOptimizedOS = Nothing, _fsSplitHealthChecks = Nothing}

3278+

3362

3279

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

3363

3287

3364-- | Boolean value indicating if split health checks should be used instead

3288-- | Boolean value indicating if split health checks should be used instead

3365-- of the legacy health checks. At an app.yaml level, this means defaulting

3289-- of the legacy health checks. At an app.yaml level, this means defaulting

@@ -3375,13 +3299,17 @@ instance FromJSON FeatureSettings where

3375 parseJSON

3299 parseJSON

3376 = withObject "FeatureSettings"

3300 = withObject "FeatureSettings"

3377 (\ o ->

3301 (\ o ->

3302+ FeatureSettings' <$>

3303+ (o .:? "useContainerOptimizedOs") <*>

3378− FeatureSettings' <$> (o .:? "splitHealthChecks"))

3304+ (o .:? "splitHealthChecks"))

3379

3305

3380instance ToJSON FeatureSettings where

3306instance ToJSON FeatureSettings where

3381 toJSON FeatureSettings'{..}

3307 toJSON FeatureSettings'{..}

3382 = object

3308 = object

3383 (catMaybes

3309 (catMaybes

3310+ [("useContainerOptimizedOs" .=) <$>

3311+ _fsUseContainerOptimizedOS,

3384− [("splitHealthChecks" .=) <$> _fsSplitHealthChecks])

3312+ ("splitHealthChecks" .=) <$> _fsSplitHealthChecks])

3385

3313

3386-- | An SSL certificate obtained from a certificate authority.

3314-- | An SSL certificate obtained from a certificate authority.

3387--

3315--

@@ -4033,6 +3961,7 @@ data Version =

4033 , _verInstanceClass :: !(Maybe Text)

3961 , _verInstanceClass :: !(Maybe Text)

4034 , _verRuntimeChannel :: !(Maybe Text)

3962 , _verRuntimeChannel :: !(Maybe Text)

4035 , _verRuntimeMainExecutablePath :: !(Maybe Text)

3963 , _verRuntimeMainExecutablePath :: !(Maybe Text)

3964+ , _verVPCAccessConnector :: !(Maybe VPCAccessConnector)

4036 , _verHealthCheck :: !(Maybe HealthCheck)

3965 , _verHealthCheck :: !(Maybe HealthCheck)

4037 , _verEndpointsAPIService :: !(Maybe EndpointsAPIService)

3966 , _verEndpointsAPIService :: !(Maybe EndpointsAPIService)

4038 , _verEnv :: !(Maybe Text)

3967 , _verEnv :: !(Maybe Text)

@@ -4082,6 +4011,8 @@ data Version =

4082--

4011--

4083-- * 'verRuntimeMainExecutablePath'

4012-- * 'verRuntimeMainExecutablePath'

4084--

4013--

4014+-- * 'verVPCAccessConnector'

4015+--

4085-- * 'verHealthCheck'

4016-- * 'verHealthCheck'

4086--

4017--

4087-- * 'verEndpointsAPIService'

4018-- * 'verEndpointsAPIService'

@@ -4152,6 +4083,7 @@ version =

4152 , _verInstanceClass = Nothing

4083 , _verInstanceClass = Nothing

4153 , _verRuntimeChannel = Nothing

4084 , _verRuntimeChannel = Nothing

4154 , _verRuntimeMainExecutablePath = Nothing

4085 , _verRuntimeMainExecutablePath = Nothing

4086+ , _verVPCAccessConnector = Nothing

4155 , _verHealthCheck = Nothing

4087 , _verHealthCheck = Nothing

4156 , _verEndpointsAPIService = Nothing

4088 , _verEndpointsAPIService = Nothing

4157 , _verEnv = Nothing

4089 , _verEnv = Nothing

@@ -4221,6 +4153,12 @@ verRuntimeMainExecutablePath

4221 = lens _verRuntimeMainExecutablePath

4153 = lens _verRuntimeMainExecutablePath

4222 (\ s a -> s{_verRuntimeMainExecutablePath = a})

4154 (\ s a -> s{_verRuntimeMainExecutablePath = a})

4223

4155

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+

4224-- | Configures health checking for instances. Unhealthy instances are

4162-- | Configures health checking for instances. Unhealthy instances are

4225-- stopped and replaced with new instances. Only applicable in the App

4163-- stopped and replaced with new instances. Only applicable in the App

4226-- Engine flexible environment.Only returned in GET requests if view=FULL

4164-- Engine flexible environment.Only returned in GET requests if view=FULL

@@ -4243,7 +4181,7 @@ verEnv :: Lens' Version (Maybe Text)

4243verEnv = lens _verEnv (\ s a -> s{_verEnv = a})

4181verEnv = lens _verEnv (\ s a -> s{_verEnv = a})

4244

4182

4245-- | The Google Compute Engine zones that are supported by this version in

4183-- | The Google Compute Engine zones that are supported by this version in

4246−-- the App Engine flexible environment.

4184+-- the App Engine flexible environment. Deprecated.

4247verZones :: Lens' Version [Text]

4185verZones :: Lens' Version [Text]

4248verZones

4186verZones

4249 = lens _verZones (\ s a -> s{_verZones = a}) .

4187 = lens _verZones (\ s a -> s{_verZones = a}) .

@@ -4455,6 +4393,7 @@ instance FromJSON Version where

4455 (o .:? "instanceClass")

4393 (o .:? "instanceClass")

4456 <*> (o .:? "runtimeChannel")

4394 <*> (o .:? "runtimeChannel")

4457 <*> (o .:? "runtimeMainExecutablePath")

4395 <*> (o .:? "runtimeMainExecutablePath")

4396+ <*> (o .:? "vpcAccessConnector")

4458 <*> (o .:? "healthCheck")

4397 <*> (o .:? "healthCheck")

4459 <*> (o .:? "endpointsApiService")

4398 <*> (o .:? "endpointsApiService")

4460 <*> (o .:? "env")

4399 <*> (o .:? "env")

@@ -4497,6 +4436,7 @@ instance ToJSON Version where

4497 ("runtimeChannel" .=) <$> _verRuntimeChannel,

4436 ("runtimeChannel" .=) <$> _verRuntimeChannel,

4498 ("runtimeMainExecutablePath" .=) <$>

4437 ("runtimeMainExecutablePath" .=) <$>

4499 _verRuntimeMainExecutablePath,

4438 _verRuntimeMainExecutablePath,

4439+ ("vpcAccessConnector" .=) <$> _verVPCAccessConnector,

4500 ("healthCheck" .=) <$> _verHealthCheck,

4440 ("healthCheck" .=) <$> _verHealthCheck,

4501 ("endpointsApiService" .=) <$>

4441 ("endpointsApiService" .=) <$>

4502 _verEndpointsAPIService,

4442 _verEndpointsAPIService,

@@ -5038,17 +4978,15 @@ instance ToJSON LocationMetadata where

5038 ("flexibleEnvironmentAvailable" .=) <$>

4978 ("flexibleEnvironmentAvailable" .=) <$>

5039 _lmFlexibleEnvironmentAvailable])

4979 _lmFlexibleEnvironmentAvailable])

5040

4980

5041−-- | Metadata for the given google.longrunning.Operation.

4981+-- | Service-specific metadata associated with the operation. It typically

4982+-- contains progress information and common metadata such as create time.

4983+-- Some services might not provide such metadata. Any method that returns a

4984+-- long-running operation should document the metadata type, if any.

5042--

4985--

5043-- /See:/ 'operationMetadata' smart constructor.

4986-- /See:/ 'operationMetadata' smart constructor.

5044−data OperationMetadata =

4987+newtype OperationMetadata =

5045 OperationMetadata'

4988 OperationMetadata'

5046− { _omInsertTime :: !(Maybe DateTime')

4989+ { _omAddtional :: HashMap Text JSONValue

5047− , _omUser :: !(Maybe Text)

5048− , _omMethod :: !(Maybe Text)

5049− , _omEndTime :: !(Maybe DateTime')

5050− , _omOperationType :: !(Maybe Text)

5051− , _omTarget :: !(Maybe Text)

5052 }

4990 }

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

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

5054

4992

@@ -5057,83 +4995,27 @@ data OperationMetadata =

5057--

4995--

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

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

5059--

4997--

5060−-- * 'omInsertTime'

4998+-- * 'omAddtional'

5061−--

5062−-- * 'omUser'

5063−--

5064−-- * 'omMethod'

5065−--

5066−-- * 'omEndTime'

5067−--

5068−-- * 'omOperationType'

5069−--

5070−-- * 'omTarget'

5071operationMetadata

4999operationMetadata

5000+ :: HashMap Text JSONValue -- ^ 'omAddtional'

5072− :: OperationMetadata

5001+ -> OperationMetadata

5073−operationMetadata =

5002+operationMetadata pOmAddtional_ =

5074− OperationMetadata'

5075− { _omInsertTime = Nothing

5076− , _omUser = Nothing

5077− , _omMethod = Nothing

5078− , _omEndTime = Nothing

5079− , _omOperationType = Nothing

5080− , _omTarget = Nothing

5081− }

5082−

5083−

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)

5003+ OperationMetadata' {_omAddtional = _Coerce # pOmAddtional_}

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

5004

5105−-- | Type of this operation. Deprecated, use method field instead. Example:

5106−-- \"create_version\".\'OutputOnly

5107−omOperationType :: Lens' OperationMetadata (Maybe Text)

5108−omOperationType

5109− = lens _omOperationType

5110− (\ s a -> s{_omOperationType = a})

5111

5005

5112−-- | Name of the resource that this operation is acting on. Example:

5006+-- | Properties of the object. Contains field \'type with type URL.

5113−-- apps\/myapp\/modules\/default.\'OutputOnly

5114−omTarget :: Lens' OperationMetadata (Maybe Text)

5007+omAddtional :: Lens' OperationMetadata (HashMap Text JSONValue)

5115−omTarget = lens _omTarget (\ s a -> s{_omTarget = a})

5008+omAddtional

5009+ = lens _omAddtional (\ s a -> s{_omAddtional = a}) .

5010+ _Coerce

5116

5011

5117instance FromJSON OperationMetadata where

5012instance FromJSON OperationMetadata where

5118 parseJSON

5013 parseJSON

5119 = withObject "OperationMetadata"

5014 = withObject "OperationMetadata"

5120− (\ o ->

5121− OperationMetadata' <$>

5015+ (\ o -> OperationMetadata' <$> (parseJSONObject o))

5122− (o .:? "insertTime") <*> (o .:? "user") <*>

5123− (o .:? "method")

5124− <*> (o .:? "endTime")

5125− <*> (o .:? "operationType")

5126− <*> (o .:? "target"))

5127

5016

5128instance ToJSON OperationMetadata where

5017instance ToJSON OperationMetadata where

5129− toJSON OperationMetadata'{..}

5018+ toJSON = toJSON . _omAddtional

5130− = object

5131− (catMaybes

5132− [("insertTime" .=) <$> _omInsertTime,

5133− ("user" .=) <$> _omUser, ("method" .=) <$> _omMethod,

5134− ("endTime" .=) <$> _omEndTime,

5135− ("operationType" .=) <$> _omOperationType,

5136− ("target" .=) <$> _omTarget])

5137

5019

5138-- | Response message for Instances.ListInstances.

5020-- | Response message for Instances.ListInstances.

5139--

5021--

gogol-appengine/gen/Network/Google/Resource/AppEngine/Apps/Repair.hs+12

@@ -24,6 +24,12 @@

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.

27--

33--

28-- /See:/ <https://cloud.google.com/appengine/docs/admin-api/ App Engine Admin API Reference> for @appengine.apps.repair@.

34-- /See:/ <https://cloud.google.com/appengine/docs/admin-api/ App Engine Admin API Reference> for @appengine.apps.repair@.

29module Network.Google.Resource.AppEngine.Apps.Repair

35module Network.Google.Resource.AppEngine.Apps.Repair

@@ -67,6 +73,12 @@ type AppsRepairResource =

67-- application, for example a Cloud Storage bucket or App Engine service

73-- application, for example a Cloud Storage bucket or App Engine service

68-- account. Use this method if you receive an error message about a missing

74-- account. Use this method if you receive an error message about a missing

69-- feature, for example, Error retrieving the App Engine service account.

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

70--

82--

71-- /See:/ 'appsRepair' smart constructor.

83-- /See:/ 'appsRepair' smart constructor.

72data AppsRepair =

84data AppsRepair =

gogol-apps-activity/gen/Network/Google/Resource/AppsActivity/Activities/List.hs+5−4

@@ -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 visiblity settings of the

24+-- Visible activities are determined by the visibility 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 visiblity settings of the

72+-- Visible activities are determined by the visibility 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,8 +140,9 @@ alGroupingStrategy

140 = lens _alGroupingStrategy

140 = lens _alGroupingStrategy

141 (\ s a -> s{_alGroupingStrategy = a})

141 (\ s a -> s{_alGroupingStrategy = a})

142

142

143−-- | Indicates the user to return activity for. Use the special value me to

143+-- | The ID used for ACL checks (does not filter the resulting event list by

144+-- the assigned value). Use the special value me to indicate the currently

144−-- indicate the currently authenticated user.

145+-- authenticated user.

145alUserId :: Lens' ActivitiesList Text

146alUserId :: Lens' ActivitiesList Text

146alUserId = lens _alUserId (\ s a -> s{_alUserId = a})

147alUserId = lens _alUserId (\ s a -> s{_alUserId = a})

147

148

gogol-apps-calendar/gen/Network/Google/Resource/Calendar/Events/List.hs+11−11

@@ -205,11 +205,12 @@ 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 end time to filter by. Optional.

208+-- | Lower bound (inclusive) for an event\'s start time to filter by.

209−-- The default is not to filter by end time. Must be an RFC3339 timestamp

209+-- Optional. The default is not to filter by start time. Must be an RFC3339

210−-- with mandatory time zone offset, e.g., 2011-06-03T10:00:00-07:00,

210+-- timestamp with mandatory time zone offset, for example,

211−-- 2011-06-03T10:00:00Z. Milliseconds may be provided but will be ignored.

211+-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

212−-- If timeMax is set, timeMin must be smaller than timeMax.

212+-- provided but are ignored. If timeMax is set, timeMin must be smaller

213+-- than timeMax.

213elTimeMin :: Lens' EventsList (Maybe UTCTime)

214elTimeMin :: Lens' EventsList (Maybe UTCTime)

214elTimeMin

215elTimeMin

215 = lens _elTimeMin (\ s a -> s{_elTimeMin = a}) .

216 = lens _elTimeMin (\ s a -> s{_elTimeMin = a}) .

@@ -329,12 +330,11 @@ elAlwaysIncludeEmail

329 = lens _elAlwaysIncludeEmail

330 = lens _elAlwaysIncludeEmail

330 (\ s a -> s{_elAlwaysIncludeEmail = a})

331 (\ s a -> s{_elAlwaysIncludeEmail = a})

331

332

332−-- | Upper bound (exclusive) for an event\'s start time to filter by.

333+-- | Upper bound (exclusive) for an event\'s end time to filter by. Optional.

333−-- Optional. The default is not to filter by start time. Must be an RFC3339

334+-- The default is not to filter by end time. Must be an RFC3339 timestamp

334−-- timestamp with mandatory time zone offset, e.g.,

335+-- with mandatory time zone offset, for example, 2011-06-03T10:00:00-07:00,

335−-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

336+-- 2011-06-03T10:00:00Z. Milliseconds may be provided but are ignored. If

336−-- provided but will be ignored. If timeMin is set, timeMax must be greater

337+-- timeMin is set, timeMax must be greater than timeMin.

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,11 +215,12 @@ 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 end time to filter by. Optional.

218+-- | Lower bound (inclusive) for an event\'s start time to filter by.

219−-- The default is not to filter by end time. Must be an RFC3339 timestamp

219+-- Optional. The default is not to filter by start time. Must be an RFC3339

220−-- with mandatory time zone offset, e.g., 2011-06-03T10:00:00-07:00,

220+-- timestamp with mandatory time zone offset, for example,

221−-- 2011-06-03T10:00:00Z. Milliseconds may be provided but will be ignored.

221+-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

222−-- If timeMax is set, timeMin must be smaller than timeMax.

222+-- provided but are ignored. If timeMax is set, timeMin must be smaller

223+-- than timeMax.

223ewTimeMin :: Lens' EventsWatch (Maybe UTCTime)

224ewTimeMin :: Lens' EventsWatch (Maybe UTCTime)

224ewTimeMin

225ewTimeMin

225 = lens _ewTimeMin (\ s a -> s{_ewTimeMin = a}) .

226 = lens _ewTimeMin (\ s a -> s{_ewTimeMin = a}) .

@@ -344,12 +345,11 @@ ewAlwaysIncludeEmail

344 = lens _ewAlwaysIncludeEmail

345 = lens _ewAlwaysIncludeEmail

345 (\ s a -> s{_ewAlwaysIncludeEmail = a})

346 (\ s a -> s{_ewAlwaysIncludeEmail = a})

346

347

347−-- | Upper bound (exclusive) for an event\'s start time to filter by.

348+-- | Upper bound (exclusive) for an event\'s end time to filter by. Optional.

348−-- Optional. The default is not to filter by start time. Must be an RFC3339

349+-- The default is not to filter by end time. Must be an RFC3339 timestamp

349−-- timestamp with mandatory time zone offset, e.g.,

350+-- with mandatory time zone offset, for example, 2011-06-03T10:00:00-07:00,

350−-- 2011-06-03T10:00:00-07:00, 2011-06-03T10:00:00Z. Milliseconds may be

351+-- 2011-06-03T10:00:00Z. Milliseconds may be provided but are ignored. If

351−-- provided but will be ignored. If timeMin is set, timeMax must be greater

352+-- timeMin is set, timeMax must be greater than timeMin.

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+41−49

@@ -407,9 +407,11 @@ 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. This can be continuous numbers, with

410+-- | Customer contact phone number. Must start with \"+\" followed by the

411+-- country code. The rest of the number can be contiguous numbers or

412+-- respect the phone local format conventions, but it must be a real phone

411−-- spaces, etc. But it must be a real phone number and not, for example,

413+-- number and not, for example, \"123\". This field is silently ignored if

412−-- \"123\". See phone local format conventions.

414+-- invalid.

413cPhoneNumber :: Lens' Customer (Maybe Text)

415cPhoneNumber :: Lens' Customer (Maybe Text)

414cPhoneNumber

416cPhoneNumber

415 = lens _cPhoneNumber (\ s a -> s{_cPhoneNumber = a})

417 = lens _cPhoneNumber (\ s a -> s{_cPhoneNumber = a})

@@ -508,8 +510,9 @@ cprDealCode

508-- | The planName property is required. This is the name of the

510-- | The planName property is required. This is the name of the

509-- subscription\'s payment plan. For more information about the Google

511-- subscription\'s payment plan. For more information about the Google

510-- payment plans, see API concepts. Possible values are: -

512-- payment plans, see API concepts. Possible values are: -

511−-- ANNUAL_MONTHLY_PAY - The annual commitment plan with monthly payments -

513+-- ANNUAL_MONTHLY_PAY - The annual commitment plan with monthly payments

514+-- Caution: ANNUAL_MONTHLY_PAY is returned as ANNUAL in all API responses.

512−-- ANNUAL_YEARLY_PAY - The annual commitment plan with yearly payments -

515+-- - ANNUAL_YEARLY_PAY - The annual commitment plan with yearly payments -

513-- FLEXIBLE - The flexible plan - TRIAL - The 30-day free trial plan

516-- FLEXIBLE - The flexible plan - TRIAL - The 30-day free trial plan

514cprPlanName :: Lens' ChangePlanRequest (Maybe Text)

517cprPlanName :: Lens' ChangePlanRequest (Maybe Text)

515cprPlanName

518cprPlanName

@@ -551,7 +554,8 @@ instance ToJSON ChangePlanRequest where

551 ("seats" .=) <$> _cprSeats])

554 ("seats" .=) <$> _cprSeats])

552

555

553-- | In this version of the API, annual commitment plan\'s interval is one

556-- | In this version of the API, annual commitment plan\'s interval is one

554−-- year.

557+-- year. Note: When billingMethod value is OFFLINE, the subscription

558+-- property object plan.commitmentInterval is omitted in all API responses.

555--

559--

556-- /See:/ 'subscriptionPlanCommitmentInterval' smart constructor.

560-- /See:/ 'subscriptionPlanCommitmentInterval' smart constructor.

557data SubscriptionPlanCommitmentInterval =

561data SubscriptionPlanCommitmentInterval =

@@ -642,7 +646,8 @@ subscriptionPlan =

642

646

643

647

644-- | In this version of the API, annual commitment plan\'s interval is one

648-- | In this version of the API, annual commitment plan\'s interval is one

645−-- year.

649+-- year. Note: When billingMethod value is OFFLINE, the subscription

650+-- property object plan.commitmentInterval is omitted in all API responses.

646spCommitmentInterval :: Lens' SubscriptionPlan (Maybe SubscriptionPlanCommitmentInterval)

651spCommitmentInterval :: Lens' SubscriptionPlan (Maybe SubscriptionPlanCommitmentInterval)

647spCommitmentInterval

652spCommitmentInterval

648 = lens _spCommitmentInterval

653 = lens _spCommitmentInterval

@@ -659,14 +664,16 @@ spIsCommitmentPlan

659-- | The planName property is required. This is the name of the

664-- | The planName property is required. This is the name of the

660-- subscription\'s plan. For more information about the Google payment

665-- subscription\'s plan. For more information about the Google payment

661-- plans, see the API concepts. Possible values are: - ANNUAL_MONTHLY_PAY —

666-- plans, see the API concepts. Possible values are: - ANNUAL_MONTHLY_PAY —

662−-- The annual commitment plan with monthly payments - ANNUAL_YEARLY_PAY —

667+-- The annual commitment plan with monthly payments. Caution:

668+-- ANNUAL_MONTHLY_PAY is returned as ANNUAL in all API responses. -

663−-- The annual commitment plan with yearly payments - FLEXIBLE — The

669+-- ANNUAL_YEARLY_PAY — The annual commitment plan with yearly payments -

664−-- flexible plan - TRIAL — The 30-day free trial plan. A subscription in

670+-- FLEXIBLE — The flexible plan - TRIAL — The 30-day free trial plan. A

665−-- trial will be suspended after the 30th free day if no payment plan is

671+-- subscription in trial will be suspended after the 30th free day if no

666−-- assigned. Calling changePlan will assign a payment plan to a trial but

672+-- payment plan is assigned. Calling changePlan will assign a payment plan

667−-- will not activate the plan. A trial will automatically begin its

673+-- to a trial but will not activate the plan. A trial will automatically

668−-- assigned payment plan after its 30th free day or immediately after

674+-- begin its assigned payment plan after its 30th free day or immediately

669−-- calling startPaidService.

675+-- after calling startPaidService. - FREE — The free plan is exclusive to

676+-- the Cloud Identity SKU and does not incur any billing.

670spPlanName :: Lens' SubscriptionPlan (Maybe Text)

677spPlanName :: Lens' SubscriptionPlan (Maybe Text)

671spPlanName

678spPlanName

672 = lens _spPlanName (\ s a -> s{_spPlanName = a})

679 = lens _spPlanName (\ s a -> s{_spPlanName = a})

@@ -791,58 +798,43 @@ seats =

791 }

798 }

792

799

793

800

794−-- | The numberOfSeats property holds the customer\'s number of user

801+-- | This is a required property and is exclusive to subscriptions with

795−-- licenses. How a user\'s licenses are managed depends on the

802+-- ANNUAL_MONTHLY_PAY and ANNUAL_YEARLY_PAY plans. This property sets the

796−-- subscription\'s plan: - annual commitment plan (with monthly or yearly

803+-- maximum number of licenses assignable to users on a subscription. The

797−-- pay) — For this plan, a reseller is invoiced on the number of user

798−-- licenses in the numberOfSeats property. This is the maximum number of

799−-- user licenses that a reseller\'s customer can create. The reseller can

800−-- add more licenses, but once set, the numberOfSeats can not be reduced

804+-- reseller can add more licenses, but once set, the numberOfSeats cannot

801−-- until renewal. The reseller is invoiced based on the numberOfSeats value

805+-- be reduced until renewal. The reseller is invoiced based on the

802−-- regardless of how many of these user licenses are provisioned users. -

806+-- numberOfSeats value regardless of how many of these user licenses are

803−-- flexible plan — For this plan, a reseller is invoiced on the actual

807+-- assigned. Note: G Suite subscriptions automatically assign a license to

804−-- number of users which is capped by the maximumNumberOfSeats. The

808+-- every user.

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−-- | The maximumNumberOfSeats property is the maximum number of licenses that

815+-- | This is a required property and is exclusive to subscriptions with

816−-- the customer can purchase. This property applies to plans other than the

816+-- FLEXIBLE or TRIAL plans. This property sets the maximum number of

817−-- annual commitment plan. How a user\'s licenses are managed depends on

818−-- the subscription\'s payment plan: - annual commitment plan (with monthly

819−-- or yearly payments) — For this plan, a reseller is invoiced on the

820−-- number of user licenses in the numberOfSeats property. The

821−-- maximumNumberOfSeats property is a read-only property in the API\'s

822−-- response. - flexible plan — For this plan, a reseller is invoiced on the

823−-- actual number of users which is capped by the maximumNumberOfSeats. This

824−-- is the maximum number of user licenses a customer has for user license

825−-- provisioning. This quantity can be increased up to the maximum limit

817+-- licensed users allowed on a subscription. This quantity can be increased

826−-- defined in the reseller\'s contract. And the minimum quantity is the

818+-- up to the maximum limit defined in the reseller\'s contract. The minimum

827−-- current number of users in the customer account. - 30-day free trial

819+-- quantity is the current number of users in the customer account. Note: G

828−-- plan — A subscription in a 30-day free trial is restricted to maximum 10

820+-- Suite subscriptions automatically assign a license to every user.

829−-- seats.

830seaMaximumNumberOfSeats :: Lens' Seats (Maybe Int32)

821seaMaximumNumberOfSeats :: Lens' Seats (Maybe Int32)

831seaMaximumNumberOfSeats

822seaMaximumNumberOfSeats

832 = lens _seaMaximumNumberOfSeats

823 = lens _seaMaximumNumberOfSeats

833 (\ s a -> s{_seaMaximumNumberOfSeats = a})

824 (\ s a -> s{_seaMaximumNumberOfSeats = a})

834 . mapping _Coerce

825 . mapping _Coerce

835

826

836−-- | Read-only field containing the current number of licensed seats for

827+-- | Read-only field containing the current number of users that are assigned

837−-- FLEXIBLE Google-Apps subscriptions and secondary subscriptions such as

828+-- a license for the product defined in skuId. This field\'s value is

838−-- Google-Vault and Drive-storage.

829+-- equivalent to the numerical count of users returned by the Enterprise

830+-- License Manager API method: listForProductAndSku

839seaLicensedNumberOfSeats :: Lens' Seats (Maybe Int32)

831seaLicensedNumberOfSeats :: Lens' Seats (Maybe Int32)

840seaLicensedNumberOfSeats

832seaLicensedNumberOfSeats

841 = lens _seaLicensedNumberOfSeats

833 = lens _seaLicensedNumberOfSeats

842 (\ s a -> s{_seaLicensedNumberOfSeats = a})

834 (\ s a -> s{_seaLicensedNumberOfSeats = a})

843 . mapping _Coerce

835 . mapping _Coerce

844

836

845−-- | Identifies the resource as a subscription change plan request. Value:

837+-- | Identifies the resource as a subscription seat setting. Value:

846-- subscriptions#seats

838-- subscriptions#seats

847seaKind :: Lens' Seats Text

839seaKind :: Lens' Seats Text

848seaKind = lens _seaKind (\ s a -> s{_seaKind = a})

840seaKind = lens _seaKind (\ s a -> s{_seaKind = a})

gogol-apps-reseller/gen/Network/Google/AppsReseller/Types/Sum.hs−26

@@ -25,28 +25,6 @@ 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.

50 | TransferToDirect

28 | TransferToDirect

51 -- ^ @transfer_to_direct@

29 -- ^ @transfer_to_direct@

52 -- Transfers a subscription directly to Google.  The customer is

30 -- Transfers a subscription directly to Google.  The customer is

@@ -61,16 +39,12 @@ instance Hashable SubscriptionsDeleteDeletionType

61instance FromHttpApiData SubscriptionsDeleteDeletionType where

39instance FromHttpApiData SubscriptionsDeleteDeletionType where

62 parseQueryParam = \case

40 parseQueryParam = \case

63 "cancel" -> Right Cancel

41 "cancel" -> Right Cancel

64− "downgrade" -> Right Downgrade

65− "suspend" -> Right Suspend

66 "transfer_to_direct" -> Right TransferToDirect

42 "transfer_to_direct" -> Right TransferToDirect

67 x -> Left ("Unable to parse SubscriptionsDeleteDeletionType from: " <> x)

43 x -> Left ("Unable to parse SubscriptionsDeleteDeletionType from: " <> x)

68

44

69instance ToHttpApiData SubscriptionsDeleteDeletionType where

45instance ToHttpApiData SubscriptionsDeleteDeletionType where

70 toQueryParam = \case

46 toQueryParam = \case

71 Cancel -> "cancel"

47 Cancel -> "cancel"

72− Downgrade -> "downgrade"

73− Suspend -> "suspend"

74 TransferToDirect -> "transfer_to_direct"

48 TransferToDirect -> "transfer_to_direct"

75

49

76instance FromJSON SubscriptionsDeleteDeletionType where

50instance 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, suspend or transfer a subscription to direct.

23+-- Cancel 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, suspend or transfer a subscription to direct.

58+-- | Cancel 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−-- Lets you manage your tasks and task lists.

16+-- Manages 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 100.

85+-- is 20 (max allowed: 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 100.

198+-- is 20 (max allowed: 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− Lets you manage your tasks and task lists.

17+ Manages 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+47−30

@@ -214,6 +214,7 @@ module Network.Google.BigQuery

214 , jsCreationTime

214 , jsCreationTime

215 , jsStartTime

215 , jsStartTime

216 , jsCompletionRatio

216 , jsCompletionRatio

217+ , jsNumChildJobs

217 , jsTotalSlotMs

218 , jsTotalSlotMs

218 , jsLoad

219 , jsLoad

219 , jsTotalBytesProcessed

220 , jsTotalBytesProcessed

@@ -222,6 +223,7 @@ module Network.Google.BigQuery

222 , jsQuery

223 , jsQuery

223 , jsExtract

224 , jsExtract

224 , jsReservationUsage

225 , jsReservationUsage

226+ , jsParentJobId

225

227

226 -- ** JobConfigurationLabels

228 -- ** JobConfigurationLabels

227 , JobConfigurationLabels

229 , JobConfigurationLabels

@@ -300,6 +302,13 @@ module Network.Google.BigQuery

300 , mdmoLabels

302 , mdmoLabels

301 , mdmoLossType

303 , mdmoLossType

302

304

305+ -- ** RoutineReference

306+ , RoutineReference

307+ , routineReference

308+ , rrDataSetId

309+ , rrProjectId

310+ , rrRoutineId

311+

303 -- ** RangePartitioning

312 -- ** RangePartitioning

304 , RangePartitioning

313 , RangePartitioning

305 , rangePartitioning

314 , rangePartitioning

@@ -359,6 +368,19 @@ module Network.Google.BigQuery

359 -- ** JobsListProjection

368 -- ** JobsListProjection

360 , JobsListProjection (..)

369 , JobsListProjection (..)

361

370

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+

362 -- ** QueryParameter

384 -- ** QueryParameter

363 , QueryParameter

385 , QueryParameter

364 , queryParameter

386 , queryParameter

@@ -366,18 +388,10 @@ module Network.Google.BigQuery

366 , qpParameterType

388 , qpParameterType

367 , qpName

389 , qpName

368

390

369− -- ** IterationResult

370− , IterationResult

371− , iterationResult

372− , irDurationMs

373− , irLearnRate

374− , irEvalLoss

375− , irTrainingLoss

376− , irIndex

377−

378 -- ** JobStatistics4

391 -- ** JobStatistics4

379 , JobStatistics4

392 , JobStatistics4

380 , jobStatistics4

393 , jobStatistics4

394+ , jsInputBytes

381 , jsDestinationURIFileCounts

395 , jsDestinationURIFileCounts

382

396

383 -- ** ProjectReference

397 -- ** ProjectReference

@@ -418,19 +432,6 @@ module Network.Google.BigQuery

418 , eqsEndMs

432 , eqsEndMs

419 , eqsWaitMsMax

433 , eqsWaitMsMax

420

434

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−

434 -- ** BigQueryModelTraining

435 -- ** BigQueryModelTraining

435 , BigQueryModelTraining

436 , BigQueryModelTraining

436 , bigQueryModelTraining

437 , bigQueryModelTraining

@@ -507,6 +508,15 @@ module Network.Google.BigQuery

507 , plpiId

508 , plpiId

508 , plpiNumericId

509 , plpiNumericId

509

510

511+ -- ** BqmlIterationResult

512+ , BqmlIterationResult

513+ , bqmlIterationResult

514+ , birDurationMs

515+ , birLearnRate

516+ , birEvalLoss

517+ , birTrainingLoss

518+ , birIndex

519+

510 -- ** BigtableColumn

520 -- ** BigtableColumn

511 , BigtableColumn

521 , BigtableColumn

512 , bigtableColumn

522 , bigtableColumn

@@ -712,6 +722,7 @@ module Network.Google.BigQuery

712 , jModelTrainingExpectedTotalIteration

722 , jModelTrainingExpectedTotalIteration

713 , jModelTraining

723 , jModelTraining

714 , jTotalSlotMs

724 , jTotalSlotMs

725+ , jDdlTargetRoutine

715 , jDdlTargetTable

726 , jDdlTargetTable

716 , jEstimatedBytesProcessed

727 , jEstimatedBytesProcessed

717 , jModelTrainingCurrentIteration

728 , jModelTrainingCurrentIteration

@@ -752,6 +763,7 @@ module Network.Google.BigQuery

752 , DestinationTableProperties

763 , DestinationTableProperties

753 , destinationTableProperties

764 , destinationTableProperties

754 , dtpFriendlyName

765 , dtpFriendlyName

766+ , dtpLabels

755 , dtpDescription

767 , dtpDescription

756

768

757 -- ** DataSetAccessItem

769 -- ** DataSetAccessItem

@@ -765,6 +777,14 @@ module Network.Google.BigQuery

765 , dsaiView

777 , dsaiView

766 , dsaiUserByEmail

778 , dsaiUserByEmail

767

779

780+ -- ** BqmlTrainingRun

781+ , BqmlTrainingRun

782+ , bqmlTrainingRun

783+ , btrState

784+ , btrStartTime

785+ , btrIterationResults

786+ , btrTrainingOptions

787+

768 -- ** TableDataInsertAllResponse

788 -- ** TableDataInsertAllResponse

769 , TableDataInsertAllResponse

789 , TableDataInsertAllResponse

770 , tableDataInsertAllResponse

790 , tableDataInsertAllResponse

@@ -828,6 +848,11 @@ module Network.Google.BigQuery

828 , coEncoding

848 , coEncoding

829 , coFieldDelimiter

849 , coFieldDelimiter

830

850

851+ -- ** DestinationTablePropertiesLabels

852+ , DestinationTablePropertiesLabels

853+ , destinationTablePropertiesLabels

854+ , dtplAddtional

855+

831 -- ** JobStatistics3

856 -- ** JobStatistics3

832 , JobStatistics3

857 , JobStatistics3

833 , jobStatistics3

858 , jobStatistics3

@@ -857,14 +882,6 @@ module Network.Google.BigQuery

857 , dataSetListDataSetsItemLabels

882 , dataSetListDataSetsItemLabels

858 , dsldsilAddtional

883 , dsldsilAddtional

859

884

860− -- ** TrainingRun

861− , TrainingRun

862− , trainingRun

863− , trState

864− , trStartTime

865− , trIterationResults

866− , trTrainingOptions

867−

868 -- ** TableListTablesItemView

885 -- ** TableListTablesItemView

869 , TableListTablesItemView

886 , TableListTablesItemView

870 , tableListTablesItemView

887 , tableListTablesItemView

gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+47−30

@@ -139,6 +139,7 @@ module Network.Google.BigQuery.Types

139 , jsCreationTime

139 , jsCreationTime

140 , jsStartTime

140 , jsStartTime

141 , jsCompletionRatio

141 , jsCompletionRatio

142+ , jsNumChildJobs

142 , jsTotalSlotMs

143 , jsTotalSlotMs

143 , jsLoad

144 , jsLoad

144 , jsTotalBytesProcessed

145 , jsTotalBytesProcessed

@@ -147,6 +148,7 @@ module Network.Google.BigQuery.Types

147 , jsQuery

148 , jsQuery

148 , jsExtract

149 , jsExtract

149 , jsReservationUsage

150 , jsReservationUsage

151+ , jsParentJobId

150

152

151 -- * JobConfigurationLabels

153 -- * JobConfigurationLabels

152 , JobConfigurationLabels

154 , JobConfigurationLabels

@@ -225,6 +227,13 @@ module Network.Google.BigQuery.Types

225 , mdmoLabels

227 , mdmoLabels

226 , mdmoLossType

228 , mdmoLossType

227

229

230+ -- * RoutineReference

231+ , RoutineReference

232+ , routineReference

233+ , rrDataSetId

234+ , rrProjectId

235+ , rrRoutineId

236+

228 -- * RangePartitioning

237 -- * RangePartitioning

229 , RangePartitioning

238 , RangePartitioning

230 , rangePartitioning

239 , rangePartitioning

@@ -284,6 +293,19 @@ module Network.Google.BigQuery.Types

284 -- * JobsListProjection

293 -- * JobsListProjection

285 , JobsListProjection (..)

294 , JobsListProjection (..)

286

295

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+

287 -- * QueryParameter

309 -- * QueryParameter

288 , QueryParameter

310 , QueryParameter

289 , queryParameter

311 , queryParameter

@@ -291,18 +313,10 @@ module Network.Google.BigQuery.Types

291 , qpParameterType

313 , qpParameterType

292 , qpName

314 , qpName

293

315

294− -- * IterationResult

295− , IterationResult

296− , iterationResult

297− , irDurationMs

298− , irLearnRate

299− , irEvalLoss

300− , irTrainingLoss

301− , irIndex

302−

303 -- * JobStatistics4

316 -- * JobStatistics4

304 , JobStatistics4

317 , JobStatistics4

305 , jobStatistics4

318 , jobStatistics4

319+ , jsInputBytes

306 , jsDestinationURIFileCounts

320 , jsDestinationURIFileCounts

307

321

308 -- * ProjectReference

322 -- * ProjectReference

@@ -343,19 +357,6 @@ module Network.Google.BigQuery.Types

343 , eqsEndMs

357 , eqsEndMs

344 , eqsWaitMsMax

358 , eqsWaitMsMax

345

359

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−

359 -- * BigQueryModelTraining

360 -- * BigQueryModelTraining

360 , BigQueryModelTraining

361 , BigQueryModelTraining

361 , bigQueryModelTraining

362 , bigQueryModelTraining

@@ -432,6 +433,15 @@ module Network.Google.BigQuery.Types

432 , plpiId

433 , plpiId

433 , plpiNumericId

434 , plpiNumericId

434

435

436+ -- * BqmlIterationResult

437+ , BqmlIterationResult

438+ , bqmlIterationResult

439+ , birDurationMs

440+ , birLearnRate

441+ , birEvalLoss

442+ , birTrainingLoss

443+ , birIndex

444+

435 -- * BigtableColumn

445 -- * BigtableColumn

436 , BigtableColumn

446 , BigtableColumn

437 , bigtableColumn

447 , bigtableColumn

@@ -637,6 +647,7 @@ module Network.Google.BigQuery.Types

637 , jModelTrainingExpectedTotalIteration

647 , jModelTrainingExpectedTotalIteration

638 , jModelTraining

648 , jModelTraining

639 , jTotalSlotMs

649 , jTotalSlotMs

650+ , jDdlTargetRoutine

640 , jDdlTargetTable

651 , jDdlTargetTable

641 , jEstimatedBytesProcessed

652 , jEstimatedBytesProcessed

642 , jModelTrainingCurrentIteration

653 , jModelTrainingCurrentIteration

@@ -677,6 +688,7 @@ module Network.Google.BigQuery.Types

677 , DestinationTableProperties

688 , DestinationTableProperties

678 , destinationTableProperties

689 , destinationTableProperties

679 , dtpFriendlyName

690 , dtpFriendlyName

691+ , dtpLabels

680 , dtpDescription

692 , dtpDescription

681

693

682 -- * DataSetAccessItem

694 -- * DataSetAccessItem

@@ -690,6 +702,14 @@ module Network.Google.BigQuery.Types

690 , dsaiView

702 , dsaiView

691 , dsaiUserByEmail

703 , dsaiUserByEmail

692

704

705+ -- * BqmlTrainingRun

706+ , BqmlTrainingRun

707+ , bqmlTrainingRun

708+ , btrState

709+ , btrStartTime

710+ , btrIterationResults

711+ , btrTrainingOptions

712+

693 -- * TableDataInsertAllResponse

713 -- * TableDataInsertAllResponse

694 , TableDataInsertAllResponse

714 , TableDataInsertAllResponse

695 , tableDataInsertAllResponse

715 , tableDataInsertAllResponse

@@ -753,6 +773,11 @@ module Network.Google.BigQuery.Types

753 , coEncoding

773 , coEncoding

754 , coFieldDelimiter

774 , coFieldDelimiter

755

775

776+ -- * DestinationTablePropertiesLabels

777+ , DestinationTablePropertiesLabels

778+ , destinationTablePropertiesLabels

779+ , dtplAddtional

780+

756 -- * JobStatistics3

781 -- * JobStatistics3

757 , JobStatistics3

782 , JobStatistics3

758 , jobStatistics3

783 , jobStatistics3

@@ -782,14 +807,6 @@ module Network.Google.BigQuery.Types

782 , dataSetListDataSetsItemLabels

807 , dataSetListDataSetsItemLabels

783 , dsldsilAddtional

808 , dsldsilAddtional

784

809

785− -- * TrainingRun

786− , TrainingRun

787− , trainingRun

788− , trState

789− , trStartTime

790− , trIterationResults

791− , trTrainingOptions

792−

793 -- * TableListTablesItemView

810 -- * TableListTablesItemView

794 , TableListTablesItemView

811 , TableListTablesItemView

795 , tableListTablesItemView

812 , tableListTablesItemView

gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+519−338

@@ -1053,6 +1053,7 @@ 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))

1056 , _jsTotalSlotMs :: !(Maybe (Textual Int64))

1057 , _jsTotalSlotMs :: !(Maybe (Textual Int64))

1057 , _jsLoad :: !(Maybe JobStatistics3)

1058 , _jsLoad :: !(Maybe JobStatistics3)

1058 , _jsTotalBytesProcessed :: !(Maybe (Textual Int64))

1059 , _jsTotalBytesProcessed :: !(Maybe (Textual Int64))

@@ -1061,6 +1062,7 @@ data JobStatistics =

1061 , _jsQuery :: !(Maybe JobStatistics2)

1062 , _jsQuery :: !(Maybe JobStatistics2)

1062 , _jsExtract :: !(Maybe JobStatistics4)

1063 , _jsExtract :: !(Maybe JobStatistics4)

1063 , _jsReservationUsage :: !(Maybe [JobStatisticsReservationUsageItem])

1064 , _jsReservationUsage :: !(Maybe [JobStatisticsReservationUsageItem])

1065+ , _jsParentJobId :: !(Maybe Text)

1064 }

1066 }

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

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

1066

1068

@@ -1075,6 +1077,8 @@ data JobStatistics =

1075--

1077--

1076-- * 'jsCompletionRatio'

1078-- * 'jsCompletionRatio'

1077--

1079--

1080+-- * 'jsNumChildJobs'

1081+--

1078-- * 'jsTotalSlotMs'

1082-- * 'jsTotalSlotMs'

1079--

1083--

1080-- * 'jsLoad'

1084-- * 'jsLoad'

@@ -1090,6 +1094,8 @@ data JobStatistics =

1090-- * 'jsExtract'

1094-- * 'jsExtract'

1091--

1095--

1092-- * 'jsReservationUsage'

1096-- * 'jsReservationUsage'

1097+--

1098+-- * 'jsParentJobId'

1093jobStatistics

1099jobStatistics

1094 :: JobStatistics

1100 :: JobStatistics

1095jobStatistics =

1101jobStatistics =

@@ -1097,6 +1103,7 @@ jobStatistics =

1097 { _jsCreationTime = Nothing

1103 { _jsCreationTime = Nothing

1098 , _jsStartTime = Nothing

1104 , _jsStartTime = Nothing

1099 , _jsCompletionRatio = Nothing

1105 , _jsCompletionRatio = Nothing

1106+ , _jsNumChildJobs = Nothing

1100 , _jsTotalSlotMs = Nothing

1107 , _jsTotalSlotMs = Nothing

1101 , _jsLoad = Nothing

1108 , _jsLoad = Nothing

1102 , _jsTotalBytesProcessed = Nothing

1109 , _jsTotalBytesProcessed = Nothing

@@ -1105,6 +1112,7 @@ jobStatistics =

1105 , _jsQuery = Nothing

1112 , _jsQuery = Nothing

1106 , _jsExtract = Nothing

1113 , _jsExtract = Nothing

1107 , _jsReservationUsage = Nothing

1114 , _jsReservationUsage = Nothing

1115+ , _jsParentJobId = Nothing

1108 }

1116 }

1109

1117

1110

1118

@@ -1132,6 +1140,13 @@ jsCompletionRatio

1132 (\ s a -> s{_jsCompletionRatio = a})

1140 (\ s a -> s{_jsCompletionRatio = a})

1133 . mapping _Coerce

1141 . mapping _Coerce

1134

1142

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+

1135-- | [Output-only] Slot-milliseconds for the job.

1150-- | [Output-only] Slot-milliseconds for the job.

1136jsTotalSlotMs :: Lens' JobStatistics (Maybe Int64)

1151jsTotalSlotMs :: Lens' JobStatistics (Maybe Int64)

1137jsTotalSlotMs

1152jsTotalSlotMs

@@ -1183,6 +1198,12 @@ jsReservationUsage

1183 . _Default

1198 . _Default

1184 . _Coerce

1199 . _Coerce

1185

1200

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+

1186instance FromJSON JobStatistics where

1207instance FromJSON JobStatistics where

1187 parseJSON

1208 parseJSON

1188 = withObject "JobStatistics"

1209 = withObject "JobStatistics"

@@ -1190,6 +1211,7 @@ instance FromJSON JobStatistics where

1190 JobStatistics' <$>

1211 JobStatistics' <$>

1191 (o .:? "creationTime") <*> (o .:? "startTime") <*>

1212 (o .:? "creationTime") <*> (o .:? "startTime") <*>

1192 (o .:? "completionRatio")

1213 (o .:? "completionRatio")

1214+ <*> (o .:? "numChildJobs")

1193 <*> (o .:? "totalSlotMs")

1215 <*> (o .:? "totalSlotMs")

1194 <*> (o .:? "load")

1216 <*> (o .:? "load")

1195 <*> (o .:? "totalBytesProcessed")

1217 <*> (o .:? "totalBytesProcessed")

@@ -1197,7 +1219,8 @@ instance FromJSON JobStatistics where

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

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

1198 <*> (o .:? "query")

1220 <*> (o .:? "query")

1199 <*> (o .:? "extract")

1221 <*> (o .:? "extract")

1200− <*> (o .:? "reservationUsage" .!= mempty))

1222+ <*> (o .:? "reservationUsage" .!= mempty)

1223+ <*> (o .:? "parentJobId"))

1201

1224

1202instance ToJSON JobStatistics where

1225instance ToJSON JobStatistics where

1203 toJSON JobStatistics'{..}

1226 toJSON JobStatistics'{..}

@@ -1206,6 +1229,7 @@ instance ToJSON JobStatistics where

1206 [("creationTime" .=) <$> _jsCreationTime,

1229 [("creationTime" .=) <$> _jsCreationTime,

1207 ("startTime" .=) <$> _jsStartTime,

1230 ("startTime" .=) <$> _jsStartTime,

1208 ("completionRatio" .=) <$> _jsCompletionRatio,

1231 ("completionRatio" .=) <$> _jsCompletionRatio,

1232+ ("numChildJobs" .=) <$> _jsNumChildJobs,

1209 ("totalSlotMs" .=) <$> _jsTotalSlotMs,

1233 ("totalSlotMs" .=) <$> _jsTotalSlotMs,

1210 ("load" .=) <$> _jsLoad,

1234 ("load" .=) <$> _jsLoad,

1211 ("totalBytesProcessed" .=) <$>

1235 ("totalBytesProcessed" .=) <$>

@@ -1214,7 +1238,8 @@ instance ToJSON JobStatistics where

1214 ("endTime" .=) <$> _jsEndTime,

1238 ("endTime" .=) <$> _jsEndTime,

1215 ("query" .=) <$> _jsQuery,

1239 ("query" .=) <$> _jsQuery,

1216 ("extract" .=) <$> _jsExtract,

1240 ("extract" .=) <$> _jsExtract,

1217− ("reservationUsage" .=) <$> _jsReservationUsage])

1241+ ("reservationUsage" .=) <$> _jsReservationUsage,

1242+ ("parentJobId" .=) <$> _jsParentJobId])

1218

1243

1219-- | The labels associated with this job. You can use these to organize and

1244-- | The labels associated with this job. You can use these to organize and

1220-- group your jobs. Label keys and values can be no longer than 63

1245-- group your jobs. Label keys and values can be no longer than 63

@@ -2042,6 +2067,66 @@ instance ToJSON ModelDefinitionModelOptions where

2042 ("labels" .=) <$> _mdmoLabels,

2067 ("labels" .=) <$> _mdmoLabels,

2043 ("lossType" .=) <$> _mdmoLossType])

2068 ("lossType" .=) <$> _mdmoLossType])

2044

2069

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+

2045--

2130--

2046-- /See:/ 'rangePartitioning' smart constructor.

2131-- /See:/ 'rangePartitioning' smart constructor.

2047data RangePartitioning =

2132data RangePartitioning =

@@ -2657,6 +2742,146 @@ instance ToJSON QueryRequest where

2657 ("maxResults" .=) <$> _qrMaxResults,

2742 ("maxResults" .=) <$> _qrMaxResults,

2658 ("defaultDataset" .=) <$> _qrDefaultDataSet])

2743 ("defaultDataset" .=) <$> _qrDefaultDataSet])

2659

2744

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+

2660--

2885--

2661-- /See:/ 'queryParameter' smart constructor.

2886-- /See:/ 'queryParameter' smart constructor.

2662data QueryParameter =

2887data QueryParameter =

@@ -2717,109 +2942,12 @@ instance ToJSON QueryParameter where

2717 ("parameterType" .=) <$> _qpParameterType,

2942 ("parameterType" .=) <$> _qpParameterType,

2718 ("name" .=) <$> _qpName])

2943 ("name" .=) <$> _qpName])

2719

2944

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−

2818--

2945--

2819-- /See:/ 'jobStatistics4' smart constructor.

2946-- /See:/ 'jobStatistics4' smart constructor.

2820−newtype JobStatistics4 =

2947+data JobStatistics4 =

2821 JobStatistics4'

2948 JobStatistics4'

2949+ { _jsInputBytes :: !(Maybe (Textual Int64))

2822− { _jsDestinationURIFileCounts :: Maybe [Textual Int64]

2950+ , _jsDestinationURIFileCounts :: !(Maybe [Textual Int64])

2823 }

2951 }

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

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

2825

2953

@@ -2828,11 +2956,22 @@ newtype JobStatistics4 =

2828--

2956--

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

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

2830--

2958--

2959+-- * 'jsInputBytes'

2960+--

2831-- * 'jsDestinationURIFileCounts'

2961-- * 'jsDestinationURIFileCounts'

2832jobStatistics4

2962jobStatistics4

2833 :: JobStatistics4

2963 :: JobStatistics4

2964+jobStatistics4 =

2965+ JobStatistics4'

2834−jobStatistics4 = JobStatistics4' {_jsDestinationURIFileCounts = Nothing}

2966+ {_jsInputBytes = Nothing, _jsDestinationURIFileCounts = Nothing}

2967+

2835

2968

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

2836

2975

2837-- | [Output-only] Number of files per destination URI or URI pattern

2976-- | [Output-only] Number of files per destination URI or URI pattern

2838-- specified in the extract configuration. These values will be in the same

2977-- specified in the extract configuration. These values will be in the same

@@ -2849,13 +2988,15 @@ instance FromJSON JobStatistics4 where

2849 = withObject "JobStatistics4"

2988 = withObject "JobStatistics4"

2850 (\ o ->

2989 (\ o ->

2851 JobStatistics4' <$>

2990 JobStatistics4' <$>

2991+ (o .:? "inputBytes") <*>

2852− (o .:? "destinationUriFileCounts" .!= mempty))

2992+ (o .:? "destinationUriFileCounts" .!= mempty))

2853

2993

2854instance ToJSON JobStatistics4 where

2994instance ToJSON JobStatistics4 where

2855 toJSON JobStatistics4'{..}

2995 toJSON JobStatistics4'{..}

2856 = object

2996 = object

2857 (catMaybes

2997 (catMaybes

2998+ [("inputBytes" .=) <$> _jsInputBytes,

2858− [("destinationUriFileCounts" .=) <$>

2999+ ("destinationUriFileCounts" .=) <$>

2859 _jsDestinationURIFileCounts])

3000 _jsDestinationURIFileCounts])

2860

3001

2861--

3002--

@@ -3290,145 +3431,6 @@ instance ToJSON ExplainQueryStage where

3290 ("endMs" .=) <$> _eqsEndMs,

3431 ("endMs" .=) <$> _eqsEndMs,

3291 ("waitMsMax" .=) <$> _eqsWaitMsMax])

3432 ("waitMsMax" .=) <$> _eqsWaitMsMax])

3292

3433

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−

3432--

3434--

3433-- /See:/ 'bigQueryModelTraining' smart constructor.

3435-- /See:/ 'bigQueryModelTraining' smart constructor.

3434data BigQueryModelTraining =

3436data BigQueryModelTraining =

@@ -4279,6 +4281,105 @@ instance ToJSON ProjectListProjectsItem where

4279 ("id" .=) <$> _plpiId,

4281 ("id" .=) <$> _plpiId,

4280 ("numericId" .=) <$> _plpiNumericId])

4282 ("numericId" .=) <$> _plpiNumericId])

4281

4283

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+

4282--

4383--

4283-- /See:/ 'bigtableColumn' smart constructor.

4384-- /See:/ 'bigtableColumn' smart constructor.

4284data BigtableColumn =

4385data BigtableColumn =

@@ -5267,7 +5368,7 @@ instance ToJSON JobConfigurationExtract where

5267data ModelDefinition =

5368data ModelDefinition =

5268 ModelDefinition'

5369 ModelDefinition'

5269 { _mdModelOptions :: !(Maybe ModelDefinitionModelOptions)

5370 { _mdModelOptions :: !(Maybe ModelDefinitionModelOptions)

5270− , _mdTrainingRuns :: !(Maybe [TrainingRun])

5371+ , _mdTrainingRuns :: !(Maybe [BqmlTrainingRun])

5271 }

5372 }

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

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

5273

5374

@@ -5297,7 +5398,7 @@ mdModelOptions

5297-- run comprises of multiple iterations and there may be multiple training

5398-- run comprises of multiple iterations and there may be multiple training

5298-- runs for the model if warm start is used or if a user decides to

5399-- runs for the model if warm start is used or if a user decides to

5299-- continue a previously cancelled query.

5400-- continue a previously cancelled query.

5300−mdTrainingRuns :: Lens' ModelDefinition [TrainingRun]

5401+mdTrainingRuns :: Lens' ModelDefinition [BqmlTrainingRun]

5301mdTrainingRuns

5402mdTrainingRuns

5302 = lens _mdTrainingRuns

5403 = lens _mdTrainingRuns

5303 (\ s a -> s{_mdTrainingRuns = a})

5404 (\ s a -> s{_mdTrainingRuns = a})

@@ -6262,6 +6363,7 @@ data JobStatistics2 =

6262 { _jModelTrainingExpectedTotalIteration :: !(Maybe (Textual Int64))

6363 { _jModelTrainingExpectedTotalIteration :: !(Maybe (Textual Int64))

6263 , _jModelTraining :: !(Maybe BigQueryModelTraining)

6364 , _jModelTraining :: !(Maybe BigQueryModelTraining)

6264 , _jTotalSlotMs :: !(Maybe (Textual Int64))

6365 , _jTotalSlotMs :: !(Maybe (Textual Int64))

6366+ , _jDdlTargetRoutine :: !(Maybe RoutineReference)

6265 , _jDdlTargetTable :: !(Maybe TableReference)

6367 , _jDdlTargetTable :: !(Maybe TableReference)

6266 , _jEstimatedBytesProcessed :: !(Maybe (Textual Int64))

6368 , _jEstimatedBytesProcessed :: !(Maybe (Textual Int64))

6267 , _jModelTrainingCurrentIteration :: !(Maybe (Textual Int32))

6369 , _jModelTrainingCurrentIteration :: !(Maybe (Textual Int32))

@@ -6294,6 +6396,8 @@ data JobStatistics2 =

6294--

6396--

6295-- * 'jTotalSlotMs'

6397-- * 'jTotalSlotMs'

6296--

6398--

6399+-- * 'jDdlTargetRoutine'

6400+--

6297-- * 'jDdlTargetTable'

6401-- * 'jDdlTargetTable'

6298--

6402--

6299-- * 'jEstimatedBytesProcessed'

6403-- * 'jEstimatedBytesProcessed'

@@ -6336,6 +6440,7 @@ jobStatistics2 =

6336 { _jModelTrainingExpectedTotalIteration = Nothing

6440 { _jModelTrainingExpectedTotalIteration = Nothing

6337 , _jModelTraining = Nothing

6441 , _jModelTraining = Nothing

6338 , _jTotalSlotMs = Nothing

6442 , _jTotalSlotMs = Nothing

6443+ , _jDdlTargetRoutine = Nothing

6339 , _jDdlTargetTable = Nothing

6444 , _jDdlTargetTable = Nothing

6340 , _jEstimatedBytesProcessed = Nothing

6445 , _jEstimatedBytesProcessed = Nothing

6341 , _jModelTrainingCurrentIteration = Nothing

6446 , _jModelTrainingCurrentIteration = Nothing

@@ -6377,6 +6482,13 @@ jTotalSlotMs

6377 = lens _jTotalSlotMs (\ s a -> s{_jTotalSlotMs = a})

6482 = lens _jTotalSlotMs (\ s a -> s{_jTotalSlotMs = a})

6378 . mapping _Coerce

6483 . mapping _Coerce

6379

6484

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+

6380-- | The DDL target table. Present only for CREATE\/DROP TABLE\/VIEW queries.

6492-- | The DDL target table. Present only for CREATE\/DROP TABLE\/VIEW queries.

6381jDdlTargetTable :: Lens' JobStatistics2 (Maybe TableReference)

6493jDdlTargetTable :: Lens' JobStatistics2 (Maybe TableReference)

6382jDdlTargetTable

6494jDdlTargetTable

@@ -6419,7 +6531,7 @@ jBillingTier

6419-- this field specifies the accuracy of the estimate. Possible values can

6531-- this field specifies the accuracy of the estimate. Possible values can

6420-- be: UNKNOWN: accuracy of the estimate is unknown. PRECISE: estimate is

6532-- be: UNKNOWN: accuracy of the estimate is unknown. PRECISE: estimate is

6421-- precise. LOWER_BOUND: estimate is lower bound of what the query would

6533-- precise. LOWER_BOUND: estimate is lower bound of what the query would

6422−-- cost. UPPER_BOUND: estiamte is upper bound of what the query would cost.

6534+-- cost. UPPER_BOUND: estimate is upper bound of what the query would cost.

6423jTotalBytesProcessedAccuracy :: Lens' JobStatistics2 (Maybe Text)

6535jTotalBytesProcessedAccuracy :: Lens' JobStatistics2 (Maybe Text)

6424jTotalBytesProcessedAccuracy

6536jTotalBytesProcessedAccuracy

6425 = lens _jTotalBytesProcessedAccuracy

6537 = lens _jTotalBytesProcessedAccuracy

@@ -6457,7 +6569,9 @@ jReferencedTables

6457-- \"CREATE_TABLE_AS_SELECT\": CREATE [OR REPLACE] TABLE ... AS SELECT ...

6569-- \"CREATE_TABLE_AS_SELECT\": CREATE [OR REPLACE] TABLE ... AS SELECT ...

6458-- . \"DROP_TABLE\": DROP TABLE query. \"CREATE_VIEW\": CREATE [OR REPLACE]

6570-- . \"DROP_TABLE\": DROP TABLE query. \"CREATE_VIEW\": CREATE [OR REPLACE]

6459-- VIEW ... AS SELECT ... . \"DROP_VIEW\": DROP VIEW query.

6571-- VIEW ... AS SELECT ... . \"DROP_VIEW\": DROP VIEW query.

6572+-- \"CREATE_FUNCTION\": CREATE FUNCTION query. \"DROP_FUNCTION\" : DROP

6460−-- \"ALTER_TABLE\": ALTER TABLE query. \"ALTER_VIEW\": ALTER VIEW query.

6573+-- FUNCTION query. \"ALTER_TABLE\": ALTER TABLE query. \"ALTER_VIEW\":

6574+-- ALTER VIEW query.

6461jStatementType :: Lens' JobStatistics2 (Maybe Text)

6575jStatementType :: Lens' JobStatistics2 (Maybe Text)

6462jStatementType

6576jStatementType

6463 = lens _jStatementType

6577 = lens _jStatementType

@@ -6534,6 +6648,7 @@ instance FromJSON JobStatistics2 where

6534 (o .:? "modelTrainingExpectedTotalIteration") <*>

6648 (o .:? "modelTrainingExpectedTotalIteration") <*>

6535 (o .:? "modelTraining")

6649 (o .:? "modelTraining")

6536 <*> (o .:? "totalSlotMs")

6650 <*> (o .:? "totalSlotMs")

6651+ <*> (o .:? "ddlTargetRoutine")

6537 <*> (o .:? "ddlTargetTable")

6652 <*> (o .:? "ddlTargetTable")

6538 <*> (o .:? "estimatedBytesProcessed")

6653 <*> (o .:? "estimatedBytesProcessed")

6539 <*> (o .:? "modelTrainingCurrentIteration")

6654 <*> (o .:? "modelTrainingCurrentIteration")

@@ -6561,6 +6676,7 @@ instance ToJSON JobStatistics2 where

6561 _jModelTrainingExpectedTotalIteration,

6676 _jModelTrainingExpectedTotalIteration,

6562 ("modelTraining" .=) <$> _jModelTraining,

6677 ("modelTraining" .=) <$> _jModelTraining,

6563 ("totalSlotMs" .=) <$> _jTotalSlotMs,

6678 ("totalSlotMs" .=) <$> _jTotalSlotMs,

6679+ ("ddlTargetRoutine" .=) <$> _jDdlTargetRoutine,

6564 ("ddlTargetTable" .=) <$> _jDdlTargetTable,

6680 ("ddlTargetTable" .=) <$> _jDdlTargetTable,

6565 ("estimatedBytesProcessed" .=) <$>

6681 ("estimatedBytesProcessed" .=) <$>

6566 _jEstimatedBytesProcessed,

6682 _jEstimatedBytesProcessed,

@@ -6735,6 +6851,7 @@ instance ToJSON TableLabels where

6735data DestinationTableProperties =

6851data DestinationTableProperties =

6736 DestinationTableProperties'

6852 DestinationTableProperties'

6737 { _dtpFriendlyName :: !(Maybe Text)

6853 { _dtpFriendlyName :: !(Maybe Text)

6854+ , _dtpLabels :: !(Maybe DestinationTablePropertiesLabels)

6738 , _dtpDescription :: !(Maybe Text)

6855 , _dtpDescription :: !(Maybe Text)

6739 }

6856 }

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

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

@@ -6746,12 +6863,17 @@ data DestinationTableProperties =

6746--

6863--

6747-- * 'dtpFriendlyName'

6864-- * 'dtpFriendlyName'

6748--

6865--

6866+-- * 'dtpLabels'

6867+--

6749-- * 'dtpDescription'

6868-- * 'dtpDescription'

6750destinationTableProperties

6869destinationTableProperties

6751 :: DestinationTableProperties

6870 :: DestinationTableProperties

6752destinationTableProperties =

6871destinationTableProperties =

6753 DestinationTableProperties'

6872 DestinationTableProperties'

6754− {_dtpFriendlyName = Nothing, _dtpDescription = Nothing}

6873+ { _dtpFriendlyName = Nothing

6874+ , _dtpLabels = Nothing

6875+ , _dtpDescription = Nothing

6876+ }

6755

6877

6756

6878

6757-- | [Optional] The friendly name for the destination table. This will only

6879-- | [Optional] The friendly name for the destination table. This will only

@@ -6763,6 +6885,15 @@ dtpFriendlyName

6763 = lens _dtpFriendlyName

6885 = lens _dtpFriendlyName

6764 (\ s a -> s{_dtpFriendlyName = a})

6886 (\ s a -> s{_dtpFriendlyName = a})

6765

6887

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+

6766-- | [Optional] The description for the destination table. This will only be

6897-- | [Optional] The description for the destination table. This will only be

6767-- used if the destination table is newly created. If the table already

6898-- used if the destination table is newly created. If the table already

6768-- exists and a value different than the current description is provided,

6899-- exists and a value different than the current description is provided,

@@ -6777,13 +6908,15 @@ instance FromJSON DestinationTableProperties where

6777 = withObject "DestinationTableProperties"

6908 = withObject "DestinationTableProperties"

6778 (\ o ->

6909 (\ o ->

6779 DestinationTableProperties' <$>

6910 DestinationTableProperties' <$>

6780− (o .:? "friendlyName") <*> (o .:? "description"))

6911+ (o .:? "friendlyName") <*> (o .:? "labels") <*>

6912+ (o .:? "description"))

6781

6913

6782instance ToJSON DestinationTableProperties where

6914instance ToJSON DestinationTableProperties where

6783 toJSON DestinationTableProperties'{..}

6915 toJSON DestinationTableProperties'{..}

6784 = object

6916 = object

6785 (catMaybes

6917 (catMaybes

6786 [("friendlyName" .=) <$> _dtpFriendlyName,

6918 [("friendlyName" .=) <$> _dtpFriendlyName,

6919+ ("labels" .=) <$> _dtpLabels,

6787 ("description" .=) <$> _dtpDescription])

6920 ("description" .=) <$> _dtpDescription])

6788

6921

6789--

6922--

@@ -6856,9 +6989,13 @@ dsaiSpecialGroup

6856 = lens _dsaiSpecialGroup

6989 = lens _dsaiSpecialGroup

6857 (\ s a -> s{_dsaiSpecialGroup = a})

6990 (\ s a -> s{_dsaiSpecialGroup = a})

6858

6991

6859−-- | [Required] Describes the rights granted to the user specified by the

6992+-- | [Required] An IAM role ID that should be granted to the user, group, or

6860−-- other member of the access object. The following string values are

6993+-- domain specified in this access entry. The following legacy mappings

6861−-- supported: READER, WRITER, OWNER.

6994+-- will be applied: OWNER roles\/bigquery.dataOwner WRITER

6995+-- roles\/bigquery.dataEditor READER roles\/bigquery.dataViewer This field

6996+-- will accept any of the above formats, but will return only the legacy

6997+-- format. For example, if you set this field to

6998+-- \"roles\/bigquery.dataOwner\", it will be returned back as \"OWNER\".

6862dsaiRole :: Lens' DataSetAccessItem (Maybe Text)

6999dsaiRole :: Lens' DataSetAccessItem (Maybe Text)

6863dsaiRole = lens _dsaiRole (\ s a -> s{_dsaiRole = a})

7000dsaiRole = lens _dsaiRole (\ s a -> s{_dsaiRole = a})

6864

7001

@@ -6909,6 +7046,91 @@ instance ToJSON DataSetAccessItem where

6909 ("view" .=) <$> _dsaiView,

7046 ("view" .=) <$> _dsaiView,

6910 ("userByEmail" .=) <$> _dsaiUserByEmail])

7047 ("userByEmail" .=) <$> _dsaiUserByEmail])

6911

7048

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+

6912--

7134--

6913-- /See:/ 'tableDataInsertAllResponse' smart constructor.

7135-- /See:/ 'tableDataInsertAllResponse' smart constructor.

6914data TableDataInsertAllResponse =

7136data TableDataInsertAllResponse =

@@ -7606,6 +7828,50 @@ instance ToJSON CSVOptions where

7606 ("encoding" .=) <$> _coEncoding,

7828 ("encoding" .=) <$> _coEncoding,

7607 ("fieldDelimiter" .=) <$> _coFieldDelimiter])

7829 ("fieldDelimiter" .=) <$> _coFieldDelimiter])

7608

7830

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+

7609--

7875--

7610-- /See:/ 'jobStatistics3' smart constructor.

7876-- /See:/ 'jobStatistics3' smart constructor.

7611data JobStatistics3 =

7877data JobStatistics3 =

@@ -7913,91 +8179,6 @@ instance FromJSON DataSetListDataSetsItemLabels where

7913instance ToJSON DataSetListDataSetsItemLabels where

8179instance ToJSON DataSetListDataSetsItemLabels where

7914 toJSON = toJSON . _dsldsilAddtional

8180 toJSON = toJSON . _dsldsilAddtional

7915

8181

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−

8001-- | Additional details for a view.

8182-- | Additional details for a view.

8002--

8183--

8003-- /See:/ 'tableListTablesItemView' smart constructor.

8184-- /See:/ 'tableListTablesItemView' smart constructor.

gogol-bigquerydatatransfer/gen/Network/Google/BigQueryDataTransfer.hs+43−15

@@ -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−-- Transfers data from partner SaaS applications to Google BigQuery on a

16+-- Schedule queries or transfer external data from SaaS applications to

17−-- scheduled, managed basis.

17+-- Google BigQuery on a regular 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,6 +86,9 @@ 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+

89 -- ** bigquerydatatransfer.projects.transferConfigs.create

92 -- ** bigquerydatatransfer.projects.transferConfigs.create

90 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

93 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

91

94

@@ -116,6 +119,9 @@ module Network.Google.BigQueryDataTransfer

116 -- ** bigquerydatatransfer.projects.transferConfigs.scheduleRuns

119 -- ** bigquerydatatransfer.projects.transferConfigs.scheduleRuns

117 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

120 , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

118

121

122+ -- ** bigquerydatatransfer.projects.transferConfigs.startManualRuns

123+ , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

124+

119 -- * Types

125 -- * Types

120

126

121 -- ** DataSourceParameterType

127 -- ** DataSourceParameterType

@@ -134,22 +140,28 @@ module Network.Google.BigQueryDataTransfer

134 , llrNextPageToken

140 , llrNextPageToken

135 , llrLocations

141 , llrLocations

136

142

143+ -- ** TimeRange

144+ , TimeRange

145+ , timeRange

146+ , trStartTime

147+ , trEndTime

148+

137 -- ** TransferRun

149 -- ** TransferRun

138 , TransferRun

150 , TransferRun

139 , transferRun

151 , transferRun

140− , trRunTime

152+ , tRunTime

141− , trErrorStatus

153+ , tErrorStatus

142− , trState

154+ , tState

143− , trSchedule

155+ , tSchedule

144− , trStartTime

156+ , tStartTime

145− , trScheduleTime

157+ , tScheduleTime

146− , trDataSourceId

158+ , tDataSourceId

147− , trParams

159+ , tParams

148− , trUserId

160+ , tUserId

149− , trUpdateTime

161+ , tUpdateTime

150− , trName

162+ , tName

151− , trEndTime

163+ , tEndTime

152− , trDestinationDataSetId

164+ , tDestinationDataSetId

153

165

154 -- ** CheckValidCredsRequest

166 -- ** CheckValidCredsRequest

155 , CheckValidCredsRequest

167 , CheckValidCredsRequest

@@ -246,6 +258,12 @@ module Network.Google.BigQueryDataTransfer

246 , ldsrNextPageToken

258 , ldsrNextPageToken

247 , ldsrDataSources

259 , ldsrDataSources

248

260

261+ -- ** StartManualTransferRunsRequest

262+ , StartManualTransferRunsRequest

263+ , startManualTransferRunsRequest

264+ , smtrrRequestedRunTime

265+ , smtrrRequestedTimeRange

266+

249 -- ** Xgafv

267 -- ** Xgafv

250 , Xgafv (..)

268 , Xgafv (..)

251

269

@@ -292,6 +310,11 @@ module Network.Google.BigQueryDataTransfer

292 , locationLabels

310 , locationLabels

293 , llAddtional

311 , llAddtional

294

312

313+ -- ** StartManualTransferRunsResponse

314+ , StartManualTransferRunsResponse

315+ , startManualTransferRunsResponse

316+ , smtrrRuns

317+

295 -- ** LocationMetadata

318 -- ** LocationMetadata

296 , LocationMetadata

319 , LocationMetadata

297 , locationMetadata

320 , locationMetadata

@@ -348,6 +371,7 @@ import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations

348import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List

371import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List

349import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List

372import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List

350import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

373import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns

374+import Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns

351import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

375import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

352import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

376import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

353import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

377import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

@@ -358,6 +382,7 @@ import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferC

358import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

382import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

359import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

383import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

360import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

384import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

385+import Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

361

386

362{- $resources

387{- $resources

363TODO

388TODO

@@ -375,6 +400,7 @@ type BigQueryDataTransferAPI =

375 :<|> ProjectsTransferConfigsRunsDeleteResource

400 :<|> ProjectsTransferConfigsRunsDeleteResource

376 :<|> ProjectsTransferConfigsScheduleRunsResource

401 :<|> ProjectsTransferConfigsScheduleRunsResource

377 :<|> ProjectsTransferConfigsListResource

402 :<|> ProjectsTransferConfigsListResource

403+ :<|> ProjectsTransferConfigsStartManualRunsResource

378 :<|> ProjectsTransferConfigsPatchResource

404 :<|> ProjectsTransferConfigsPatchResource

379 :<|> ProjectsTransferConfigsGetResource

405 :<|> ProjectsTransferConfigsGetResource

380 :<|> ProjectsTransferConfigsCreateResource

406 :<|> ProjectsTransferConfigsCreateResource

@@ -392,6 +418,8 @@ type BigQueryDataTransferAPI =

392 :<|>

418 :<|>

393 ProjectsLocationsTransferConfigsScheduleRunsResource

419 ProjectsLocationsTransferConfigsScheduleRunsResource

394 :<|> ProjectsLocationsTransferConfigsListResource

420 :<|> ProjectsLocationsTransferConfigsListResource

421+ :<|>

422+ ProjectsLocationsTransferConfigsStartManualRunsResource

395 :<|> ProjectsLocationsTransferConfigsPatchResource

423 :<|> ProjectsLocationsTransferConfigsPatchResource

396 :<|> ProjectsLocationsTransferConfigsGetResource

424 :<|> ProjectsLocationsTransferConfigsGetResource

397 :<|> ProjectsLocationsTransferConfigsCreateResource

425 :<|> ProjectsLocationsTransferConfigsCreateResource

gogol-bigquerydatatransfer/gen/Network/Google/BigQueryDataTransfer/Types.hs+30−13

@@ -40,22 +40,28 @@ 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+

43 -- * TransferRun

49 -- * TransferRun

44 , TransferRun

50 , TransferRun

45 , transferRun

51 , transferRun

46− , trRunTime

52+ , tRunTime

47− , trErrorStatus

53+ , tErrorStatus

48− , trState

54+ , tState

49− , trSchedule

55+ , tSchedule

50− , trStartTime

56+ , tStartTime

51− , trScheduleTime

57+ , tScheduleTime

52− , trDataSourceId

58+ , tDataSourceId

53− , trParams

59+ , tParams

54− , trUserId

60+ , tUserId

55− , trUpdateTime

61+ , tUpdateTime

56− , trName

62+ , tName

57− , trEndTime

63+ , tEndTime

58− , trDestinationDataSetId

64+ , tDestinationDataSetId

59

65

60 -- * CheckValidCredsRequest

66 -- * CheckValidCredsRequest

61 , CheckValidCredsRequest

67 , CheckValidCredsRequest

@@ -152,6 +158,12 @@ module Network.Google.BigQueryDataTransfer.Types

152 , ldsrNextPageToken

158 , ldsrNextPageToken

153 , ldsrDataSources

159 , ldsrDataSources

154

160

161+ -- * StartManualTransferRunsRequest

162+ , StartManualTransferRunsRequest

163+ , startManualTransferRunsRequest

164+ , smtrrRequestedRunTime

165+ , smtrrRequestedTimeRange

166+

155 -- * Xgafv

167 -- * Xgafv

156 , Xgafv (..)

168 , Xgafv (..)

157

169

@@ -198,6 +210,11 @@ module Network.Google.BigQueryDataTransfer.Types

198 , locationLabels

210 , locationLabels

199 , llAddtional

211 , llAddtional

200

212

213+ -- * StartManualTransferRunsResponse

214+ , StartManualTransferRunsResponse

215+ , startManualTransferRunsResponse

216+ , smtrrRuns

217+

201 -- * LocationMetadata

218 -- * LocationMetadata

202 , LocationMetadata

219 , LocationMetadata

203 , locationMetadata

220 , locationMetadata

gogol-bigquerydatatransfer/gen/Network/Google/BigQueryDataTransfer/Types/Product.hs+243−93

@@ -168,24 +168,80 @@ 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+

171-- | Represents a data transfer run.

227-- | Represents a data transfer run.

172--

228--

173-- /See:/ 'transferRun' smart constructor.

229-- /See:/ 'transferRun' smart constructor.

174data TransferRun =

230data TransferRun =

175 TransferRun'

231 TransferRun'

176− { _trRunTime :: !(Maybe DateTime')

232+ { _tRunTime :: !(Maybe DateTime')

177− , _trErrorStatus :: !(Maybe Status)

233+ , _tErrorStatus :: !(Maybe Status)

178− , _trState :: !(Maybe TransferRunState)

234+ , _tState :: !(Maybe TransferRunState)

179− , _trSchedule :: !(Maybe Text)

235+ , _tSchedule :: !(Maybe Text)

180− , _trStartTime :: !(Maybe DateTime')

236+ , _tStartTime :: !(Maybe DateTime')

181− , _trScheduleTime :: !(Maybe DateTime')

237+ , _tScheduleTime :: !(Maybe DateTime')

182− , _trDataSourceId :: !(Maybe Text)

238+ , _tDataSourceId :: !(Maybe Text)

183− , _trParams :: !(Maybe TransferRunParams)

239+ , _tParams :: !(Maybe TransferRunParams)

184− , _trUserId :: !(Maybe (Textual Int64))

240+ , _tUserId :: !(Maybe (Textual Int64))

185− , _trUpdateTime :: !(Maybe DateTime')

241+ , _tUpdateTime :: !(Maybe DateTime')

186− , _trName :: !(Maybe Text)

242+ , _tName :: !(Maybe Text)

187− , _trEndTime :: !(Maybe DateTime')

243+ , _tEndTime :: !(Maybe DateTime')

188− , _trDestinationDataSetId :: !(Maybe Text)

244+ , _tDestinationDataSetId :: !(Maybe Text)

189 }

245 }

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

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

191

247

@@ -194,131 +250,130 @@ data TransferRun =

194--

250--

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

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

196--

252--

197−-- * 'trRunTime'

253+-- * 'tRunTime'

198--

254--

199−-- * 'trErrorStatus'

255+-- * 'tErrorStatus'

200--

256--

201−-- * 'trState'

257+-- * 'tState'

202--

258--

203−-- * 'trSchedule'

259+-- * 'tSchedule'

204--

260--

205−-- * 'trStartTime'

261+-- * 'tStartTime'

206--

262--

207−-- * 'trScheduleTime'

263+-- * 'tScheduleTime'

208--

264--

209−-- * 'trDataSourceId'

265+-- * 'tDataSourceId'

210--

266--

211−-- * 'trParams'

267+-- * 'tParams'

212--

268--

213−-- * 'trUserId'

269+-- * 'tUserId'

214--

270--

215−-- * 'trUpdateTime'

271+-- * 'tUpdateTime'

216--

272--

217−-- * 'trName'

273+-- * 'tName'

218--

274--

219−-- * 'trEndTime'

275+-- * 'tEndTime'

220--

276--

221−-- * 'trDestinationDataSetId'

277+-- * 'tDestinationDataSetId'

222transferRun

278transferRun

223 :: TransferRun

279 :: TransferRun

224transferRun =

280transferRun =

225 TransferRun'

281 TransferRun'

226− { _trRunTime = Nothing

282+ { _tRunTime = Nothing

227− , _trErrorStatus = Nothing

283+ , _tErrorStatus = Nothing

228− , _trState = Nothing

284+ , _tState = Nothing

229− , _trSchedule = Nothing

285+ , _tSchedule = Nothing

230− , _trStartTime = Nothing

286+ , _tStartTime = Nothing

231− , _trScheduleTime = Nothing

287+ , _tScheduleTime = Nothing

232− , _trDataSourceId = Nothing

288+ , _tDataSourceId = Nothing

233− , _trParams = Nothing

289+ , _tParams = Nothing

234− , _trUserId = Nothing

290+ , _tUserId = Nothing

235− , _trUpdateTime = Nothing

291+ , _tUpdateTime = Nothing

236− , _trName = Nothing

292+ , _tName = Nothing

237− , _trEndTime = Nothing

293+ , _tEndTime = Nothing

238− , _trDestinationDataSetId = Nothing

294+ , _tDestinationDataSetId = Nothing

239 }

295 }

240

296

241

297

242-- | For batch transfer runs, specifies the date and time that data should be

298-- | For batch transfer runs, specifies the date and time that data should be

243-- ingested.

299-- ingested.

244−trRunTime :: Lens' TransferRun (Maybe UTCTime)

300+tRunTime :: Lens' TransferRun (Maybe UTCTime)

245−trRunTime

301+tRunTime

246− = lens _trRunTime (\ s a -> s{_trRunTime = a}) .

302+ = lens _tRunTime (\ s a -> s{_tRunTime = a}) .

247 mapping _DateTime

303 mapping _DateTime

248

304

249-- | Status of the transfer run.

305-- | Status of the transfer run.

250−trErrorStatus :: Lens' TransferRun (Maybe Status)

306+tErrorStatus :: Lens' TransferRun (Maybe Status)

251−trErrorStatus

307+tErrorStatus

252− = lens _trErrorStatus

308+ = lens _tErrorStatus (\ s a -> s{_tErrorStatus = a})

253− (\ s a -> s{_trErrorStatus = a})

254

309

255-- | Data transfer run state. Ignored for input requests.

310-- | Data transfer run state. Ignored for input requests.

256−trState :: Lens' TransferRun (Maybe TransferRunState)

311+tState :: Lens' TransferRun (Maybe TransferRunState)

257−trState = lens _trState (\ s a -> s{_trState = a})

312+tState = lens _tState (\ s a -> s{_tState = a})

258

313

259-- | Output only. Describes the schedule of this transfer run if it was

314-- | Output only. Describes the schedule of this transfer run if it was

260-- created as part of a regular schedule. For batch transfer runs that are

315-- created as part of a regular schedule. For batch transfer runs that are

261-- scheduled manually, this is empty. NOTE: the system might choose to

316-- scheduled manually, this is empty. NOTE: the system might choose to

262-- delay the schedule depending on the current load, so \`schedule_time\`

317-- delay the schedule depending on the current load, so \`schedule_time\`

263-- doesn\'t always match this.

318-- doesn\'t always match this.

264−trSchedule :: Lens' TransferRun (Maybe Text)

319+tSchedule :: Lens' TransferRun (Maybe Text)

265−trSchedule

320+tSchedule

266− = lens _trSchedule (\ s a -> s{_trSchedule = a})

321+ = lens _tSchedule (\ s a -> s{_tSchedule = a})

267

322

268-- | Output only. Time when transfer run was started. Parameter ignored by

323-- | Output only. Time when transfer run was started. Parameter ignored by

269-- server for input requests.

324-- server for input requests.

270−trStartTime :: Lens' TransferRun (Maybe UTCTime)

325+tStartTime :: Lens' TransferRun (Maybe UTCTime)

271−trStartTime

326+tStartTime

272− = lens _trStartTime (\ s a -> s{_trStartTime = a}) .

327+ = lens _tStartTime (\ s a -> s{_tStartTime = a}) .

273 mapping _DateTime

328 mapping _DateTime

274

329

275-- | Minimum time after which a transfer run can be started.

330-- | Minimum time after which a transfer run can be started.

276−trScheduleTime :: Lens' TransferRun (Maybe UTCTime)

331+tScheduleTime :: Lens' TransferRun (Maybe UTCTime)

277−trScheduleTime

332+tScheduleTime

278− = lens _trScheduleTime

333+ = lens _tScheduleTime

279− (\ s a -> s{_trScheduleTime = a})

334+ (\ s a -> s{_tScheduleTime = a})

280 . mapping _DateTime

335 . mapping _DateTime

281

336

282-- | Output only. Data source id.

337-- | Output only. Data source id.

283−trDataSourceId :: Lens' TransferRun (Maybe Text)

338+tDataSourceId :: Lens' TransferRun (Maybe Text)

284−trDataSourceId

339+tDataSourceId

285− = lens _trDataSourceId

340+ = lens _tDataSourceId

286− (\ s a -> s{_trDataSourceId = a})

341+ (\ s a -> s{_tDataSourceId = a})

287

342

288-- | Output only. Data transfer specific parameters.

343-- | Output only. Data transfer specific parameters.

289−trParams :: Lens' TransferRun (Maybe TransferRunParams)

344+tParams :: Lens' TransferRun (Maybe TransferRunParams)

290−trParams = lens _trParams (\ s a -> s{_trParams = a})

345+tParams = lens _tParams (\ s a -> s{_tParams = a})

291

346

292-- | Deprecated. Unique ID of the user on whose behalf transfer is done.

347-- | Deprecated. Unique ID of the user on whose behalf transfer is done.

293−trUserId :: Lens' TransferRun (Maybe Int64)

348+tUserId :: Lens' TransferRun (Maybe Int64)

294−trUserId

349+tUserId

295− = lens _trUserId (\ s a -> s{_trUserId = a}) .

350+ = lens _tUserId (\ s a -> s{_tUserId = a}) .

296 mapping _Coerce

351 mapping _Coerce

297

352

298-- | Output only. Last time the data transfer run state was updated.

353-- | Output only. Last time the data transfer run state was updated.

299−trUpdateTime :: Lens' TransferRun (Maybe UTCTime)

354+tUpdateTime :: Lens' TransferRun (Maybe UTCTime)

300−trUpdateTime

355+tUpdateTime

301− = lens _trUpdateTime (\ s a -> s{_trUpdateTime = a})

356+ = lens _tUpdateTime (\ s a -> s{_tUpdateTime = a}) .

302− . mapping _DateTime

357+ mapping _DateTime

303

358

304-- | The resource name of the transfer run. Transfer run names have the form

359-- | The resource name of the transfer run. Transfer run names have the form

305-- \`projects\/{project_id}\/locations\/{location}\/transferConfigs\/{config_id}\/runs\/{run_id}\`.

360-- \`projects\/{project_id}\/locations\/{location}\/transferConfigs\/{config_id}\/runs\/{run_id}\`.

306-- The name is ignored when creating a transfer run.

361-- The name is ignored when creating a transfer run.

307−trName :: Lens' TransferRun (Maybe Text)

362+tName :: Lens' TransferRun (Maybe Text)

308−trName = lens _trName (\ s a -> s{_trName = a})

363+tName = lens _tName (\ s a -> s{_tName = a})

309

364

310-- | Output only. Time when transfer run ended. Parameter ignored by server

365-- | Output only. Time when transfer run ended. Parameter ignored by server

311-- for input requests.

366-- for input requests.

312−trEndTime :: Lens' TransferRun (Maybe UTCTime)

367+tEndTime :: Lens' TransferRun (Maybe UTCTime)

313−trEndTime

368+tEndTime

314− = lens _trEndTime (\ s a -> s{_trEndTime = a}) .

369+ = lens _tEndTime (\ s a -> s{_tEndTime = a}) .

315 mapping _DateTime

370 mapping _DateTime

316

371

317-- | Output only. The BigQuery target dataset id.

372-- | Output only. The BigQuery target dataset id.

318−trDestinationDataSetId :: Lens' TransferRun (Maybe Text)

373+tDestinationDataSetId :: Lens' TransferRun (Maybe Text)

319−trDestinationDataSetId

374+tDestinationDataSetId

320− = lens _trDestinationDataSetId

375+ = lens _tDestinationDataSetId

321− (\ s a -> s{_trDestinationDataSetId = a})

376+ (\ s a -> s{_tDestinationDataSetId = a})

322

377

323instance FromJSON TransferRun where

378instance FromJSON TransferRun where

324 parseJSON

379 parseJSON

@@ -342,20 +397,19 @@ instance ToJSON TransferRun where

342 toJSON TransferRun'{..}

397 toJSON TransferRun'{..}

343 = object

398 = object

344 (catMaybes

399 (catMaybes

345− [("runTime" .=) <$> _trRunTime,

400+ [("runTime" .=) <$> _tRunTime,

346− ("errorStatus" .=) <$> _trErrorStatus,

401+ ("errorStatus" .=) <$> _tErrorStatus,

347− ("state" .=) <$> _trState,

402+ ("state" .=) <$> _tState,

348− ("schedule" .=) <$> _trSchedule,

403+ ("schedule" .=) <$> _tSchedule,

349− ("startTime" .=) <$> _trStartTime,

404+ ("startTime" .=) <$> _tStartTime,

350− ("scheduleTime" .=) <$> _trScheduleTime,

405+ ("scheduleTime" .=) <$> _tScheduleTime,

351− ("dataSourceId" .=) <$> _trDataSourceId,

406+ ("dataSourceId" .=) <$> _tDataSourceId,

352− ("params" .=) <$> _trParams,

407+ ("params" .=) <$> _tParams,

353− ("userId" .=) <$> _trUserId,

408+ ("userId" .=) <$> _tUserId,

354− ("updateTime" .=) <$> _trUpdateTime,

409+ ("updateTime" .=) <$> _tUpdateTime,

355− ("name" .=) <$> _trName,

410+ ("name" .=) <$> _tName, ("endTime" .=) <$> _tEndTime,

356− ("endTime" .=) <$> _trEndTime,

357 ("destinationDatasetId" .=) <$>

411 ("destinationDatasetId" .=) <$>

358− _trDestinationDataSetId])

412+ _tDestinationDataSetId])

359

413

360-- | A request to determine whether the user has valid credentials. This

414-- | A request to determine whether the user has valid credentials. This

361-- method is used to limit the number of OAuth popups in the user

415-- method is used to limit the number of OAuth popups in the user

@@ -1136,6 +1190,62 @@ instance ToJSON ListDataSourcesResponse where

1136 [("nextPageToken" .=) <$> _ldsrNextPageToken,

1190 [("nextPageToken" .=) <$> _ldsrNextPageToken,

1137 ("dataSources" .=) <$> _ldsrDataSources])

1191 ("dataSources" .=) <$> _ldsrDataSources])

1138

1192

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+

1139-- | Represents data source metadata. Metadata is sufficient to render UI and

1249-- | Represents data source metadata. Metadata is sufficient to render UI and

1140-- request proper OAuth tokens.

1250-- request proper OAuth tokens.

1141--

1251--

@@ -1554,6 +1664,46 @@ instance FromJSON LocationLabels where

1554instance ToJSON LocationLabels where

1664instance ToJSON LocationLabels where

1555 toJSON = toJSON . _llAddtional

1665 toJSON = toJSON . _llAddtional

1556

1666

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+

1557-- | Service-specific metadata. For example the available capacity at the

1707-- | Service-specific metadata. For example the available capacity at the

1558-- given location.

1708-- given location.

1559--

1709--

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Create.hs+22−4

@@ -40,6 +40,7 @@ module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferC

40 , pltccUploadType

40 , pltccUploadType

41 , pltccAuthorizationCode

41 , pltccAuthorizationCode

42 , pltccPayload

42 , pltccPayload

43+ , pltccVersionInfo

43 , pltccCallback

44 , pltccCallback

44 ) where

45 ) where

45

46

@@ -57,10 +58,11 @@ type ProjectsLocationsTransferConfigsCreateResource =

57 QueryParam "access_token" Text :>

58 QueryParam "access_token" Text :>

58 QueryParam "uploadType" Text :>

59 QueryParam "uploadType" Text :>

59 QueryParam "authorizationCode" Text :>

60 QueryParam "authorizationCode" Text :>

60− QueryParam "callback" Text :>

61+ QueryParam "versionInfo" Text :>

62+ QueryParam "callback" Text :>

61− QueryParam "alt" AltJSON :>

63+ QueryParam "alt" AltJSON :>

62− ReqBody '[JSON] TransferConfig :>

64+ ReqBody '[JSON] TransferConfig :>

63− Post '[JSON] TransferConfig

65+ Post '[JSON] TransferConfig

64

66

65-- | Creates a new data transfer configuration.

67-- | Creates a new data transfer configuration.

66--

68--

@@ -74,6 +76,7 @@ data ProjectsLocationsTransferConfigsCreate =

74 , _pltccUploadType :: !(Maybe Text)

76 , _pltccUploadType :: !(Maybe Text)

75 , _pltccAuthorizationCode :: !(Maybe Text)

77 , _pltccAuthorizationCode :: !(Maybe Text)

76 , _pltccPayload :: !TransferConfig

78 , _pltccPayload :: !TransferConfig

79+ , _pltccVersionInfo :: !(Maybe Text)

77 , _pltccCallback :: !(Maybe Text)

80 , _pltccCallback :: !(Maybe Text)

78 }

81 }

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

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

@@ -97,6 +100,8 @@ data ProjectsLocationsTransferConfigsCreate =

97--

100--

98-- * 'pltccPayload'

101-- * 'pltccPayload'

99--

102--

103+-- * 'pltccVersionInfo'

104+--

100-- * 'pltccCallback'

105-- * 'pltccCallback'

101projectsLocationsTransferConfigsCreate

106projectsLocationsTransferConfigsCreate

102 :: Text -- ^ 'pltccParent'

107 :: Text -- ^ 'pltccParent'

@@ -111,6 +116,7 @@ projectsLocationsTransferConfigsCreate pPltccParent_ pPltccPayload_ =

111 , _pltccUploadType = Nothing

116 , _pltccUploadType = Nothing

112 , _pltccAuthorizationCode = Nothing

117 , _pltccAuthorizationCode = Nothing

113 , _pltccPayload = pPltccPayload_

118 , _pltccPayload = pPltccPayload_

119+ , _pltccVersionInfo = Nothing

114 , _pltccCallback = Nothing

120 , _pltccCallback = Nothing

115 }

121 }

116

122

@@ -171,6 +177,17 @@ pltccPayload :: Lens' ProjectsLocationsTransferConfigsCreate TransferConfig

171pltccPayload

177pltccPayload

172 = lens _pltccPayload (\ s a -> s{_pltccPayload = a})

178 = lens _pltccPayload (\ s a -> s{_pltccPayload = a})

173

179

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+

174-- | JSONP

191-- | JSONP

175pltccCallback :: Lens' ProjectsLocationsTransferConfigsCreate (Maybe Text)

192pltccCallback :: Lens' ProjectsLocationsTransferConfigsCreate (Maybe Text)

176pltccCallback

193pltccCallback

@@ -190,6 +207,7 @@ instance GoogleRequest

190 _pltccAccessToken

207 _pltccAccessToken

191 _pltccUploadType

208 _pltccUploadType

192 _pltccAuthorizationCode

209 _pltccAuthorizationCode

210+ _pltccVersionInfo

193 _pltccCallback

211 _pltccCallback

194 (Just AltJSON)

212 (Just AltJSON)

195 _pltccPayload

213 _pltccPayload

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Patch.hs+22−4

@@ -41,6 +41,7 @@ module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferC

41 , pltcpUploadType

41 , pltcpUploadType

42 , pltcpAuthorizationCode

42 , pltcpAuthorizationCode

43 , pltcpPayload

43 , pltcpPayload

44+ , pltcpVersionInfo

44 , pltcpName

45 , pltcpName

45 , pltcpCallback

46 , pltcpCallback

46 ) where

47 ) where

@@ -59,10 +60,11 @@ type ProjectsLocationsTransferConfigsPatchResource =

59 QueryParam "access_token" Text :>

60 QueryParam "access_token" Text :>

60 QueryParam "uploadType" Text :>

61 QueryParam "uploadType" Text :>

61 QueryParam "authorizationCode" Text :>

62 QueryParam "authorizationCode" Text :>

62− QueryParam "callback" Text :>

63+ QueryParam "versionInfo" Text :>

64+ QueryParam "callback" Text :>

63− QueryParam "alt" AltJSON :>

65+ QueryParam "alt" AltJSON :>

64− ReqBody '[JSON] TransferConfig :>

66+ ReqBody '[JSON] TransferConfig :>

65− Patch '[JSON] TransferConfig

67+ Patch '[JSON] TransferConfig

66

68

67-- | Updates a data transfer configuration. All fields must be set, even if

69-- | Updates a data transfer configuration. All fields must be set, even if

68-- they are not updated.

70-- they are not updated.

@@ -77,6 +79,7 @@ data ProjectsLocationsTransferConfigsPatch =

77 , _pltcpUploadType :: !(Maybe Text)

79 , _pltcpUploadType :: !(Maybe Text)

78 , _pltcpAuthorizationCode :: !(Maybe Text)

80 , _pltcpAuthorizationCode :: !(Maybe Text)

79 , _pltcpPayload :: !TransferConfig

81 , _pltcpPayload :: !TransferConfig

82+ , _pltcpVersionInfo :: !(Maybe Text)

80 , _pltcpName :: !Text

83 , _pltcpName :: !Text

81 , _pltcpCallback :: !(Maybe Text)

84 , _pltcpCallback :: !(Maybe Text)

82 }

85 }

@@ -101,6 +104,8 @@ data ProjectsLocationsTransferConfigsPatch =

101--

104--

102-- * 'pltcpPayload'

105-- * 'pltcpPayload'

103--

106--

107+-- * 'pltcpVersionInfo'

108+--

104-- * 'pltcpName'

109-- * 'pltcpName'

105--

110--

106-- * 'pltcpCallback'

111-- * 'pltcpCallback'

@@ -117,6 +122,7 @@ projectsLocationsTransferConfigsPatch pPltcpPayload_ pPltcpName_ =

117 , _pltcpUploadType = Nothing

122 , _pltcpUploadType = Nothing

118 , _pltcpAuthorizationCode = Nothing

123 , _pltcpAuthorizationCode = Nothing

119 , _pltcpPayload = pPltcpPayload_

124 , _pltcpPayload = pPltcpPayload_

125+ , _pltcpVersionInfo = Nothing

120 , _pltcpName = pPltcpName_

126 , _pltcpName = pPltcpName_

121 , _pltcpCallback = Nothing

127 , _pltcpCallback = Nothing

122 }

128 }

@@ -175,6 +181,17 @@ pltcpPayload :: Lens' ProjectsLocationsTransferConfigsPatch TransferConfig

175pltcpPayload

181pltcpPayload

176 = lens _pltcpPayload (\ s a -> s{_pltcpPayload = a})

182 = lens _pltcpPayload (\ s a -> s{_pltcpPayload = a})

177

183

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+

178-- | The resource name of the transfer config. Transfer config names have the

195-- | The resource name of the transfer config. Transfer config names have the

179-- form of

196-- form of

180-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

197-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

@@ -206,6 +223,7 @@ instance GoogleRequest

206 _pltcpAccessToken

223 _pltcpAccessToken

207 _pltcpUploadType

224 _pltcpUploadType

208 _pltcpAuthorizationCode

225 _pltcpAuthorizationCode

226+ _pltcpVersionInfo

209 _pltcpCallback

227 _pltcpCallback

210 (Just AltJSON)

228 (Just AltJSON)

211 _pltcpPayload

229 _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.

26+-- the time range. DEPRECATED: use StartManualTransferRuns instead.

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.

69+-- the time range. DEPRECATED: use StartManualTransferRuns instead.

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.hsnew file+186

@@ -0,0 +1,186 @@

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+22−4

@@ -40,6 +40,7 @@ module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Cre

40 , ptccUploadType

40 , ptccUploadType

41 , ptccAuthorizationCode

41 , ptccAuthorizationCode

42 , ptccPayload

42 , ptccPayload

43+ , ptccVersionInfo

43 , ptccCallback

44 , ptccCallback

44 ) where

45 ) where

45

46

@@ -57,10 +58,11 @@ type ProjectsTransferConfigsCreateResource =

57 QueryParam "access_token" Text :>

58 QueryParam "access_token" Text :>

58 QueryParam "uploadType" Text :>

59 QueryParam "uploadType" Text :>

59 QueryParam "authorizationCode" Text :>

60 QueryParam "authorizationCode" Text :>

60− QueryParam "callback" Text :>

61+ QueryParam "versionInfo" Text :>

62+ QueryParam "callback" Text :>

61− QueryParam "alt" AltJSON :>

63+ QueryParam "alt" AltJSON :>

62− ReqBody '[JSON] TransferConfig :>

64+ ReqBody '[JSON] TransferConfig :>

63− Post '[JSON] TransferConfig

65+ Post '[JSON] TransferConfig

64

66

65-- | Creates a new data transfer configuration.

67-- | Creates a new data transfer configuration.

66--

68--

@@ -74,6 +76,7 @@ data ProjectsTransferConfigsCreate =

74 , _ptccUploadType :: !(Maybe Text)

76 , _ptccUploadType :: !(Maybe Text)

75 , _ptccAuthorizationCode :: !(Maybe Text)

77 , _ptccAuthorizationCode :: !(Maybe Text)

76 , _ptccPayload :: !TransferConfig

78 , _ptccPayload :: !TransferConfig

79+ , _ptccVersionInfo :: !(Maybe Text)

77 , _ptccCallback :: !(Maybe Text)

80 , _ptccCallback :: !(Maybe Text)

78 }

81 }

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

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

@@ -97,6 +100,8 @@ data ProjectsTransferConfigsCreate =

97--

100--

98-- * 'ptccPayload'

101-- * 'ptccPayload'

99--

102--

103+-- * 'ptccVersionInfo'

104+--

100-- * 'ptccCallback'

105-- * 'ptccCallback'

101projectsTransferConfigsCreate

106projectsTransferConfigsCreate

102 :: Text -- ^ 'ptccParent'

107 :: Text -- ^ 'ptccParent'

@@ -111,6 +116,7 @@ projectsTransferConfigsCreate pPtccParent_ pPtccPayload_ =

111 , _ptccUploadType = Nothing

116 , _ptccUploadType = Nothing

112 , _ptccAuthorizationCode = Nothing

117 , _ptccAuthorizationCode = Nothing

113 , _ptccPayload = pPtccPayload_

118 , _ptccPayload = pPtccPayload_

119+ , _ptccVersionInfo = Nothing

114 , _ptccCallback = Nothing

120 , _ptccCallback = Nothing

115 }

121 }

116

122

@@ -171,6 +177,17 @@ ptccPayload :: Lens' ProjectsTransferConfigsCreate TransferConfig

171ptccPayload

177ptccPayload

172 = lens _ptccPayload (\ s a -> s{_ptccPayload = a})

178 = lens _ptccPayload (\ s a -> s{_ptccPayload = a})

173

179

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+

174-- | JSONP

191-- | JSONP

175ptccCallback :: Lens' ProjectsTransferConfigsCreate (Maybe Text)

192ptccCallback :: Lens' ProjectsTransferConfigsCreate (Maybe Text)

176ptccCallback

193ptccCallback

@@ -187,6 +204,7 @@ instance GoogleRequest ProjectsTransferConfigsCreate

187 _ptccAccessToken

204 _ptccAccessToken

188 _ptccUploadType

205 _ptccUploadType

189 _ptccAuthorizationCode

206 _ptccAuthorizationCode

207+ _ptccVersionInfo

190 _ptccCallback

208 _ptccCallback

191 (Just AltJSON)

209 (Just AltJSON)

192 _ptccPayload

210 _ptccPayload

gogol-bigquerydatatransfer/gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Patch.hs+22−4

@@ -41,6 +41,7 @@ module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Pat

41 , ptcpUploadType

41 , ptcpUploadType

42 , ptcpAuthorizationCode

42 , ptcpAuthorizationCode

43 , ptcpPayload

43 , ptcpPayload

44+ , ptcpVersionInfo

44 , ptcpName

45 , ptcpName

45 , ptcpCallback

46 , ptcpCallback

46 ) where

47 ) where

@@ -59,10 +60,11 @@ type ProjectsTransferConfigsPatchResource =

59 QueryParam "access_token" Text :>

60 QueryParam "access_token" Text :>

60 QueryParam "uploadType" Text :>

61 QueryParam "uploadType" Text :>

61 QueryParam "authorizationCode" Text :>

62 QueryParam "authorizationCode" Text :>

62− QueryParam "callback" Text :>

63+ QueryParam "versionInfo" Text :>

64+ QueryParam "callback" Text :>

63− QueryParam "alt" AltJSON :>

65+ QueryParam "alt" AltJSON :>

64− ReqBody '[JSON] TransferConfig :>

66+ ReqBody '[JSON] TransferConfig :>

65− Patch '[JSON] TransferConfig

67+ Patch '[JSON] TransferConfig

66

68

67-- | Updates a data transfer configuration. All fields must be set, even if

69-- | Updates a data transfer configuration. All fields must be set, even if

68-- they are not updated.

70-- they are not updated.

@@ -77,6 +79,7 @@ data ProjectsTransferConfigsPatch =

77 , _ptcpUploadType :: !(Maybe Text)

79 , _ptcpUploadType :: !(Maybe Text)

78 , _ptcpAuthorizationCode :: !(Maybe Text)

80 , _ptcpAuthorizationCode :: !(Maybe Text)

79 , _ptcpPayload :: !TransferConfig

81 , _ptcpPayload :: !TransferConfig

82+ , _ptcpVersionInfo :: !(Maybe Text)

80 , _ptcpName :: !Text

83 , _ptcpName :: !Text

81 , _ptcpCallback :: !(Maybe Text)

84 , _ptcpCallback :: !(Maybe Text)

82 }

85 }

@@ -101,6 +104,8 @@ data ProjectsTransferConfigsPatch =

101--

104--

102-- * 'ptcpPayload'

105-- * 'ptcpPayload'

103--

106--

107+-- * 'ptcpVersionInfo'

108+--

104-- * 'ptcpName'

109-- * 'ptcpName'

105--

110--

106-- * 'ptcpCallback'

111-- * 'ptcpCallback'

@@ -117,6 +122,7 @@ projectsTransferConfigsPatch pPtcpPayload_ pPtcpName_ =

117 , _ptcpUploadType = Nothing

122 , _ptcpUploadType = Nothing

118 , _ptcpAuthorizationCode = Nothing

123 , _ptcpAuthorizationCode = Nothing

119 , _ptcpPayload = pPtcpPayload_

124 , _ptcpPayload = pPtcpPayload_

125+ , _ptcpVersionInfo = Nothing

120 , _ptcpName = pPtcpName_

126 , _ptcpName = pPtcpName_

121 , _ptcpCallback = Nothing

127 , _ptcpCallback = Nothing

122 }

128 }

@@ -175,6 +181,17 @@ ptcpPayload :: Lens' ProjectsTransferConfigsPatch TransferConfig

175ptcpPayload

181ptcpPayload

176 = lens _ptcpPayload (\ s a -> s{_ptcpPayload = a})

182 = lens _ptcpPayload (\ s a -> s{_ptcpPayload = a})

177

183

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+

178-- | The resource name of the transfer config. Transfer config names have the

195-- | The resource name of the transfer config. Transfer config names have the

179-- form of

196-- form of

180-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

197-- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.

@@ -201,6 +218,7 @@ instance GoogleRequest ProjectsTransferConfigsPatch

201 _ptcpAccessToken

218 _ptcpAccessToken

202 _ptcpUploadType

219 _ptcpUploadType

203 _ptcpAuthorizationCode

220 _ptcpAuthorizationCode

221+ _ptcpVersionInfo

204 _ptcpCallback

222 _ptcpCallback

205 (Just AltJSON)

223 (Just AltJSON)

206 _ptcpPayload

224 _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.

26+-- the time range. DEPRECATED: use StartManualTransferRuns instead.

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.

68+-- the time range. DEPRECATED: use StartManualTransferRuns instead.

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.hsnew file+179

@@ -0,0 +1,179 @@

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+4−2

@@ -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− Transfers data from partner SaaS applications to Google BigQuery on a

17+ Schedule queries or transfer external data from SaaS applications to

18− scheduled, managed basis.

18+ Google BigQuery on a regular 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,6 +54,7 @@ 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

57 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

58 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create

58 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

59 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete

59 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

60 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get

@@ -64,6 +65,7 @@ library

64 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

65 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List

65 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

66 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List

66 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

67 , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns

68+ , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns

67

69

68 other-modules:

70 other-modules:

69 Network.Google.BigQueryDataTransfer.Types.Product

71 Network.Google.BigQueryDataTransfer.Types.Product

gogol-bigtableadmin/gen/Network/Google/BigtableAdmin.hs+17−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−-- -- |

16+-- Administer your Cloud Bigtable tables and instances.

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,12 +118,21 @@ 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+

121 -- ** bigtableadmin.projects.instances.tables.list

124 -- ** bigtableadmin.projects.instances.tables.list

122 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

125 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

123

126

124 -- ** bigtableadmin.projects.instances.tables.modifyColumnFamilies

127 -- ** bigtableadmin.projects.instances.tables.modifyColumnFamilies

125 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

128 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

126

129

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+

127 -- ** bigtableadmin.projects.instances.testIamPermissions

136 -- ** bigtableadmin.projects.instances.testIamPermissions

128 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

137 , module Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

129

138

@@ -521,8 +530,11 @@ import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables

521import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.DropRowRange

530import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.DropRowRange

522import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GenerateConsistencyToken

531import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GenerateConsistencyToken

523import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

532import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.Get

533+import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.GetIAMPolicy

524import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

534import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

525import Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

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

526import Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

538import Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

527import Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

539import Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

528

540

@@ -543,13 +555,17 @@ type BigtableAdminAPI =

543 :<|> ProjectsInstancesAppProFilesDeleteResource

555 :<|> ProjectsInstancesAppProFilesDeleteResource

544 :<|> ProjectsInstancesTablesDropRowRangeResource

556 :<|> ProjectsInstancesTablesDropRowRangeResource

545 :<|> ProjectsInstancesTablesListResource

557 :<|> ProjectsInstancesTablesListResource

558+ :<|> ProjectsInstancesTablesGetIAMPolicyResource

546 :<|>

559 :<|>

547 ProjectsInstancesTablesGenerateConsistencyTokenResource

560 ProjectsInstancesTablesGenerateConsistencyTokenResource

548 :<|> ProjectsInstancesTablesGetResource

561 :<|> ProjectsInstancesTablesGetResource

549 :<|>

562 :<|>

550 ProjectsInstancesTablesModifyColumnFamiliesResource

563 ProjectsInstancesTablesModifyColumnFamiliesResource

551 :<|> ProjectsInstancesTablesCreateResource

564 :<|> ProjectsInstancesTablesCreateResource

565+ :<|> ProjectsInstancesTablesSetIAMPolicyResource

552 :<|> ProjectsInstancesTablesCheckConsistencyResource

566 :<|> ProjectsInstancesTablesCheckConsistencyResource

567+ :<|>

568+ ProjectsInstancesTablesTestIAMPermissionsResource

553 :<|> ProjectsInstancesTablesDeleteResource

569 :<|> ProjectsInstancesTablesDeleteResource

554 :<|> ProjectsInstancesClustersListResource

570 :<|> ProjectsInstancesClustersListResource

555 :<|> ProjectsInstancesClustersGetResource

571 :<|> ProjectsInstancesClustersGetResource

gogol-bigtableadmin/gen/Network/Google/BigtableAdmin/Types/Product.hs+18−19

@@ -827,7 +827,7 @@ clusterState

827clusterState = ClusterState' {_csReplicationState = Nothing}

827clusterState = ClusterState' {_csReplicationState = Nothing}

828

828

829

829

830−-- | (\`OutputOnly\`) The state of replication for the table in this cluster.

830+-- | Output only. 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−-- | (\`OutputOnly\`) Map from cluster ID to per-cluster table state. If it

1042+-- | Output only. Map from cluster ID to per-cluster table state. If it could

1043−-- could not be determined whether or not the table has data in a

1043+-- not be determined whether or not the table has data in a particular

1044−-- particular cluster (for example, if its zone is unavailable), then there

1044+-- cluster (for example, if its zone is unavailable), then there will be an

1045−-- will be an entry for the cluster with UNKNOWN \`replication_status\`.

1045+-- entry for the cluster with UNKNOWN \`replication_status\`. Views:

1046−-- Views: \`REPLICATION_VIEW\`, \`FULL\`

1046+-- \`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−-- | (\`OutputOnly\`) The unique name of the table. Values are of the form

2850+-- | Output only. 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−-- | (\`OutputOnly\`) Map from cluster ID to per-cluster table state. If it

2856+-- | Output only. Map from cluster ID to per-cluster table state. If it could

2857−-- could not be determined whether or not the table has data in a

2857+-- not be determined whether or not the table has data in a particular

2858−-- particular cluster (for example, if its zone is unavailable), then there

2858+-- cluster (for example, if its zone is unavailable), then there will be an

2859−-- will be an entry for the cluster with UNKNOWN \`replication_status\`.

2859+-- entry for the cluster with UNKNOWN \`replication_status\`. Views:

2860−-- Views: \`REPLICATION_VIEW\`, \`FULL\`

2860+-- \`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}\`: A Google Apps domain

2972+-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

2973−-- name that represents all the users of that domain. For example,

2973+-- (primary) 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,10 +2983,9 @@ 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−-- | Unimplemented. The condition that is associated with this binding. NOTE:

2986+-- | The condition that is associated with this binding. NOTE: An unsatisfied

2987−-- an unsatisfied condition will not allow user access via current binding.

2987+-- condition will not allow user access via current binding. Different

2988−-- Different bindings, including their conditions, are examined

2988+-- bindings, including their conditions, are examined independently.

2989−-- independently.

2990bCondition :: Lens' Binding (Maybe Expr)

2989bCondition :: Lens' Binding (Maybe Expr)

2991bCondition

2990bCondition

2992 = lens _bCondition (\ s a -> s{_bCondition = a})

2991 = 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−-- | (\`OutputOnly\`) The state of replication for the table in this cluster.

56+-- | Output only. 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.hsnew file+179

@@ -0,0 +1,179 @@

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+7−1

@@ -160,7 +160,13 @@ 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. CURRENTLY UNIMPLEMENTED AND IGNORED.

163+-- | Maximum number of results per page. A page_size of zero lets the server

164+-- choose the number of items to return. A page_size which is strictly

165+-- positive will return at most that many items. A negative page_size will

166+-- cause an error. Following the first request, subsequent paginated calls

167+-- are not required to pass a page_size. If a page_size is set in

168+-- subsequent calls, it must match the page_size given in the first

169+-- request.

164pitlPageSize :: Lens' ProjectsInstancesTablesList (Maybe Int32)

170pitlPageSize :: Lens' ProjectsInstancesTablesList (Maybe Int32)

165pitlPageSize

171pitlPageSize

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

172 = lens _pitlPageSize (\ s a -> s{_pitlPageSize = a})

gogol-bigtableadmin/gen/Network/Google/Resource/BigtableAdmin/Projects/Instances/Tables/SetIAMPolicy.hsnew file+179

@@ -0,0 +1,179 @@

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.hsnew file+182

@@ -0,0 +1,182 @@

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+4−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−

17+ Administer your Cloud Bigtable tables and instances.

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,8 +62,11 @@ 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

65 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

66 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.List

66 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Tables.ModifyColumnFamilies

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

67 , Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

70 , Network.Google.Resource.BigtableAdmin.Projects.Instances.TestIAMPermissions

68 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

71 , Network.Google.Resource.BigtableAdmin.Projects.Instances.Update

69

72

gogol-billing/gen/Network/Google/Billing/Types/Product.hs+5−6

@@ -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}\`: A Google Apps domain

1605+-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

1606−-- name that represents all the users of that domain. For example,

1606+-- (primary) 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,10 +1616,9 @@ 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−-- | Unimplemented. The condition that is associated with this binding. NOTE:

1619+-- | The condition that is associated with this binding. NOTE: An unsatisfied

1620−-- an unsatisfied condition will not allow user access via current binding.

1620+-- condition will not allow user access via current binding. Different

1621−-- Different bindings, including their conditions, are examined

1621+-- bindings, including their conditions, are examined independently.

1622−-- independently.

1623bCondition :: Lens' Binding (Maybe Expr)

1622bCondition :: Lens' Binding (Maybe Expr)

1624bCondition

1623bCondition

1625 = lens _bCondition (\ s a -> s{_bCondition = a})

1624 = lens _bCondition (\ s a -> s{_bCondition = a})

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization.hs+14

@@ -71,6 +71,12 @@ module Network.Google.BinaryAuthorization

71

71

72 -- * Types

72 -- * Types

73

73

74+ -- ** PkixPublicKey

75+ , PkixPublicKey

76+ , pkixPublicKey

77+ , ppkPublicKeyPem

78+ , ppkSignatureAlgorithm

79+

74 -- ** Expr

80 -- ** Expr

75 , Expr

81 , Expr

76 , expr

82 , expr

@@ -93,6 +99,9 @@ module Network.Google.BinaryAuthorization

93 -- ** AdmissionRuleEnforcementMode

99 -- ** AdmissionRuleEnforcementMode

94 , AdmissionRuleEnforcementMode (..)

100 , AdmissionRuleEnforcementMode (..)

95

101

102+ -- ** PolicyGlobalPolicyEvaluationMode

103+ , PolicyGlobalPolicyEvaluationMode (..)

104+

96 -- ** SetIAMPolicyRequest

105 -- ** SetIAMPolicyRequest

97 , SetIAMPolicyRequest

106 , SetIAMPolicyRequest

98 , setIAMPolicyRequest

107 , setIAMPolicyRequest

@@ -109,6 +118,9 @@ module Network.Google.BinaryAuthorization

109 , admissionWhiteListPattern

118 , admissionWhiteListPattern

110 , awlpNamePattern

119 , awlpNamePattern

111

120

121+ -- ** PkixPublicKeySignatureAlgorithm

122+ , PkixPublicKeySignatureAlgorithm (..)

123+

112 -- ** AdmissionRule

124 -- ** AdmissionRule

113 , AdmissionRule

125 , AdmissionRule

114 , admissionRule

126 , admissionRule

@@ -137,6 +149,7 @@ module Network.Google.BinaryAuthorization

137 -- ** AttestorPublicKey

149 -- ** AttestorPublicKey

138 , AttestorPublicKey

150 , AttestorPublicKey

139 , attestorPublicKey

151 , attestorPublicKey

152+ , apkPkixPublicKey

140 , apkAsciiArmoredPgpPublicKey

153 , apkAsciiArmoredPgpPublicKey

141 , apkId

154 , apkId

142 , apkComment

155 , apkComment

@@ -154,6 +167,7 @@ module Network.Google.BinaryAuthorization

154 , pClusterAdmissionRules

167 , pClusterAdmissionRules

155 , pUpdateTime

168 , pUpdateTime

156 , pName

169 , pName

170+ , pGlobalPolicyEvaluationMode

157 , pDescription

171 , pDescription

158

172

159 -- ** PolicyClusterAdmissionRules

173 -- ** PolicyClusterAdmissionRules

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization/Types.hs+14

@@ -22,6 +22,12 @@ 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+

25 -- * Expr

31 -- * Expr

26 , Expr

32 , Expr

27 , expr

33 , expr

@@ -44,6 +50,9 @@ module Network.Google.BinaryAuthorization.Types

44 -- * AdmissionRuleEnforcementMode

50 -- * AdmissionRuleEnforcementMode

45 , AdmissionRuleEnforcementMode (..)

51 , AdmissionRuleEnforcementMode (..)

46

52

53+ -- * PolicyGlobalPolicyEvaluationMode

54+ , PolicyGlobalPolicyEvaluationMode (..)

55+

47 -- * SetIAMPolicyRequest

56 -- * SetIAMPolicyRequest

48 , SetIAMPolicyRequest

57 , SetIAMPolicyRequest

49 , setIAMPolicyRequest

58 , setIAMPolicyRequest

@@ -60,6 +69,9 @@ module Network.Google.BinaryAuthorization.Types

60 , admissionWhiteListPattern

69 , admissionWhiteListPattern

61 , awlpNamePattern

70 , awlpNamePattern

62

71

72+ -- * PkixPublicKeySignatureAlgorithm

73+ , PkixPublicKeySignatureAlgorithm (..)

74+

63 -- * AdmissionRule

75 -- * AdmissionRule

64 , AdmissionRule

76 , AdmissionRule

65 , admissionRule

77 , admissionRule

@@ -88,6 +100,7 @@ module Network.Google.BinaryAuthorization.Types

88 -- * AttestorPublicKey

100 -- * AttestorPublicKey

89 , AttestorPublicKey

101 , AttestorPublicKey

90 , attestorPublicKey

102 , attestorPublicKey

103+ , apkPkixPublicKey

91 , apkAsciiArmoredPgpPublicKey

104 , apkAsciiArmoredPgpPublicKey

92 , apkId

105 , apkId

93 , apkComment

106 , apkComment

@@ -105,6 +118,7 @@ module Network.Google.BinaryAuthorization.Types

105 , pClusterAdmissionRules

118 , pClusterAdmissionRules

106 , pUpdateTime

119 , pUpdateTime

107 , pName

120 , pName

121+ , pGlobalPolicyEvaluationMode

108 , pDescription

122 , pDescription

109

123

110 -- * PolicyClusterAdmissionRules

124 -- * PolicyClusterAdmissionRules

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization/Types/Product.hs+116−17

@@ -20,6 +20,65 @@ 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+

23-- | Represents an expression text. Example: title: \"User account presence\"

82-- | Represents an expression text. Example: title: \"User account presence\"

24-- description: \"Determines whether the request has a user account\"

83-- description: \"Determines whether the request has a user account\"

25-- expression: \"size(request.user) > 0\"

84-- expression: \"size(request.user) > 0\"

@@ -556,13 +615,14 @@ instance ToJSON IAMPolicy where

556 ("version" .=) <$> _ipVersion,

615 ("version" .=) <$> _ipVersion,

557 ("bindings" .=) <$> _ipBindings])

616 ("bindings" .=) <$> _ipBindings])

558

617

559−-- | An attestator public key that will be used to verify attestations signed

618+-- | An attestor public key that will be used to verify attestations signed

560-- by this attestor.

619-- by this attestor.

561--

620--

562-- /See:/ 'attestorPublicKey' smart constructor.

621-- /See:/ 'attestorPublicKey' smart constructor.

563data AttestorPublicKey =

622data AttestorPublicKey =

564 AttestorPublicKey'

623 AttestorPublicKey'

624+ { _apkPkixPublicKey :: !(Maybe PkixPublicKey)

565− { _apkAsciiArmoredPgpPublicKey :: !(Maybe Text)

625+ , _apkAsciiArmoredPgpPublicKey :: !(Maybe Text)

566 , _apkId :: !(Maybe Text)

626 , _apkId :: !(Maybe Text)

567 , _apkComment :: !(Maybe Text)

627 , _apkComment :: !(Maybe Text)

568 }

628 }

@@ -573,6 +633,8 @@ data AttestorPublicKey =

573--

633--

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

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

575--

635--

636+-- * 'apkPkixPublicKey'

637+--

576-- * 'apkAsciiArmoredPgpPublicKey'

638-- * 'apkAsciiArmoredPgpPublicKey'

577--

639--

578-- * 'apkId'

640-- * 'apkId'

@@ -582,23 +644,41 @@ attestorPublicKey

582 :: AttestorPublicKey

644 :: AttestorPublicKey

583attestorPublicKey =

645attestorPublicKey =

584 AttestorPublicKey'

646 AttestorPublicKey'

647+ { _apkPkixPublicKey = Nothing

585− { _apkAsciiArmoredPgpPublicKey = Nothing

648+ , _apkAsciiArmoredPgpPublicKey = Nothing

586 , _apkId = Nothing

649 , _apkId = Nothing

587 , _apkComment = Nothing

650 , _apkComment = Nothing

588 }

651 }

589

652

590

653

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+

591-- | ASCII-armored representation of a PGP public key, as the entire output

664-- | ASCII-armored representation of a PGP public key, as the entire output

592-- by the command \`gpg --export --armor foo\'example.com\` (either LF or

665-- by the command \`gpg --export --armor foo\'example.com\` (either LF or

593−-- CRLF line endings).

666+-- CRLF line endings). When using this field, \`id\` should be left blank.

667+-- The BinAuthz API handlers will calculate the ID and fill it in

668+-- automatically. BinAuthz computes this ID as the OpenPGP RFC4880 V4

669+-- fingerprint, represented as upper-case hex. If \`id\` is provided by the

670+-- caller, it will be overwritten by the API-calculated ID.

594apkAsciiArmoredPgpPublicKey :: Lens' AttestorPublicKey (Maybe Text)

671apkAsciiArmoredPgpPublicKey :: Lens' AttestorPublicKey (Maybe Text)

595apkAsciiArmoredPgpPublicKey

672apkAsciiArmoredPgpPublicKey

596 = lens _apkAsciiArmoredPgpPublicKey

673 = lens _apkAsciiArmoredPgpPublicKey

597 (\ s a -> s{_apkAsciiArmoredPgpPublicKey = a})

674 (\ s a -> s{_apkAsciiArmoredPgpPublicKey = a})

598

675

599−-- | Output only. This field will be overwritten with key ID information, for

676+-- | The ID of this public key. Signatures verified by BinAuthz must include

600−-- example, an identifier extracted from a PGP public key. This field may

677+-- the ID of the public key that can be used to verify them, and that ID

601−-- not be updated.

678+-- must match the contents of this field exactly. Additional restrictions

679+-- on this field can be imposed based on which public key type is

680+-- encapsulated. See the documentation on \`public_key\` cases below for

681+-- details.

602apkId :: Lens' AttestorPublicKey (Maybe Text)

682apkId :: Lens' AttestorPublicKey (Maybe Text)

603apkId = lens _apkId (\ s a -> s{_apkId = a})

683apkId = lens _apkId (\ s a -> s{_apkId = a})

604

684

@@ -612,14 +692,17 @@ instance FromJSON AttestorPublicKey where

612 = withObject "AttestorPublicKey"

692 = withObject "AttestorPublicKey"

613 (\ o ->

693 (\ o ->

614 AttestorPublicKey' <$>

694 AttestorPublicKey' <$>

695+ (o .:? "pkixPublicKey") <*>

615− (o .:? "asciiArmoredPgpPublicKey") <*> (o .:? "id")

696+ (o .:? "asciiArmoredPgpPublicKey")

697+ <*> (o .:? "id")

616 <*> (o .:? "comment"))

698 <*> (o .:? "comment"))

617

699

618instance ToJSON AttestorPublicKey where

700instance ToJSON AttestorPublicKey where

619 toJSON AttestorPublicKey'{..}

701 toJSON AttestorPublicKey'{..}

620 = object

702 = object

621 (catMaybes

703 (catMaybes

704+ [("pkixPublicKey" .=) <$> _apkPkixPublicKey,

622− [("asciiArmoredPgpPublicKey" .=) <$>

705+ ("asciiArmoredPgpPublicKey" .=) <$>

623 _apkAsciiArmoredPgpPublicKey,

706 _apkAsciiArmoredPgpPublicKey,

624 ("id" .=) <$> _apkId,

707 ("id" .=) <$> _apkId,

625 ("comment" .=) <$> _apkComment])

708 ("comment" .=) <$> _apkComment])

@@ -677,6 +760,7 @@ data Policy =

677 , _pClusterAdmissionRules :: !(Maybe PolicyClusterAdmissionRules)

760 , _pClusterAdmissionRules :: !(Maybe PolicyClusterAdmissionRules)

678 , _pUpdateTime :: !(Maybe DateTime')

761 , _pUpdateTime :: !(Maybe DateTime')

679 , _pName :: !(Maybe Text)

762 , _pName :: !(Maybe Text)

763+ , _pGlobalPolicyEvaluationMode :: !(Maybe PolicyGlobalPolicyEvaluationMode)

680 , _pDescription :: !(Maybe Text)

764 , _pDescription :: !(Maybe Text)

681 }

765 }

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

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

@@ -696,6 +780,8 @@ data Policy =

696--

780--

697-- * 'pName'

781-- * 'pName'

698--

782--

783+-- * 'pGlobalPolicyEvaluationMode'

784+--

699-- * 'pDescription'

785-- * 'pDescription'

700policy

786policy

701 :: Policy

787 :: Policy

@@ -706,12 +792,14 @@ policy =

706 , _pClusterAdmissionRules = Nothing

792 , _pClusterAdmissionRules = Nothing

707 , _pUpdateTime = Nothing

793 , _pUpdateTime = Nothing

708 , _pName = Nothing

794 , _pName = Nothing

795+ , _pGlobalPolicyEvaluationMode = Nothing

709 , _pDescription = Nothing

796 , _pDescription = Nothing

710 }

797 }

711

798

712

799

713−-- | Required. Default admission rule for a cluster without a per-cluster

800+-- | Required. Default admission rule for a cluster without a per-cluster,

801+-- per- kubernetes-service-account, or per-istio-service-identity admission

714−-- admission rule.

802+-- rule.

715pDefaultAdmissionRule :: Lens' Policy (Maybe AdmissionRule)

803pDefaultAdmissionRule :: Lens' Policy (Maybe AdmissionRule)

716pDefaultAdmissionRule

804pDefaultAdmissionRule

717 = lens _pDefaultAdmissionRule

805 = lens _pDefaultAdmissionRule

@@ -750,6 +838,15 @@ pUpdateTime

750pName :: Lens' Policy (Maybe Text)

838pName :: Lens' Policy (Maybe Text)

751pName = lens _pName (\ s a -> s{_pName = a})

839pName = lens _pName (\ s a -> s{_pName = a})

752

840

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+

753-- | Optional. A descriptive comment.

850-- | Optional. A descriptive comment.

754pDescription :: Lens' Policy (Maybe Text)

851pDescription :: Lens' Policy (Maybe Text)

755pDescription

852pDescription

@@ -765,6 +862,7 @@ instance FromJSON Policy where

765 <*> (o .:? "clusterAdmissionRules")

862 <*> (o .:? "clusterAdmissionRules")

766 <*> (o .:? "updateTime")

863 <*> (o .:? "updateTime")

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

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

865+ <*> (o .:? "globalPolicyEvaluationMode")

768 <*> (o .:? "description"))

866 <*> (o .:? "description"))

769

867

770instance ToJSON Policy where

868instance ToJSON Policy where

@@ -779,6 +877,8 @@ instance ToJSON Policy where

779 _pClusterAdmissionRules,

877 _pClusterAdmissionRules,

780 ("updateTime" .=) <$> _pUpdateTime,

878 ("updateTime" .=) <$> _pUpdateTime,

781 ("name" .=) <$> _pName,

879 ("name" .=) <$> _pName,

880+ ("globalPolicyEvaluationMode" .=) <$>

881+ _pGlobalPolicyEvaluationMode,

782 ("description" .=) <$> _pDescription])

882 ("description" .=) <$> _pDescription])

783

883

784-- | Optional. Per-cluster admission rules. Cluster spec format:

884-- | Optional. Per-cluster admission rules. Cluster spec format:

@@ -940,8 +1040,8 @@ binding =

940-- that represents a service account. For example,

1040-- that represents a service account. For example,

941-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

1041-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

942-- email address that represents a Google group. For example,

1042-- email address that represents a Google group. For example,

943−-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

1043+-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

944−-- name that represents all the users of that domain. For example,

1044+-- (primary) that represents all the users of that domain. For example,

945-- \`google.com\` or \`example.com\`.

1045-- \`google.com\` or \`example.com\`.

946bMembers :: Lens' Binding [Text]

1046bMembers :: Lens' Binding [Text]

947bMembers

1047bMembers

@@ -954,10 +1054,9 @@ bMembers

954bRole :: Lens' Binding (Maybe Text)

1054bRole :: Lens' Binding (Maybe Text)

955bRole = lens _bRole (\ s a -> s{_bRole = a})

1055bRole = lens _bRole (\ s a -> s{_bRole = a})

956

1056

957−-- | Unimplemented. The condition that is associated with this binding. NOTE:

1057+-- | The condition that is associated with this binding. NOTE: An unsatisfied

958−-- an unsatisfied condition will not allow user access via current binding.

1058+-- condition will not allow user access via current binding. Different

959−-- Different bindings, including their conditions, are examined

1059+-- bindings, including their conditions, are examined independently.

960−-- independently.

961bCondition :: Lens' Binding (Maybe Expr)

1060bCondition :: Lens' Binding (Maybe Expr)

962bCondition

1061bCondition

963 = lens _bCondition (\ s a -> s{_bCondition = a})

1062 = lens _bCondition (\ s a -> s{_bCondition = a})

gogol-binaryauthorization/gen/Network/Google/BinaryAuthorization/Types/Sum.hs+127−2

@@ -23,10 +23,14 @@ import Network.Google.Prelude hiding (Bytes)

23data AdmissionRuleEnforcementMode

23data AdmissionRuleEnforcementMode

24 = EnforcementModeUnspecified

24 = EnforcementModeUnspecified

25 -- ^ @ENFORCEMENT_MODE_UNSPECIFIED@

25 -- ^ @ENFORCEMENT_MODE_UNSPECIFIED@

26− -- Mandatory.

26+ -- Do not use.

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.

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

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

31

35

32instance Hashable AdmissionRuleEnforcementMode

36instance Hashable AdmissionRuleEnforcementMode

@@ -35,12 +39,14 @@ instance FromHttpApiData AdmissionRuleEnforcementMode where

35 parseQueryParam = \case

39 parseQueryParam = \case

36 "ENFORCEMENT_MODE_UNSPECIFIED" -> Right EnforcementModeUnspecified

40 "ENFORCEMENT_MODE_UNSPECIFIED" -> Right EnforcementModeUnspecified

37 "ENFORCED_BLOCK_AND_AUDIT_LOG" -> Right EnforcedBlockAndAuditLog

41 "ENFORCED_BLOCK_AND_AUDIT_LOG" -> Right EnforcedBlockAndAuditLog

42+ "DRYRUN_AUDIT_LOG_ONLY" -> Right DryrunAuditLogOnly

38 x -> Left ("Unable to parse AdmissionRuleEnforcementMode from: " <> x)

43 x -> Left ("Unable to parse AdmissionRuleEnforcementMode from: " <> x)

39

44

40instance ToHttpApiData AdmissionRuleEnforcementMode where

45instance ToHttpApiData AdmissionRuleEnforcementMode where

41 toQueryParam = \case

46 toQueryParam = \case

42 EnforcementModeUnspecified -> "ENFORCEMENT_MODE_UNSPECIFIED"

47 EnforcementModeUnspecified -> "ENFORCEMENT_MODE_UNSPECIFIED"

43 EnforcedBlockAndAuditLog -> "ENFORCED_BLOCK_AND_AUDIT_LOG"

48 EnforcedBlockAndAuditLog -> "ENFORCED_BLOCK_AND_AUDIT_LOG"

49+ DryrunAuditLogOnly -> "DRYRUN_AUDIT_LOG_ONLY"

44

50

45instance FromJSON AdmissionRuleEnforcementMode where

51instance FromJSON AdmissionRuleEnforcementMode where

46 parseJSON = parseJSONText "AdmissionRuleEnforcementMode"

52 parseJSON = parseJSONText "AdmissionRuleEnforcementMode"

@@ -48,11 +54,130 @@ instance FromJSON AdmissionRuleEnforcementMode where

48instance ToJSON AdmissionRuleEnforcementMode where

54instance ToJSON AdmissionRuleEnforcementMode where

49 toJSON = toJSONText

55 toJSON = toJSONText

50

56

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+

51-- | Required. How this admission rule will be evaluated.

176-- | Required. How this admission rule will be evaluated.

52data AdmissionRuleEvaluationMode

177data AdmissionRuleEvaluationMode

53 = EvaluationModeUnspecified

178 = EvaluationModeUnspecified

54 -- ^ @EVALUATION_MODE_UNSPECIFIED@

179 -- ^ @EVALUATION_MODE_UNSPECIFIED@

55− -- Mandatory.

180+ -- Do not use.

56 | AlwaysAllow

181 | AlwaysAllow

57 -- ^ @ALWAYS_ALLOW@

182 -- ^ @ALWAYS_ALLOW@

58 -- This rule allows all all pod creations.

183 -- This rule allows all all pod creations.

gogol-classroom/gen/Network/Google/Classroom.hs+47−5

@@ -26,6 +26,7 @@ module Network.Google.Classroom

26 , classroomCoursesScope

26 , classroomCoursesScope

27 , classroomPushNotificationsScope

27 , classroomPushNotificationsScope

28 , classroomCourseworkStudentsReadOnlyScope

28 , classroomCourseworkStudentsReadOnlyScope

29+ , classroomTopicsReadOnlyScope

29 , classroomProFileEmailsScope

30 , classroomProFileEmailsScope

30 , classroomProFilePhotosScope

31 , classroomProFilePhotosScope

31 , classroomCourseworkMeScope

32 , classroomCourseworkMeScope

@@ -36,6 +37,7 @@ module Network.Google.Classroom

36 , classroomRostersScope

37 , classroomRostersScope

37 , classroomCoursesReadOnlyScope

38 , classroomCoursesReadOnlyScope

38 , classroomCourseworkStudentsScope

39 , classroomCourseworkStudentsScope

40+ , classroomTopicsScope

39 , classroomAnnouncementsScope

41 , classroomAnnouncementsScope

40 , classroomCourseworkMeReadOnlyScope

42 , classroomCourseworkMeReadOnlyScope

41 , classroomStudentSubmissionsMeReadOnlyScope

43 , classroomStudentSubmissionsMeReadOnlyScope

@@ -151,6 +153,21 @@ module Network.Google.Classroom

151 -- ** classroom.courses.teachers.list

153 -- ** classroom.courses.teachers.list

152 , module Network.Google.Resource.Classroom.Courses.Teachers.List

154 , module Network.Google.Resource.Classroom.Courses.Teachers.List

153

155

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+

154 -- ** classroom.courses.update

171 -- ** classroom.courses.update

155 , module Network.Google.Resource.Classroom.Courses.Update

172 , module Network.Google.Resource.Classroom.Courses.Update

156

173

@@ -222,6 +239,7 @@ module Network.Google.Classroom

222 , cwDueTime

239 , cwDueTime

223 , cwAssociatedWithDeveloper

240 , cwAssociatedWithDeveloper

224 , cwUpdateTime

241 , cwUpdateTime

242+ , cwTopicId

225 , cwMultipleChoiceQuestion

243 , cwMultipleChoiceQuestion

226 , cwId

244 , cwId

227 , cwSubmissionModificationMode

245 , cwSubmissionModificationMode

@@ -326,6 +344,12 @@ module Network.Google.Classroom

326 , globalPermission

344 , globalPermission

327 , gpPermission

345 , gpPermission

328

346

347+ -- ** ListTopicResponse

348+ , ListTopicResponse

349+ , listTopicResponse

350+ , ltrNextPageToken

351+ , ltrTopic

352+

329 -- ** Link

353 -- ** Link

330 , Link

354 , Link

331 , link

355 , link

@@ -431,6 +455,14 @@ module Network.Google.Classroom

431 , aYouTubeVideo

455 , aYouTubeVideo

432 , aForm

456 , aForm

433

457

458+ -- ** Topic

459+ , Topic

460+ , topic

461+ , tCourseId

462+ , tUpdateTime

463+ , tTopicId

464+ , tName

465+

434 -- ** Announcement

466 -- ** Announcement

435 , Announcement

467 , Announcement

436 , announcement

468 , announcement

@@ -492,9 +524,9 @@ module Network.Google.Classroom

492 -- ** Teacher

524 -- ** Teacher

493 , Teacher

525 , Teacher

494 , teacher

526 , teacher

495− , tCourseId

527+ , teaCourseId

496− , tProFile

528+ , teaProFile

497− , tUserId

529+ , teaUserId

498

530

499 -- ** CourseMaterialSet

531 -- ** CourseMaterialSet

500 , CourseMaterialSet

532 , CourseMaterialSet

@@ -657,8 +689,8 @@ module Network.Google.Classroom

657 -- ** ListTeachersResponse

689 -- ** ListTeachersResponse

658 , ListTeachersResponse

690 , ListTeachersResponse

659 , listTeachersResponse

691 , listTeachersResponse

660− , ltrNextPageToken

692+ , lNextPageToken

661− , ltrTeachers

693+ , lTeachers

662

694

663 -- ** Student

695 -- ** Student

664 , Student

696 , Student

@@ -717,6 +749,11 @@ import Network.Google.Resource.Classroom.Courses.Teachers.Create

717import Network.Google.Resource.Classroom.Courses.Teachers.Delete

749import Network.Google.Resource.Classroom.Courses.Teachers.Delete

718import Network.Google.Resource.Classroom.Courses.Teachers.Get

750import Network.Google.Resource.Classroom.Courses.Teachers.Get

719import Network.Google.Resource.Classroom.Courses.Teachers.List

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

720import Network.Google.Resource.Classroom.Courses.Update

757import Network.Google.Resource.Classroom.Courses.Update

721import Network.Google.Resource.Classroom.Invitations.Accept

758import Network.Google.Resource.Classroom.Invitations.Accept

722import Network.Google.Resource.Classroom.Invitations.Create

759import Network.Google.Resource.Classroom.Invitations.Create

@@ -772,6 +809,11 @@ type ClassroomAPI =

772 :<|> CoursesAnnouncementsCreateResource

809 :<|> CoursesAnnouncementsCreateResource

773 :<|> CoursesAnnouncementsModifyAssigneesResource

810 :<|> CoursesAnnouncementsModifyAssigneesResource

774 :<|> CoursesAnnouncementsDeleteResource

811 :<|> CoursesAnnouncementsDeleteResource

812+ :<|> CoursesTopicsListResource

813+ :<|> CoursesTopicsPatchResource

814+ :<|> CoursesTopicsGetResource

815+ :<|> CoursesTopicsCreateResource

816+ :<|> CoursesTopicsDeleteResource

775 :<|> CoursesAliasesListResource

817 :<|> CoursesAliasesListResource

776 :<|> CoursesAliasesCreateResource

818 :<|> CoursesAliasesCreateResource

777 :<|> CoursesAliasesDeleteResource

819 :<|> CoursesAliasesDeleteResource

gogol-classroom/gen/Network/Google/Classroom/Types.hs+30−5

@@ -24,6 +24,7 @@ module Network.Google.Classroom.Types

24 , classroomCoursesScope

24 , classroomCoursesScope

25 , classroomPushNotificationsScope

25 , classroomPushNotificationsScope

26 , classroomCourseworkStudentsReadOnlyScope

26 , classroomCourseworkStudentsReadOnlyScope

27+ , classroomTopicsReadOnlyScope

27 , classroomProFileEmailsScope

28 , classroomProFileEmailsScope

28 , classroomProFilePhotosScope

29 , classroomProFilePhotosScope

29 , classroomCourseworkMeScope

30 , classroomCourseworkMeScope

@@ -34,6 +35,7 @@ module Network.Google.Classroom.Types

34 , classroomRostersScope

35 , classroomRostersScope

35 , classroomCoursesReadOnlyScope

36 , classroomCoursesReadOnlyScope

36 , classroomCourseworkStudentsScope

37 , classroomCourseworkStudentsScope

38+ , classroomTopicsScope

37 , classroomAnnouncementsScope

39 , classroomAnnouncementsScope

38 , classroomCourseworkMeReadOnlyScope

40 , classroomCourseworkMeReadOnlyScope

39 , classroomStudentSubmissionsMeReadOnlyScope

41 , classroomStudentSubmissionsMeReadOnlyScope

@@ -60,6 +62,7 @@ module Network.Google.Classroom.Types

60 , cwDueTime

62 , cwDueTime

61 , cwAssociatedWithDeveloper

63 , cwAssociatedWithDeveloper

62 , cwUpdateTime

64 , cwUpdateTime

65+ , cwTopicId

63 , cwMultipleChoiceQuestion

66 , cwMultipleChoiceQuestion

64 , cwId

67 , cwId

65 , cwSubmissionModificationMode

68 , cwSubmissionModificationMode

@@ -164,6 +167,12 @@ module Network.Google.Classroom.Types

164 , globalPermission

167 , globalPermission

165 , gpPermission

168 , gpPermission

166

169

170+ -- * ListTopicResponse

171+ , ListTopicResponse

172+ , listTopicResponse

173+ , ltrNextPageToken

174+ , ltrTopic

175+

167 -- * Link

176 -- * Link

168 , Link

177 , Link

169 , link

178 , link

@@ -269,6 +278,14 @@ module Network.Google.Classroom.Types

269 , aYouTubeVideo

278 , aYouTubeVideo

270 , aForm

279 , aForm

271

280

281+ -- * Topic

282+ , Topic

283+ , topic

284+ , tCourseId

285+ , tUpdateTime

286+ , tTopicId

287+ , tName

288+

272 -- * Announcement

289 -- * Announcement

273 , Announcement

290 , Announcement

274 , announcement

291 , announcement

@@ -330,9 +347,9 @@ module Network.Google.Classroom.Types

330 -- * Teacher

347 -- * Teacher

331 , Teacher

348 , Teacher

332 , teacher

349 , teacher

333− , tCourseId

350+ , teaCourseId

334− , tProFile

351+ , teaProFile

335− , tUserId

352+ , teaUserId

336

353

337 -- * CourseMaterialSet

354 -- * CourseMaterialSet

338 , CourseMaterialSet

355 , CourseMaterialSet

@@ -495,8 +512,8 @@ module Network.Google.Classroom.Types

495 -- * ListTeachersResponse

512 -- * ListTeachersResponse

496 , ListTeachersResponse

513 , ListTeachersResponse

497 , listTeachersResponse

514 , listTeachersResponse

498− , ltrNextPageToken

515+ , lNextPageToken

499− , ltrTeachers

516+ , lTeachers

500

517

501 -- * Student

518 -- * Student

502 , Student

519 , Student

@@ -545,6 +562,10 @@ classroomPushNotificationsScope = Proxy

545classroomCourseworkStudentsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students.readonly"]

562classroomCourseworkStudentsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students.readonly"]

546classroomCourseworkStudentsReadOnlyScope = Proxy

563classroomCourseworkStudentsReadOnlyScope = Proxy

547

564

565+-- | View topics in Google Classroom

566+classroomTopicsReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/classroom.topics.readonly"]

567+classroomTopicsReadOnlyScope = Proxy

568+

548-- | View the email addresses of people in your classes

569-- | View the email addresses of people in your classes

549classroomProFileEmailsScope :: Proxy '["https://www.googleapis.com/auth/classroom.profile.emails"]

570classroomProFileEmailsScope :: Proxy '["https://www.googleapis.com/auth/classroom.profile.emails"]

550classroomProFileEmailsScope = Proxy

571classroomProFileEmailsScope = Proxy

@@ -588,6 +609,10 @@ classroomCoursesReadOnlyScope = Proxy

588classroomCourseworkStudentsScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students"]

609classroomCourseworkStudentsScope :: Proxy '["https://www.googleapis.com/auth/classroom.coursework.students"]

589classroomCourseworkStudentsScope = Proxy

610classroomCourseworkStudentsScope = Proxy

590

611

612+-- | See, create, and edit topics in Google Classroom

613+classroomTopicsScope :: Proxy '["https://www.googleapis.com/auth/classroom.topics"]

614+classroomTopicsScope = Proxy

615+

591-- | View and manage announcements in Google Classroom

616-- | View and manage announcements in Google Classroom

592classroomAnnouncementsScope :: Proxy '["https://www.googleapis.com/auth/classroom.announcements"]

617classroomAnnouncementsScope :: Proxy '["https://www.googleapis.com/auth/classroom.announcements"]

593classroomAnnouncementsScope = Proxy

618classroomAnnouncementsScope = Proxy

gogol-classroom/gen/Network/Google/Classroom/Types/Product.hs+174−31

@@ -91,6 +91,7 @@ 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)

94 , _cwMultipleChoiceQuestion :: !(Maybe MultipleChoiceQuestion)

95 , _cwMultipleChoiceQuestion :: !(Maybe MultipleChoiceQuestion)

95 , _cwId :: !(Maybe Text)

96 , _cwId :: !(Maybe Text)

96 , _cwSubmissionModificationMode :: !(Maybe CourseWorkSubmissionModificationMode)

97 , _cwSubmissionModificationMode :: !(Maybe CourseWorkSubmissionModificationMode)

@@ -132,6 +133,8 @@ data CourseWork =

132--

133--

133-- * 'cwUpdateTime'

134-- * 'cwUpdateTime'

134--

135--

136+-- * 'cwTopicId'

137+--

135-- * 'cwMultipleChoiceQuestion'

138-- * 'cwMultipleChoiceQuestion'

136--

139--

137-- * 'cwId'

140-- * 'cwId'

@@ -165,6 +168,7 @@ courseWork =

165 , _cwDueTime = Nothing

168 , _cwDueTime = Nothing

166 , _cwAssociatedWithDeveloper = Nothing

169 , _cwAssociatedWithDeveloper = Nothing

167 , _cwUpdateTime = Nothing

170 , _cwUpdateTime = Nothing

171+ , _cwTopicId = Nothing

168 , _cwMultipleChoiceQuestion = Nothing

172 , _cwMultipleChoiceQuestion = Nothing

169 , _cwId = Nothing

173 , _cwId = Nothing

170 , _cwSubmissionModificationMode = Nothing

174 , _cwSubmissionModificationMode = Nothing

@@ -259,6 +263,12 @@ cwUpdateTime

259 = lens _cwUpdateTime (\ s a -> s{_cwUpdateTime = a})

263 = lens _cwUpdateTime (\ s a -> s{_cwUpdateTime = a})

260 . mapping _DateTime

264 . mapping _DateTime

261

265

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+

262-- | Multiple choice question details. For read operations, this field is

272-- | Multiple choice question details. For read operations, this field is

263-- populated only when \`work_type\` is \`MULTIPLE_CHOICE_QUESTION\`. For

273-- populated only when \`work_type\` is \`MULTIPLE_CHOICE_QUESTION\`. For

264-- write operations, this field must be specified when creating course work

274-- write operations, this field must be specified when creating course work

@@ -334,6 +344,7 @@ instance FromJSON CourseWork where

334 <*> (o .:? "dueTime")

344 <*> (o .:? "dueTime")

335 <*> (o .:? "associatedWithDeveloper")

345 <*> (o .:? "associatedWithDeveloper")

336 <*> (o .:? "updateTime")

346 <*> (o .:? "updateTime")

347+ <*> (o .:? "topicId")

337 <*> (o .:? "multipleChoiceQuestion")

348 <*> (o .:? "multipleChoiceQuestion")

338 <*> (o .:? "id")

349 <*> (o .:? "id")

339 <*> (o .:? "submissionModificationMode")

350 <*> (o .:? "submissionModificationMode")

@@ -362,6 +373,7 @@ instance ToJSON CourseWork where

362 ("associatedWithDeveloper" .=) <$>

373 ("associatedWithDeveloper" .=) <$>

363 _cwAssociatedWithDeveloper,

374 _cwAssociatedWithDeveloper,

364 ("updateTime" .=) <$> _cwUpdateTime,

375 ("updateTime" .=) <$> _cwUpdateTime,

376+ ("topicId" .=) <$> _cwTopicId,

365 ("multipleChoiceQuestion" .=) <$>

377 ("multipleChoiceQuestion" .=) <$>

366 _cwMultipleChoiceQuestion,

378 _cwMultipleChoiceQuestion,

367 ("id" .=) <$> _cwId,

379 ("id" .=) <$> _cwId,

@@ -1020,6 +1032,59 @@ instance ToJSON GlobalPermission where

1020 = object

1032 = object

1021 (catMaybes [("permission" .=) <$> _gpPermission])

1033 (catMaybes [("permission" .=) <$> _gpPermission])

1022

1034

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+

1023-- | URL item.

1088-- | URL item.

1024--

1089--

1025-- /See:/ 'link' smart constructor.

1090-- /See:/ 'link' smart constructor.

@@ -1808,6 +1873,82 @@ instance ToJSON Attachment where

1808 ("youTubeVideo" .=) <$> _aYouTubeVideo,

1873 ("youTubeVideo" .=) <$> _aYouTubeVideo,

1809 ("form" .=) <$> _aForm])

1874 ("form" .=) <$> _aForm])

1810

1875

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+

1811-- | Announcement created by a teacher for students of the course

1952-- | Announcement created by a teacher for students of the course

1812--

1953--

1813-- /See:/ 'announcement' smart constructor.

1954-- /See:/ 'announcement' smart constructor.

@@ -2434,9 +2575,9 @@ instance ToJSON YouTubeVideo where

2434-- /See:/ 'teacher' smart constructor.

2575-- /See:/ 'teacher' smart constructor.

2435data Teacher =

2576data Teacher =

2436 Teacher'

2577 Teacher'

2437− { _tCourseId :: !(Maybe Text)

2578+ { _teaCourseId :: !(Maybe Text)

2438− , _tProFile :: !(Maybe UserProFile)

2579+ , _teaProFile :: !(Maybe UserProFile)

2439− , _tUserId :: !(Maybe Text)

2580+ , _teaUserId :: !(Maybe Text)

2440 }

2581 }

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

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

2442

2583

@@ -2445,32 +2586,34 @@ data Teacher =

2445--

2586--

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

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

2447--

2588--

2448−-- * 'tCourseId'

2589+-- * 'teaCourseId'

2449--

2590--

2450−-- * 'tProFile'

2591+-- * 'teaProFile'

2451--

2592--

2452−-- * 'tUserId'

2593+-- * 'teaUserId'

2453teacher

2594teacher

2454 :: Teacher

2595 :: Teacher

2455teacher =

2596teacher =

2456− Teacher' {_tCourseId = Nothing, _tProFile = Nothing, _tUserId = Nothing}

2597+ Teacher' {_teaCourseId = Nothing, _teaProFile = Nothing, _teaUserId = Nothing}

2457

2598

2458

2599

2459-- | Identifier of the course. Read-only.

2600-- | Identifier of the course. Read-only.

2460−tCourseId :: Lens' Teacher (Maybe Text)

2601+teaCourseId :: Lens' Teacher (Maybe Text)

2461−tCourseId

2602+teaCourseId

2462− = lens _tCourseId (\ s a -> s{_tCourseId = a})

2603+ = lens _teaCourseId (\ s a -> s{_teaCourseId = a})

2463

2604

2464-- | Global user information for the teacher. Read-only.

2605-- | Global user information for the teacher. Read-only.

2465−tProFile :: Lens' Teacher (Maybe UserProFile)

2606+teaProFile :: Lens' Teacher (Maybe UserProFile)

2466−tProFile = lens _tProFile (\ s a -> s{_tProFile = a})

2607+teaProFile

2608+ = lens _teaProFile (\ s a -> s{_teaProFile = a})

2467

2609

2468-- | Identifier of the user. When specified as a parameter of a request, this

2610-- | Identifier of the user. When specified as a parameter of a request, this

2469-- identifier can be one of the following: * the numeric identifier for the

2611-- identifier can be one of the following: * the numeric identifier for the

2470-- user * the email address of the user * the string literal \`\"me\"\`,

2612-- user * the email address of the user * the string literal \`\"me\"\`,

2471-- indicating the requesting user

2613-- indicating the requesting user

2472−tUserId :: Lens' Teacher (Maybe Text)

2614+teaUserId :: Lens' Teacher (Maybe Text)

2473−tUserId = lens _tUserId (\ s a -> s{_tUserId = a})

2615+teaUserId

2616+ = lens _teaUserId (\ s a -> s{_teaUserId = a})

2474

2617

2475instance FromJSON Teacher where

2618instance FromJSON Teacher where

2476 parseJSON

2619 parseJSON

@@ -2484,9 +2627,9 @@ instance ToJSON Teacher where

2484 toJSON Teacher'{..}

2627 toJSON Teacher'{..}

2485 = object

2628 = object

2486 (catMaybes

2629 (catMaybes

2487− [("courseId" .=) <$> _tCourseId,

2630+ [("courseId" .=) <$> _teaCourseId,

2488− ("profile" .=) <$> _tProFile,

2631+ ("profile" .=) <$> _teaProFile,

2489− ("userId" .=) <$> _tUserId])

2632+ ("userId" .=) <$> _teaUserId])

2490

2633

2491-- | A set of materials that appears on the \"About\" page of the course.

2634-- | A set of materials that appears on the \"About\" page of the course.

2492-- These materials might include a syllabus, schedule, or other background

2635-- These materials might include a syllabus, schedule, or other background

@@ -3797,8 +3940,8 @@ instance ToJSON Form where

3797-- /See:/ 'listTeachersResponse' smart constructor.

3940-- /See:/ 'listTeachersResponse' smart constructor.

3798data ListTeachersResponse =

3941data ListTeachersResponse =

3799 ListTeachersResponse'

3942 ListTeachersResponse'

3800− { _ltrNextPageToken :: !(Maybe Text)

3943+ { _lNextPageToken :: !(Maybe Text)

3801− , _ltrTeachers :: !(Maybe [Teacher])

3944+ , _lTeachers :: !(Maybe [Teacher])

3802 }

3945 }

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

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

3804

3947

@@ -3807,26 +3950,26 @@ data ListTeachersResponse =

3807--

3950--

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

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

3809--

3952--

3810−-- * 'ltrNextPageToken'

3953+-- * 'lNextPageToken'

3811--

3954--

3812−-- * 'ltrTeachers'

3955+-- * 'lTeachers'

3813listTeachersResponse

3956listTeachersResponse

3814 :: ListTeachersResponse

3957 :: ListTeachersResponse

3815listTeachersResponse =

3958listTeachersResponse =

3816− ListTeachersResponse' {_ltrNextPageToken = Nothing, _ltrTeachers = Nothing}

3959+ ListTeachersResponse' {_lNextPageToken = Nothing, _lTeachers = Nothing}

3817

3960

3818

3961

3819-- | Token identifying the next page of results to return. If empty, no

3962-- | Token identifying the next page of results to return. If empty, no

3820-- further results are available.

3963-- further results are available.

3821−ltrNextPageToken :: Lens' ListTeachersResponse (Maybe Text)

3964+lNextPageToken :: Lens' ListTeachersResponse (Maybe Text)

3822−ltrNextPageToken

3965+lNextPageToken

3823− = lens _ltrNextPageToken

3966+ = lens _lNextPageToken

3824− (\ s a -> s{_ltrNextPageToken = a})

3967+ (\ s a -> s{_lNextPageToken = a})

3825

3968

3826-- | Teachers who match the list request.

3969-- | Teachers who match the list request.

3827−ltrTeachers :: Lens' ListTeachersResponse [Teacher]

3970+lTeachers :: Lens' ListTeachersResponse [Teacher]

3828−ltrTeachers

3971+lTeachers

3829− = lens _ltrTeachers (\ s a -> s{_ltrTeachers = a}) .

3972+ = lens _lTeachers (\ s a -> s{_lTeachers = a}) .

3830 _Default

3973 _Default

3831 . _Coerce

3974 . _Coerce

3832

3975

@@ -3842,8 +3985,8 @@ instance ToJSON ListTeachersResponse where

3842 toJSON ListTeachersResponse'{..}

3985 toJSON ListTeachersResponse'{..}

3843 = object

3986 = object

3844 (catMaybes

3987 (catMaybes

3845− [("nextPageToken" .=) <$> _ltrNextPageToken,

3988+ [("nextPageToken" .=) <$> _lNextPageToken,

3846− ("teachers" .=) <$> _ltrTeachers])

3989+ ("teachers" .=) <$> _lTeachers])

3847

3990

3848-- | Student in a course.

3991-- | Student in a course.

3849--

3992--

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Delete.hs+60−59

@@ -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− , ctdXgafv

41+ , ctdtXgafv

42− , ctdUploadProtocol

42+ , ctdtUploadProtocol

43− , ctdCourseId

43+ , ctdtCourseId

44− , ctdAccessToken

44+ , ctdtAccessToken

45− , ctdUploadType

45+ , ctdtUploadType

46− , ctdUserId

46+ , ctdtUserId

47− , ctdCallback

47+ , ctdtCallback

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− { _ctdXgafv :: !(Maybe Xgafv)

78+ { _ctdtXgafv :: !(Maybe Xgafv)

79− , _ctdUploadProtocol :: !(Maybe Text)

79+ , _ctdtUploadProtocol :: !(Maybe Text)

80− , _ctdCourseId :: !Text

80+ , _ctdtCourseId :: !Text

81− , _ctdAccessToken :: !(Maybe Text)

81+ , _ctdtAccessToken :: !(Maybe Text)

82− , _ctdUploadType :: !(Maybe Text)

82+ , _ctdtUploadType :: !(Maybe Text)

83− , _ctdUserId :: !Text

83+ , _ctdtUserId :: !Text

84− , _ctdCallback :: !(Maybe Text)

84+ , _ctdtCallback :: !(Maybe Text)

85 }

85 }

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

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

87

87

@@ -90,85 +90,86 @@ 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−-- * 'ctdXgafv'

93+-- * 'ctdtXgafv'

94--

94--

95−-- * 'ctdUploadProtocol'

95+-- * 'ctdtUploadProtocol'

96--

96--

97−-- * 'ctdCourseId'

97+-- * 'ctdtCourseId'

98--

98--

99−-- * 'ctdAccessToken'

99+-- * 'ctdtAccessToken'

100--

100--

101−-- * 'ctdUploadType'

101+-- * 'ctdtUploadType'

102--

102--

103−-- * 'ctdUserId'

103+-- * 'ctdtUserId'

104--

104--

105−-- * 'ctdCallback'

105+-- * 'ctdtCallback'

106coursesTeachersDelete

106coursesTeachersDelete

107− :: Text -- ^ 'ctdCourseId'

107+ :: Text -- ^ 'ctdtCourseId'

108− -> Text -- ^ 'ctdUserId'

108+ -> Text -- ^ 'ctdtUserId'

109 -> CoursesTeachersDelete

109 -> CoursesTeachersDelete

110−coursesTeachersDelete pCtdCourseId_ pCtdUserId_ =

110+coursesTeachersDelete pCtdtCourseId_ pCtdtUserId_ =

111 CoursesTeachersDelete'

111 CoursesTeachersDelete'

112− { _ctdXgafv = Nothing

112+ { _ctdtXgafv = Nothing

113− , _ctdUploadProtocol = Nothing

113+ , _ctdtUploadProtocol = Nothing

114− , _ctdCourseId = pCtdCourseId_

114+ , _ctdtCourseId = pCtdtCourseId_

115− , _ctdAccessToken = Nothing

115+ , _ctdtAccessToken = Nothing

116− , _ctdUploadType = Nothing

116+ , _ctdtUploadType = Nothing

117− , _ctdUserId = pCtdUserId_

117+ , _ctdtUserId = pCtdtUserId_

118− , _ctdCallback = Nothing

118+ , _ctdtCallback = Nothing

119 }

119 }

120

120

121

121

122-- | V1 error format.

122-- | V1 error format.

123−ctdXgafv :: Lens' CoursesTeachersDelete (Maybe Xgafv)

123+ctdtXgafv :: Lens' CoursesTeachersDelete (Maybe Xgafv)

124−ctdXgafv = lens _ctdXgafv (\ s a -> s{_ctdXgafv = a})

124+ctdtXgafv

125+ = lens _ctdtXgafv (\ s a -> s{_ctdtXgafv = a})

125

126

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

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

127−ctdUploadProtocol :: Lens' CoursesTeachersDelete (Maybe Text)

128+ctdtUploadProtocol :: Lens' CoursesTeachersDelete (Maybe Text)

128−ctdUploadProtocol

129+ctdtUploadProtocol

129− = lens _ctdUploadProtocol

130+ = lens _ctdtUploadProtocol

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

131+ (\ s a -> s{_ctdtUploadProtocol = a})

131

132

132-- | Identifier of the course. This identifier can be either the

133-- | Identifier of the course. This identifier can be either the

133-- Classroom-assigned identifier or an alias.

134-- Classroom-assigned identifier or an alias.

134−ctdCourseId :: Lens' CoursesTeachersDelete Text

135+ctdtCourseId :: Lens' CoursesTeachersDelete Text

135−ctdCourseId

136+ctdtCourseId

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

137+ = lens _ctdtCourseId (\ s a -> s{_ctdtCourseId = a})

137

138

138-- | OAuth access token.

139-- | OAuth access token.

139−ctdAccessToken :: Lens' CoursesTeachersDelete (Maybe Text)

140+ctdtAccessToken :: Lens' CoursesTeachersDelete (Maybe Text)

140−ctdAccessToken

141+ctdtAccessToken

141− = lens _ctdAccessToken

142+ = lens _ctdtAccessToken

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

143+ (\ s a -> s{_ctdtAccessToken = a})

143

144

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

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

145−ctdUploadType :: Lens' CoursesTeachersDelete (Maybe Text)

146+ctdtUploadType :: Lens' CoursesTeachersDelete (Maybe Text)

146−ctdUploadType

147+ctdtUploadType

147− = lens _ctdUploadType

148+ = lens _ctdtUploadType

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

149+ (\ s a -> s{_ctdtUploadType = a})

149

150

150-- | Identifier of the teacher to delete. The identifier can be one of the

151-- | Identifier of the teacher to delete. The identifier can be one of the

151-- following: * the numeric identifier for the user * the email address of

152-- following: * the numeric identifier for the user * the email address of

152-- the user * the string literal \`\"me\"\`, indicating the requesting user

153-- the user * the string literal \`\"me\"\`, indicating the requesting user

153−ctdUserId :: Lens' CoursesTeachersDelete Text

154+ctdtUserId :: Lens' CoursesTeachersDelete Text

154−ctdUserId

155+ctdtUserId

155− = lens _ctdUserId (\ s a -> s{_ctdUserId = a})

156+ = lens _ctdtUserId (\ s a -> s{_ctdtUserId = a})

156

157

157-- | JSONP

158-- | JSONP

158−ctdCallback :: Lens' CoursesTeachersDelete (Maybe Text)

159+ctdtCallback :: Lens' CoursesTeachersDelete (Maybe Text)

159−ctdCallback

160+ctdtCallback

160− = lens _ctdCallback (\ s a -> s{_ctdCallback = a})

161+ = lens _ctdtCallback (\ s a -> s{_ctdtCallback = a})

161

162

162instance GoogleRequest CoursesTeachersDelete where

163instance GoogleRequest CoursesTeachersDelete where

163 type Rs CoursesTeachersDelete = Empty

164 type Rs CoursesTeachersDelete = Empty

164 type Scopes CoursesTeachersDelete =

165 type Scopes CoursesTeachersDelete =

165 '["https://www.googleapis.com/auth/classroom.rosters"]

166 '["https://www.googleapis.com/auth/classroom.rosters"]

166 requestClient CoursesTeachersDelete'{..}

167 requestClient CoursesTeachersDelete'{..}

167− = go _ctdCourseId _ctdUserId _ctdXgafv

168+ = go _ctdtCourseId _ctdtUserId _ctdtXgafv

168− _ctdUploadProtocol

169+ _ctdtUploadProtocol

169− _ctdAccessToken

170+ _ctdtAccessToken

170− _ctdUploadType

171+ _ctdtUploadType

171− _ctdCallback

172+ _ctdtCallback

172 (Just AltJSON)

173 (Just AltJSON)

173 classroomService

174 classroomService

174 where go

175 where go

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/Get.hs+60−59

@@ -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− , ctgXgafv

40+ , ctgtXgafv

41− , ctgUploadProtocol

41+ , ctgtUploadProtocol

42− , ctgCourseId

42+ , ctgtCourseId

43− , ctgAccessToken

43+ , ctgtAccessToken

44− , ctgUploadType

44+ , ctgtUploadType

45− , ctgUserId

45+ , ctgtUserId

46− , ctgCallback

46+ , ctgtCallback

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− { _ctgXgafv :: !(Maybe Xgafv)

76+ { _ctgtXgafv :: !(Maybe Xgafv)

77− , _ctgUploadProtocol :: !(Maybe Text)

77+ , _ctgtUploadProtocol :: !(Maybe Text)

78− , _ctgCourseId :: !Text

78+ , _ctgtCourseId :: !Text

79− , _ctgAccessToken :: !(Maybe Text)

79+ , _ctgtAccessToken :: !(Maybe Text)

80− , _ctgUploadType :: !(Maybe Text)

80+ , _ctgtUploadType :: !(Maybe Text)

81− , _ctgUserId :: !Text

81+ , _ctgtUserId :: !Text

82− , _ctgCallback :: !(Maybe Text)

82+ , _ctgtCallback :: !(Maybe Text)

83 }

83 }

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

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

85

85

@@ -88,74 +88,75 @@ 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−-- * 'ctgXgafv'

91+-- * 'ctgtXgafv'

92--

92--

93−-- * 'ctgUploadProtocol'

93+-- * 'ctgtUploadProtocol'

94--

94--

95−-- * 'ctgCourseId'

95+-- * 'ctgtCourseId'

96--

96--

97−-- * 'ctgAccessToken'

97+-- * 'ctgtAccessToken'

98--

98--

99−-- * 'ctgUploadType'

99+-- * 'ctgtUploadType'

100--

100--

101−-- * 'ctgUserId'

101+-- * 'ctgtUserId'

102--

102--

103−-- * 'ctgCallback'

103+-- * 'ctgtCallback'

104coursesTeachersGet

104coursesTeachersGet

105− :: Text -- ^ 'ctgCourseId'

105+ :: Text -- ^ 'ctgtCourseId'

106− -> Text -- ^ 'ctgUserId'

106+ -> Text -- ^ 'ctgtUserId'

107 -> CoursesTeachersGet

107 -> CoursesTeachersGet

108−coursesTeachersGet pCtgCourseId_ pCtgUserId_ =

108+coursesTeachersGet pCtgtCourseId_ pCtgtUserId_ =

109 CoursesTeachersGet'

109 CoursesTeachersGet'

110− { _ctgXgafv = Nothing

110+ { _ctgtXgafv = Nothing

111− , _ctgUploadProtocol = Nothing

111+ , _ctgtUploadProtocol = Nothing

112− , _ctgCourseId = pCtgCourseId_

112+ , _ctgtCourseId = pCtgtCourseId_

113− , _ctgAccessToken = Nothing

113+ , _ctgtAccessToken = Nothing

114− , _ctgUploadType = Nothing

114+ , _ctgtUploadType = Nothing

115− , _ctgUserId = pCtgUserId_

115+ , _ctgtUserId = pCtgtUserId_

116− , _ctgCallback = Nothing

116+ , _ctgtCallback = Nothing

117 }

117 }

118

118

119

119

120-- | V1 error format.

120-- | V1 error format.

121−ctgXgafv :: Lens' CoursesTeachersGet (Maybe Xgafv)

121+ctgtXgafv :: Lens' CoursesTeachersGet (Maybe Xgafv)

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

122+ctgtXgafv

123+ = lens _ctgtXgafv (\ s a -> s{_ctgtXgafv = a})

123

124

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

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

125−ctgUploadProtocol :: Lens' CoursesTeachersGet (Maybe Text)

126+ctgtUploadProtocol :: Lens' CoursesTeachersGet (Maybe Text)

126−ctgUploadProtocol

127+ctgtUploadProtocol

127− = lens _ctgUploadProtocol

128+ = lens _ctgtUploadProtocol

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

129+ (\ s a -> s{_ctgtUploadProtocol = a})

129

130

130-- | Identifier of the course. This identifier can be either the

131-- | Identifier of the course. This identifier can be either the

131-- Classroom-assigned identifier or an alias.

132-- Classroom-assigned identifier or an alias.

132−ctgCourseId :: Lens' CoursesTeachersGet Text

133+ctgtCourseId :: Lens' CoursesTeachersGet Text

133−ctgCourseId

134+ctgtCourseId

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

135+ = lens _ctgtCourseId (\ s a -> s{_ctgtCourseId = a})

135

136

136-- | OAuth access token.

137-- | OAuth access token.

137−ctgAccessToken :: Lens' CoursesTeachersGet (Maybe Text)

138+ctgtAccessToken :: Lens' CoursesTeachersGet (Maybe Text)

138−ctgAccessToken

139+ctgtAccessToken

139− = lens _ctgAccessToken

140+ = lens _ctgtAccessToken

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

141+ (\ s a -> s{_ctgtAccessToken = a})

141

142

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

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

143−ctgUploadType :: Lens' CoursesTeachersGet (Maybe Text)

144+ctgtUploadType :: Lens' CoursesTeachersGet (Maybe Text)

144−ctgUploadType

145+ctgtUploadType

145− = lens _ctgUploadType

146+ = lens _ctgtUploadType

146− (\ s a -> s{_ctgUploadType = a})

147+ (\ s a -> s{_ctgtUploadType = a})

147

148

148-- | Identifier of the teacher to return. The identifier can be one of the

149-- | Identifier of the teacher to return. The identifier can be one of the

149-- following: * the numeric identifier for the user * the email address of

150-- following: * the numeric identifier for the user * the email address of

150-- the user * the string literal \`\"me\"\`, indicating the requesting user

151-- the user * the string literal \`\"me\"\`, indicating the requesting user

151−ctgUserId :: Lens' CoursesTeachersGet Text

152+ctgtUserId :: Lens' CoursesTeachersGet Text

152−ctgUserId

153+ctgtUserId

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

154+ = lens _ctgtUserId (\ s a -> s{_ctgtUserId = a})

154

155

155-- | JSONP

156-- | JSONP

156−ctgCallback :: Lens' CoursesTeachersGet (Maybe Text)

157+ctgtCallback :: Lens' CoursesTeachersGet (Maybe Text)

157−ctgCallback

158+ctgtCallback

158− = lens _ctgCallback (\ s a -> s{_ctgCallback = a})

159+ = lens _ctgtCallback (\ s a -> s{_ctgtCallback = a})

159

160

160instance GoogleRequest CoursesTeachersGet where

161instance GoogleRequest CoursesTeachersGet where

161 type Rs CoursesTeachersGet = Teacher

162 type Rs CoursesTeachersGet = Teacher

@@ -165,11 +166,11 @@ instance GoogleRequest CoursesTeachersGet where

165 "https://www.googleapis.com/auth/classroom.rosters",

166 "https://www.googleapis.com/auth/classroom.rosters",

166 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

167 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

167 requestClient CoursesTeachersGet'{..}

168 requestClient CoursesTeachersGet'{..}

168− = go _ctgCourseId _ctgUserId _ctgXgafv

169+ = go _ctgtCourseId _ctgtUserId _ctgtXgafv

169− _ctgUploadProtocol

170+ _ctgtUploadProtocol

170− _ctgAccessToken

171+ _ctgtAccessToken

171− _ctgUploadType

172+ _ctgtUploadType

172− _ctgCallback

173+ _ctgtCallback

173 (Just AltJSON)

174 (Just AltJSON)

174 classroomService

175 classroomService

175 where go

176 where go

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Teachers/List.hs+69−67

@@ -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− , ctlXgafv

39+ , ctltXgafv

40− , ctlUploadProtocol

40+ , ctltUploadProtocol

41− , ctlCourseId

41+ , ctltCourseId

42− , ctlAccessToken

42+ , ctltAccessToken

43− , ctlUploadType

43+ , ctltUploadType

44− , ctlPageToken

44+ , ctltPageToken

45− , ctlPageSize

45+ , ctltPageSize

46− , ctlCallback

46+ , ctltCallback

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− { _ctlXgafv :: !(Maybe Xgafv)

77+ { _ctltXgafv :: !(Maybe Xgafv)

78− , _ctlUploadProtocol :: !(Maybe Text)

78+ , _ctltUploadProtocol :: !(Maybe Text)

79− , _ctlCourseId :: !Text

79+ , _ctltCourseId :: !Text

80− , _ctlAccessToken :: !(Maybe Text)

80+ , _ctltAccessToken :: !(Maybe Text)

81− , _ctlUploadType :: !(Maybe Text)

81+ , _ctltUploadType :: !(Maybe Text)

82− , _ctlPageToken :: !(Maybe Text)

82+ , _ctltPageToken :: !(Maybe Text)

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

83+ , _ctltPageSize :: !(Maybe (Textual Int32))

84− , _ctlCallback :: !(Maybe Text)

84+ , _ctltCallback :: !(Maybe Text)

85 }

85 }

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

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

87

87

@@ -90,83 +90,85 @@ 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−-- * 'ctlXgafv'

93+-- * 'ctltXgafv'

94--

94--

95−-- * 'ctlUploadProtocol'

95+-- * 'ctltUploadProtocol'

96--

96--

97−-- * 'ctlCourseId'

97+-- * 'ctltCourseId'

98--

98--

99−-- * 'ctlAccessToken'

99+-- * 'ctltAccessToken'

100--

100--

101−-- * 'ctlUploadType'

101+-- * 'ctltUploadType'

102--

102--

103−-- * 'ctlPageToken'

103+-- * 'ctltPageToken'

104--

104--

105−-- * 'ctlPageSize'

105+-- * 'ctltPageSize'

106--

106--

107−-- * 'ctlCallback'

107+-- * 'ctltCallback'

108coursesTeachersList

108coursesTeachersList

109− :: Text -- ^ 'ctlCourseId'

109+ :: Text -- ^ 'ctltCourseId'

110 -> CoursesTeachersList

110 -> CoursesTeachersList

111−coursesTeachersList pCtlCourseId_ =

111+coursesTeachersList pCtltCourseId_ =

112 CoursesTeachersList'

112 CoursesTeachersList'

113− { _ctlXgafv = Nothing

113+ { _ctltXgafv = Nothing

114− , _ctlUploadProtocol = Nothing

114+ , _ctltUploadProtocol = Nothing

115− , _ctlCourseId = pCtlCourseId_

115+ , _ctltCourseId = pCtltCourseId_

116− , _ctlAccessToken = Nothing

116+ , _ctltAccessToken = Nothing

117− , _ctlUploadType = Nothing

117+ , _ctltUploadType = Nothing

118− , _ctlPageToken = Nothing

118+ , _ctltPageToken = Nothing

119− , _ctlPageSize = Nothing

119+ , _ctltPageSize = Nothing

120− , _ctlCallback = Nothing

120+ , _ctltCallback = Nothing

121 }

121 }

122

122

123

123

124-- | V1 error format.

124-- | V1 error format.

125−ctlXgafv :: Lens' CoursesTeachersList (Maybe Xgafv)

125+ctltXgafv :: Lens' CoursesTeachersList (Maybe Xgafv)

126−ctlXgafv = lens _ctlXgafv (\ s a -> s{_ctlXgafv = a})

126+ctltXgafv

127+ = lens _ctltXgafv (\ s a -> s{_ctltXgafv = a})

127

128

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

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

129−ctlUploadProtocol :: Lens' CoursesTeachersList (Maybe Text)

130+ctltUploadProtocol :: Lens' CoursesTeachersList (Maybe Text)

130−ctlUploadProtocol

131+ctltUploadProtocol

131− = lens _ctlUploadProtocol

132+ = lens _ctltUploadProtocol

132− (\ s a -> s{_ctlUploadProtocol = a})

133+ (\ s a -> s{_ctltUploadProtocol = a})

133

134

134-- | Identifier of the course. This identifier can be either the

135-- | Identifier of the course. This identifier can be either the

135-- Classroom-assigned identifier or an alias.

136-- Classroom-assigned identifier or an alias.

136−ctlCourseId :: Lens' CoursesTeachersList Text

137+ctltCourseId :: Lens' CoursesTeachersList Text

137−ctlCourseId

138+ctltCourseId

138− = lens _ctlCourseId (\ s a -> s{_ctlCourseId = a})

139+ = lens _ctltCourseId (\ s a -> s{_ctltCourseId = a})

139

140

140-- | OAuth access token.

141-- | OAuth access token.

141−ctlAccessToken :: Lens' CoursesTeachersList (Maybe Text)

142+ctltAccessToken :: Lens' CoursesTeachersList (Maybe Text)

142−ctlAccessToken

143+ctltAccessToken

143− = lens _ctlAccessToken

144+ = lens _ctltAccessToken

144− (\ s a -> s{_ctlAccessToken = a})

145+ (\ s a -> s{_ctltAccessToken = a})

145

146

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

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

147−ctlUploadType :: Lens' CoursesTeachersList (Maybe Text)

148+ctltUploadType :: Lens' CoursesTeachersList (Maybe Text)

148−ctlUploadType

149+ctltUploadType

149− = lens _ctlUploadType

150+ = lens _ctltUploadType

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

151+ (\ s a -> s{_ctltUploadType = a})

151

152

152-- | nextPageToken value returned from a previous list call, indicating that

153-- | nextPageToken value returned from a previous list call, indicating that

153-- the subsequent page of results should be returned. The list request must

154-- the subsequent page of results should be returned. The list request must

154-- be otherwise identical to the one that resulted in this token.

155-- be otherwise identical to the one that resulted in this token.

155−ctlPageToken :: Lens' CoursesTeachersList (Maybe Text)

156+ctltPageToken :: Lens' CoursesTeachersList (Maybe Text)

156−ctlPageToken

157+ctltPageToken

157− = lens _ctlPageToken (\ s a -> s{_ctlPageToken = a})

158+ = lens _ctltPageToken

159+ (\ s a -> s{_ctltPageToken = a})

158

160

159-- | Maximum number of items to return. Zero means no maximum. The server may

161-- | Maximum number of items to return. Zero means no maximum. The server may

160-- return fewer than the specified number of results.

162-- return fewer than the specified number of results.

161−ctlPageSize :: Lens' CoursesTeachersList (Maybe Int32)

163+ctltPageSize :: Lens' CoursesTeachersList (Maybe Int32)

162−ctlPageSize

164+ctltPageSize

163− = lens _ctlPageSize (\ s a -> s{_ctlPageSize = a}) .

165+ = lens _ctltPageSize (\ s a -> s{_ctltPageSize = a})

164− mapping _Coerce

166+ . mapping _Coerce

165

167

166-- | JSONP

168-- | JSONP

167−ctlCallback :: Lens' CoursesTeachersList (Maybe Text)

169+ctltCallback :: Lens' CoursesTeachersList (Maybe Text)

168−ctlCallback

170+ctltCallback

169− = lens _ctlCallback (\ s a -> s{_ctlCallback = a})

171+ = lens _ctltCallback (\ s a -> s{_ctltCallback = a})

170

172

171instance GoogleRequest CoursesTeachersList where

173instance GoogleRequest CoursesTeachersList where

172 type Rs CoursesTeachersList = ListTeachersResponse

174 type Rs CoursesTeachersList = ListTeachersResponse

@@ -176,12 +178,12 @@ instance GoogleRequest CoursesTeachersList where

176 "https://www.googleapis.com/auth/classroom.rosters",

178 "https://www.googleapis.com/auth/classroom.rosters",

177 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

179 "https://www.googleapis.com/auth/classroom.rosters.readonly"]

178 requestClient CoursesTeachersList'{..}

180 requestClient CoursesTeachersList'{..}

179− = go _ctlCourseId _ctlXgafv _ctlUploadProtocol

181+ = go _ctltCourseId _ctltXgafv _ctltUploadProtocol

180− _ctlAccessToken

182+ _ctltAccessToken

181− _ctlUploadType

183+ _ctltUploadType

182− _ctlPageToken

184+ _ctltPageToken

183− _ctlPageSize

185+ _ctltPageSize

184− _ctlCallback

186+ _ctltCallback

185 (Just AltJSON)

187 (Just AltJSON)

186 classroomService

188 classroomService

187 where go

189 where go

gogol-classroom/gen/Network/Google/Resource/Classroom/Courses/Topics/Create.hsnew file+174

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

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.hsnew file+171

@@ -0,0 +1,171 @@

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.hsnew file+171

@@ -0,0 +1,171 @@

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.hsnew file+191

@@ -0,0 +1,191 @@

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.hsnew file+203

@@ -0,0 +1,203 @@

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,6 +70,11 @@ 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

73 , Network.Google.Resource.Classroom.Courses.Update

78 , Network.Google.Resource.Classroom.Courses.Update

74 , Network.Google.Resource.Classroom.Invitations.Accept

79 , Network.Google.Resource.Classroom.Invitations.Accept

75 , Network.Google.Resource.Classroom.Invitations.Create

80 , Network.Google.Resource.Classroom.Invitations.Create

gogol-cloudasset/gen/Network/Google/CloudAsset.hs+14−38

@@ -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://console.cloud.google.com/apis/api/cloudasset.googleapis.com/overview Cloud Asset API Reference>

19+-- /See:/ <https://cloud.google.com/resource-manager/docs/cloud-asset-inventory/quickstart-cloud-asset-inventory Cloud Asset API Reference>

20module Network.Google.CloudAsset

20module Network.Google.CloudAsset

21 (

21 (

22 -- * Service Configuration

22 -- * Service Configuration

@@ -30,29 +30,14 @@ module Network.Google.CloudAsset

30

30

31 -- * Resources

31 -- * Resources

32

32

33− -- ** cloudasset.folders.exportAssets

33+ -- ** cloudasset.batchGetAssetsHistory

34− , module Network.Google.Resource.CloudAsset.Folders.ExportAssets

34+ , module Network.Google.Resource.CloudAsset.BatchGetAssetsHistory

35

35

36− -- ** cloudasset.folders.operations.get

36+ -- ** cloudasset.exportAssets

37− , module Network.Google.Resource.CloudAsset.Folders.Operations.Get

37+ , module Network.Google.Resource.CloudAsset.ExportAssets

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−

45− -- ** cloudasset.organizations.operations.get

39+ -- ** cloudasset.operations.get

46− , module Network.Google.Resource.CloudAsset.Organizations.Operations.Get

40+ , module Network.Google.Resource.CloudAsset.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

56

41

57 -- * Types

42 -- * Types

58

43

@@ -100,6 +85,7 @@ module Network.Google.CloudAsset

100 -- ** GcsDestination

85 -- ** GcsDestination

101 , GcsDestination

86 , GcsDestination

102 , gcsDestination

87 , gcsDestination

88+ , gdURIPrefix

103 , gdURI

89 , gdURI

104

90

105 -- ** StatusDetailsItem

91 -- ** StatusDetailsItem

@@ -193,14 +179,9 @@ module Network.Google.CloudAsset

193

179

194import Network.Google.CloudAsset.Types

180import Network.Google.CloudAsset.Types

195import Network.Google.Prelude

181import Network.Google.Prelude

196−import Network.Google.Resource.CloudAsset.Folders.ExportAssets

182+import Network.Google.Resource.CloudAsset.BatchGetAssetsHistory

197−import Network.Google.Resource.CloudAsset.Folders.Operations.Get

198−import Network.Google.Resource.CloudAsset.Organizations.BatchGetAssetsHistory

199−import Network.Google.Resource.CloudAsset.Organizations.ExportAssets

200−import Network.Google.Resource.CloudAsset.Organizations.Operations.Get

201−import Network.Google.Resource.CloudAsset.Projects.BatchGetAssetsHistory

202−import Network.Google.Resource.CloudAsset.Projects.ExportAssets

183+import Network.Google.Resource.CloudAsset.ExportAssets

203−import Network.Google.Resource.CloudAsset.Projects.Operations.Get

184+import Network.Google.Resource.CloudAsset.Operations.Get

204

185

205{- $resources

186{- $resources

206TODO

187TODO

@@ -208,11 +189,6 @@ TODO

208

189

209-- | Represents the entirety of the methods and resources available for the Cloud Asset API service.

190-- | Represents the entirety of the methods and resources available for the Cloud Asset API service.

210type CloudAssetAPI =

191type CloudAssetAPI =

211− FoldersOperationsGetResource :<|>

192+ ExportAssetsResource :<|>

212− FoldersExportAssetsResource

193+ BatchGetAssetsHistoryResource

213− :<|> OrganizationsOperationsGetResource

194+ :<|> OperationsGetResource

214− :<|> OrganizationsExportAssetsResource

215− :<|> OrganizationsBatchGetAssetsHistoryResource

216− :<|> ProjectsOperationsGetResource

217− :<|> ProjectsExportAssetsResource

218− :<|> ProjectsBatchGetAssetsHistoryResource

gogol-cloudasset/gen/Network/Google/CloudAsset/Types.hs+3−2

@@ -66,6 +66,7 @@ module Network.Google.CloudAsset.Types

66 -- * GcsDestination

66 -- * GcsDestination

67 , GcsDestination

67 , GcsDestination

68 , gcsDestination

68 , gcsDestination

69+ , gdURIPrefix

69 , gdURI

70 , gdURI

70

71

71 -- * StatusDetailsItem

72 -- * StatusDetailsItem

@@ -161,10 +162,10 @@ import Network.Google.CloudAsset.Types.Product

161import Network.Google.CloudAsset.Types.Sum

162import Network.Google.CloudAsset.Types.Sum

162import Network.Google.Prelude

163import Network.Google.Prelude

163

164

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.

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.

165cloudAssetService :: ServiceConfig

166cloudAssetService :: ServiceConfig

166cloudAssetService

167cloudAssetService

167− = defaultService (ServiceId "cloudasset:v1beta1")

168+ = defaultService (ServiceId "cloudasset:v1")

168 "cloudasset.googleapis.com"

169 "cloudasset.googleapis.com"

169

170

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

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

gogol-cloudasset/gen/Network/Google/CloudAsset/Types/Product.hs+35−15

@@ -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: \"google.compute.Disk\".

418+-- | Type of the asset. Example: \"compute.googleapis.com\/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,9 +441,10 @@ 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−newtype GcsDestination =

444+data GcsDestination =

445 GcsDestination'

445 GcsDestination'

446+ { _gdURIPrefix :: !(Maybe Text)

446− { _gdURI :: Maybe Text

447+ , _gdURI :: !(Maybe Text)

447 }

448 }

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

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

449

450

@@ -452,11 +453,26 @@ newtype GcsDestination =

452--

453--

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

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

454--

455--

456+-- * 'gdURIPrefix'

457+--

455-- * 'gdURI'

458-- * 'gdURI'

456gcsDestination

459gcsDestination

457 :: GcsDestination

460 :: GcsDestination

458−gcsDestination = GcsDestination' {_gdURI = Nothing}

461+gcsDestination = GcsDestination' {_gdURIPrefix = Nothing, _gdURI = Nothing}

459−

462+

463+

464+-- | The uri prefix of all generated Cloud Storage objects. For example:

465+-- \"gs:\/\/bucket_name\/object_name_prefix\". Each object uri is in

466+-- format: \"gs:\/\/bucket_name\/object_name_prefix\/\/ and only contains

467+-- assets for that type. starts from 0. For example:

468+-- \"gs:\/\/bucket_name\/object_name_prefix\/compute.googleapis.com\/Disk\/0\"

469+-- is the first shard of output objects containing all

470+-- compute.googleapis.com\/Disk assets. An INVALID_ARGUMENT error will be

471+-- returned if file with the same name

472+-- \"gs:\/\/bucket_name\/object_name_prefix\" already exists.

473+gdURIPrefix :: Lens' GcsDestination (Maybe Text)

474+gdURIPrefix

475+ = lens _gdURIPrefix (\ s a -> s{_gdURIPrefix = a})

460

476

461-- | The uri of the Cloud Storage object. It\'s the same uri that is used by

477-- | The uri of the Cloud Storage object. It\'s the same uri that is used by

462-- gsutil. For example: \"gs:\/\/bucket_name\/object_name\". See [Viewing

478-- gsutil. For example: \"gs:\/\/bucket_name\/object_name\". See [Viewing

@@ -469,11 +485,16 @@ gdURI = lens _gdURI (\ s a -> s{_gdURI = a})

469instance FromJSON GcsDestination where

485instance FromJSON GcsDestination where

470 parseJSON

486 parseJSON

471 = withObject "GcsDestination"

487 = withObject "GcsDestination"

488+ (\ o ->

472− (\ o -> GcsDestination' <$> (o .:? "uri"))

489+ GcsDestination' <$>

490+ (o .:? "uriPrefix") <*> (o .:? "uri"))

473

491

474instance ToJSON GcsDestination where

492instance ToJSON GcsDestination where

475 toJSON GcsDestination'{..}

493 toJSON GcsDestination'{..}

494+ = object

476− = object (catMaybes [("uri" .=) <$> _gdURI])

495+ (catMaybes

496+ [("uriPrefix" .=) <$> _gdURIPrefix,

497+ ("uri" .=) <$> _gdURI])

477

498

478--

499--

479-- /See:/ 'statusDetailsItem' smart constructor.

500-- /See:/ 'statusDetailsItem' smart constructor.

@@ -556,8 +577,8 @@ earReadTime

556 mapping _DateTime

577 mapping _DateTime

557

578

558-- | A list of asset types of which to take a snapshot for. For example:

579-- | A list of asset types of which to take a snapshot for. For example:

559−-- \"google.compute.Disk\". If specified, only matching assets will be

580+-- \"compute.googleapis.com\/Disk\". If specified, only matching assets

560−-- returned. See [Introduction to Cloud Asset

581+-- will be returned. See [Introduction to Cloud Asset

561-- Inventory](https:\/\/cloud.google.com\/resource-manager\/docs\/cloud-asset-inventory\/overview)

582-- Inventory](https:\/\/cloud.google.com\/resource-manager\/docs\/cloud-asset-inventory\/overview)

562-- for all supported asset types.

583-- for all supported asset types.

563earAssetTypes :: Lens' ExportAssetsRequest [Text]

584earAssetTypes :: Lens' ExportAssetsRequest [Text]

@@ -1212,8 +1233,8 @@ binding =

1212-- that represents a service account. For example,

1233-- that represents a service account. For example,

1213-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

1234-- \`my-other-app\'appspot.gserviceaccount.com\`. * \`group:{emailid}\`: An

1214-- email address that represents a Google group. For example,

1235-- email address that represents a Google group. For example,

1215−-- \`admins\'example.com\`. * \`domain:{domain}\`: A Google Apps domain

1236+-- \`admins\'example.com\`. * \`domain:{domain}\`: The G Suite domain

1216−-- name that represents all the users of that domain. For example,

1237+-- (primary) that represents all the users of that domain. For example,

1217-- \`google.com\` or \`example.com\`.

1238-- \`google.com\` or \`example.com\`.

1218bMembers :: Lens' Binding [Text]

1239bMembers :: Lens' Binding [Text]

1219bMembers

1240bMembers

@@ -1226,10 +1247,9 @@ bMembers

1226bRole :: Lens' Binding (Maybe Text)

1247bRole :: Lens' Binding (Maybe Text)

1227bRole = lens _bRole (\ s a -> s{_bRole = a})

1248bRole = lens _bRole (\ s a -> s{_bRole = a})

1228

1249

1229−-- | Unimplemented. The condition that is associated with this binding. NOTE:

1250+-- | The condition that is associated with this binding. NOTE: An unsatisfied

1230−-- an unsatisfied condition will not allow user access via current binding.

1251+-- condition will not allow user access via current binding. Different

1231−-- Different bindings, including their conditions, are examined

1252+-- bindings, including their conditions, are examined independently.

1232−-- independently.

1233bCondition :: Lens' Binding (Maybe Expr)

1253bCondition :: Lens' Binding (Maybe Expr)

1234bCondition

1254bCondition

1235 = lens _bCondition (\ s a -> s{_bCondition = a})

1255 = lens _bCondition (\ s a -> s{_bCondition = a})

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/BatchGetAssetsHistory.hsnew file+230

@@ -0,0 +1,230 @@

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.hsnew file+169

@@ -0,0 +1,169 @@

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.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.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.hsdeleted−152

@@ -1,152 +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.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.hsnew file+150

@@ -0,0 +1,150 @@

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.hsdeleted−232

@@ -1,232 +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.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.hsdeleted−173

@@ -1,173 +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.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-cloudasset/gen/Network/Google/Resource/CloudAsset/Projects/BatchGetAssetsHistory.hsdeleted−231

@@ -1,231 +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.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.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.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.hsdeleted−152

@@ -1,152 +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.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+4−9

@@ -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 @v1beta1@

23+ This library is compatible with version @v1@

24 of the API.

24 of the API.

25

25

26source-repository head

26source-repository head

@@ -36,14 +36,9 @@ library

36 exposed-modules:

36 exposed-modules:

37 Network.Google.CloudAsset

37 Network.Google.CloudAsset

38 , Network.Google.CloudAsset.Types

38 , Network.Google.CloudAsset.Types

39− , Network.Google.Resource.CloudAsset.Folders.ExportAssets

39+ , Network.Google.Resource.CloudAsset.BatchGetAssetsHistory

40− , Network.Google.Resource.CloudAsset.Folders.Operations.Get

41− , Network.Google.Resource.CloudAsset.Organizations.BatchGetAssetsHistory

42− , Network.Google.Resource.CloudAsset.Organizations.ExportAssets

40+ , Network.Google.Resource.CloudAsset.ExportAssets

43− , Network.Google.Resource.CloudAsset.Organizations.Operations.Get

41+ , Network.Google.Resource.CloudAsset.Operations.Get

44− , Network.Google.Resource.CloudAsset.Projects.BatchGetAssetsHistory

45− , Network.Google.Resource.CloudAsset.Projects.ExportAssets

46− , Network.Google.Resource.CloudAsset.Projects.Operations.Get

47

42

48 other-modules:

43 other-modules:

49 Network.Google.CloudAsset.Types.Product

44 Network.Google.CloudAsset.Types.Product

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+14−4

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+2−1

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Delete.hs+2−1

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Get.hs+3−1

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/List.hs+5−3

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Lookup.hs+3−1

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/Create.hs+2−1

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/Delete.hs+2−1

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/Get.hs+3−1

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/List.hs+5−3

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Memberships/Lookup.hs+3−1

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Patch.hs+2−1

This diff is too big to show here.

gogol-cloudidentity/gen/Network/Google/Resource/CloudIdentity/Groups/Search.hs+5−3

This diff is too big to show here.

gogol-cloudiot/gen/Network/Google/CloudIOT/Types/Product.hs+5−6

This diff is too big to show here.

gogol-cloudkms/gen/Network/Google/CloudKMS/Types/Product.hs+8−7

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/LICENSEnew file+367

This diff is too big to show here.

gogol-cloudprivatecatalog/Makefilenew file+1

This diff is too big to show here.

gogol-cloudprivatecatalog/README.mdnew file+28

This diff is too big to show here.

gogol-cloudprivatecatalog/Setup.hsnew file+2

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/CloudPrivateCatalog.hsnew file+148

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/CloudPrivateCatalog/Types.hsnew file+98

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/CloudPrivateCatalog/Types/Product.hsnew file+662

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/CloudPrivateCatalog/Types/Sum.hsnew file+48

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Catalogs/Search.hsnew file+196

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Products/Search.hsnew file+197

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Folders/Versions/Search.hsnew file+198

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Catalogs/Search.hsnew file+197

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Products/Search.hsnew file+198

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Organizations/Versions/Search.hsnew file+199

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Catalogs/Search.hsnew file+196

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Products/Search.hsnew file+197

This diff is too big to show here.

gogol-cloudprivatecatalog/gen/Network/Google/Resource/CloudPrivateCatalog/Projects/Versions/Search.hsnew file+198

This diff is too big to show here.

gogol-cloudprivatecatalog/gogol-cloudprivatecatalog.cabalnew file+55

This diff is too big to show here.

gogol-cloudprivatecatalog/src/.gitkeepnew file

No changes to the content.

gogol-cloudprivatecatalogproducer/LICENSEnew file+367

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/Makefilenew file+1

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/README.mdnew file+28

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/Setup.hsnew file+2

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/CloudPrivateCatalogProducer.hsnew file+386

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/CloudPrivateCatalogProducer/Types.hsnew file+236

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/CloudPrivateCatalogProducer/Types/Product.hsnew file+2080

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/CloudPrivateCatalogProducer/Types/Sum.hsnew file+87

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Associations/Create.hsnew file+169

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Associations/Delete.hsnew file+151

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Associations/Get.hsnew file+151

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Associations/List.hsnew file+180

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Create.hsnew file+150

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Delete.hsnew file+167

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Get.hsnew file+149

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/GetIAMPolicy.hsnew file+152

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/List.hsnew file+178

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Patch.hsnew file+177

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Copy.hsnew file+160

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Create.hsnew file+168

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Delete.hsnew file+149

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Get.hsnew file+151

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Icons/Upload.hsnew file+176

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/List.hsnew file+195

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Patch.hsnew file+183

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/Create.hsnew file+169

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/Delete.hsnew file+153

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/Get.hsnew file+153

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/List.hsnew file+185

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Products/Versions/Patch.hsnew file+186

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/SetIAMPolicy.hsnew file+165

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/TestIAMPermissions.hsnew file+168

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Catalogs/Undelete.hsnew file+165

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Operations/Cancel.hsnew file+178

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Operations/Delete.hsnew file+154

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Operations/Get.hsnew file+151

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gen/Network/Google/Resource/CloudPrivateCatalogProducer/Operations/List.hsnew file+202

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/gogol-cloudprivatecatalogproducer.cabalnew file+75

This diff is too big to show here.

gogol-cloudprivatecatalogproducer/src/.gitkeepnew file

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+11−8

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+3−2

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+373−56

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+5−3

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+6−2

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/CloudTasks.hs+1−6

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/CloudTasks/Types.hs+3−8

This diff is too big to show here.

gogol-cloudtasks/gen/Network/Google/CloudTasks/Types/Product.hs+33−79

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/LICENSEnew file+367

This diff is too big to show here.

gogol-commentanalyzer/Makefilenew file+1

This diff is too big to show here.

gogol-commentanalyzer/README.mdnew file+28

This diff is too big to show here.

gogol-commentanalyzer/Setup.hsnew file+2

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/CommentAnalyzer.hsnew file+168

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/CommentAnalyzer/Types.hsnew file+148

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/CommentAnalyzer/Types/Product.hsnew file+988

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/CommentAnalyzer/Types/Sum.hsnew file+183

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/Resource/CommentAnalyzer/Comments/Analyze.hsnew file+150

This diff is too big to show here.

gogol-commentanalyzer/gen/Network/Google/Resource/CommentAnalyzer/Comments/Suggestscore.hsnew file+151

This diff is too big to show here.

gogol-commentanalyzer/gogol-commentanalyzer.cabalnew file+53

This diff is too big to show here.

gogol-commentanalyzer/src/.gitkeepnew file

No changes to the content.

gogol-compute/gen/Network/Google/Compute.hs+321−7

This diff is too big to show here.

gogol-compute/gen/Network/Google/Compute/Types.hs+257−7

This diff is too big to show here.

gogol-compute/gen/Network/Google/Compute/Types/Product.hs+2383−184

This diff is too big to show here.

gogol-compute/gen/Network/Google/Compute/Types/Sum.hs+878−67

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.hsnew file+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.hsnew file+171

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/Instances/UpdateShieldedInstanceConfig.hsnew file+165

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/AggregatedList.hsnew file+177

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/AttachNetworkEndpoints.hsnew file+173

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/Delete.hsnew file+149

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/DetachNetworkEndpoints.hsnew file+173

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/Get.hsnew file+124

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/Insert.hsnew file+144

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/List.hsnew file+188

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/ListNetworkEndpoints.hsnew file+231

This diff is too big to show here.

gogol-compute/gen/Network/Google/Resource/Compute/NetworkEndpointGroups/TestIAMPermissions.hsnew file+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+42−2

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+349−14

This diff is too big to show here.

gogol-container/gen/Network/Google/Container/Types/Sum.hs+64−15

This diff is too big to show here.

gogol-container/gen/Network/Google/Resource/Container/Projects/Aggregated/UsableSubnetworks/List.hsnew file+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+385−22

This diff is too big to show here.

gogol-containeranalysis/gen/Network/Google/ContainerAnalysis/Types/Sum.hs+375−23

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+268−8

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+28−3

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+195−30

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.hsnew file+181

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Aggregated.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Create.hs+13−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Get.hs+15−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/GetMetrics.hs+13−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/List.hs+19−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Messages/List.hs+15−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Jobs/Update.hs+15−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Create.hs+13−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/GetConfig.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Debug/SendCapture.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Get.hs+15−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/GetMetrics.hs+13−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/List.hs+19−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Messages/List.hs+15−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/Update.hs+15−3

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/WorkItems/Lease.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Jobs/WorkItems/ReportStatus.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/SQL/Validate.hsnew file+193

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Snapshots/Delete.hsnew file+189

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Snapshots/Get.hsnew file+186

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Snapshots/List.hsnew file+174

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Templates/Create.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Templates/Get.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/Templates/Launch.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Locations/WorkerMessages.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Snapshots/Get.hsnew file+180

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Snapshots/List.hsnew file+167

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Templates/Get.hs+3−1

This diff is too big to show here.

gogol-dataflow/gen/Network/Google/Resource/Dataflow/Projects/Templates/Launch.hs+3−1

This diff is too big to show here.

gogol-dataflow/gogol-dataflow.cabal+7

This diff is too big to show here.

gogol-datafusion/LICENSEnew file+367

This diff is too big to show here.

gogol-datafusion/Makefilenew file+1

This diff is too big to show here.

gogol-photoslibrary/README.md → gogol-datafusion/README.mdrenamed+3−3

This diff is too big to show here.

gogol-datafusion/Setup.hsnew file+2

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/DataFusion.hsnew file+400

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/DataFusion/Types.hsnew file+308

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/DataFusion/Types/Product.hsnew file+2258

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/DataFusion/Types/Sum.hsnew file+531

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Get.hsnew file+148

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Create.hsnew file+183

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Delete.hsnew file+153

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Get.hsnew file+152

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/GetIAMPolicy.hsnew file+161

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/List.hsnew file+210

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Patch.hsnew file+184

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Restart.hsnew file+169

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/SetIAMPolicy.hsnew file+176

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/TestIAMPermissions.hsnew file+188

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Instances/Upgrade.hsnew file+171

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/List.hsnew file+187

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Operations/Cancel.hsnew file+182

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Operations/Delete.hsnew file+158

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Operations/Get.hsnew file+155

This diff is too big to show here.

gogol-datafusion/gen/Network/Google/Resource/DataFusion/Projects/Locations/Operations/List.hsnew file+211

This diff is too big to show here.

gogol-datafusion/gogol-datafusion.cabalnew file+67

This diff is too big to show here.

gogol-datafusion/src/.gitkeepnew file

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+56−39

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/DialogFlow.hs+57−4

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/DialogFlow/Types.hs+57−4

This diff is too big to show here.

gogol-dialogflow/gen/Network/Google/DialogFlow/Types/Product.hs+641−121

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+180−25

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.hsnew file+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+191−15

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+20−3

This diff is too big to show here.

gogol-docs/gen/Network/Google/Docs/Types.hs+20−3

This diff is too big to show here.

gogol-docs/gen/Network/Google/Docs/Types/Product.hs+255−87

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types/Product.hs+7−5

This diff is too big to show here.

gogol-doubleclick-bids/gen/Network/Google/DoubleClickBids/Types/Sum.hs+2−1

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+1050−83

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/GetStartPageToken.hs+35−8

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/List.hs+62−21

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Changes/Watch.hs+61−20

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Create.hsnew file+102

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Delete.hsnew file+87

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Get.hsnew file+102

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Hide.hsnew file+86

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/List.hsnew file+127

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Unhide.hsnew file+86

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Drives/Update.hsnew file+115

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Copy.hs+20−6

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Create.hs+28−11

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Delete.hs+29−12

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Get.hs+28−12

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/List.hs+62−23

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Update.hs+28−12

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Watch.hs+27−11

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Create.hs+28−12

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Delete.hs+24−9

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Get.hs+23−8

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/List.hs+33−18

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Permissions/Update.hs+26−11

This diff is too big to show here.

gogol-drive/gen/Network/Google/Resource/Drive/Revisions/Delete.hs+8−4

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+2−4

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+34−2

This diff is too big to show here.

gogol-driveactivity/gen/Network/Google/DriveActivity/Types.hs+34−2

This diff is too big to show here.

gogol-driveactivity/gen/Network/Google/DriveActivity/Types/Product.hs+307−68

This diff is too big to show here.

gogol-driveactivity/gen/Network/Google/DriveActivity/Types/Sum.hs+53−15

This diff is too big to show here.

gogol-factchecktools/LICENSEnew file+367

This diff is too big to show here.

gogol-factchecktools/Makefilenew file+1

This diff is too big to show here.

gogol-factchecktools/README.mdnew file+28

This diff is too big to show here.

gogol-factchecktools/Setup.hsnew file+2

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/FactCheckTools.hsnew file+160

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/FactCheckTools/Types.hsnew file+127

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/FactCheckTools/Types/Product.hsnew file+941

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/FactCheckTools/Types/Sum.hsnew file+48

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Claims/Search.hsnew file+236

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/Create.hsnew file+153

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/Delete.hsnew file+147

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/Get.hsnew file+149

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/List.hsnew file+213

This diff is too big to show here.

gogol-factchecktools/gen/Network/Google/Resource/FactCheckTools/Pages/Update.hsnew file+172

This diff is too big to show here.

gogol-factchecktools/gogol-factchecktools.cabalnew file+51

This diff is too big to show here.

gogol-factchecktools/src/.gitkeepnew file

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+68−18

This diff is too big to show here.

gogol-firebase-dynamiclinks/gen/Network/Google/FirebaseDynamicLinks.hs+4−7

This diff is too big to show here.

gogol-firebase-dynamiclinks/gen/Network/Google/FirebaseDynamicLinks/Types.hs+4−7

This diff is too big to show here.

gogol-firebase-dynamiclinks/gen/Network/Google/FirebaseDynamicLinks/Types/Product.hs+48−68

This diff is too big to show here.

gogol-firebase-rules/gen/Network/Google/FirebaseRules/Types/Product.hs+5−2

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+9−8

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+10−8

This diff is too big to show here.

gogol-fitness/gen/Network/Google/Resource/Fitness/Users/DataSources/Patch.hsdeleted−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+1−2

This diff is too big to show here.

gogol-games/gen/Network/Google/Games/Types.hs+2−3

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+5−90

This diff is too big to show here.

gogol-genomics/gen/Network/Google/Resource/Genomics/Projects/Operations/List.hs+1−2

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.hsnew file+92

This diff is too big to show here.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Settings/UpdateLanguage.hsnew file+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+19−1

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+293−48

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+337−334

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Healthcare/Types.hs+150−153

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Healthcare/Types/Product.hs+1424−1376

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Healthcare/Types/Sum.hs+132−4

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/Create.hsdeleted−184

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/Delete.hsdeleted−162

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/Get.hsdeleted−162

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/List.hsdeleted−211

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Annotations/Patch.hsdeleted−193

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Create.hsdeleted−192

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Delete.hsdeleted−163

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Get.hsdeleted−163

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/GetIAMPolicy.hsdeleted−187

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/List.hsdeleted−207

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/Patch.hsdeleted−192

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/SetIAMPolicy.hsdeleted−183

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/AnnotationStores/TestIAMPermissions.hsdeleted−186

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/Create.hs+11−5

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.hsdeleted−191

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/DicomWeb/DicomWebGet.hsdeleted−192

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/DicomWeb/DicomWebPost.hsdeleted−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+21−6

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.hsnew file+182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/SearchForSeries.hsnew file+182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/SearchForStudies.hsnew file+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.hsnew file+198

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Delete.hsnew file+184

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/RetrieveMetadata.hsnew file+184

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/RetrieveStudy.hsnew file+182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/SearchForInstances.hsnew file+182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/SearchForSeries.hsnew file+182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Delete.hsnew file+185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/Delete.hsnew file+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.hsnew file+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.hsnew file+187

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/RetrieveInstance.hsnew file+185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/RetrieveMetadata.hsnew file+187

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/Instances/RetrieveRendered.hsnew file+187

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/RetrieveMetadata.hsnew file+185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/RetrieveSeries.hsnew file+185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/Series/SearchForInstances.hsnew file+182

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/DicomStores/Studies/StoreInstances.hsnew file+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+3−5

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/ExecuteBundle.hsdeleted−181

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Export.hs+15−12

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Capabilities.hsnew file+176

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ConditionalDelete.hsnew file+195

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ConditionalPatch.hsnew file+221

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ConditionalUpdate.hsnew file+231

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Create.hsnew file+212

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Delete.hsnew file+173

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ExecuteBundle.hsnew file+216

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/History.hsnew file+247

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ObservationLastn.hsnew file+194

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Patch.hsnew file+197

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/PatientEverything.hsnew file+207

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Read.hsnew file+181

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/ResourcePurge.hsnew file+170

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Search.hsnew file+231

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Update.hsnew file+203

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Fhir/Vread.hsnew file+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+9−32

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/GetMetadata.hsdeleted−163

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Import.hs+35−11

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/List.hs+21−6

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.hsdeleted−188

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/ConditionalPatchResource.hsdeleted−194

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/ConditionalUpdateResource.hsdeleted−194

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/CreateResource.hsdeleted−191

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Delete.hsdeleted−170

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/DeletePurge.hsdeleted−168

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Get.hsdeleted−162

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/GetMetadata.hsdeleted−165

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/History/Get.hsdeleted−163

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/History/List.hsdeleted−166

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Patch.hsdeleted−176

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Patient/GetEverything.hsdeleted−192

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Search.hsdeleted−180

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/SearchResources.hsdeleted−178

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/Resources/Update.hsdeleted−180

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/SecurityLabels/GetIAMPolicy.hsdeleted−189

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/SecurityLabels/SetIAMPolicy.hsdeleted−185

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/SetIAMPolicy.hs+5−9

This diff is too big to show here.

gogol-healthcare/gen/Network/Google/Resource/Healthcare/Projects/Locations/DataSets/FhirStores/TestIAMPermissions.hs+9−5

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+21−6

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+32−20

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+38−37

This diff is too big to show here.

gogol-iam/gen/Network/Google/IAM.hs+52−7

This diff is too big to show here.

gogol-iam/gen/Network/Google/IAM/Types.hs+32−7

This diff is too big to show here.

gogol-iam/gen/Network/Google/IAM/Types/Product.hs+238−54

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Organizations/Roles/List.hs+4−1

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/Roles/List.hs+4−1

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Delete.hs+46−50

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Disable.hsnew file+169

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Enable.hsnew file+168

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/GetIAMPolicy.hs+22−2

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Patch.hsnew file+176

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/SetIAMPolicy.hs+26−2

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Undelete.hsnew file+172

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Projects/ServiceAccounts/Update.hs+66−63

This diff is too big to show here.

gogol-iam/gen/Network/Google/Resource/IAM/Roles/List.hs+4−1

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+12−4

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/GenerateAccessToken.hs+3−1

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/GenerateIdToken.hs+3−1

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/GenerateIdentityBindingAccessToken.hs+3−1

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/SignBlob.hs+3−1

This diff is too big to show here.

gogol-iamcredentials/gen/Network/Google/Resource/IAMCredentials/Projects/ServiceAccounts/SignJwt.hs+3−1

This diff is too big to show here.

gogol-iap/gen/Network/Google/IAP/Types/Product.hs+5−6

This diff is too big to show here.

gogol-jobs/gen/Network/Google/Jobs/Types/Product.hs+14−10

This diff is too big to show here.

gogol-jobs/gen/Network/Google/Jobs/Types/Sum.hs+12−2

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+8−6

This diff is too big to show here.

gogol-language/gen/Network/Google/Language/Types/Sum.hs+48−8

This diff is too big to show here.

gogol-logging/gen/Network/Google/Logging/Types/Product.hs+9−6

This diff is too big to show here.

gogol-ml/gen/Network/Google/MachineLearning.hs+15−1

This diff is too big to show here.

gogol-ml/gen/Network/Google/MachineLearning/Types.hs+15−1

This diff is too big to show here.

gogol-ml/gen/Network/Google/MachineLearning/Types/Product.hs+322−76

This diff is too big to show here.

gogol-ml/gen/Network/Google/MachineLearning/Types/Sum.hs+14−10

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+5−20

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+3−7

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/Resource/OAuth2/UserInfo/Get.hs+1−2

This diff is too big to show here.

gogol-oauth2/gen/Network/Google/Resource/OAuth2/UserInfo/V2/Me/Get.hs+1−2

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+3−6

This diff is too big to show here.

gogol-people/gen/Network/Google/People/Types/Product.hs+33−14

This diff is too big to show here.

gogol-people/gen/Network/Google/People/Types/Sum.hs+2−1

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-photoslibrary/gen/Network/Google/PhotosLibrary.hsdeleted−363

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/PhotosLibrary/Types.hsdeleted−328

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/PhotosLibrary/Types/Product.hsdeleted−2366

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/PhotosLibrary/Types/Sum.hsdeleted−132

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/AddEnrichment.hsdeleted−191

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/Create.hsdeleted−175

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/Get.hsdeleted−175

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/List.hsdeleted−194

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/Albums/Share.hsdeleted−191

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/MediaItems/BatchCreate.hsdeleted−189

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/MediaItems/Get.hsdeleted−177

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/MediaItems/Search.hsdeleted−188

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/SharedAlbums/Join.hsdeleted−175

This diff is too big to show here.

gogol-photoslibrary/gen/Network/Google/Resource/PhotosLibrary/SharedAlbums/List.hsdeleted−196

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/PlusDomains.hs+1−53

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/PlusDomains/Types.hs+4−15

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/Get.hs+4−2

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Activities/Insert.hsdeleted−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+4−2

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/AddPeople.hsdeleted−119

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Get.hsdeleted−86

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Insert.hsdeleted−101

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/List.hs+4−2

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Patch.hsdeleted−99

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Remove.hsdeleted−86

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/RemovePeople.hsdeleted−117

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Circles/Update.hsdeleted−99

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/Get.hs+4−2

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/Insert.hsdeleted−99

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Comments/List.hs+4−2

This diff is too big to show here.

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Media/Insert.hs+4−8

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.hsdeleted−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+4−3

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Activities/Get.hs+4−2

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+4−2

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Comments/Get.hs+4−2

This diff is too big to show here.

gogol-plus/gen/Network/Google/Resource/Plus/Comments/List.hs+4−2

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+4−2

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+82−34

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+2−8

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.hsnew file+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+37−8

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+5−6

This diff is too big to show here.

gogol-run/LICENSEnew file+367

This diff is too big to show here.

gogol-run/Makefilenew file+1

This diff is too big to show here.

gogol-run/README.mdnew file+28

This diff is too big to show here.

gogol-run/Setup.hsnew file+2

This diff is too big to show here.

gogol-run/gen/Network/Google/Resource/Run/Projects/Locations/Get.hsnew file+148

This diff is too big to show here.

gogol-run/gen/Network/Google/Run.hsnew file+70

This diff is too big to show here.

gogol-run/gen/Network/Google/Run/Types.hsnew file+60

This diff is too big to show here.

gogol-run/gen/Network/Google/Run/Types/Product.hsnew file+180

This diff is too big to show here.

gogol-run/gen/Network/Google/Run/Types/Sum.hsnew file+48

This diff is too big to show here.

gogol-photoslibrary/gogol-photoslibrary.cabal → gogol-run/gogol-run.cabalrenamed+9−17

This diff is too big to show here.

gogol-run/src/.gitkeepnew file

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/LICENSEnew file+367

This diff is too big to show here.

gogol-securitycenter/Makefilenew file+1

This diff is too big to show here.

gogol-securitycenter/README.mdnew file+28

This diff is too big to show here.

gogol-securitycenter/Setup.hsnew file+2

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Assets/Group.hsnew file+168

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Assets/List.hsnew file+297

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Assets/RunDiscovery.hsnew file+175

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Assets/UpdateSecurityMarks.hsnew file+205

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/GetOrganizationSettings.hsnew file+156

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Operations/Cancel.hsnew file+166

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Operations/Delete.hsnew file+156

This diff is too big to show here.

gogol-cloudasset/gen/Network/Google/Resource/CloudAsset/Organizations/Operations/Get.hs → gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Operations/Get.hsrenamed+7−7

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Operations/List.hsnew file+206

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Create.hsnew file+165

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/Create.hsnew file+185

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/Group.hsnew file+176

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/List.hsnew file+303

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/Patch.hsnew file+186

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/SetState.hsnew file+172

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Findings/UpdateSecurityMarks.hsnew file+210

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Get.hsnew file+149

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/GetIAMPolicy.hsnew file+170

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/List.hsnew file+181

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/Patch.hsnew file+178

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/SetIAMPolicy.hsnew file+170

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/Sources/TestIAMPermissions.hsnew file+173

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/Resource/SecurityCenter/Organizations/UpdateOrganizationSettings.hsnew file+186

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/SecurityCenter.hsnew file+466

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/SecurityCenter/Types.hsnew file+344

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/SecurityCenter/Types/Product.hsnew file+2793

This diff is too big to show here.

gogol-securitycenter/gen/Network/Google/SecurityCenter/Types/Sum.hsnew file+360

This diff is too big to show here.

gogol-securitycenter/gogol-securitycenter.cabalnew file+69

This diff is too big to show here.

gogol-securitycenter/src/.gitkeepnew file

No changes to the content.

gogol-servicebroker/gen/Network/Google/ServiceBroker/Types/Product.hs+5−6

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+10−9

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/ApplyProjectConfig.hs+30−27

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/AttachProject.hs+20−17

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.hsnew file+183

This diff is too big to show here.

gogol-serviceconsumermanagement/gen/Network/Google/Resource/ServiceConsumerManagement/Services/TenancyUnits/List.hs+16−14

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.hsnew file+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+732−45

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+256−6

This diff is too big to show here.

gogol-servicecontrol/gen/Network/Google/ServiceControl/Types/Sum.hs+17−1

This diff is too big to show here.

gogol-servicemanagement/gen/Network/Google/Resource/ServiceManagement/Services/Configs/List.hs+2−1

This diff is too big to show here.

gogol-servicemanagement/gen/Network/Google/Resource/ServiceManagement/Services/List.hs+2−1

This diff is too big to show here.

gogol-servicemanagement/gen/Network/Google/Resource/ServiceManagement/Services/Rollouts/List.hs+2−1

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.hsnew file+188

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Services/Connections/Create.hsnew file+184

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Services/Connections/List.hsnew file+178

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Services/Connections/Patch.hsnew file+196

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/Resource/ServiceNetworking/Services/SearchRange.hsnew file+176

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/ServiceNetworking.hs+81−9

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/ServiceNetworking/Types.hs+53−6

This diff is too big to show here.

gogol-servicenetworking/gen/Network/Google/ServiceNetworking/Types/Product.hs+581−83

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+7−2

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+226−7

This diff is too big to show here.

gogol-sheets/gen/Network/Google/Sheets/Types/Product.hs+15−11

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+10−2

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.hsnew file+93

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/Resource/Content/Regionalinventory/Insert.hsnew file+123

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/ShoppingContent.hs+76−33

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/ShoppingContent/Types.hs+66−33

This diff is too big to show here.

gogol-shopping-content/gen/Network/Google/ShoppingContent/Types/Product.hs+757−428

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.hsnew file+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+336−6

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+6−2

This diff is too big to show here.

gogol-spanner/gen/Network/Google/Resource/Spanner/Projects/Instances/Databases/Sessions/ExecuteBatchDml.hsnew file+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+302−4

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+6−2

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+15−6

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+189−45

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+18−10

This diff is too big to show here.

gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Sum.hs+2−1

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/Create.hsnew file+107

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/Delete.hsnew file+104

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/Get.hsnew file+105

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/List.hsnew file+153

This diff is too big to show here.

gogol-storage/gen/Network/Google/Resource/Storage/Projects/HmacKeys/Update.hsnew file+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+20−24

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photos/BatchDelete.hs+10−12

This diff is too big to show here.

gogol-streetviewpublish/gen/Network/Google/Resource/StreetViewPublish/Photos/BatchGet.hs+11−13

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.hsdeleted−121

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/GetProposal.hsdeleted−95

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Proposal/Create.hsdeleted−110

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Proposal/Delete.hsdeleted−95

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/UpdateProposal.hsdeleted−109

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Create.hsnew file+108

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Delete.hsnew file+93

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Get.hsnew file+92

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/List.hsnew file+108

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Revert.hsnew file+109

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/Resource/TagManager/Accounts/Containers/Workspaces/Zones/Update.hsnew file+123

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/TagManager.hs+68−95

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/TagManager/Types.hs+38−67

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/TagManager/Types/Product.hs+356−470

This diff is too big to show here.

gogol-tagmanager/gen/Network/Google/TagManager/Types/Sum.hs+32−231

This diff is too big to show here.

gogol-tagmanager/gogol-tagmanager.cabal+6−5

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+27−31

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.hsnew file+167

This diff is too big to show here.

gogol-toolresults/gen/Network/Google/Resource/ToolResults/Projects/Histories/Executions/Steps/TestCases/List.hsnew file+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+213−5

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+18−5

This diff is too big to show here.

gogol-tpu/gen/Network/Google/TPU/Types/Sum.hs+16−1

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+63−11

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+40−6

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/WebSecurityScanner/Types.hs+42−8

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/WebSecurityScanner/Types/Product.hs+279−18

This diff is too big to show here.

gogol-websecurityscanner/gen/Network/Google/WebSecurityScanner/Types/Sum.hs+389−201

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+15−11

This diff is too big to show here.

gogol/src/Network/Google/Internal/HTTP.hs+1−4

This diff is too big to show here.

stack-8.2.2.yaml+8−1

This diff is too big to show here.

stack-8.4.4.yaml+8−1

This diff is too big to show here.

stack-8.6.3.yaml → stack-8.6.4.yamlrenamed+9−2

This diff is too big to show here.

stack.yaml+1−1

This diff is too big to show here.

stack.yaml.locknew file+12

This diff is too big to show here.