@@ -637,7 +637,8 @@ instance ToJSON Operation where
637637--
638638-- /See:/ 'settings' smart constructor.
639639data Settings = Settings'
640− { _sReplicationType :: !(Maybe Text)
640+ { _sStorageAutoResize :: !(Maybe Bool)
641+ , _sReplicationType :: !(Maybe Text)
641642 , _sActivationPolicy :: !(Maybe Text)
642643 , _sSettingsVersion :: !(Maybe (Textual Int64))
643644 , _sDataDiskSizeGb :: !(Maybe (Textual Int64))
@@ -659,6 +660,8 @@ data Settings = Settings'
659660--
660661-- Use one of the following lenses to modify other fields as desired:
661662--
663+-- * 'sStorageAutoResize'
664+--
662665-- * 'sReplicationType'
663666--
664667-- * 'sActivationPolicy'
@@ -694,7 +697,8 @@ settings
694697 :: Settings
695698settings =
696699 Settings'
697− { _sReplicationType = Nothing
700+ { _sStorageAutoResize = Nothing
701+ , _sReplicationType = Nothing
698702 , _sActivationPolicy = Nothing
699703 , _sSettingsVersion = Nothing
700704 , _sDataDiskSizeGb = Nothing
@@ -712,6 +716,13 @@ settings =
712716 , _sBackupConfiguration = Nothing
713717 }
714718
719+-- | Configuration to increase storage size automatically. The default value
720+-- is false. Applies only to Second Generation instances.
721+sStorageAutoResize :: Lens' Settings (Maybe Bool)
722+sStorageAutoResize
723+ = lens _sStorageAutoResize
724+ (\ s a -> s{_sStorageAutoResize = a})
725+
715726-- | The type of replication this instance uses. This can be either
716727-- ASYNCHRONOUS or SYNCHRONOUS. This property is only applicable to First
717728-- Generation instances.
@@ -741,8 +752,8 @@ sSettingsVersion
741752 (\ s a -> s{_sSettingsVersion = a})
742753 . mapping _Coerce
743754
744−-- | The size of data disk, in GB. The data disk size minimum is 10GB. This
745−-- property is only applicable to Second Generation instances.
755+-- | The size of data disk, in GB. The data disk size minimum is 10GB.
756+-- Applies only to Second Generation instances.
746757sDataDiskSizeGb :: Lens' Settings (Maybe Int64)
747758sDataDiskSizeGb
748759 = lens _sDataDiskSizeGb
@@ -778,8 +789,8 @@ sIPConfiguration
778789 (\ s a -> s{_sIPConfiguration = a})
779790
780791-- | The maintenance window for this instance. This specifies when the
781−-- instance may be restarted for maintenance purposes. This property is
782−-- only applicable to Second Generation instances.
792+-- instance may be restarted for maintenance purposes. Applies only to
793+-- Second Generation instances.
783794sMaintenanceWindow :: Lens' Settings (Maybe MaintenanceWindow)
784795sMaintenanceWindow
785796 = lens _sMaintenanceWindow
@@ -806,8 +817,7 @@ sDatabaseFlags
806817 . _Coerce
807818
808819-- | The type of data disk. Only supported for Second Generation instances.
809−-- The default type is PD_SSD. This property is only applicable to Second
810−-- Generation instances.
820+-- The default type is PD_SSD. Applies only to Second Generation instances.
811821sDataDiskType :: Lens' Settings (Maybe Text)
812822sDataDiskType
813823 = lens _sDataDiskType
@@ -841,8 +851,9 @@ instance FromJSON Settings where
841851 = withObject "Settings"
842852 (\ o ->
843853 Settings' <$>
844− (o .:? "replicationType") <*>
845− (o .:? "activationPolicy")
854+ (o .:? "storageAutoResize") <*>
855+ (o .:? "replicationType")
856+ <*> (o .:? "activationPolicy")
846857 <*> (o .:? "settingsVersion")
847858 <*> (o .:? "dataDiskSizeGb")
848859 <*> (o .:? "authorizedGaeApplications" .!= mempty)
@@ -862,7 +873,8 @@ instance ToJSON Settings where
862873 toJSON Settings'{..}
863874 = object
864875 (catMaybes
865− [("replicationType" .=) <$> _sReplicationType,
876+ [("storageAutoResize" .=) <$> _sStorageAutoResize,
877+ ("replicationType" .=) <$> _sReplicationType,
866878 ("activationPolicy" .=) <$> _sActivationPolicy,
867879 ("settingsVersion" .=) <$> _sSettingsVersion,
868880 ("dataDiskSizeGb" .=) <$> _sDataDiskSizeGb,
@@ -3306,6 +3318,7 @@ instance ToJSON FailoverContext where
33063318-- /See:/ 'sslCertsInsertResponse' smart constructor.
33073319data SSLCertsInsertResponse = SSLCertsInsertResponse'
33083320 { _scirServerCaCert :: !(Maybe SSLCert)
3321+ , _scirOperation :: !(Maybe Operation)
33093322 , _scirKind :: !Text
33103323 , _scirClientCert :: !(Maybe SSLCertDetail)
33113324 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -3316,6 +3329,8 @@ data SSLCertsInsertResponse = SSLCertsInsertResponse'
33163329--
33173330-- * 'scirServerCaCert'
33183331--
3332+-- * 'scirOperation'
3333+--
33193334-- * 'scirKind'
33203335--
33213336-- * 'scirClientCert'
@@ -3324,6 +3339,7 @@ sslCertsInsertResponse
33243339sslCertsInsertResponse =
33253340 SSLCertsInsertResponse'
33263341 { _scirServerCaCert = Nothing
3342+ , _scirOperation = Nothing
33273343 , _scirKind = "sql#sslCertsInsert"
33283344 , _scirClientCert = Nothing
33293345 }
@@ -3336,12 +3352,18 @@ scirServerCaCert
33363352 = lens _scirServerCaCert
33373353 (\ s a -> s{_scirServerCaCert = a})
33383354
3355+-- | The operation to track the ssl certs insert request.
3356+scirOperation :: Lens' SSLCertsInsertResponse (Maybe Operation)
3357+scirOperation
3358+ = lens _scirOperation
3359+ (\ s a -> s{_scirOperation = a})
3360+
33393361-- | This is always sql#sslCertsInsert.
33403362scirKind :: Lens' SSLCertsInsertResponse Text
33413363scirKind = lens _scirKind (\ s a -> s{_scirKind = a})
33423364
33433365-- | The new client certificate and private key. The new certificate will not
3344−-- work until the instance is restarted.
3366+-- work until the instance is restarted for First Generation instances.
33453367scirClientCert :: Lens' SSLCertsInsertResponse (Maybe SSLCertDetail)
33463368scirClientCert
33473369 = lens _scirClientCert
@@ -3352,7 +3374,7 @@ instance FromJSON SSLCertsInsertResponse where
33523374 = withObject "SSLCertsInsertResponse"
33533375 (\ o ->
33543376 SSLCertsInsertResponse' <$>
3355− (o .:? "serverCaCert") <*>
3377+ (o .:? "serverCaCert") <*> (o .:? "operation") <*>
33563378 (o .:? "kind" .!= "sql#sslCertsInsert")
33573379 <*> (o .:? "clientCert"))
33583380
@@ -3361,6 +3383,7 @@ instance ToJSON SSLCertsInsertResponse where
33613383 = object
33623384 (catMaybes
33633385 [("serverCaCert" .=) <$> _scirServerCaCert,
3386+ ("operation" .=) <$> _scirOperation,
33643387 Just ("kind" .= _scirKind),
33653388 ("clientCert" .=) <$> _scirClientCert])
33663389