@@ -20,63 +20,63 @@ module Network.Google.AppEngine.Types.Product where
2020import Network.Google.AppEngine.Types.Sum
2121import Network.Google.Prelude
2222
23−-- | Target scaling by network usage (for VM runtimes only).
23+-- | Target scaling by network usage. Only applicable for VM runtimes.
2424--
2525-- /See:/ 'networkUtilization' smart constructor.
2626data NetworkUtilization = NetworkUtilization'
27− { _nuTargetReceivedBytesPerSec :: !(Maybe (Textual Int32))
28− , _nuTargetSentPacketsPerSec :: !(Maybe (Textual Int32))
29− , _nuTargetReceivedPacketsPerSec :: !(Maybe (Textual Int32))
30− , _nuTargetSentBytesPerSec :: !(Maybe (Textual Int32))
27+ { _nuTargetReceivedBytesPerSecond :: !(Maybe (Textual Int32))
28+ , _nuTargetSentPacketsPerSecond :: !(Maybe (Textual Int32))
29+ , _nuTargetReceivedPacketsPerSecond :: !(Maybe (Textual Int32))
30+ , _nuTargetSentBytesPerSecond :: !(Maybe (Textual Int32))
3131 } deriving (Eq,Show,Data,Typeable,Generic)
3232
3333-- | Creates a value of 'NetworkUtilization' with the minimum fields required to make a request.
3434--
3535-- Use one of the following lenses to modify other fields as desired:
3636--
37−-- * 'nuTargetReceivedBytesPerSec'
37+-- * 'nuTargetReceivedBytesPerSecond'
3838--
39−-- * 'nuTargetSentPacketsPerSec'
39+-- * 'nuTargetSentPacketsPerSecond'
4040--
41−-- * 'nuTargetReceivedPacketsPerSec'
41+-- * 'nuTargetReceivedPacketsPerSecond'
4242--
43−-- * 'nuTargetSentBytesPerSec'
43+-- * 'nuTargetSentBytesPerSecond'
4444networkUtilization
4545 :: NetworkUtilization
4646networkUtilization =
4747 NetworkUtilization'
48− { _nuTargetReceivedBytesPerSec = Nothing
49− , _nuTargetSentPacketsPerSec = Nothing
50− , _nuTargetReceivedPacketsPerSec = Nothing
51− , _nuTargetSentBytesPerSec = Nothing
48+ { _nuTargetReceivedBytesPerSecond = Nothing
49+ , _nuTargetSentPacketsPerSecond = Nothing
50+ , _nuTargetReceivedPacketsPerSecond = Nothing
51+ , _nuTargetSentBytesPerSecond = Nothing
5252 }
5353
54−-- | Target bytes per second received.
55−nuTargetReceivedBytesPerSec :: Lens' NetworkUtilization (Maybe Int32)
56−nuTargetReceivedBytesPerSec
57− = lens _nuTargetReceivedBytesPerSec
58− (\ s a -> s{_nuTargetReceivedBytesPerSec = a})
54+-- | Target bytes received per second.
55+nuTargetReceivedBytesPerSecond :: Lens' NetworkUtilization (Maybe Int32)
56+nuTargetReceivedBytesPerSecond
57+ = lens _nuTargetReceivedBytesPerSecond
58+ (\ s a -> s{_nuTargetReceivedBytesPerSecond = a})
5959 . mapping _Coerce
6060
61−-- | Target packets per second sent.
62−nuTargetSentPacketsPerSec :: Lens' NetworkUtilization (Maybe Int32)
63−nuTargetSentPacketsPerSec
64− = lens _nuTargetSentPacketsPerSec
65− (\ s a -> s{_nuTargetSentPacketsPerSec = a})
61+-- | Target packets sent per second.
62+nuTargetSentPacketsPerSecond :: Lens' NetworkUtilization (Maybe Int32)
63+nuTargetSentPacketsPerSecond
64+ = lens _nuTargetSentPacketsPerSecond
65+ (\ s a -> s{_nuTargetSentPacketsPerSecond = a})
6666 . mapping _Coerce
6767
68−-- | Target packets per second received.
69−nuTargetReceivedPacketsPerSec :: Lens' NetworkUtilization (Maybe Int32)
70−nuTargetReceivedPacketsPerSec
71− = lens _nuTargetReceivedPacketsPerSec
72− (\ s a -> s{_nuTargetReceivedPacketsPerSec = a})
68+-- | Target packets received per second.
69+nuTargetReceivedPacketsPerSecond :: Lens' NetworkUtilization (Maybe Int32)
70+nuTargetReceivedPacketsPerSecond
71+ = lens _nuTargetReceivedPacketsPerSecond
72+ (\ s a -> s{_nuTargetReceivedPacketsPerSecond = a})
7373 . mapping _Coerce
7474
75−-- | Target bytes per second sent.
76−nuTargetSentBytesPerSec :: Lens' NetworkUtilization (Maybe Int32)
77−nuTargetSentBytesPerSec
78− = lens _nuTargetSentBytesPerSec
79− (\ s a -> s{_nuTargetSentBytesPerSec = a})
75+-- | Target bytes sent per second.
76+nuTargetSentBytesPerSecond :: Lens' NetworkUtilization (Maybe Int32)
77+nuTargetSentBytesPerSecond
78+ = lens _nuTargetSentBytesPerSecond
79+ (\ s a -> s{_nuTargetSentBytesPerSecond = a})
8080 . mapping _Coerce
8181
8282instance FromJSON NetworkUtilization where
@@ -84,23 +84,23 @@ instance FromJSON NetworkUtilization where
8484 = withObject "NetworkUtilization"
8585 (\ o ->
8686 NetworkUtilization' <$>
87− (o .:? "targetReceivedBytesPerSec") <*>
88− (o .:? "targetSentPacketsPerSec")
89− <*> (o .:? "targetReceivedPacketsPerSec")
90− <*> (o .:? "targetSentBytesPerSec"))
87+ (o .:? "targetReceivedBytesPerSecond") <*>
88+ (o .:? "targetSentPacketsPerSecond")
89+ <*> (o .:? "targetReceivedPacketsPerSecond")
90+ <*> (o .:? "targetSentBytesPerSecond"))
9191
9292instance ToJSON NetworkUtilization where
9393 toJSON NetworkUtilization'{..}
9494 = object
9595 (catMaybes
96− [("targetReceivedBytesPerSec" .=) <$>
97− _nuTargetReceivedBytesPerSec,
98− ("targetSentPacketsPerSec" .=) <$>
99− _nuTargetSentPacketsPerSec,
100− ("targetReceivedPacketsPerSec" .=) <$>
101− _nuTargetReceivedPacketsPerSec,
102− ("targetSentBytesPerSec" .=) <$>
103− _nuTargetSentBytesPerSec])
96+ [("targetReceivedBytesPerSecond" .=) <$>
97+ _nuTargetReceivedBytesPerSecond,
98+ ("targetSentPacketsPerSecond" .=) <$>
99+ _nuTargetSentPacketsPerSecond,
100+ ("targetReceivedPacketsPerSecond" .=) <$>
101+ _nuTargetReceivedPacketsPerSecond,
102+ ("targetSentBytesPerSecond" .=) <$>
103+ _nuTargetSentBytesPerSecond])
104104
105105-- | The \`Status\` type defines a logical error model that is suitable for
106106-- different programming environments, including REST APIs and RPC APIs. It
@@ -222,7 +222,7 @@ operationSchema pOsAddtional_ =
222222 { _osAddtional = _Coerce # pOsAddtional_
223223 }
224224
225−-- | Properties of the object. Contains field \'ype with type URL.
225+-- | Properties of the object. Contains field \'type with type URL.
226226osAddtional :: Lens' OperationSchema (HashMap Text JSONValue)
227227osAddtional
228228 = lens _osAddtional (\ s a -> s{_osAddtional = a}) .
@@ -236,10 +236,44 @@ instance FromJSON OperationSchema where
236236instance ToJSON OperationSchema where
237237 toJSON = toJSON . _osAddtional
238238
239−-- | Configuration for traffic splitting for versions within a single
240−-- service. Traffic splitting allows traffic directed to the service to be
241−-- assigned to one of several versions in a fractional way, enabling
242−-- experiments and canarying new builds, for example.
239+-- | Service-specific metadata. For example the available capacity at the
240+-- given location.
241+--
242+-- /See:/ 'locationSchema' smart constructor.
243+newtype LocationSchema = LocationSchema'
244+ { _lsAddtional :: HashMap Text JSONValue
245+ } deriving (Eq,Show,Data,Typeable,Generic)
246+
247+-- | Creates a value of 'LocationSchema' with the minimum fields required to make a request.
248+--
249+-- Use one of the following lenses to modify other fields as desired:
250+--
251+-- * 'lsAddtional'
252+locationSchema
253+ :: HashMap Text JSONValue -- ^ 'lsAddtional'
254+ -> LocationSchema
255+locationSchema pLsAddtional_ =
256+ LocationSchema'
257+ { _lsAddtional = _Coerce # pLsAddtional_
258+ }
259+
260+-- | Properties of the object. Contains field \'type with type URL.
261+lsAddtional :: Lens' LocationSchema (HashMap Text JSONValue)
262+lsAddtional
263+ = lens _lsAddtional (\ s a -> s{_lsAddtional = a}) .
264+ _Coerce
265+
266+instance FromJSON LocationSchema where
267+ parseJSON
268+ = withObject "LocationSchema"
269+ (\ o -> LocationSchema' <$> (parseJSONObject o))
270+
271+instance ToJSON LocationSchema where
272+ toJSON = toJSON . _lsAddtional
273+
274+-- | Traffic routing configuration for versions within a single service.
275+-- Traffic splits define how traffic directed to the service is assigned to
276+-- versions.
243277--
244278-- /See:/ 'trafficSplit' smart constructor.
245279data TrafficSplit = TrafficSplit'
@@ -262,21 +296,21 @@ trafficSplit =
262296 , _tsAllocations = Nothing
263297 }
264298
265−-- | Which mechanism should be used as a selector when choosing a version to
266−-- send a request to. The traffic selection algorithm will be stable for
267−-- either type until allocations are changed.
299+-- | Mechanism used to determine which version a request is sent to. The
300+-- traffic selection algorithm will be stable for either type until
301+-- allocations are changed.
268302tsShardBy :: Lens' TrafficSplit (Maybe Text)
269303tsShardBy
270304 = lens _tsShardBy (\ s a -> s{_tsShardBy = a})
271305
272−-- | Mapping from service version IDs within the service to fractional
273−-- (0.000, 1] allocations of traffic for that version. Each version may
274−-- only be specified once, but some versions in the service may not have
275−-- any traffic allocation. Services that have traffic allocated in this
276−-- field may not be deleted until the service is deleted, or their traffic
277−-- allocation is removed. Allocations must sum to 1. Supports precision up
278−-- to two decimal places for IP-based splits and up to three decimal places
279−-- for cookie-based splits.
306+-- | Mapping from version IDs within the service to fractional (0.000, 1]
307+-- allocations of traffic for that version. Each version can be specified
308+-- only once, but some versions in the service may not have any traffic
309+-- allocation. Services that have traffic allocated cannot be deleted until
310+-- either the service is deleted or their traffic allocation is removed.
311+-- Allocations must sum to 1. Up to two decimal place precision is
312+-- supported for IP-based splits and up to three decimal places is
313+-- supported for cookie-based splits.
280314tsAllocations :: Lens' TrafficSplit (Maybe TrafficSplitAllocations)
281315tsAllocations
282316 = lens _tsAllocations
@@ -315,7 +349,7 @@ scriptHandler =
315349 { _shScriptPath = Nothing
316350 }
317351
318−-- | Specifies the path to the script from the application root directory.
352+-- | Path to the script from the application root directory.
319353shScriptPath :: Lens' ScriptHandler (Maybe Text)
320354shScriptPath
321355 = lens _shScriptPath (\ s a -> s{_shScriptPath = a})
@@ -381,9 +415,9 @@ instance ToJSON ListServicesResponse where
381415 [("nextPageToken" .=) <$> _lsrNextPageToken,
382416 ("services" .=) <$> _lsrServices])
383417
384−-- | A URL pattern and description of how it should be handled. App Engine
385−-- can handle URLs by executing application code, or by serving static
386−-- files uploaded with the code, such as images, CSS or JavaScript.
418+-- | URL pattern and description of how the URL should be handled. App Engine
419+-- can handle URLs by executing application code or by serving static files
420+-- uploaded with the version, such as images, CSS, or JavaScript.
387421--
388422-- /See:/ 'urlMap' smart constructor.
389423data URLMap = URLMap'
@@ -430,40 +464,39 @@ urlMap =
430464 , _umLogin = Nothing
431465 }
432466
433−-- | Executes a script to handle the request that matches the URL pattern.
467+-- | Executes a script to handle the request that matches this URL pattern.
434468umScript :: Lens' URLMap (Maybe ScriptHandler)
435469umScript = lens _umScript (\ s a -> s{_umScript = a})
436470
437−-- | Configures whether security (HTTPS) should be enforced for this URL.
471+-- | Security (HTTPS) enforcement for this URL.
438472umSecurityLevel :: Lens' URLMap (Maybe Text)
439473umSecurityLevel
440474 = lens _umSecurityLevel
441475 (\ s a -> s{_umSecurityLevel = a})
442476
443−-- | Use API Endpoints to handle requests.
477+-- | Uses API Endpoints to handle requests.
444478umAPIEndpoint :: Lens' URLMap (Maybe APIEndpointHandler)
445479umAPIEndpoint
446480 = lens _umAPIEndpoint
447481 (\ s a -> s{_umAPIEndpoint = a})
448482
449−-- | A URL prefix. This value uses regular expression syntax (and so regexp
450−-- special characters must be escaped), but it should not contain
451−-- groupings. All URLs that begin with this prefix are handled by this
452−-- handler, using the portion of the URL after the prefix as part of the
453−-- file path. This is always required.
483+-- | URL prefix. Uses regular expression syntax, which means regexp special
484+-- characters must be escaped, but should not contain groupings. All URLs
485+-- that begin with this prefix are handled by this handler, using the
486+-- portion of the URL after the prefix as part of the file path.
454487umURLRegex :: Lens' URLMap (Maybe Text)
455488umURLRegex
456489 = lens _umURLRegex (\ s a -> s{_umURLRegex = a})
457490
458491-- | \`30x\` code to use when performing redirects for the \`secure\` field.
459−-- A \`302\` is used by default.
492+-- Defaults to \`302\`.
460493umRedirectHTTPResponseCode :: Lens' URLMap (Maybe Text)
461494umRedirectHTTPResponseCode
462495 = lens _umRedirectHTTPResponseCode
463496 (\ s a -> s{_umRedirectHTTPResponseCode = a})
464497
465−-- | For users not logged in, how to handle access to resources with required
466−-- login. Defaults to \"redirect\".
498+-- | Action to take when users access resources that require authentication.
499+-- Defaults to \`redirect\`.
467500umAuthFailAction :: Lens' URLMap (Maybe Text)
468501umAuthFailAction
469502 = lens _umAuthFailAction
@@ -475,7 +508,7 @@ umStaticFiles
475508 = lens _umStaticFiles
476509 (\ s a -> s{_umStaticFiles = a})
477510
478−-- | What level of login is required to access this resource.
511+-- | Level of login required to access this resource.
479512umLogin :: Lens' URLMap (Maybe Text)
480513umLogin = lens _umLogin (\ s a -> s{_umLogin = a})
481514
@@ -506,7 +539,7 @@ instance ToJSON URLMap where
506539 ("staticFiles" .=) <$> _umStaticFiles,
507540 ("login" .=) <$> _umLogin])
508541
509−-- | A Python runtime third-party library required by the application.
542+-- | Third-party Python runtime library that is required by the application.
510543--
511544-- /See:/ 'library' smart constructor.
512545data Library = Library'
@@ -529,11 +562,11 @@ library =
529562 , _lVersion = Nothing
530563 }
531564
532−-- | The name of the library, e.g. \"PIL\" or \"django\".
565+-- | Name of the library. Example: \"django\".
533566lName :: Lens' Library (Maybe Text)
534567lName = lens _lName (\ s a -> s{_lName = a})
535568
536−-- | The version of the library to select, or \"latest\".
569+-- | Version of the library to select, or \"latest\".
537570lVersion :: Lens' Library (Maybe Text)
538571lVersion = lens _lVersion (\ s a -> s{_lVersion = a})
539572
@@ -550,63 +583,114 @@ instance ToJSON Library where
550583 [("name" .=) <$> _lName,
551584 ("version" .=) <$> _lVersion])
552585
553−-- | Target scaling by disk usage (for VM runtimes only).
586+-- | The response message for LocationService.ListLocations.
587+--
588+-- /See:/ 'listLocationsResponse' smart constructor.
589+data ListLocationsResponse = ListLocationsResponse'
590+ { _llrNextPageToken :: !(Maybe Text)
591+ , _llrLocations :: !(Maybe [Location])
592+ } deriving (Eq,Show,Data,Typeable,Generic)
593+
594+-- | Creates a value of 'ListLocationsResponse' with the minimum fields required to make a request.
595+--
596+-- Use one of the following lenses to modify other fields as desired:
597+--
598+-- * 'llrNextPageToken'
599+--
600+-- * 'llrLocations'
601+listLocationsResponse
602+ :: ListLocationsResponse
603+listLocationsResponse =
604+ ListLocationsResponse'
605+ { _llrNextPageToken = Nothing
606+ , _llrLocations = Nothing
607+ }
608+
609+-- | The standard List next-page token.
610+llrNextPageToken :: Lens' ListLocationsResponse (Maybe Text)
611+llrNextPageToken
612+ = lens _llrNextPageToken
613+ (\ s a -> s{_llrNextPageToken = a})
614+
615+-- | A list of locations that matches the specified filter in the request.
616+llrLocations :: Lens' ListLocationsResponse [Location]
617+llrLocations
618+ = lens _llrLocations (\ s a -> s{_llrLocations = a})
619+ . _Default
620+ . _Coerce
621+
622+instance FromJSON ListLocationsResponse where
623+ parseJSON
624+ = withObject "ListLocationsResponse"
625+ (\ o ->
626+ ListLocationsResponse' <$>
627+ (o .:? "nextPageToken") <*>
628+ (o .:? "locations" .!= mempty))
629+
630+instance ToJSON ListLocationsResponse where
631+ toJSON ListLocationsResponse'{..}
632+ = object
633+ (catMaybes
634+ [("nextPageToken" .=) <$> _llrNextPageToken,
635+ ("locations" .=) <$> _llrLocations])
636+
637+-- | Target scaling by disk usage. Only applicable for VM runtimes.
554638--
555639-- /See:/ 'diskUtilization' smart constructor.
556640data DiskUtilization = DiskUtilization'
557− { _duTargetWriteOpsPerSec :: !(Maybe (Textual Int32))
558− , _duTargetReadOpsPerSec :: !(Maybe (Textual Int32))
559− , _duTargetWriteBytesPerSec :: !(Maybe (Textual Int32))
560− , _duTargetReadBytesPerSec :: !(Maybe (Textual Int32))
641+ { _duTargetReadBytesPerSecond :: !(Maybe (Textual Int32))
642+ , _duTargetReadOpsPerSecond :: !(Maybe (Textual Int32))
643+ , _duTargetWriteOpsPerSecond :: !(Maybe (Textual Int32))
644+ , _duTargetWriteBytesPerSecond :: !(Maybe (Textual Int32))
561645 } deriving (Eq,Show,Data,Typeable,Generic)
562646
563647-- | Creates a value of 'DiskUtilization' with the minimum fields required to make a request.
564648--
565649-- Use one of the following lenses to modify other fields as desired:
566650--
567−-- * 'duTargetWriteOpsPerSec'
651+-- * 'duTargetReadBytesPerSecond'
568652--
569−-- * 'duTargetReadOpsPerSec'
653+-- * 'duTargetReadOpsPerSecond'
570654--
571−-- * 'duTargetWriteBytesPerSec'
655+-- * 'duTargetWriteOpsPerSecond'
572656--
573−-- * 'duTargetReadBytesPerSec'
657+-- * 'duTargetWriteBytesPerSecond'
574658diskUtilization
575659 :: DiskUtilization
576660diskUtilization =
577661 DiskUtilization'
578− { _duTargetWriteOpsPerSec = Nothing
579− , _duTargetReadOpsPerSec = Nothing
580− , _duTargetWriteBytesPerSec = Nothing
581− , _duTargetReadBytesPerSec = Nothing
662+ { _duTargetReadBytesPerSecond = Nothing
663+ , _duTargetReadOpsPerSecond = Nothing
664+ , _duTargetWriteOpsPerSecond = Nothing
665+ , _duTargetWriteBytesPerSecond = Nothing
582666 }
583667
584−-- | Target ops per second written.
585−duTargetWriteOpsPerSec :: Lens' DiskUtilization (Maybe Int32)
586−duTargetWriteOpsPerSec
587− = lens _duTargetWriteOpsPerSec
588− (\ s a -> s{_duTargetWriteOpsPerSec = a})
668+-- | Target bytes read per second.
669+duTargetReadBytesPerSecond :: Lens' DiskUtilization (Maybe Int32)
670+duTargetReadBytesPerSecond
671+ = lens _duTargetReadBytesPerSecond
672+ (\ s a -> s{_duTargetReadBytesPerSecond = a})
589673 . mapping _Coerce
590674
591−-- | Target ops per second read.
592−duTargetReadOpsPerSec :: Lens' DiskUtilization (Maybe Int32)
593−duTargetReadOpsPerSec
594− = lens _duTargetReadOpsPerSec
595− (\ s a -> s{_duTargetReadOpsPerSec = a})
675+-- | Target ops read per seconds.
676+duTargetReadOpsPerSecond :: Lens' DiskUtilization (Maybe Int32)
677+duTargetReadOpsPerSecond
678+ = lens _duTargetReadOpsPerSecond
679+ (\ s a -> s{_duTargetReadOpsPerSecond = a})
596680 . mapping _Coerce
597681
598−-- | Target bytes per second written.
599−duTargetWriteBytesPerSec :: Lens' DiskUtilization (Maybe Int32)
600−duTargetWriteBytesPerSec
601− = lens _duTargetWriteBytesPerSec
602− (\ s a -> s{_duTargetWriteBytesPerSec = a})
682+-- | Target ops written per second.
683+duTargetWriteOpsPerSecond :: Lens' DiskUtilization (Maybe Int32)
684+duTargetWriteOpsPerSecond
685+ = lens _duTargetWriteOpsPerSecond
686+ (\ s a -> s{_duTargetWriteOpsPerSecond = a})
603687 . mapping _Coerce
604688
605−-- | Target bytes per second read.
606−duTargetReadBytesPerSec :: Lens' DiskUtilization (Maybe Int32)
607−duTargetReadBytesPerSec
608− = lens _duTargetReadBytesPerSec
609− (\ s a -> s{_duTargetReadBytesPerSec = a})
689+-- | Target bytes written per second.
690+duTargetWriteBytesPerSecond :: Lens' DiskUtilization (Maybe Int32)
691+duTargetWriteBytesPerSecond
692+ = lens _duTargetWriteBytesPerSecond
693+ (\ s a -> s{_duTargetWriteBytesPerSecond = a})
610694 . mapping _Coerce
611695
612696instance FromJSON DiskUtilization where
@@ -614,23 +698,23 @@ instance FromJSON DiskUtilization where
614698 = withObject "DiskUtilization"
615699 (\ o ->
616700 DiskUtilization' <$>
617− (o .:? "targetWriteOpsPerSec") <*>
618− (o .:? "targetReadOpsPerSec")
619− <*> (o .:? "targetWriteBytesPerSec")
620− <*> (o .:? "targetReadBytesPerSec"))
701+ (o .:? "targetReadBytesPerSecond") <*>
702+ (o .:? "targetReadOpsPerSecond")
703+ <*> (o .:? "targetWriteOpsPerSecond")
704+ <*> (o .:? "targetWriteBytesPerSecond"))
621705
622706instance ToJSON DiskUtilization where
623707 toJSON DiskUtilization'{..}
624708 = object
625709 (catMaybes
626− [("targetWriteOpsPerSec" .=) <$>
627− _duTargetWriteOpsPerSec,
628− ("targetReadOpsPerSec" .=) <$>
629− _duTargetReadOpsPerSec,
630− ("targetWriteBytesPerSec" .=) <$>
631− _duTargetWriteBytesPerSec,
632− ("targetReadBytesPerSec" .=) <$>
633− _duTargetReadBytesPerSec])
710+ [("targetReadBytesPerSecond" .=) <$>
711+ _duTargetReadBytesPerSecond,
712+ ("targetReadOpsPerSecond" .=) <$>
713+ _duTargetReadOpsPerSecond,
714+ ("targetWriteOpsPerSecond" .=) <$>
715+ _duTargetWriteOpsPerSecond,
716+ ("targetWriteBytesPerSecond" .=) <$>
717+ _duTargetWriteBytesPerSecond])
634718
635719-- | The response message for Operations.ListOperations.
636720--
@@ -684,8 +768,9 @@ instance ToJSON ListOperationsResponse where
684768 [("nextPageToken" .=) <$> _lorNextPageToken,
685769 ("operations" .=) <$> _lorOperations])
686770
687−-- | Configure health checking for the VM instances. Unhealthy VM instances
688−-- will be killed and replaced with new instances.
771+-- | Health checking configuration for VM instances. Unhealthy instances are
772+-- killed and replaced with new instances. Only applicable for instances in
773+-- App Engine flexible environment.
689774--
690775-- /See:/ 'healthCheck' smart constructor.
691776data HealthCheck = HealthCheck'
@@ -728,7 +813,7 @@ healthCheck =
728813 , _hcUnhealthyThreshold = Nothing
729814 }
730815
731−-- | The number of consecutive successful health checks before receiving
816+-- | Number of consecutive successful health checks required before receiving
732817-- traffic.
733818hcHealthyThreshold :: Lens' HealthCheck (Maybe Word32)
734819hcHealthyThreshold
@@ -742,31 +827,32 @@ hcDisableHealthCheck
742827 = lens _hcDisableHealthCheck
743828 (\ s a -> s{_hcDisableHealthCheck = a})
744829
745−-- | The interval between health checks.
830+-- | Interval between health checks.
746831hcCheckInterval :: Lens' HealthCheck (Maybe Text)
747832hcCheckInterval
748833 = lens _hcCheckInterval
749834 (\ s a -> s{_hcCheckInterval = a})
750835
751−-- | The number of consecutive failed health checks before an instance is
752−-- restarted.
836+-- | Number of consecutive failed health checks required before an instance
837+-- is restarted.
753838hcRestartThreshold :: Lens' HealthCheck (Maybe Word32)
754839hcRestartThreshold
755840 = lens _hcRestartThreshold
756841 (\ s a -> s{_hcRestartThreshold = a})
757842 . mapping _Coerce
758843
759−-- | The host header to send when performing an HTTP health check (e.g.
760−-- myapp.appspot.com)
844+-- | Host header to send when performing an HTTP health check. Example:
845+-- \"myapp.appspot.com\"
761846hcHost :: Lens' HealthCheck (Maybe Text)
762847hcHost = lens _hcHost (\ s a -> s{_hcHost = a})
763848
764−-- | The amount of time before the health check is considered failed.
849+-- | Time before the health check is considered failed.
765850hcTimeout :: Lens' HealthCheck (Maybe Text)
766851hcTimeout
767852 = lens _hcTimeout (\ s a -> s{_hcTimeout = a})
768853
769−-- | The number of consecutive failed health checks before removing traffic.
854+-- | Number of consecutive failed health checks required before removing
855+-- traffic.
770856hcUnhealthyThreshold :: Lens' HealthCheck (Maybe Word32)
771857hcUnhealthyThreshold
772858 = lens _hcUnhealthyThreshold
@@ -798,7 +884,9 @@ instance ToJSON HealthCheck where
798884 ("timeout" .=) <$> _hcTimeout,
799885 ("unhealthyThreshold" .=) <$> _hcUnhealthyThreshold])
800886
801−-- | API Serving configuration for Cloud Endpoints.
887+-- | [Google Cloud
888+-- Endpoints](https:\/\/cloud.google.com\/appengine\/docs\/python\/endpoints\/)
889+-- configuration for API handlers.
802890--
803891-- /See:/ 'apiConfigHandler' smart constructor.
804892data APIConfigHandler = APIConfigHandler'
@@ -833,12 +921,12 @@ apiConfigHandler =
833921 , _achLogin = Nothing
834922 }
835923
836−-- | Specifies the path to the script from the application root directory.
924+-- | Path to the script from the application root directory.
837925achScript :: Lens' APIConfigHandler (Maybe Text)
838926achScript
839927 = lens _achScript (\ s a -> s{_achScript = a})
840928
841−-- | Configures whether security (HTTPS) should be enforced for this URL.
929+-- | Security (HTTPS) enforcement for this URL.
842930achSecurityLevel :: Lens' APIConfigHandler (Maybe Text)
843931achSecurityLevel
844932 = lens _achSecurityLevel
@@ -848,15 +936,15 @@ achSecurityLevel
848936achURL :: Lens' APIConfigHandler (Maybe Text)
849937achURL = lens _achURL (\ s a -> s{_achURL = a})
850938
851−-- | For users not logged in, how to handle access to resources with required
852−-- login. Defaults to \"redirect\".
939+-- | Action to take when users access resources that require authentication.
940+-- Defaults to \`redirect\`.
853941achAuthFailAction :: Lens' APIConfigHandler (Maybe Text)
854942achAuthFailAction
855943 = lens _achAuthFailAction
856944 (\ s a -> s{_achAuthFailAction = a})
857945
858−-- | What level of login is required to access this resource. Default is
859−-- \"optional\".
946+-- | Level of login required to access this resource. Defaults to
947+-- \`optional\`.
860948achLogin :: Lens' APIConfigHandler (Maybe Text)
861949achLogin = lens _achLogin (\ s a -> s{_achLogin = a})
862950
@@ -880,9 +968,8 @@ instance ToJSON APIConfigHandler where
880968 ("authFailAction" .=) <$> _achAuthFailAction,
881969 ("login" .=) <$> _achLogin])
882970
883−-- | Environment variables made available to the application. Only returned
884−-- in \`GET\` requests if \`view=FULL\` is set. May only be set on create
885−-- requests; once created, is immutable.
971+-- | Environment variables available to the application. Only returned in
972+-- \`GET\` requests if \`view=FULL\` is set.
886973--
887974-- /See:/ 'versionEnvVariables' smart constructor.
888975newtype VersionEnvVariables = VersionEnvVariables'
@@ -915,20 +1002,20 @@ instance FromJSON VersionEnvVariables where
9151002instance ToJSON VersionEnvVariables where
9161003 toJSON = toJSON . _vevAddtional
9171004
918−-- | An Application contains the top-level configuration of an App Engine
919−-- application.
1005+-- | An Application resource contains the top-level configuration of an App
1006+-- Engine application.
9201007--
9211008-- /See:/ 'application' smart constructor.
9221009data Application = Application'
9231010 { _aDefaultHostname :: !(Maybe Text)
9241011 , _aDefaultCookieExpiration :: !(Maybe Text)
925− , _aLocation :: !(Maybe Text)
9261012 , _aAuthDomain :: !(Maybe Text)
9271013 , _aCodeBucket :: !(Maybe Text)
9281014 , _aName :: !(Maybe Text)
9291015 , _aDispatchRules :: !(Maybe [URLDispatchRule])
9301016 , _aDefaultBucket :: !(Maybe Text)
9311017 , _aId :: !(Maybe Text)
1018+ , _aLocationId :: !(Maybe Text)
9321019 } deriving (Eq,Show,Data,Typeable,Generic)
9331020
9341021-- | Creates a value of 'Application' with the minimum fields required to make a request.
@@ -939,8 +1026,6 @@ data Application = Application'
9391026--
9401027-- * 'aDefaultCookieExpiration'
9411028--
942−-- * 'aLocation'
943−--
9441029-- * 'aAuthDomain'
9451030--
9461031-- * 'aCodeBucket'
@@ -952,66 +1037,58 @@ data Application = Application'
9521037-- * 'aDefaultBucket'
9531038--
9541039-- * 'aId'
1040+--
1041+-- * 'aLocationId'
9551042application
9561043 :: Application
9571044application =
9581045 Application'
9591046 { _aDefaultHostname = Nothing
9601047 , _aDefaultCookieExpiration = Nothing
961− , _aLocation = Nothing
9621048 , _aAuthDomain = Nothing
9631049 , _aCodeBucket = Nothing
9641050 , _aName = Nothing
9651051 , _aDispatchRules = Nothing
9661052 , _aDefaultBucket = Nothing
9671053 , _aId = Nothing
1054+ , _aLocationId = Nothing
9681055 }
9691056
970−-- | The hostname used to reach the application, as resolved by App Engine.
1057+-- | Hostname used to reach this application, as resolved by App Engine.
9711058-- \'OutputOnly
9721059aDefaultHostname :: Lens' Application (Maybe Text)
9731060aDefaultHostname
9741061 = lens _aDefaultHostname
9751062 (\ s a -> s{_aDefaultHostname = a})
9761063
977−-- | Determines the cookie expiration policy for the application.
978−-- \'OutputOnly
1064+-- | Cookie expiration policy for this application. \'OutputOnly
9791065aDefaultCookieExpiration :: Lens' Application (Maybe Text)
9801066aDefaultCookieExpiration
9811067 = lens _aDefaultCookieExpiration
9821068 (\ s a -> s{_aDefaultCookieExpiration = a})
9831069
984−-- | The location from which the application will be run. Application
985−-- instances will run out of data centers in the chosen location and all of
986−-- the application\'s End User Content will be stored at rest. The default
987−-- is \"us-central\". Choices are: \"us-central\" - Central US
988−-- \"europe-west\" - Western Europe \"us-east1\" - Eastern US
989−aLocation :: Lens' Application (Maybe Text)
990−aLocation
991− = lens _aLocation (\ s a -> s{_aLocation = a})
992−
993−-- | If set, only users from the specified Google Apps authentication domain
994−-- may access the application. If not set, any Google Account may access
995−-- the application.
1070+-- | Google Apps authentication domain that controls which users can access
1071+-- this application. Defaults to open access for any Google Account.
9961072aAuthDomain :: Lens' Application (Maybe Text)
9971073aAuthDomain
9981074 = lens _aAuthDomain (\ s a -> s{_aAuthDomain = a})
9991075
1000−-- | A Google Cloud Storage bucket which can be used for storing files
1001−-- associated with an application. This bucket is associated with the
1076+-- | Google Cloud Storage bucket that can be used for storing files
1077+-- associated with this application. This bucket is associated with the
10021078-- application and can be used by the gcloud deployment commands.
10031079-- \'OutputOnly
10041080aCodeBucket :: Lens' Application (Maybe Text)
10051081aCodeBucket
10061082 = lens _aCodeBucket (\ s a -> s{_aCodeBucket = a})
10071083
1008−-- | The full path to the application in the API. Example: \"apps\/myapp\".
1009−-- \'OutputOnly
1084+-- | Full path to the Application resource in the API. Example:
1085+-- \`apps\/myapp\`. \'OutputOnly
10101086aName :: Lens' Application (Maybe Text)
10111087aName = lens _aName (\ s a -> s{_aName = a})
10121088
1013−-- | HTTP path dispatch rules for requests to the app that do not explicitly
1014−-- target a service or version. The rules are order-dependent. \'OutputOnly
1089+-- | HTTP path dispatch rules for requests to the application that do not
1090+-- explicitly target a service or version. Rules are order-dependent.
1091+-- \'OutputOnly
10151092aDispatchRules :: Lens' Application [URLDispatchRule]
10161093aDispatchRules
10171094 = lens _aDispatchRules
@@ -1019,17 +1096,28 @@ aDispatchRules
10191096 . _Default
10201097 . _Coerce
10211098
1022−-- | A Google Cloud Storage bucket which can be used by the application to
1099+-- | Google Cloud Storage bucket that can be used by this application to
10231100-- store content. \'OutputOnly
10241101aDefaultBucket :: Lens' Application (Maybe Text)
10251102aDefaultBucket
10261103 = lens _aDefaultBucket
10271104 (\ s a -> s{_aDefaultBucket = a})
10281105
1029−-- | The relative name\/path of the application. Example: \"myapp\".
1106+-- | Identifier of the Application resource. This identifier is equivalent to
1107+-- the project ID of the Google Cloud Platform project where you want to
1108+-- deploy your application. Example: \`myapp\`.
10301109aId :: Lens' Application (Maybe Text)
10311110aId = lens _aId (\ s a -> s{_aId = a})
10321111
1112+-- | Location from which this application will be run. Application instances
1113+-- will run out of data centers in the chosen location, which is also where
1114+-- all of the application\'s end user content is stored. Defaults to
1115+-- \`us-central\`. Options are: \`us-central\` - Central US \`europe-west\`
1116+-- - Western Europe \`us-east1\` - Eastern US
1117+aLocationId :: Lens' Application (Maybe Text)
1118+aLocationId
1119+ = lens _aLocationId (\ s a -> s{_aLocationId = a})
1120+
10331121instance FromJSON Application where
10341122 parseJSON
10351123 = withObject "Application"
@@ -1037,13 +1125,13 @@ instance FromJSON Application where
10371125 Application' <$>
10381126 (o .:? "defaultHostname") <*>
10391127 (o .:? "defaultCookieExpiration")
1040− <*> (o .:? "location")
10411128 <*> (o .:? "authDomain")
10421129 <*> (o .:? "codeBucket")
10431130 <*> (o .:? "name")
10441131 <*> (o .:? "dispatchRules" .!= mempty)
10451132 <*> (o .:? "defaultBucket")
1046− <*> (o .:? "id"))
1133+ <*> (o .:? "id")
1134+ <*> (o .:? "locationId"))
10471135
10481136instance ToJSON Application where
10491137 toJSON Application'{..}
@@ -1052,15 +1140,16 @@ instance ToJSON Application where
10521140 [("defaultHostname" .=) <$> _aDefaultHostname,
10531141 ("defaultCookieExpiration" .=) <$>
10541142 _aDefaultCookieExpiration,
1055− ("location" .=) <$> _aLocation,
10561143 ("authDomain" .=) <$> _aAuthDomain,
10571144 ("codeBucket" .=) <$> _aCodeBucket,
10581145 ("name" .=) <$> _aName,
10591146 ("dispatchRules" .=) <$> _aDispatchRules,
10601147 ("defaultBucket" .=) <$> _aDefaultBucket,
1061− ("id" .=) <$> _aId])
1148+ ("id" .=) <$> _aId,
1149+ ("locationId" .=) <$> _aLocationId])
10621150
1063−-- | Beta settings supplied to the application via metadata.
1151+-- | Metadata settings that are supplied to this version to enable beta
1152+-- runtime features.
10641153--
10651154-- /See:/ 'versionBetaSettings' smart constructor.
10661155newtype VersionBetaSettings = VersionBetaSettings'
@@ -1093,13 +1182,13 @@ instance FromJSON VersionBetaSettings where
10931182instance ToJSON VersionBetaSettings where
10941183 toJSON = toJSON . _vbsAddtional
10951184
1096−-- | A service is a logical component of an application that can share state
1097−-- and communicate in a secure fashion with other services. For example, an
1098−-- application that handles customer requests might include separate
1099−-- services to handle other tasks such as API requests from mobile devices
1100−-- or backend data analysis. Each service has a collection of versions that
1101−-- define a specific set of code used to implement the functionality of
1102−-- that service.
1185+-- | A Service resource is a logical component of an application that can
1186+-- share state and communicate in a secure fashion with other services. For
1187+-- example, an application that handles customer requests might include
1188+-- separate services to handle tasks such as backend data analysis or API
1189+-- requests from mobile devices. Each service has a collection of versions
1190+-- that define a specific set of code used to implement the functionality
1191+-- of that service.
11031192--
11041193-- /See:/ 'service' smart constructor.
11051194data Service = Service'
@@ -1126,18 +1215,18 @@ service =
11261215 , _sId = Nothing
11271216 }
11281217
1129−-- | A mapping that defines fractional HTTP traffic diversion to different
1218+-- | Mapping that defines fractional HTTP traffic diversion to different
11301219-- versions within the service.
11311220sSplit :: Lens' Service (Maybe TrafficSplit)
11321221sSplit = lens _sSplit (\ s a -> s{_sSplit = a})
11331222
1134−-- | The full path to the Service resource in the API. Example:
1135−-- \"apps\/myapp\/services\/default\" \'OutputOnly
1223+-- | Full path to the Service resource in the API. Example:
1224+-- \`apps\/myapp\/services\/default\`. \'OutputOnly
11361225sName :: Lens' Service (Maybe Text)
11371226sName = lens _sName (\ s a -> s{_sName = a})
11381227
1139−-- | The relative name\/path of the service within the application. Example:
1140−-- \"default\" \'OutputOnly
1228+-- | Relative name of the service within the application. Example:
1229+-- \`default\`. \'OutputOnly
11411230sId :: Lens' Service (Maybe Text)
11421231sId = lens _sId (\ s a -> s{_sId = a})
11431232
@@ -1155,6 +1244,78 @@ instance ToJSON Service where
11551244 [("split" .=) <$> _sSplit, ("name" .=) <$> _sName,
11561245 ("id" .=) <$> _sId])
11571246
1247+-- | A resource that represents Google Cloud Platform location.
1248+--
1249+-- /See:/ 'location' smart constructor.
1250+data Location = Location'
1251+ { _locName :: !(Maybe Text)
1252+ , _locMetadata :: !(Maybe LocationSchema)
1253+ , _locLabels :: !(Maybe LocationLabels)
1254+ , _locLocationId :: !(Maybe Text)
1255+ } deriving (Eq,Show,Data,Typeable,Generic)
1256+
1257+-- | Creates a value of 'Location' with the minimum fields required to make a request.
1258+--
1259+-- Use one of the following lenses to modify other fields as desired:
1260+--
1261+-- * 'locName'
1262+--
1263+-- * 'locMetadata'
1264+--
1265+-- * 'locLabels'
1266+--
1267+-- * 'locLocationId'
1268+location
1269+ :: Location
1270+location =
1271+ Location'
1272+ { _locName = Nothing
1273+ , _locMetadata = Nothing
1274+ , _locLabels = Nothing
1275+ , _locLocationId = Nothing
1276+ }
1277+
1278+-- | Resource name for the location, which may vary between implementations.
1279+-- For example: \`\"projects\/example-project\/locations\/us-east1\"\`
1280+locName :: Lens' Location (Maybe Text)
1281+locName = lens _locName (\ s a -> s{_locName = a})
1282+
1283+-- | Service-specific metadata. For example the available capacity at the
1284+-- given location.
1285+locMetadata :: Lens' Location (Maybe LocationSchema)
1286+locMetadata
1287+ = lens _locMetadata (\ s a -> s{_locMetadata = a})
1288+
1289+-- | Cross-service attributes for the location. For example
1290+-- {\"cloud.googleapis.com\/region\": \"us-east1\"}
1291+locLabels :: Lens' Location (Maybe LocationLabels)
1292+locLabels
1293+ = lens _locLabels (\ s a -> s{_locLabels = a})
1294+
1295+-- | The canonical id for this location. For example: \`\"us-east1\"\`.
1296+locLocationId :: Lens' Location (Maybe Text)
1297+locLocationId
1298+ = lens _locLocationId
1299+ (\ s a -> s{_locLocationId = a})
1300+
1301+instance FromJSON Location where
1302+ parseJSON
1303+ = withObject "Location"
1304+ (\ o ->
1305+ Location' <$>
1306+ (o .:? "name") <*> (o .:? "metadata") <*>
1307+ (o .:? "labels")
1308+ <*> (o .:? "locationId"))
1309+
1310+instance ToJSON Location where
1311+ toJSON Location'{..}
1312+ = object
1313+ (catMaybes
1314+ [("name" .=) <$> _locName,
1315+ ("metadata" .=) <$> _locMetadata,
1316+ ("labels" .=) <$> _locLabels,
1317+ ("locationId" .=) <$> _locLocationId])
1318+
11581319-- | This resource represents a long-running operation that is the result of
11591320-- a network API call.
11601321--
@@ -1246,6 +1407,58 @@ instance ToJSON Operation where
12461407 ("name" .=) <$> _oName,
12471408 ("metadata" .=) <$> _oMetadata])
12481409
1410+-- | The zip file information for a zip deployment.
1411+--
1412+-- /See:/ 'zipInfo' smart constructor.
1413+data ZipInfo = ZipInfo'
1414+ { _ziFilesCount :: !(Maybe (Textual Int32))
1415+ , _ziSourceURL :: !(Maybe Text)
1416+ } deriving (Eq,Show,Data,Typeable,Generic)
1417+
1418+-- | Creates a value of 'ZipInfo' with the minimum fields required to make a request.
1419+--
1420+-- Use one of the following lenses to modify other fields as desired:
1421+--
1422+-- * 'ziFilesCount'
1423+--
1424+-- * 'ziSourceURL'
1425+zipInfo
1426+ :: ZipInfo
1427+zipInfo =
1428+ ZipInfo'
1429+ { _ziFilesCount = Nothing
1430+ , _ziSourceURL = Nothing
1431+ }
1432+
1433+-- | An estimate of the number of files in a zip for a zip deployment. If
1434+-- set, must be greater than or equal to the actual number of files. Used
1435+-- for optimizing performance; if not provided, deployment may be slow.
1436+ziFilesCount :: Lens' ZipInfo (Maybe Int32)
1437+ziFilesCount
1438+ = lens _ziFilesCount (\ s a -> s{_ziFilesCount = a})
1439+ . mapping _Coerce
1440+
1441+-- | URL of the zip file to deploy from. Must be a URL to a resource in
1442+-- Google Cloud Storage in the form
1443+-- \'http(s):\/\/storage.googleapis.com\/\\\/\\\'.
1444+ziSourceURL :: Lens' ZipInfo (Maybe Text)
1445+ziSourceURL
1446+ = lens _ziSourceURL (\ s a -> s{_ziSourceURL = a})
1447+
1448+instance FromJSON ZipInfo where
1449+ parseJSON
1450+ = withObject "ZipInfo"
1451+ (\ o ->
1452+ ZipInfo' <$>
1453+ (o .:? "filesCount") <*> (o .:? "sourceUrl"))
1454+
1455+instance ToJSON ZipInfo where
1456+ toJSON ZipInfo'{..}
1457+ = object
1458+ (catMaybes
1459+ [("filesCount" .=) <$> _ziFilesCount,
1460+ ("sourceUrl" .=) <$> _ziSourceURL])
1461+
12491462-- | Rules to match an HTTP request and dispatch that request to a service.
12501463--
12511464-- /See:/ 'urlDispatchRule' smart constructor.
@@ -1273,21 +1486,21 @@ urlDispatchRule =
12731486 , _udrDomain = Nothing
12741487 }
12751488
1276−-- | The pathname within the host. This must start with a \'\/\'. A single
1277−-- \'*\' (glob) can be included at the end of the path. The sum of the
1278−-- lengths of the domain and path may not exceed 100 characters.
1489+-- | Pathname within the host. Must start with a \"\`\/\`\". A single
1490+-- \"\`*\`\" can be included at the end of the path. The sum of the lengths
1491+-- of the domain and path may not exceed 100 characters.
12791492udrPath :: Lens' URLDispatchRule (Maybe Text)
12801493udrPath = lens _udrPath (\ s a -> s{_udrPath = a})
12811494
1282−-- | The resource id of a Service in this application that should service the
1283−-- matched request. The Service must already exist. Example: \"default\".
1495+-- | Resource ID of a service in this application that should serve the
1496+-- matched request. The service must already exist. Example: \`default\`.
12841497udrService :: Lens' URLDispatchRule (Maybe Text)
12851498udrService
12861499 = lens _udrService (\ s a -> s{_udrService = a})
12871500
1288−-- | The domain name to match on. Supports \'*\' (glob) wildcarding on the
1289−-- left-hand side of a \'.\'. If empty, all domains will be matched (the
1290−-- same as \'*\').
1501+-- | Domain name to match against. The wildcard \"\`*\`\" is supported if
1502+-- specified before a period: \"\`*.\`\". Defaults to matching all domains:
1503+-- \"\`*\`\".
12911504udrDomain :: Lens' URLDispatchRule (Maybe Text)
12921505udrDomain
12931506 = lens _udrDomain (\ s a -> s{_udrDomain = a})
@@ -1337,7 +1550,7 @@ lvrNextPageToken
13371550 = lens _lvrNextPageToken
13381551 (\ s a -> s{_lvrNextPageToken = a})
13391552
1340−-- | The versions belonging to the requested application service.
1553+-- | The versions belonging to the requested service.
13411554lvrVersions :: Lens' ListVersionsResponse [Version]
13421555lvrVersions
13431556 = lens _lvrVersions (\ s a -> s{_lvrVersions = a}) .
@@ -1359,7 +1572,8 @@ instance ToJSON ListVersionsResponse where
13591572 [("nextPageToken" .=) <$> _lvrNextPageToken,
13601573 ("versions" .=) <$> _lvrVersions])
13611574
1362−-- | A single source file which is part of the application to be deployed.
1575+-- | Single source file that is part of the version to be deployed. Each
1576+-- source file that is deployed must be specified separately.
13631577--
13641578-- /See:/ 'fileInfo' smart constructor.
13651579data FileInfo = FileInfo'
@@ -1386,18 +1600,18 @@ fileInfo =
13861600 , _fiSourceURL = Nothing
13871601 }
13881602
1389−-- | The SHA1 (160 bits) hash of the file in hex.
1603+-- | The SHA1 hash of the file, in hex.
13901604fiSha1Sum :: Lens' FileInfo (Maybe Text)
13911605fiSha1Sum
13921606 = lens _fiSha1Sum (\ s a -> s{_fiSha1Sum = a})
13931607
1394−-- | The MIME type of the file; if unspecified, the value from Google Cloud
1395−-- Storage will be used.
1608+-- | The MIME type of the file. Defaults to the value from Google Cloud
1609+-- Storage.
13961610fiMimeType :: Lens' FileInfo (Maybe Text)
13971611fiMimeType
13981612 = lens _fiMimeType (\ s a -> s{_fiMimeType = a})
13991613
1400−-- | The URL source to use to fetch this file. Must be a URL to a resource in
1614+-- | URL source to use to fetch this file. Must be a URL to a resource in
14011615-- Google Cloud Storage in the form
14021616-- \'http(s):\/\/storage.googleapis.com\/\\\/\\\'.
14031617fiSourceURL :: Lens' FileInfo (Maybe Text)
@@ -1420,8 +1634,7 @@ instance ToJSON FileInfo where
14201634 ("mimeType" .=) <$> _fiMimeType,
14211635 ("sourceUrl" .=) <$> _fiSourceURL])
14221636
1423−-- | Automatic scaling is the scaling policy that App Engine has used since
1424−-- its inception. It is based on request rate, response latencies, and
1637+-- | Automatic scaling is based on request rate, response latencies, and
14251638-- other application metrics.
14261639--
14271640-- /See:/ 'automaticScaling' smart constructor.
@@ -1491,16 +1704,15 @@ asNetworkUtilization
14911704 = lens _asNetworkUtilization
14921705 (\ s a -> s{_asNetworkUtilization = a})
14931706
1494−-- | Max number of instances that App Engine should start to handle requests.
1707+-- | Maximum number of instances that should be started to handle requests.
14951708asMaxTotalInstances :: Lens' AutomaticScaling (Maybe Int32)
14961709asMaxTotalInstances
14971710 = lens _asMaxTotalInstances
14981711 (\ s a -> s{_asMaxTotalInstances = a})
14991712 . mapping _Coerce
15001713
1501−-- | The minimum number of idle instances that App Engine should maintain for
1502−-- this version. Only applies to the default version of a service, since
1503−-- other versions are not expected to receive significant traffic.
1714+-- | Minimum number of idle instances that should be maintained for this
1715+-- version. Only applicable for the default version of a service.
15041716asMinIdleInstances :: Lens' AutomaticScaling (Maybe Int32)
15051717asMinIdleInstances
15061718 = lens _asMinIdleInstances
@@ -1513,8 +1725,8 @@ asDiskUtilization
15131725 = lens _asDiskUtilization
15141726 (\ s a -> s{_asDiskUtilization = a})
15151727
1516−-- | The minimum amount of time that App Engine should allow a request to
1517−-- wait in the pending queue before starting a new instance to handle it.
1728+-- | Minimum amount of time a request should wait in the pending queue before
1729+-- starting a new instance to handle it.
15181730asMinPendingLatency :: Lens' AutomaticScaling (Maybe Text)
15191731asMinPendingLatency
15201732 = lens _asMinPendingLatency
@@ -1526,34 +1738,34 @@ asCPUUtilization
15261738 = lens _asCPUUtilization
15271739 (\ s a -> s{_asCPUUtilization = a})
15281740
1529−-- | The maximum number of idle instances that App Engine should maintain for
1530−-- this version.
1741+-- | Maximum number of idle instances that should be maintained for this
1742+-- version.
15311743asMaxIdleInstances :: Lens' AutomaticScaling (Maybe Int32)
15321744asMaxIdleInstances
15331745 = lens _asMaxIdleInstances
15341746 (\ s a -> s{_asMaxIdleInstances = a})
15351747 . mapping _Coerce
15361748
1537−-- | Minimum number of instances that App Engine should maintain.
1749+-- | Minimum number of instances that should be maintained for this version.
15381750asMinTotalInstances :: Lens' AutomaticScaling (Maybe Int32)
15391751asMinTotalInstances
15401752 = lens _asMinTotalInstances
15411753 (\ s a -> s{_asMinTotalInstances = a})
15421754 . mapping _Coerce
15431755
1544−-- | The number of concurrent requests an automatic scaling instance can
1545−-- accept before the scheduler spawns a new instance. Default value is
1546−-- chosen based on the runtime.
1756+-- | Number of concurrent requests an automatic scaling instance can accept
1757+-- before the scheduler spawns a new instance. Defaults to a
1758+-- runtime-specific value.
15471759asMaxConcurrentRequests :: Lens' AutomaticScaling (Maybe Int32)
15481760asMaxConcurrentRequests
15491761 = lens _asMaxConcurrentRequests
15501762 (\ s a -> s{_asMaxConcurrentRequests = a})
15511763 . mapping _Coerce
15521764
1553−-- | The amount of time that the
1765+-- | Amount of time that the
15541766-- [Autoscaler](https:\/\/cloud.google.com\/compute\/docs\/autoscaler\/)
1555−-- should wait between changes to the number of virtual machines. Applies
1556−-- only to the VM runtime.
1767+-- should wait between changes to the number of virtual machines. Only
1768+-- applicable for VM runtimes.
15571769asCoolDownPeriod :: Lens' AutomaticScaling (Maybe Text)
15581770asCoolDownPeriod
15591771 = lens _asCoolDownPeriod
@@ -1565,8 +1777,8 @@ asRequestUtilization
15651777 = lens _asRequestUtilization
15661778 (\ s a -> s{_asRequestUtilization = a})
15671779
1568−-- | The maximum amount of time that App Engine should allow a request to
1569−-- wait in the pending queue before starting a new instance to handle it.
1780+-- | Maximum amount of time that a request should wait in the pending queue
1781+-- before starting a new instance to handle it.
15701782asMaxPendingLatency :: Lens' AutomaticScaling (Maybe Text)
15711783asMaxPendingLatency
15721784 = lens _asMaxPendingLatency
@@ -1643,30 +1855,29 @@ operationMetadataV1Beta5 =
16431855 , _omvbTarget = Nothing
16441856 }
16451857
1646−-- | Timestamp that this operation was received. \'OutputOnly
1858+-- | Timestamp that this operation was created. \'OutputOnly
16471859omvbInsertTime :: Lens' OperationMetadataV1Beta5 (Maybe Text)
16481860omvbInsertTime
16491861 = lens _omvbInsertTime
16501862 (\ s a -> s{_omvbInsertTime = a})
16511863
1652−-- | The user who requested this operation. \'OutputOnly
1864+-- | User who requested this operation. \'OutputOnly
16531865omvbUser :: Lens' OperationMetadataV1Beta5 (Maybe Text)
16541866omvbUser = lens _omvbUser (\ s a -> s{_omvbUser = a})
16551867
1656−-- | API method name that initiated the operation. Example:
1657−-- \"google.appengine.v1beta5.Version.CreateVersion\". \'OutputOnly
1868+-- | API method name that initiated this operation. Example:
1869+-- \`google.appengine.v1beta5.Version.CreateVersion\`. \'OutputOnly
16581870omvbMethod :: Lens' OperationMetadataV1Beta5 (Maybe Text)
16591871omvbMethod
16601872 = lens _omvbMethod (\ s a -> s{_omvbMethod = a})
16611873
1662−-- | Timestamp that this operation was completed. (Not present if the
1663−-- operation is still in progress.) \'OutputOnly
1874+-- | Timestamp that this operation completed. \'OutputOnly
16641875omvbEndTime :: Lens' OperationMetadataV1Beta5 (Maybe Text)
16651876omvbEndTime
16661877 = lens _omvbEndTime (\ s a -> s{_omvbEndTime = a})
16671878
1668−-- | Resource that this operation is acting on. Example:
1669−-- \"apps\/myapp\/services\/default\". \'OutputOnly
1879+-- | Name of the resource that this operation is acting on. Example:
1880+-- \`apps\/myapp\/services\/default\`. \'OutputOnly
16701881omvbTarget :: Lens' OperationMetadataV1Beta5 (Maybe Text)
16711882omvbTarget
16721883 = lens _omvbTarget (\ s a -> s{_omvbTarget = a})
@@ -1691,7 +1902,7 @@ instance ToJSON OperationMetadataV1Beta5 where
16911902 ("endTime" .=) <$> _omvbEndTime,
16921903 ("target" .=) <$> _omvbTarget])
16931904
1694−-- | Use Google Cloud Endpoints to handle requests.
1905+-- | Uses Google Cloud Endpoints to handle requests.
16951906--
16961907-- /See:/ 'apiEndpointHandler' smart constructor.
16971908newtype APIEndpointHandler = APIEndpointHandler'
@@ -1710,7 +1921,7 @@ apiEndpointHandler =
17101921 { _aehScriptPath = Nothing
17111922 }
17121923
1713−-- | Specifies the path to the script from the application root directory.
1924+-- | Path to the script from the application root directory.
17141925aehScriptPath :: Lens' APIEndpointHandler (Maybe Text)
17151926aehScriptPath
17161927 = lens _aehScriptPath
@@ -1745,7 +1956,7 @@ statusDetailsItem pSdiAddtional_ =
17451956 { _sdiAddtional = _Coerce # pSdiAddtional_
17461957 }
17471958
1748−-- | Properties of the object. Contains field \'ype with type URL.
1959+-- | Properties of the object. Contains field \'type with type URL.
17491960sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
17501961sdiAddtional
17511962 = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
@@ -1759,7 +1970,7 @@ instance FromJSON StatusDetailsItem where
17591970instance ToJSON StatusDetailsItem where
17601971 toJSON = toJSON . _sdiAddtional
17611972
1762−-- | Used to specify extra network settings (for VM runtimes only).
1973+-- | Extra network settings. Only applicable for VM runtimes.
17631974--
17641975-- /See:/ 'network' smart constructor.
17651976data Network = Network'
@@ -1786,8 +1997,8 @@ network =
17861997 , _nName = Nothing
17871998 }
17881999
1789−-- | A list of ports (or port pairs) to forward from the VM into the app
1790−-- container.
2000+-- | List of ports, or port pairs, to forward from the virtual machine to the
2001+-- application container.
17912002nForwardedPorts :: Lens' Network [Text]
17922003nForwardedPorts
17932004 = lens _nForwardedPorts
@@ -1795,14 +2006,13 @@ nForwardedPorts
17952006 . _Default
17962007 . _Coerce
17972008
1798−-- | A tag to apply to the VM instance during creation.
2009+-- | Tag to apply to the VM instance during creation.
17992010nInstanceTag :: Lens' Network (Maybe Text)
18002011nInstanceTag
18012012 = lens _nInstanceTag (\ s a -> s{_nInstanceTag = a})
18022013
1803−-- | The Google Compute Engine network where the VMs will be created. If not
1804−-- specified, or empty, the network named \"default\" will be used. (The
1805−-- short name should be specified, not the resource path.)
2014+-- | Google Cloud Platform network where the virtual machines are created.
2015+-- Specify the short name, not the resource path. Defaults to \`default\`.
18062016nName :: Lens' Network (Maybe Text)
18072017nName = lens _nName (\ s a -> s{_nName = a})
18082018
@@ -1823,6 +2033,27 @@ instance ToJSON Network where
18232033 ("instanceTag" .=) <$> _nInstanceTag,
18242034 ("name" .=) <$> _nName])
18252035
2036+-- | Request message for \`Instances.DebugInstance\`.
2037+--
2038+-- /See:/ 'debugInstanceRequest' smart constructor.
2039+data DebugInstanceRequest =
2040+ DebugInstanceRequest'
2041+ deriving (Eq,Show,Data,Typeable,Generic)
2042+
2043+-- | Creates a value of 'DebugInstanceRequest' with the minimum fields required to make a request.
2044+--
2045+debugInstanceRequest
2046+ :: DebugInstanceRequest
2047+debugInstanceRequest = DebugInstanceRequest'
2048+
2049+instance FromJSON DebugInstanceRequest where
2050+ parseJSON
2051+ = withObject "DebugInstanceRequest"
2052+ (\ o -> pure DebugInstanceRequest')
2053+
2054+instance ToJSON DebugInstanceRequest where
2055+ toJSON = const emptyObject
2056+
18262057-- | HTTP headers to use for all responses from these URLs.
18272058--
18282059-- /See:/ 'staticFilesHandlerHTTPHeaders' smart constructor.
@@ -1859,7 +2090,7 @@ instance FromJSON StaticFilesHandlerHTTPHeaders where
18592090instance ToJSON StaticFilesHandlerHTTPHeaders where
18602091 toJSON = toJSON . _sfhhttphAddtional
18612092
1862−-- | Used to specify how many machine resources an app version needs.
2093+-- | Machine resources for a version.
18632094--
18642095-- /See:/ 'resources' smart constructor.
18652096data Resources = Resources'
@@ -1886,19 +2117,19 @@ resources =
18862117 , _rCPU = Nothing
18872118 }
18882119
1889−-- | How much memory, in GB, an app version needs.
2120+-- | Memory (GB) needed.
18902121rMemoryGb :: Lens' Resources (Maybe Double)
18912122rMemoryGb
18922123 = lens _rMemoryGb (\ s a -> s{_rMemoryGb = a}) .
18932124 mapping _Coerce
18942125
1895−-- | How much disk size, in GB, an app version needs.
2126+-- | Disk size (GB) needed.
18962127rDiskGb :: Lens' Resources (Maybe Double)
18972128rDiskGb
18982129 = lens _rDiskGb (\ s a -> s{_rDiskGb = a}) .
18992130 mapping _Coerce
19002131
1901−-- | How many CPU cores an app version needs.
2132+-- | Number of CPU cores needed.
19022133rCPU :: Lens' Resources (Maybe Double)
19032134rCPU
19042135 = lens _rCPU (\ s a -> s{_rCPU = a}) .
@@ -1919,9 +2150,9 @@ instance ToJSON Resources where
19192150 [("memoryGb" .=) <$> _rMemoryGb,
19202151 ("diskGb" .=) <$> _rDiskGb, ("cpu" .=) <$> _rCPU])
19212152
1922−-- | A manifest of files stored in Google Cloud Storage which should be
1923−-- included as part of this application. All files must be readable using
1924−-- the credentials supplied with this call.
2153+-- | Manifest of the files stored in Google Cloud Storage that are included
2154+-- as part of this version. All files must be readable using the
2155+-- credentials supplied with this call.
19252156--
19262157-- /See:/ 'deploymentFiles' smart constructor.
19272158newtype DeploymentFiles = DeploymentFiles'
@@ -1977,13 +2208,14 @@ cpuUtilization =
19772208 , _cuTargetUtilization = Nothing
19782209 }
19792210
1980−-- | The period of time over which CPU utilization is calculated.
2211+-- | Period of time over which CPU utilization is calculated.
19812212cuAggregationWindowLength :: Lens' CPUUtilization (Maybe Text)
19822213cuAggregationWindowLength
19832214 = lens _cuAggregationWindowLength
19842215 (\ s a -> s{_cuAggregationWindowLength = a})
19852216
1986−-- | Target (0-1) CPU utilization ratio to maintain when scaling.
2217+-- | Target CPU utilization ratio to maintain when scaling. Must be between 0
2218+-- and 1.
19872219cuTargetUtilization :: Lens' CPUUtilization (Maybe Double)
19882220cuTargetUtilization
19892221 = lens _cuTargetUtilization
@@ -2006,14 +2238,14 @@ instance ToJSON CPUUtilization where
20062238 _cuAggregationWindowLength,
20072239 ("targetUtilization" .=) <$> _cuTargetUtilization])
20082240
2009−-- | Mapping from service version IDs within the service to fractional
2010−-- (0.000, 1] allocations of traffic for that version. Each version may
2011−-- only be specified once, but some versions in the service may not have
2012−-- any traffic allocation. Services that have traffic allocated in this
2013−-- field may not be deleted until the service is deleted, or their traffic
2014−-- allocation is removed. Allocations must sum to 1. Supports precision up
2015−-- to two decimal places for IP-based splits and up to three decimal places
2016−-- for cookie-based splits.
2241+-- | Mapping from version IDs within the service to fractional (0.000, 1]
2242+-- allocations of traffic for that version. Each version can be specified
2243+-- only once, but some versions in the service may not have any traffic
2244+-- allocation. Services that have traffic allocated cannot be deleted until
2245+-- either the service is deleted or their traffic allocation is removed.
2246+-- Allocations must sum to 1. Up to two decimal place precision is
2247+-- supported for IP-based splits and up to three decimal places is
2248+-- supported for cookie-based splits.
20172249--
20182250-- /See:/ 'trafficSplitAllocations' smart constructor.
20192251newtype TrafficSplitAllocations = TrafficSplitAllocations'
@@ -2067,8 +2299,8 @@ manualScaling =
20672299 { _msInstances = Nothing
20682300 }
20692301
2070−-- | The number of instances to assign to the service at the start. This
2071−-- number can later be altered by using the [Modules
2302+-- | Number of instances to assign to the service at the start. This number
2303+-- can later be altered by using the [Modules
20722304-- API](https:\/\/cloud.google.com\/appengine\/docs\/python\/modules\/functions)
20732305-- \`set_num_instances()\` function.
20742306msInstances :: Lens' ManualScaling (Maybe Int32)
@@ -2112,16 +2344,15 @@ basicScaling =
21122344 , _bsIdleTimeout = Nothing
21132345 }
21142346
2115−-- | The maximum number of instances for App Engine to create for this
2116−-- version.
2347+-- | Maximum number of instances to create for this version.
21172348bsMaxInstances :: Lens' BasicScaling (Maybe Int32)
21182349bsMaxInstances
21192350 = lens _bsMaxInstances
21202351 (\ s a -> s{_bsMaxInstances = a})
21212352 . mapping _Coerce
21222353
2123−-- | The instance will be shut down this amount of time after receiving its
2124−-- last request.
2354+-- | Duration of time after the last request that an instance must wait
2355+-- before the instance is shut down.
21252356bsIdleTimeout :: Lens' BasicScaling (Maybe Text)
21262357bsIdleTimeout
21272358 = lens _bsIdleTimeout
@@ -2141,14 +2372,94 @@ instance ToJSON BasicScaling where
21412372 [("maxInstances" .=) <$> _bsMaxInstances,
21422373 ("idleTimeout" .=) <$> _bsIdleTimeout])
21432374
2144−-- | A Version is a specific set of source code and configuration files
2145−-- deployed to a service.
2375+-- | Metadata for the given google.longrunning.Operation.
2376+--
2377+-- /See:/ 'operationMetadataV1' smart constructor.
2378+data OperationMetadataV1 = OperationMetadataV1'
2379+ { _omvInsertTime :: !(Maybe Text)
2380+ , _omvUser :: !(Maybe Text)
2381+ , _omvMethod :: !(Maybe Text)
2382+ , _omvEndTime :: !(Maybe Text)
2383+ , _omvTarget :: !(Maybe Text)
2384+ } deriving (Eq,Show,Data,Typeable,Generic)
2385+
2386+-- | Creates a value of 'OperationMetadataV1' with the minimum fields required to make a request.
2387+--
2388+-- Use one of the following lenses to modify other fields as desired:
2389+--
2390+-- * 'omvInsertTime'
2391+--
2392+-- * 'omvUser'
2393+--
2394+-- * 'omvMethod'
2395+--
2396+-- * 'omvEndTime'
2397+--
2398+-- * 'omvTarget'
2399+operationMetadataV1
2400+ :: OperationMetadataV1
2401+operationMetadataV1 =
2402+ OperationMetadataV1'
2403+ { _omvInsertTime = Nothing
2404+ , _omvUser = Nothing
2405+ , _omvMethod = Nothing
2406+ , _omvEndTime = Nothing
2407+ , _omvTarget = Nothing
2408+ }
2409+
2410+-- | Time that this operation was created. \'OutputOnly
2411+omvInsertTime :: Lens' OperationMetadataV1 (Maybe Text)
2412+omvInsertTime
2413+ = lens _omvInsertTime
2414+ (\ s a -> s{_omvInsertTime = a})
2415+
2416+-- | User who requested this operation. \'OutputOnly
2417+omvUser :: Lens' OperationMetadataV1 (Maybe Text)
2418+omvUser = lens _omvUser (\ s a -> s{_omvUser = a})
2419+
2420+-- | API method that initiated this operation. Example:
2421+-- \`google.appengine.v1.Versions.CreateVersion\`. \'OutputOnly
2422+omvMethod :: Lens' OperationMetadataV1 (Maybe Text)
2423+omvMethod
2424+ = lens _omvMethod (\ s a -> s{_omvMethod = a})
2425+
2426+-- | Time that this operation completed. \'OutputOnly
2427+omvEndTime :: Lens' OperationMetadataV1 (Maybe Text)
2428+omvEndTime
2429+ = lens _omvEndTime (\ s a -> s{_omvEndTime = a})
2430+
2431+-- | Name of the resource that this operation is acting on. Example:
2432+-- \`apps\/myapp\/services\/default\`. \'OutputOnly
2433+omvTarget :: Lens' OperationMetadataV1 (Maybe Text)
2434+omvTarget
2435+ = lens _omvTarget (\ s a -> s{_omvTarget = a})
2436+
2437+instance FromJSON OperationMetadataV1 where
2438+ parseJSON
2439+ = withObject "OperationMetadataV1"
2440+ (\ o ->
2441+ OperationMetadataV1' <$>
2442+ (o .:? "insertTime") <*> (o .:? "user") <*>
2443+ (o .:? "method")
2444+ <*> (o .:? "endTime")
2445+ <*> (o .:? "target"))
2446+
2447+instance ToJSON OperationMetadataV1 where
2448+ toJSON OperationMetadataV1'{..}
2449+ = object
2450+ (catMaybes
2451+ [("insertTime" .=) <$> _omvInsertTime,
2452+ ("user" .=) <$> _omvUser,
2453+ ("method" .=) <$> _omvMethod,
2454+ ("endTime" .=) <$> _omvEndTime,
2455+ ("target" .=) <$> _omvTarget])
2456+
2457+-- | A Version resource is a specific set of source code and configuration
2458+-- files that are deployed into a service.
21462459--
21472460-- /See:/ 'version' smart constructor.
21482461data Version = Version'
2149− { _vCreationTime :: !(Maybe Text)
2150− , _vRuntime :: !(Maybe Text)
2151− , _vDeployer :: !(Maybe Text)
2462+ { _vRuntime :: !(Maybe Text)
21522463 , _vNobuildFilesRegex :: !(Maybe Text)
21532464 , _vInstanceClass :: !(Maybe Text)
21542465 , _vHealthCheck :: !(Maybe HealthCheck)
@@ -2156,6 +2467,7 @@ data Version = Version'
21562467 , _vDefaultExpiration :: !(Maybe Text)
21572468 , _vAutomaticScaling :: !(Maybe AutomaticScaling)
21582469 , _vErrorHandlers :: !(Maybe [ErrorHandler])
2470+ , _vCreatedBy :: !(Maybe Text)
21592471 , _vVM :: !(Maybe Bool)
21602472 , _vHandlers :: !(Maybe [URLMap])
21612473 , _vInboundServices :: !(Maybe [Text])
@@ -2171,7 +2483,9 @@ data Version = Version'
21712483 , _vEnvVariables :: !(Maybe VersionEnvVariables)
21722484 , _vServingStatus :: !(Maybe Text)
21732485 , _vDiskUsageBytes :: !(Maybe (Textual Int64))
2486+ , _vCreateTime :: !(Maybe Text)
21742487 , _vLibraries :: !(Maybe [Library])
2488+ , _vVersionURL :: !(Maybe Text)
21752489 , _vDeployment :: !(Maybe Deployment)
21762490 } deriving (Eq,Show,Data,Typeable,Generic)
21772491
@@ -2179,12 +2493,8 @@ data Version = Version'
21792493--
21802494-- Use one of the following lenses to modify other fields as desired:
21812495--
2182−-- * 'vCreationTime'
2183−--
21842496-- * 'vRuntime'
21852497--
2186−-- * 'vDeployer'
2187−--
21882498-- * 'vNobuildFilesRegex'
21892499--
21902500-- * 'vInstanceClass'
@@ -2199,6 +2509,8 @@ data Version = Version'
21992509--
22002510-- * 'vErrorHandlers'
22012511--
2512+-- * 'vCreatedBy'
2513+--
22022514-- * 'vVM'
22032515--
22042516-- * 'vHandlers'
@@ -2229,16 +2541,18 @@ data Version = Version'
22292541--
22302542-- * 'vDiskUsageBytes'
22312543--
2544+-- * 'vCreateTime'
2545+--
22322546-- * 'vLibraries'
22332547--
2548+-- * 'vVersionURL'
2549+--
22342550-- * 'vDeployment'
22352551version
22362552 :: Version
22372553version =
22382554 Version'
2239− { _vCreationTime = Nothing
2240− , _vRuntime = Nothing
2241− , _vDeployer = Nothing
2555+ { _vRuntime = Nothing
22422556 , _vNobuildFilesRegex = Nothing
22432557 , _vInstanceClass = Nothing
22442558 , _vHealthCheck = Nothing
@@ -2246,6 +2560,7 @@ version =
22462560 , _vDefaultExpiration = Nothing
22472561 , _vAutomaticScaling = Nothing
22482562 , _vErrorHandlers = Nothing
2563+ , _vCreatedBy = Nothing
22492564 , _vVM = Nothing
22502565 , _vHandlers = Nothing
22512566 , _vInboundServices = Nothing
@@ -2261,76 +2576,65 @@ version =
22612576 , _vEnvVariables = Nothing
22622577 , _vServingStatus = Nothing
22632578 , _vDiskUsageBytes = Nothing
2579+ , _vCreateTime = Nothing
22642580 , _vLibraries = Nothing
2581+ , _vVersionURL = Nothing
22652582 , _vDeployment = Nothing
22662583 }
22672584
2268−-- | Creation time of this version. This will be between the start and end
2269−-- times of the operation that creates this version. \'OutputOnly
2270−vCreationTime :: Lens' Version (Maybe Text)
2271−vCreationTime
2272− = lens _vCreationTime
2273− (\ s a -> s{_vCreationTime = a})
2274−
2275−-- | The desired runtime. Values can include python27, java7, go, etc.
2585+-- | Desired runtime. Example: \`python27\`.
22762586vRuntime :: Lens' Version (Maybe Text)
22772587vRuntime = lens _vRuntime (\ s a -> s{_vRuntime = a})
22782588
2279−-- | The email address of the user who created this version. \'OutputOnly
2280−vDeployer :: Lens' Version (Maybe Text)
2281−vDeployer
2282− = lens _vDeployer (\ s a -> s{_vDeployer = a})
2283−
2284−-- | Go only. Files that match this pattern will not be built into the app.
2285−-- May only be set on create requests.
2589+-- | Files that match this pattern will not be built into this version. Only
2590+-- applicable for Go runtimes. Only returned in \`GET\` requests if
2591+-- \`view=FULL\` is set.
22862592vNobuildFilesRegex :: Lens' Version (Maybe Text)
22872593vNobuildFilesRegex
22882594 = lens _vNobuildFilesRegex
22892595 (\ s a -> s{_vNobuildFilesRegex = a})
22902596
2291−-- | The instance class to use to run this app. Valid values for
2292−-- AutomaticScaling are \`[F1, F2, F4, F4_1G]\`. Valid values for
2293−-- ManualScaling and BasicScaling are \`[B1, B2, B4, B8, B4_1G]\`. Default:
2294−-- \"F1\" for AutomaticScaling, \"B1\" for ManualScaling and BasicScaling
2597+-- | Instance class that is used to run this version. Valid values are: *
2598+-- AutomaticScaling: \`F1\`, \`F2\`, \`F4\`, \`F4_1G\` * ManualScaling or
2599+-- BasicScaling: \`B1\`, \`B2\`, \`B4\`, \`B8\`, \`B4_1G\` Defaults to
2600+-- \`F1\` for AutomaticScaling and \`B1\` for ManualScaling or
2601+-- BasicScaling.
22952602vInstanceClass :: Lens' Version (Maybe Text)
22962603vInstanceClass
22972604 = lens _vInstanceClass
22982605 (\ s a -> s{_vInstanceClass = a})
22992606
2300−-- | Configure health checking for the VM instances. Unhealthy VM instances
2301−-- will be stopped and replaced with new instances. Only returned in
2302−-- \`GET\` requests if \`view=FULL\` is set. May only be set on create
2303−-- requests; once created, is immutable.
2607+-- | Configures health checking for VM instances. Unhealthy instances are
2608+-- stopped and replaced with new instances. Only applicable for VM
2609+-- runtimes. Only returned in \`GET\` requests if \`view=FULL\` is set.
23042610vHealthCheck :: Lens' Version (Maybe HealthCheck)
23052611vHealthCheck
23062612 = lens _vHealthCheck (\ s a -> s{_vHealthCheck = a})
23072613
2308−-- | The App Engine execution environment to use for this version. Default:
2309−-- \"1\"
2614+-- | App Engine execution environment for this version. Defaults to
2615+-- \`standard\`.
23102616vEnv :: Lens' Version (Maybe Text)
23112617vEnv = lens _vEnv (\ s a -> s{_vEnv = a})
23122618
2313−-- | The length of time a static file served by a static file handler ought
2314−-- to be cached by web proxies and browsers, if the handler does not
2315−-- specify its own expiration. Only returned in \`GET\` requests if
2316−-- \`view=FULL\` is set. May only be set on create requests; once created,
2317−-- is immutable.
2619+-- | Duration that static files should be cached by web proxies and browsers.
2620+-- Only applicable if the corresponding
2621+-- [StaticFilesHandler](https:\/\/cloud.google.com\/appengine\/docs\/admin-api\/reference\/rest\/v1\/apps.services.versions#staticfileshandler)
2622+-- does not specify its own expiration time. Only returned in \`GET\`
2623+-- requests if \`view=FULL\` is set.
23182624vDefaultExpiration :: Lens' Version (Maybe Text)
23192625vDefaultExpiration
23202626 = lens _vDefaultExpiration
23212627 (\ s a -> s{_vDefaultExpiration = a})
23222628
2323−-- | Automatic scaling is the scaling policy that App Engine has used since
2324−-- its inception. It is based on request rate, response latencies, and
2629+-- | Automatic scaling is based on request rate, response latencies, and
23252630-- other application metrics.
23262631vAutomaticScaling :: Lens' Version (Maybe AutomaticScaling)
23272632vAutomaticScaling
23282633 = lens _vAutomaticScaling
23292634 (\ s a -> s{_vAutomaticScaling = a})
23302635
2331−-- | Custom static error pages instead of these generic error pages, (limit
2332−-- 10 KB\/page) Only returned in \`GET\` requests if \`view=FULL\` is set.
2333−-- May only be set on create requests; once created, is immutable.
2636+-- | Custom static error pages. Limited to 10KB per page. Only returned in
2637+-- \`GET\` requests if \`view=FULL\` is set.
23342638vErrorHandlers :: Lens' Version [ErrorHandler]
23352639vErrorHandlers
23362640 = lens _vErrorHandlers
@@ -2338,15 +2642,19 @@ vErrorHandlers
23382642 . _Default
23392643 . _Coerce
23402644
2341−-- | Whether to deploy this app in a VM container.
2645+-- | Email address of the user who created this version. \'OutputOnly
2646+vCreatedBy :: Lens' Version (Maybe Text)
2647+vCreatedBy
2648+ = lens _vCreatedBy (\ s a -> s{_vCreatedBy = a})
2649+
2650+-- | Whether to deploy this version in a container on a virtual machine.
23422651vVM :: Lens' Version (Maybe Bool)
23432652vVM = lens _vVM (\ s a -> s{_vVM = a})
23442653
2345−-- | An ordered list of URL Matching patterns that should be applied to
2346−-- incoming requests. The first matching URL consumes the request, and
2347−-- subsequent handlers are not attempted. Only returned in \`GET\` requests
2348−-- if \`view=FULL\` is set. May only be set on create requests; once
2349−-- created, is immutable.
2654+-- | An ordered list of URL-matching patterns that should be applied to
2655+-- incoming requests. The first matching URL handles the request and other
2656+-- request handlers are not attempted. Only returned in \`GET\` requests if
2657+-- \`view=FULL\` is set.
23502658vHandlers :: Lens' Version [URLMap]
23512659vHandlers
23522660 = lens _vHandlers (\ s a -> s{_vHandlers = a}) .
@@ -2362,27 +2670,27 @@ vInboundServices
23622670 . _Default
23632671 . _Coerce
23642672
2365−-- | Used to specify extra network settings (for VM runtimes only).
2673+-- | Extra network settings. Only applicable for VM runtimes.
23662674vNetwork :: Lens' Version (Maybe Network)
23672675vNetwork = lens _vNetwork (\ s a -> s{_vNetwork = a})
23682676
2369−-- | Used to specify how many machine resources an app version needs (for VM
2370−-- runtimes only).
2677+-- | Machine resources for this version. Only applicable for VM runtimes.
23712678vResources :: Lens' Version (Maybe Resources)
23722679vResources
23732680 = lens _vResources (\ s a -> s{_vResources = a})
23742681
2375−-- | The full path to the Version resource in the API. Example:
2376−-- \"apps\/myapp\/services\/default\/versions\/v1\". \'OutputOnly
2682+-- | Full path to the Version resource in the API. Example:
2683+-- \`apps\/myapp\/services\/default\/versions\/v1\`. \'OutputOnly
23772684vName :: Lens' Version (Maybe Text)
23782685vName = lens _vName (\ s a -> s{_vName = a})
23792686
2380−-- | If true, multiple requests can be dispatched to the app at once.
2687+-- | Whether multiple requests can be dispatched to this version at once.
23812688vThreadsafe :: Lens' Version (Maybe Bool)
23822689vThreadsafe
23832690 = lens _vThreadsafe (\ s a -> s{_vThreadsafe = a})
23842691
2385−-- | Beta settings supplied to the application via metadata.
2692+-- | Metadata settings that are supplied to this version to enable beta
2693+-- runtime features.
23862694vBetaSettings :: Lens' Version (Maybe VersionBetaSettings)
23872695vBetaSettings
23882696 = lens _vBetaSettings
@@ -2404,57 +2712,66 @@ vManualScaling
24042712 = lens _vManualScaling
24052713 (\ s a -> s{_vManualScaling = a})
24062714
2407−-- | Serving configuration for Google Cloud Endpoints. Only returned in
2408−-- \`GET\` requests if \`view=FULL\` is set. May only be set on create
2409−-- requests; once created, is immutable.
2715+-- | Serving configuration for [Google Cloud
2716+-- Endpoints](https:\/\/cloud.google.com\/appengine\/docs\/python\/endpoints\/).
2717+-- Only returned in \`GET\` requests if \`view=FULL\` is set.
24102718vAPIConfig :: Lens' Version (Maybe APIConfigHandler)
24112719vAPIConfig
24122720 = lens _vAPIConfig (\ s a -> s{_vAPIConfig = a})
24132721
2414−-- | The relative name\/path of the Version within the service. Example:
2415−-- \"v1\". Version specifiers can contain lowercase letters, digits, and
2416−-- hyphens. It cannot begin with the prefix \`ah-\` and the names
2417−-- \`default\` and \`latest\` are reserved and cannot be used.
2722+-- | Relative name of the version within the service. Example: \`v1\`.
2723+-- Version names can contain only lowercase letters, numbers, or hyphens.
2724+-- Reserved names: \"default\", \"latest\", and any name with the prefix
2725+-- \"ah-\".
24182726vId :: Lens' Version (Maybe Text)
24192727vId = lens _vId (\ s a -> s{_vId = a})
24202728
2421−-- | Environment variables made available to the application. Only returned
2422−-- in \`GET\` requests if \`view=FULL\` is set. May only be set on create
2423−-- requests; once created, is immutable.
2729+-- | Environment variables available to the application. Only returned in
2730+-- \`GET\` requests if \`view=FULL\` is set.
24242731vEnvVariables :: Lens' Version (Maybe VersionEnvVariables)
24252732vEnvVariables
24262733 = lens _vEnvVariables
24272734 (\ s a -> s{_vEnvVariables = a})
24282735
2429−-- | The current serving status of this version. Only \`SERVING\` versions
2430−-- will have instances created or billed for. If this field is unset when a
2431−-- version is created, \`SERVING\` status will be assumed. It is an error
2432−-- to explicitly set this field to \`SERVING_STATUS_UNSPECIFIED\`.
2736+-- | Current serving status of this version. Only the versions with a
2737+-- \`SERVING\` status create instances and can be billed.
2738+-- \`SERVING_STATUS_UNSPECIFIED\` is an invalid value. Defaults to
2739+-- \`SERVING\`.
24332740vServingStatus :: Lens' Version (Maybe Text)
24342741vServingStatus
24352742 = lens _vServingStatus
24362743 (\ s a -> s{_vServingStatus = a})
24372744
2438−-- | Total size of version files hosted on App Engine disk in bytes.
2439−-- \'OutputOnly
2745+-- | Total size in bytes of all the files that are included in this version
2746+-- and curerntly hosted on the App Engine disk. \'OutputOnly
24402747vDiskUsageBytes :: Lens' Version (Maybe Int64)
24412748vDiskUsageBytes
24422749 = lens _vDiskUsageBytes
24432750 (\ s a -> s{_vDiskUsageBytes = a})
24442751 . mapping _Coerce
24452752
2446−-- | Configuration for Python runtime third-party libraries required by the
2447−-- application. Only returned in \`GET\` requests if \`view=FULL\` is set.
2448−-- May only be set on create requests; once created, is immutable.
2753+-- | Time that this version was created. \'OutputOnly
2754+vCreateTime :: Lens' Version (Maybe Text)
2755+vCreateTime
2756+ = lens _vCreateTime (\ s a -> s{_vCreateTime = a})
2757+
2758+-- | Configuration for third-party Python runtime libraries that are required
2759+-- by the application. Only returned in \`GET\` requests if \`view=FULL\`
2760+-- is set.
24492761vLibraries :: Lens' Version [Library]
24502762vLibraries
24512763 = lens _vLibraries (\ s a -> s{_vLibraries = a}) .
24522764 _Default
24532765 . _Coerce
24542766
2767+-- | Serving URL for this version. Example:
2768+-- \"https:\/\/myversion-dot-myservice-dot-myapp.appspot.com\" \'OutputOnly
2769+vVersionURL :: Lens' Version (Maybe Text)
2770+vVersionURL
2771+ = lens _vVersionURL (\ s a -> s{_vVersionURL = a})
2772+
24552773-- | Code and application artifacts that make up this version. Only returned
2456−-- in \`GET\` requests if \`view=FULL\` is set. May only be set on create
2457−-- requests; once created, is immutable.
2774+-- in \`GET\` requests if \`view=FULL\` is set.
24582775vDeployment :: Lens' Version (Maybe Deployment)
24592776vDeployment
24602777 = lens _vDeployment (\ s a -> s{_vDeployment = a})
@@ -2464,15 +2781,14 @@ instance FromJSON Version where
24642781 = withObject "Version"
24652782 (\ o ->
24662783 Version' <$>
2467− (o .:? "creationTime") <*> (o .:? "runtime") <*>
2468− (o .:? "deployer")
2469− <*> (o .:? "nobuildFilesRegex")
2470− <*> (o .:? "instanceClass")
2784+ (o .:? "runtime") <*> (o .:? "nobuildFilesRegex") <*>
2785+ (o .:? "instanceClass")
24712786 <*> (o .:? "healthCheck")
24722787 <*> (o .:? "env")
24732788 <*> (o .:? "defaultExpiration")
24742789 <*> (o .:? "automaticScaling")
24752790 <*> (o .:? "errorHandlers" .!= mempty)
2791+ <*> (o .:? "createdBy")
24762792 <*> (o .:? "vm")
24772793 <*> (o .:? "handlers" .!= mempty)
24782794 <*> (o .:? "inboundServices" .!= mempty)
@@ -2488,16 +2804,16 @@ instance FromJSON Version where
24882804 <*> (o .:? "envVariables")
24892805 <*> (o .:? "servingStatus")
24902806 <*> (o .:? "diskUsageBytes")
2807+ <*> (o .:? "createTime")
24912808 <*> (o .:? "libraries" .!= mempty)
2809+ <*> (o .:? "versionUrl")
24922810 <*> (o .:? "deployment"))
24932811
24942812instance ToJSON Version where
24952813 toJSON Version'{..}
24962814 = object
24972815 (catMaybes
2498− [("creationTime" .=) <$> _vCreationTime,
2499− ("runtime" .=) <$> _vRuntime,
2500− ("deployer" .=) <$> _vDeployer,
2816+ [("runtime" .=) <$> _vRuntime,
25012817 ("nobuildFilesRegex" .=) <$> _vNobuildFilesRegex,
25022818 ("instanceClass" .=) <$> _vInstanceClass,
25032819 ("healthCheck" .=) <$> _vHealthCheck,
@@ -2505,7 +2821,8 @@ instance ToJSON Version where
25052821 ("defaultExpiration" .=) <$> _vDefaultExpiration,
25062822 ("automaticScaling" .=) <$> _vAutomaticScaling,
25072823 ("errorHandlers" .=) <$> _vErrorHandlers,
2508− ("vm" .=) <$> _vVM, ("handlers" .=) <$> _vHandlers,
2824+ ("createdBy" .=) <$> _vCreatedBy, ("vm" .=) <$> _vVM,
2825+ ("handlers" .=) <$> _vHandlers,
25092826 ("inboundServices" .=) <$> _vInboundServices,
25102827 ("network" .=) <$> _vNetwork,
25112828 ("resources" .=) <$> _vResources,
@@ -2518,7 +2835,9 @@ instance ToJSON Version where
25182835 ("envVariables" .=) <$> _vEnvVariables,
25192836 ("servingStatus" .=) <$> _vServingStatus,
25202837 ("diskUsageBytes" .=) <$> _vDiskUsageBytes,
2838+ ("createTime" .=) <$> _vCreateTime,
25212839 ("libraries" .=) <$> _vLibraries,
2840+ ("versionUrl" .=) <$> _vVersionURL,
25222841 ("deployment" .=) <$> _vDeployment])
25232842
25242843-- | Files served directly to the user for a given URL, such as images, CSS
@@ -2573,46 +2892,44 @@ sfhHTTPHeaders
25732892 = lens _sfhHTTPHeaders
25742893 (\ s a -> s{_sfhHTTPHeaders = a})
25752894
2576−-- | The path to the static files matched by the URL pattern, from the
2895+-- | Path to the static files matched by the URL pattern, from the
25772896-- application root directory. The path can refer to text matched in
25782897-- groupings in the URL pattern.
25792898sfhPath :: Lens' StaticFilesHandler (Maybe Text)
25802899sfhPath = lens _sfhPath (\ s a -> s{_sfhPath = a})
25812900
2582−-- | If true, this UrlMap entry does not match the request unless the file
2583−-- referenced by the handler also exists. If no such file exists,
2584−-- processing will continue with the next UrlMap that matches the requested
2585−-- URL.
2901+-- | Whether this handler should match the request if the file referenced by
2902+-- the handler does not exist.
25862903sfhRequireMatchingFile :: Lens' StaticFilesHandler (Maybe Bool)
25872904sfhRequireMatchingFile
25882905 = lens _sfhRequireMatchingFile
25892906 (\ s a -> s{_sfhRequireMatchingFile = a})
25902907
2591−-- | The length of time a static file served by this handler ought to be
2592−-- cached by web proxies and browsers.
2908+-- | Time a static file served by this handler should be cached by web
2909+-- proxies and browsers.
25932910sfhExpiration :: Lens' StaticFilesHandler (Maybe Text)
25942911sfhExpiration
25952912 = lens _sfhExpiration
25962913 (\ s a -> s{_sfhExpiration = a})
25972914
2598−-- | If specified, all files served by this handler will be served using the
2599−-- specified MIME type. If not specified, the MIME type for a file will be
2600−-- derived from the file\'s filename extension.
2915+-- | MIME type used to serve all files served by this handler. Defaults to
2916+-- file-specific MIME types, which are derived from each file\'s filename
2917+-- extension.
26012918sfhMimeType :: Lens' StaticFilesHandler (Maybe Text)
26022919sfhMimeType
26032920 = lens _sfhMimeType (\ s a -> s{_sfhMimeType = a})
26042921
2605−-- | By default, files declared in static file handlers are uploaded as
2606−-- static data and are only served to end users, they cannot be read by an
2607−-- application. If this field is set to true, the files are also uploaded
2608−-- as code data so your application can read them. Both uploads are charged
2609−-- against your code and static data storage resource quotas.
2922+-- | Whether files should also be uploaded as code data. By default, files
2923+-- declared in static file handlers are uploaded as static data and are
2924+-- only served to end users; they cannot be read by the application. If
2925+-- enabled, uploads are charged against both your code and static data
2926+-- storage resource quotas.
26102927sfhApplicationReadable :: Lens' StaticFilesHandler (Maybe Bool)
26112928sfhApplicationReadable
26122929 = lens _sfhApplicationReadable
26132930 (\ s a -> s{_sfhApplicationReadable = a})
26142931
2615−-- | A regular expression that matches the file paths for all files that will
2932+-- | Regular expression that matches the file paths for all files that should
26162933-- be referenced by this handler.
26172934sfhUploadPathRegex :: Lens' StaticFilesHandler (Maybe Text)
26182935sfhUploadPathRegex
@@ -2645,7 +2962,7 @@ instance ToJSON StaticFilesHandler where
26452962 _sfhApplicationReadable,
26462963 ("uploadPathRegex" .=) <$> _sfhUploadPathRegex])
26472964
2648−-- | A custom static error page to be served when an error occurs.
2965+-- | Custom static error page to be served when an error occurs.
26492966--
26502967-- /See:/ 'errorHandler' smart constructor.
26512968data ErrorHandler = ErrorHandler'
@@ -2672,12 +2989,12 @@ errorHandler =
26722989 , _ehStaticFile = Nothing
26732990 }
26742991
2675−-- | MIME type of file. If unspecified, \"text\/html\" is assumed.
2992+-- | MIME type of file. Defaults to \`text\/html\`.
26762993ehMimeType :: Lens' ErrorHandler (Maybe Text)
26772994ehMimeType
26782995 = lens _ehMimeType (\ s a -> s{_ehMimeType = a})
26792996
2680−-- | The error condition this handler applies to.
2997+-- | Error condition this handler applies to.
26812998ehErrorCode :: Lens' ErrorHandler (Maybe Text)
26822999ehErrorCode
26833000 = lens _ehErrorCode (\ s a -> s{_ehErrorCode = a})
@@ -2703,6 +3020,94 @@ instance ToJSON ErrorHandler where
27033020 ("errorCode" .=) <$> _ehErrorCode,
27043021 ("staticFile" .=) <$> _ehStaticFile])
27053022
3023+-- | Cross-service attributes for the location. For example
3024+-- {\"cloud.googleapis.com\/region\": \"us-east1\"}
3025+--
3026+-- /See:/ 'locationLabels' smart constructor.
3027+newtype LocationLabels = LocationLabels'
3028+ { _llAddtional :: HashMap Text Text
3029+ } deriving (Eq,Show,Data,Typeable,Generic)
3030+
3031+-- | Creates a value of 'LocationLabels' with the minimum fields required to make a request.
3032+--
3033+-- Use one of the following lenses to modify other fields as desired:
3034+--
3035+-- * 'llAddtional'
3036+locationLabels
3037+ :: HashMap Text Text -- ^ 'llAddtional'
3038+ -> LocationLabels
3039+locationLabels pLlAddtional_ =
3040+ LocationLabels'
3041+ { _llAddtional = _Coerce # pLlAddtional_
3042+ }
3043+
3044+llAddtional :: Lens' LocationLabels (HashMap Text Text)
3045+llAddtional
3046+ = lens _llAddtional (\ s a -> s{_llAddtional = a}) .
3047+ _Coerce
3048+
3049+instance FromJSON LocationLabels where
3050+ parseJSON
3051+ = withObject "LocationLabels"
3052+ (\ o -> LocationLabels' <$> (parseJSONObject o))
3053+
3054+instance ToJSON LocationLabels where
3055+ toJSON = toJSON . _llAddtional
3056+
3057+-- | Metadata for the given google.cloud.location.Location.
3058+--
3059+-- /See:/ 'locationMetadata' smart constructor.
3060+data LocationMetadata = LocationMetadata'
3061+ { _lmStandardEnvironmentAvailable :: !(Maybe Bool)
3062+ , _lmFlexibleEnvironmentAvailable :: !(Maybe Bool)
3063+ } deriving (Eq,Show,Data,Typeable,Generic)
3064+
3065+-- | Creates a value of 'LocationMetadata' with the minimum fields required to make a request.
3066+--
3067+-- Use one of the following lenses to modify other fields as desired:
3068+--
3069+-- * 'lmStandardEnvironmentAvailable'
3070+--
3071+-- * 'lmFlexibleEnvironmentAvailable'
3072+locationMetadata
3073+ :: LocationMetadata
3074+locationMetadata =
3075+ LocationMetadata'
3076+ { _lmStandardEnvironmentAvailable = Nothing
3077+ , _lmFlexibleEnvironmentAvailable = Nothing
3078+ }
3079+
3080+-- | App Engine Standard Environment is available in the given location.
3081+-- \'OutputOnly
3082+lmStandardEnvironmentAvailable :: Lens' LocationMetadata (Maybe Bool)
3083+lmStandardEnvironmentAvailable
3084+ = lens _lmStandardEnvironmentAvailable
3085+ (\ s a -> s{_lmStandardEnvironmentAvailable = a})
3086+
3087+-- | App Engine Flexible Environment is available in the given location.
3088+-- \'OutputOnly
3089+lmFlexibleEnvironmentAvailable :: Lens' LocationMetadata (Maybe Bool)
3090+lmFlexibleEnvironmentAvailable
3091+ = lens _lmFlexibleEnvironmentAvailable
3092+ (\ s a -> s{_lmFlexibleEnvironmentAvailable = a})
3093+
3094+instance FromJSON LocationMetadata where
3095+ parseJSON
3096+ = withObject "LocationMetadata"
3097+ (\ o ->
3098+ LocationMetadata' <$>
3099+ (o .:? "standardEnvironmentAvailable") <*>
3100+ (o .:? "flexibleEnvironmentAvailable"))
3101+
3102+instance ToJSON LocationMetadata where
3103+ toJSON LocationMetadata'{..}
3104+ = object
3105+ (catMaybes
3106+ [("standardEnvironmentAvailable" .=) <$>
3107+ _lmStandardEnvironmentAvailable,
3108+ ("flexibleEnvironmentAvailable" .=) <$>
3109+ _lmFlexibleEnvironmentAvailable])
3110+
27063111-- | Metadata for the given google.longrunning.Operation.
27073112--
27083113-- /See:/ 'operationMetadata' smart constructor.
@@ -2742,35 +3147,34 @@ operationMetadata =
27423147 , _omTarget = Nothing
27433148 }
27443149
2745−-- | Timestamp that this operation was received. \'OutputOnly
3150+-- | Timestamp that this operation was created. \'OutputOnly
27463151omInsertTime :: Lens' OperationMetadata (Maybe Text)
27473152omInsertTime
27483153 = lens _omInsertTime (\ s a -> s{_omInsertTime = a})
27493154
2750−-- | The user who requested this operation. \'OutputOnly
3155+-- | User who requested this operation. \'OutputOnly
27513156omUser :: Lens' OperationMetadata (Maybe Text)
27523157omUser = lens _omUser (\ s a -> s{_omUser = a})
27533158
2754−-- | API method name that initiated the operation. Example:
2755−-- \"google.appengine.v1beta4.Version.CreateVersion\". \'OutputOnly
3159+-- | API method that initiated this operation. Example:
3160+-- \`google.appengine.v1beta4.Version.CreateVersion\`. \'OutputOnly
27563161omMethod :: Lens' OperationMetadata (Maybe Text)
27573162omMethod = lens _omMethod (\ s a -> s{_omMethod = a})
27583163
2759−-- | Timestamp that this operation was completed. (Not present if the
2760−-- operation is still in progress.) \'OutputOnly
3164+-- | Timestamp that this operation completed. \'OutputOnly
27613165omEndTime :: Lens' OperationMetadata (Maybe Text)
27623166omEndTime
27633167 = lens _omEndTime (\ s a -> s{_omEndTime = a})
27643168
2765−-- | The type of the operation (deprecated, use method field instead).
2766−-- Example: \"create_version\". \'OutputOnly
3169+-- | Type of this operation. Deprecated, use method field instead. Example:
3170+-- \"create_version\". \'OutputOnly
27673171omOperationType :: Lens' OperationMetadata (Maybe Text)
27683172omOperationType
27693173 = lens _omOperationType
27703174 (\ s a -> s{_omOperationType = a})
27713175
2772−-- | Resource that this operation is acting on. Example:
2773−-- \"apps\/myapp\/modules\/default\". \'OutputOnly
3176+-- | Name of the resource that this operation is acting on. Example:
3177+-- \`apps\/myapp\/modules\/default\`. \'OutputOnly
27743178omTarget :: Lens' OperationMetadata (Maybe Text)
27753179omTarget = lens _omTarget (\ s a -> s{_omTarget = a})
27763180
@@ -2846,12 +3250,12 @@ instance ToJSON ListInstancesResponse where
28463250 [("nextPageToken" .=) <$> _lirNextPageToken,
28473251 ("instances" .=) <$> _lirInstances])
28483252
2849−-- | Target scaling by request utilization (for VM runtimes only).
3253+-- | Target scaling by request utilization. Only applicable for VM runtimes.
28503254--
28513255-- /See:/ 'requestUtilization' smart constructor.
28523256data RequestUtilization = RequestUtilization'
2853− { _ruTargetConcurrentRequests :: !(Maybe (Textual Int32))
2854− , _ruTargetRequestCountPerSec :: !(Maybe (Textual Int32))
3257+ { _ruTargetConcurrentRequests :: !(Maybe (Textual Int32))
3258+ , _ruTargetRequestCountPerSecond :: !(Maybe (Textual Int32))
28553259 } deriving (Eq,Show,Data,Typeable,Generic)
28563260
28573261-- | Creates a value of 'RequestUtilization' with the minimum fields required to make a request.
@@ -2860,13 +3264,13 @@ data RequestUtilization = RequestUtilization'
28603264--
28613265-- * 'ruTargetConcurrentRequests'
28623266--
2863−-- * 'ruTargetRequestCountPerSec'
3267+-- * 'ruTargetRequestCountPerSecond'
28643268requestUtilization
28653269 :: RequestUtilization
28663270requestUtilization =
28673271 RequestUtilization'
28683272 { _ruTargetConcurrentRequests = Nothing
2869− , _ruTargetRequestCountPerSec = Nothing
3273+ , _ruTargetRequestCountPerSecond = Nothing
28703274 }
28713275
28723276-- | Target number of concurrent requests.
@@ -2877,10 +3281,10 @@ ruTargetConcurrentRequests
28773281 . mapping _Coerce
28783282
28793283-- | Target requests per second.
2880−ruTargetRequestCountPerSec :: Lens' RequestUtilization (Maybe Int32)
2881−ruTargetRequestCountPerSec
2882− = lens _ruTargetRequestCountPerSec
2883− (\ s a -> s{_ruTargetRequestCountPerSec = a})
3284+ruTargetRequestCountPerSecond :: Lens' RequestUtilization (Maybe Int32)
3285+ruTargetRequestCountPerSecond
3286+ = lens _ruTargetRequestCountPerSecond
3287+ (\ s a -> s{_ruTargetRequestCountPerSecond = a})
28843288 . mapping _Coerce
28853289
28863290instance FromJSON RequestUtilization where
@@ -2889,7 +3293,7 @@ instance FromJSON RequestUtilization where
28893293 (\ o ->
28903294 RequestUtilization' <$>
28913295 (o .:? "targetConcurrentRequests") <*>
2892− (o .:? "targetRequestCountPerSec"))
3296+ (o .:? "targetRequestCountPerSecond"))
28933297
28943298instance ToJSON RequestUtilization where
28953299 toJSON RequestUtilization'{..}
@@ -2897,59 +3301,29 @@ instance ToJSON RequestUtilization where
28973301 (catMaybes
28983302 [("targetConcurrentRequests" .=) <$>
28993303 _ruTargetConcurrentRequests,
2900− ("targetRequestCountPerSec" .=) <$>
2901− _ruTargetRequestCountPerSec])
3304+ ("targetRequestCountPerSecond" .=) <$>
3305+ _ruTargetRequestCountPerSecond])
29023306
2903−-- | A reference to a particular snapshot of the source tree used to build
2904−-- and deploy the application.
3307+-- | Request message for \'Applications.RepairApplication\'.
29053308--
2906−-- /See:/ 'sourceReference' smart constructor.
2907−data SourceReference = SourceReference'
2908− { _srRepository :: !(Maybe Text)
2909− , _srRevisionId :: !(Maybe Text)
2910− } deriving (Eq,Show,Data,Typeable,Generic)
3309+-- /See:/ 'repairApplicationRequest' smart constructor.
3310+data RepairApplicationRequest =
3311+ RepairApplicationRequest'
3312+ deriving (Eq,Show,Data,Typeable,Generic)
29113313
2912−-- | Creates a value of 'SourceReference' with the minimum fields required to make a request.
2913−--
2914−-- Use one of the following lenses to modify other fields as desired:
2915−--
2916−-- * 'srRepository'
3314+-- | Creates a value of 'RepairApplicationRequest' with the minimum fields required to make a request.
29173315--
2918−-- * 'srRevisionId'
2919−sourceReference
2920− :: SourceReference
2921−sourceReference =
2922− SourceReference'
2923− { _srRepository = Nothing
2924− , _srRevisionId = Nothing
2925− }
3316+repairApplicationRequest
3317+ :: RepairApplicationRequest
3318+repairApplicationRequest = RepairApplicationRequest'
29263319
2927−-- | Optional. A URI string identifying the repository. Example:
2928−-- \"https:\/\/source.developers.google.com\/p\/app-123\/r\/default\"
2929−srRepository :: Lens' SourceReference (Maybe Text)
2930−srRepository
2931− = lens _srRepository (\ s a -> s{_srRepository = a})
2932−
2933−-- | The canonical (and persistent) identifier of the deployed revision, i.e.
2934−-- any kind of aliases including tags or branch names are not allowed.
2935−-- Example (git): \"2198322f89e0bb2e25021667c2ed489d1fd34e6b\"
2936−srRevisionId :: Lens' SourceReference (Maybe Text)
2937−srRevisionId
2938− = lens _srRevisionId (\ s a -> s{_srRevisionId = a})
2939−
2940−instance FromJSON SourceReference where
3320+instance FromJSON RepairApplicationRequest where
29413321 parseJSON
2942− = withObject "SourceReference"
2943− (\ o ->
2944− SourceReference' <$>
2945− (o .:? "repository") <*> (o .:? "revisionId"))
3322+ = withObject "RepairApplicationRequest"
3323+ (\ o -> pure RepairApplicationRequest')
29463324
2947−instance ToJSON SourceReference where
2948− toJSON SourceReference'{..}
2949− = object
2950− (catMaybes
2951− [("repository" .=) <$> _srRepository,
2952− ("revisionId" .=) <$> _srRevisionId])
3325+instance ToJSON RepairApplicationRequest where
3326+ toJSON = const emptyObject
29533327
29543328-- | The normal response of the operation in case of success. If the original
29553329-- method returns no data on success, such as \`Delete\`, the response is
@@ -2978,7 +3352,7 @@ operationResponse pOrAddtional_ =
29783352 { _orAddtional = _Coerce # pOrAddtional_
29793353 }
29803354
2981−-- | Properties of the object. Contains field \'ype with type URL.
3355+-- | Properties of the object. Contains field \'type with type URL.
29823356orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
29833357orAddtional
29843358 = lens _orAddtional (\ s a -> s{_orAddtional = a}) .
@@ -2992,8 +3366,8 @@ instance FromJSON OperationResponse where
29923366instance ToJSON OperationResponse where
29933367 toJSON = toJSON . _orAddtional
29943368
2995−-- | A Docker (container) image which should be used to start the
2996−-- application.
3369+-- | Docker image that is used to start a VM container for the version you
3370+-- deploy.
29973371--
29983372-- /See:/ 'containerInfo' smart constructor.
29993373newtype ContainerInfo = ContainerInfo'
@@ -3012,9 +3386,10 @@ containerInfo =
30123386 { _ciImage = Nothing
30133387 }
30143388
3015−-- | Reference to a hosted container image. Must be a URI to a resource in a
3016−-- Docker repository. Must be fully qualified, including tag or digest.
3017−-- e.g. gcr.io\/my-project\/image:tag or gcr.io\/my-project\/image\'digest
3389+-- | URI to the hosted container image in a Docker repository. The URI must
3390+-- be fully qualified and include a tag or digest. Examples:
3391+-- \"gcr.io\/my-project\/image:tag\" or
3392+-- \"gcr.io\/my-project\/image\'digest\"
30183393ciImage :: Lens' ContainerInfo (Maybe Text)
30193394ciImage = lens _ciImage (\ s a -> s{_ciImage = a})
30203395
@@ -3027,25 +3402,25 @@ instance ToJSON ContainerInfo where
30273402 toJSON ContainerInfo'{..}
30283403 = object (catMaybes [("image" .=) <$> _ciImage])
30293404
3030−-- | Instances are the computing units that App Engine uses to automatically
3031−-- scale an application.
3405+-- | An Instance resource is the computing unit that App Engine uses to
3406+-- automatically scale an application.
30323407--
30333408-- /See:/ 'instance'' smart constructor.
30343409data Instance = Instance'
30353410 { _iMemoryUsage :: !(Maybe (Textual Int64))
30363411 , _iVMStatus :: !(Maybe Text)
30373412 , _iVMZoneName :: !(Maybe Text)
3413+ , _iStartTime :: !(Maybe Text)
30383414 , _iVMId :: !(Maybe Text)
30393415 , _iAvailability :: !(Maybe Text)
30403416 , _iVMName :: !(Maybe Text)
30413417 , _iName :: !(Maybe Text)
3042− , _iVMUnlocked :: !(Maybe Bool)
3418+ , _iVMDebugEnabled :: !(Maybe Bool)
30433419 , _iRequests :: !(Maybe (Textual Int32))
30443420 , _iQps :: !(Maybe (Textual Double))
30453421 , _iId :: !(Maybe Text)
3046− , _iErrors :: !(Maybe (Textual Word32))
3422+ , _iErrors :: !(Maybe (Textual Int32))
30473423 , _iAverageLatency :: !(Maybe (Textual Int32))
3048− , _iStartTimestamp :: !(Maybe Text)
30493424 , _iAppEngineRelease :: !(Maybe Text)
30503425 } deriving (Eq,Show,Data,Typeable,Generic)
30513426
@@ -3059,6 +3434,8 @@ data Instance = Instance'
30593434--
30603435-- * 'iVMZoneName'
30613436--
3437+-- * 'iStartTime'
3438+--
30623439-- * 'iVMId'
30633440--
30643441-- * 'iAvailability'
@@ -3067,7 +3444,7 @@ data Instance = Instance'
30673444--
30683445-- * 'iName'
30693446--
3070−-- * 'iVMUnlocked'
3447+-- * 'iVMDebugEnabled'
30713448--
30723449-- * 'iRequests'
30733450--
@@ -3079,8 +3456,6 @@ data Instance = Instance'
30793456--
30803457-- * 'iAverageLatency'
30813458--
3082−-- * 'iStartTimestamp'
3083−--
30843459-- * 'iAppEngineRelease'
30853460instance'
30863461 :: Instance
@@ -3089,102 +3464,103 @@ instance' =
30893464 { _iMemoryUsage = Nothing
30903465 , _iVMStatus = Nothing
30913466 , _iVMZoneName = Nothing
3467+ , _iStartTime = Nothing
30923468 , _iVMId = Nothing
30933469 , _iAvailability = Nothing
30943470 , _iVMName = Nothing
30953471 , _iName = Nothing
3096− , _iVMUnlocked = Nothing
3472+ , _iVMDebugEnabled = Nothing
30973473 , _iRequests = Nothing
30983474 , _iQps = Nothing
30993475 , _iId = Nothing
31003476 , _iErrors = Nothing
31013477 , _iAverageLatency = Nothing
3102− , _iStartTimestamp = Nothing
31033478 , _iAppEngineRelease = Nothing
31043479 }
31053480
3106−-- | Memory usage (in bytes). \'OutputOnly
3481+-- | Total memory in use (bytes). \'OutputOnly
31073482iMemoryUsage :: Lens' Instance (Maybe Int64)
31083483iMemoryUsage
31093484 = lens _iMemoryUsage (\ s a -> s{_iMemoryUsage = a})
31103485 . mapping _Coerce
31113486
3112−-- | For VMEngines instances, the status of GCE VM where the instance lives.
3113−-- \'OutputOnly
3487+-- | Status of the virtual machine where this instance lives. Only applicable
3488+-- for instances in App Engine flexible environment. \'OutputOnly
31143489iVMStatus :: Lens' Instance (Maybe Text)
31153490iVMStatus
31163491 = lens _iVMStatus (\ s a -> s{_iVMStatus = a})
31173492
3118−-- | For VMEngines instances, the zone where the GCE VM is located.
3119−-- \'OutputOnly
3493+-- | Zone where the virtual machine is located. Only applicable for instances
3494+-- in App Engine flexible environment. \'OutputOnly
31203495iVMZoneName :: Lens' Instance (Maybe Text)
31213496iVMZoneName
31223497 = lens _iVMZoneName (\ s a -> s{_iVMZoneName = a})
31233498
3124−-- | For VMEngines instances, the GCE VM ID of the instance. \'OutputOnly
3499+-- | Time that this instance was started. \'OutputOnly
3500+iStartTime :: Lens' Instance (Maybe Text)
3501+iStartTime
3502+ = lens _iStartTime (\ s a -> s{_iStartTime = a})
3503+
3504+-- | Virtual machine ID of this instance. Only applicable for instances in
3505+-- App Engine flexible environment. \'OutputOnly
31253506iVMId :: Lens' Instance (Maybe Text)
31263507iVMId = lens _iVMId (\ s a -> s{_iVMId = a})
31273508
3128−-- | Availability of instance. \'OutputOnly
3509+-- | Availability of the instance. \'OutputOnly
31293510iAvailability :: Lens' Instance (Maybe Text)
31303511iAvailability
31313512 = lens _iAvailability
31323513 (\ s a -> s{_iAvailability = a})
31333514
3134−-- | For VMEngines instances, the name of GCE VM where the instance lives.
3135−-- \'OutputOnly
3515+-- | Name of the virtual machine where this instance lives. Only applicable
3516+-- for instances in App Engine flexible environment. \'OutputOnly
31363517iVMName :: Lens' Instance (Maybe Text)
31373518iVMName = lens _iVMName (\ s a -> s{_iVMName = a})
31383519
3139−-- | The full path to the Instance resource in the API. Example:
3140−-- \"apps\/myapp\/services\/default\/versions\/v1\/instances\/instance-1\"
3520+-- | Full path to the Instance resource in the API. Example:
3521+-- \`apps\/myapp\/services\/default\/versions\/v1\/instances\/instance-1\`.
31413522-- \'OutputOnly
31423523iName :: Lens' Instance (Maybe Text)
31433524iName = lens _iName (\ s a -> s{_iName = a})
31443525
3145−-- | For VMEngines instances, whether the instance has been unlocked.
3146−-- \'OutputOnly
3147−iVMUnlocked :: Lens' Instance (Maybe Bool)
3148−iVMUnlocked
3149− = lens _iVMUnlocked (\ s a -> s{_iVMUnlocked = a})
3526+-- | Whether this instance is in debug mode. Only applicable for instances in
3527+-- App Engine flexible environment. \'OutputOnly
3528+iVMDebugEnabled :: Lens' Instance (Maybe Bool)
3529+iVMDebugEnabled
3530+ = lens _iVMDebugEnabled
3531+ (\ s a -> s{_iVMDebugEnabled = a})
31503532
3151−-- | Number of requests (since the clone was started). \'OutputOnly
3533+-- | Number of requests since this instance was started. \'OutputOnly
31523534iRequests :: Lens' Instance (Maybe Int32)
31533535iRequests
31543536 = lens _iRequests (\ s a -> s{_iRequests = a}) .
31553537 mapping _Coerce
31563538
3157−-- | QPS for this instance (averaged over the last minute). \'OutputOnly
3539+-- | Average queries per second (QPS) over the last minute. \'OutputOnly
31583540iQps :: Lens' Instance (Maybe Double)
31593541iQps
31603542 = lens _iQps (\ s a -> s{_iQps = a}) .
31613543 mapping _Coerce
31623544
3163−-- | The relative name\/path of the instance within the version. Example:
3164−-- \"instance-1\" \'OutputOnly
3545+-- | Relative name of the instance within the version. Example:
3546+-- \`instance-1\`. \'OutputOnly
31653547iId :: Lens' Instance (Maybe Text)
31663548iId = lens _iId (\ s a -> s{_iId = a})
31673549
3168−-- | Number of errors since the instance was started. \'OutputOnly
3169−iErrors :: Lens' Instance (Maybe Word32)
3550+-- | Number of errors since this instance was started. \'OutputOnly
3551+iErrors :: Lens' Instance (Maybe Int32)
31703552iErrors
31713553 = lens _iErrors (\ s a -> s{_iErrors = a}) .
31723554 mapping _Coerce
31733555
3174−-- | Latency in milliseconds (averaged over the last minute). \'OutputOnly
3556+-- | Average latency (ms) over the last minute. \'OutputOnly
31753557iAverageLatency :: Lens' Instance (Maybe Int32)
31763558iAverageLatency
31773559 = lens _iAverageLatency
31783560 (\ s a -> s{_iAverageLatency = a})
31793561 . mapping _Coerce
31803562
3181−-- | Time when instance was started. \'OutputOnly
3182−iStartTimestamp :: Lens' Instance (Maybe Text)
3183−iStartTimestamp
3184− = lens _iStartTimestamp
3185− (\ s a -> s{_iStartTimestamp = a})
3186−
3187−-- | The App Engine release the instance is running on. \'OutputOnly
3563+-- | App Engine release this instance is running on. \'OutputOnly
31883564iAppEngineRelease :: Lens' Instance (Maybe Text)
31893565iAppEngineRelease
31903566 = lens _iAppEngineRelease
@@ -3197,17 +3573,17 @@ instance FromJSON Instance where
31973573 Instance' <$>
31983574 (o .:? "memoryUsage") <*> (o .:? "vmStatus") <*>
31993575 (o .:? "vmZoneName")
3576+ <*> (o .:? "startTime")
32003577 <*> (o .:? "vmId")
32013578 <*> (o .:? "availability")
32023579 <*> (o .:? "vmName")
32033580 <*> (o .:? "name")
3204− <*> (o .:? "vmUnlocked")
3581+ <*> (o .:? "vmDebugEnabled")
32053582 <*> (o .:? "requests")
32063583 <*> (o .:? "qps")
32073584 <*> (o .:? "id")
32083585 <*> (o .:? "errors")
32093586 <*> (o .:? "averageLatency")
3210− <*> (o .:? "startTimestamp")
32113587 <*> (o .:? "appEngineRelease"))
32123588
32133589instance ToJSON Instance where
@@ -3217,77 +3593,71 @@ instance ToJSON Instance where
32173593 [("memoryUsage" .=) <$> _iMemoryUsage,
32183594 ("vmStatus" .=) <$> _iVMStatus,
32193595 ("vmZoneName" .=) <$> _iVMZoneName,
3596+ ("startTime" .=) <$> _iStartTime,
32203597 ("vmId" .=) <$> _iVMId,
32213598 ("availability" .=) <$> _iAvailability,
32223599 ("vmName" .=) <$> _iVMName, ("name" .=) <$> _iName,
3223− ("vmUnlocked" .=) <$> _iVMUnlocked,
3600+ ("vmDebugEnabled" .=) <$> _iVMDebugEnabled,
32243601 ("requests" .=) <$> _iRequests, ("qps" .=) <$> _iQps,
32253602 ("id" .=) <$> _iId, ("errors" .=) <$> _iErrors,
32263603 ("averageLatency" .=) <$> _iAverageLatency,
3227− ("startTimestamp" .=) <$> _iStartTimestamp,
32283604 ("appEngineRelease" .=) <$> _iAppEngineRelease])
32293605
32303606-- | Code and application artifacts used to deploy a version to App Engine.
32313607--
32323608-- /See:/ 'deployment' smart constructor.
32333609data Deployment = Deployment'
3234− { _dContainer :: !(Maybe ContainerInfo)
3235− , _dFiles :: !(Maybe DeploymentFiles)
3236− , _dSourceReferences :: !(Maybe [SourceReference])
3610+ { _dZip :: !(Maybe ZipInfo)
3611+ , _dContainer :: !(Maybe ContainerInfo)
3612+ , _dFiles :: !(Maybe DeploymentFiles)
32373613 } deriving (Eq,Show,Data,Typeable,Generic)
32383614
32393615-- | Creates a value of 'Deployment' with the minimum fields required to make a request.
32403616--
32413617-- Use one of the following lenses to modify other fields as desired:
32423618--
3619+-- * 'dZip'
3620+--
32433621-- * 'dContainer'
32443622--
32453623-- * 'dFiles'
3246−--
3247−-- * 'dSourceReferences'
32483624deployment
32493625 :: Deployment
32503626deployment =
32513627 Deployment'
3252− { _dContainer = Nothing
3628+ { _dZip = Nothing
3629+ , _dContainer = Nothing
32533630 , _dFiles = Nothing
3254− , _dSourceReferences = Nothing
32553631 }
32563632
3257−-- | If supplied, a docker (container) image which should be used to start
3258−-- the application. Only applicable to the \'vm\' runtime.
3633+-- | The zip file for this deployment, if this is a zip deployment.
3634+dZip :: Lens' Deployment (Maybe ZipInfo)
3635+dZip = lens _dZip (\ s a -> s{_dZip = a})
3636+
3637+-- | A Docker image that App Engine uses to run the version. Only applicable
3638+-- for instances in App Engine flexible environment.
32593639dContainer :: Lens' Deployment (Maybe ContainerInfo)
32603640dContainer
32613641 = lens _dContainer (\ s a -> s{_dContainer = a})
32623642
3263−-- | A manifest of files stored in Google Cloud Storage which should be
3264−-- included as part of this application. All files must be readable using
3265−-- the credentials supplied with this call.
3643+-- | Manifest of the files stored in Google Cloud Storage that are included
3644+-- as part of this version. All files must be readable using the
3645+-- credentials supplied with this call.
32663646dFiles :: Lens' Deployment (Maybe DeploymentFiles)
32673647dFiles = lens _dFiles (\ s a -> s{_dFiles = a})
32683648
3269−-- | The origin of the source code for this deployment. There can be more
3270−-- than one source reference per Version if source code is distributed
3271−-- among multiple repositories.
3272−dSourceReferences :: Lens' Deployment [SourceReference]
3273−dSourceReferences
3274− = lens _dSourceReferences
3275− (\ s a -> s{_dSourceReferences = a})
3276− . _Default
3277− . _Coerce
3278−
32793649instance FromJSON Deployment where
32803650 parseJSON
32813651 = withObject "Deployment"
32823652 (\ o ->
32833653 Deployment' <$>
3284− (o .:? "container") <*> (o .:? "files") <*>
3285− (o .:? "sourceReferences" .!= mempty))
3654+ (o .:? "zip") <*> (o .:? "container") <*>
3655+ (o .:? "files"))
32863656
32873657instance ToJSON Deployment where
32883658 toJSON Deployment'{..}
32893659 = object
32903660 (catMaybes
3291− [("container" .=) <$> _dContainer,
3292− ("files" .=) <$> _dFiles,
3293− ("sourceReferences" .=) <$> _dSourceReferences])
3661+ [("zip" .=) <$> _dZip,
3662+ ("container" .=) <$> _dContainer,
3663+ ("files" .=) <$> _dFiles])