Hello community,
here is the log from the commit of package ghc-gogol-sqladmin for
openSUSE:Factory checked in at 2017-08-31 20:54:58
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-gogol-sqladmin (Old)
and /work/SRC/openSUSE:Factory/.ghc-gogol-sqladmin.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "ghc-gogol-sqladmin"
Thu Aug 31 20:54:58 2017 rev:2 rq:513345 version:0.3.0
Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-gogol-sqladmin/ghc-gogol-sqladmin.changes
2017-05-10 20:44:01.253849760 +0200
+++
/work/SRC/openSUSE:Factory/.ghc-gogol-sqladmin.new/ghc-gogol-sqladmin.changes
2017-08-31 20:54:59.339846861 +0200
@@ -1,0 +2,5 @@
+Thu Jul 27 14:06:55 UTC 2017 - [email protected]
+
+- Update to version 0.3.0.
+
+-------------------------------------------------------------------
Old:
----
gogol-sqladmin-0.1.1.tar.gz
New:
----
gogol-sqladmin-0.3.0.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ ghc-gogol-sqladmin.spec ++++++
--- /var/tmp/diff_new_pack.5fDkG8/_old 2017-08-31 20:55:00.135735036 +0200
+++ /var/tmp/diff_new_pack.5fDkG8/_new 2017-08-31 20:55:00.147733350 +0200
@@ -18,7 +18,7 @@
%global pkg_name gogol-sqladmin
Name: ghc-%{pkg_name}
-Version: 0.1.1
+Version: 0.3.0
Release: 0
Summary: Google Cloud SQL Administration SDK
License: MPL-2.0
++++++ gogol-sqladmin-0.1.1.tar.gz -> gogol-sqladmin-0.3.0.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/gogol-sqladmin-0.1.1/README.md
new/gogol-sqladmin-0.3.0/README.md
--- old/gogol-sqladmin-0.1.1/README.md 2016-11-03 14:26:27.000000000 +0100
+++ new/gogol-sqladmin-0.3.0/README.md 2017-07-12 16:51:29.000000000 +0200
@@ -8,7 +8,7 @@
## Version
-`0.1.1`
+`0.3.0`
## Description
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-sqladmin-0.1.1/gen/Network/Google/Resource/SQL/Instances/TruncateLog.hs
new/gogol-sqladmin-0.3.0/gen/Network/Google/Resource/SQL/Instances/TruncateLog.hs
---
old/gogol-sqladmin-0.1.1/gen/Network/Google/Resource/SQL/Instances/TruncateLog.hs
1970-01-01 01:00:00.000000000 +0100
+++
new/gogol-sqladmin-0.3.0/gen/Network/Google/Resource/SQL/Instances/TruncateLog.hs
2017-07-12 16:51:29.000000000 +0200
@@ -0,0 +1,115 @@
+{-# LANGUAGE DataKinds #-}
+{-# LANGUAGE DeriveDataTypeable #-}
+{-# LANGUAGE DeriveGeneric #-}
+{-# LANGUAGE FlexibleInstances #-}
+{-# LANGUAGE NoImplicitPrelude #-}
+{-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE RecordWildCards #-}
+{-# LANGUAGE TypeFamilies #-}
+{-# LANGUAGE TypeOperators #-}
+
+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
+{-# OPTIONS_GHC -fno-warn-unused-binds #-}
+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
+
+-- |
+-- Module : Network.Google.Resource.SQL.Instances.TruncateLog
+-- Copyright : (c) 2015-2016 Brendan Hay
+-- License : Mozilla Public License, v. 2.0.
+-- Maintainer : Brendan Hay <[email protected]>
+-- Stability : auto-generated
+-- Portability : non-portable (GHC extensions)
+--
+-- Truncate MySQL general and slow query log tables
+--
+-- /See:/ <https://cloud.google.com/sql/docs/reference/latest Cloud SQL
Administration API Reference> for @sql.instances.truncateLog@.
+module Network.Google.Resource.SQL.Instances.TruncateLog
+ (
+ -- * REST Resource
+ InstancesTruncateLogResource
+
+ -- * Creating a Request
+ , instancesTruncateLog
+ , InstancesTruncateLog
+
+ -- * Request Lenses
+ , itlProject
+ , itlPayload
+ , itlInstance
+ ) where
+
+import Network.Google.Prelude
+import Network.Google.SQLAdmin.Types
+
+-- | A resource alias for @sql.instances.truncateLog@ method which the
+-- 'InstancesTruncateLog' request conforms to.
+type InstancesTruncateLogResource =
+ "sql" :>
+ "v1beta4" :>
+ "projects" :>
+ Capture "project" Text :>
+ "instances" :>
+ Capture "instance" Text :>
+ "truncateLog" :>
+ QueryParam "alt" AltJSON :>
+ ReqBody '[JSON] InstancesTruncateLogRequest :>
+ Post '[JSON] Operation
+
+-- | Truncate MySQL general and slow query log tables
+--
+-- /See:/ 'instancesTruncateLog' smart constructor.
+data InstancesTruncateLog = InstancesTruncateLog'
+ { _itlProject :: !Text
+ , _itlPayload :: !InstancesTruncateLogRequest
+ , _itlInstance :: !Text
+ } deriving (Eq,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'InstancesTruncateLog' with the minimum fields
required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'itlProject'
+--
+-- * 'itlPayload'
+--
+-- * 'itlInstance'
+instancesTruncateLog
+ :: Text -- ^ 'itlProject'
+ -> InstancesTruncateLogRequest -- ^ 'itlPayload'
+ -> Text -- ^ 'itlInstance'
+ -> InstancesTruncateLog
+instancesTruncateLog pItlProject_ pItlPayload_ pItlInstance_ =
+ InstancesTruncateLog'
+ { _itlProject = pItlProject_
+ , _itlPayload = pItlPayload_
+ , _itlInstance = pItlInstance_
+ }
+
+-- | Project ID of the Cloud SQL project.
+itlProject :: Lens' InstancesTruncateLog Text
+itlProject
+ = lens _itlProject (\ s a -> s{_itlProject = a})
+
+-- | Multipart request metadata.
+itlPayload :: Lens' InstancesTruncateLog InstancesTruncateLogRequest
+itlPayload
+ = lens _itlPayload (\ s a -> s{_itlPayload = a})
+
+-- | Cloud SQL instance ID. This does not include the project ID.
+itlInstance :: Lens' InstancesTruncateLog Text
+itlInstance
+ = lens _itlInstance (\ s a -> s{_itlInstance = a})
+
+instance GoogleRequest InstancesTruncateLog where
+ type Rs InstancesTruncateLog = Operation
+ type Scopes InstancesTruncateLog =
+ '["https://www.googleapis.com/auth/cloud-platform";,
+ "https://www.googleapis.com/auth/sqlservice.admin";]
+ requestClient InstancesTruncateLog'{..}
+ = go _itlProject _itlInstance (Just AltJSON)
+ _itlPayload
+ sQLAdminService
+ where go
+ = buildClient
+ (Proxy :: Proxy InstancesTruncateLogResource)
+ mempty
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-sqladmin-0.1.1/gen/Network/Google/SQLAdmin/Types/Product.hs
new/gogol-sqladmin-0.3.0/gen/Network/Google/SQLAdmin/Types/Product.hs
--- old/gogol-sqladmin-0.1.1/gen/Network/Google/SQLAdmin/Types/Product.hs
2016-11-03 14:26:27.000000000 +0100
+++ new/gogol-sqladmin-0.3.0/gen/Network/Google/SQLAdmin/Types/Product.hs
2017-07-12 16:51:29.000000000 +0200
@@ -905,6 +905,7 @@
data IPMApping = IPMApping'
{ _imaIPAddress :: !(Maybe Text)
, _imaTimeToRetire :: !(Maybe DateTime')
+ , _imaType :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
-- | Creates a value of 'IPMApping' with the minimum fields required to make a
request.
@@ -914,12 +915,15 @@
-- * 'imaIPAddress'
--
-- * 'imaTimeToRetire'
+--
+-- * 'imaType'
ipMApping
:: IPMApping
ipMApping =
IPMApping'
{ _imaIPAddress = Nothing
, _imaTimeToRetire = Nothing
+ , _imaType = Nothing
}
-- | The IP address assigned.
@@ -936,19 +940,27 @@
(\ s a -> s{_imaTimeToRetire = a})
. mapping _DateTime
+-- | The type of this IP address. A PRIMARY address is an address that can
+-- accept incoming connections. An OUTGOING address is the source address
+-- of connections originating from the instance, if supported.
+imaType :: Lens' IPMApping (Maybe Text)
+imaType = lens _imaType (\ s a -> s{_imaType = a})
+
instance FromJSON IPMApping where
parseJSON
= withObject "IPMApping"
(\ o ->
IPMApping' <$>
- (o .:? "ipAddress") <*> (o .:? "timeToRetire"))
+ (o .:? "ipAddress") <*> (o .:? "timeToRetire") <*>
+ (o .:? "type"))
instance ToJSON IPMApping where
toJSON IPMApping'{..}
= object
(catMaybes
[("ipAddress" .=) <$> _imaIPAddress,
- ("timeToRetire" .=) <$> _imaTimeToRetire])
+ ("timeToRetire" .=) <$> _imaTimeToRetire,
+ ("type" .=) <$> _imaType])
-- | A database resource inside a Cloud SQL instance.
--
@@ -2782,8 +2794,7 @@
tTier :: Lens' Tier (Maybe Text)
tTier = lens _tTier (\ s a -> s{_tTier = a})
--- | The applicable regions for this tier. Can be us-east1, europe-west1 or
--- asia-east1.
+-- | The applicable regions for this tier.
tRegion :: Lens' Tier [Text]
tRegion
= lens _tRegion (\ s a -> s{_tRegion = a}) . _Default
@@ -3197,6 +3208,54 @@
[Just ("kind" .= _opeKind), ("code" .=) <$> _opeCode,
("message" .=) <$> _opeMessage])
+-- | Database Instance truncate log context.
+--
+-- /See:/ 'truncateLogContext' smart constructor.
+data TruncateLogContext = TruncateLogContext'
+ { _tlcKind :: !Text
+ , _tlcLogType :: !(Maybe Text)
+ } deriving (Eq,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'TruncateLogContext' with the minimum fields required
to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'tlcKind'
+--
+-- * 'tlcLogType'
+truncateLogContext
+ :: TruncateLogContext
+truncateLogContext =
+ TruncateLogContext'
+ { _tlcKind = "sql#truncateLogContext"
+ , _tlcLogType = Nothing
+ }
+
+-- | This is always sql#truncateLogContext.
+tlcKind :: Lens' TruncateLogContext Text
+tlcKind = lens _tlcKind (\ s a -> s{_tlcKind = a})
+
+-- | The type of log to truncate. Valid values are MYSQL_GENERAL_TABLE and
+-- MYSQL_SLOW_TABLE.
+tlcLogType :: Lens' TruncateLogContext (Maybe Text)
+tlcLogType
+ = lens _tlcLogType (\ s a -> s{_tlcLogType = a})
+
+instance FromJSON TruncateLogContext where
+ parseJSON
+ = withObject "TruncateLogContext"
+ (\ o ->
+ TruncateLogContext' <$>
+ (o .:? "kind" .!= "sql#truncateLogContext") <*>
+ (o .:? "logType"))
+
+instance ToJSON TruncateLogContext where
+ toJSON TruncateLogContext'{..}
+ = object
+ (catMaybes
+ [Just ("kind" .= _tlcKind),
+ ("logType" .=) <$> _tlcLogType])
+
-- | Database instance clone request.
--
-- /See:/ 'instancesCloneRequest' smart constructor.
@@ -3712,6 +3771,45 @@
[Just ("kind" .= _flrKind),
("items" .=) <$> _flrItems])
+-- | Instance truncate log request.
+--
+-- /See:/ 'instancesTruncateLogRequest' smart constructor.
+newtype InstancesTruncateLogRequest = InstancesTruncateLogRequest'
+ { _itlrTruncateLogContext :: Maybe TruncateLogContext
+ } deriving (Eq,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'InstancesTruncateLogRequest' with the minimum fields
required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'itlrTruncateLogContext'
+instancesTruncateLogRequest
+ :: InstancesTruncateLogRequest
+instancesTruncateLogRequest =
+ InstancesTruncateLogRequest'
+ { _itlrTruncateLogContext = Nothing
+ }
+
+-- | Contains details about the truncate log operation.
+itlrTruncateLogContext :: Lens' InstancesTruncateLogRequest (Maybe
TruncateLogContext)
+itlrTruncateLogContext
+ = lens _itlrTruncateLogContext
+ (\ s a -> s{_itlrTruncateLogContext = a})
+
+instance FromJSON InstancesTruncateLogRequest where
+ parseJSON
+ = withObject "InstancesTruncateLogRequest"
+ (\ o ->
+ InstancesTruncateLogRequest' <$>
+ (o .:? "truncateLogContext"))
+
+instance ToJSON InstancesTruncateLogRequest where
+ toJSON InstancesTruncateLogRequest'{..}
+ = object
+ (catMaybes
+ [("truncateLogContext" .=) <$>
+ _itlrTruncateLogContext])
+
-- | Options for exporting data as SQL statements.
--
-- /See:/ 'exportContextSQLExportOptions' smart constructor.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/gogol-sqladmin-0.1.1/gen/Network/Google/SQLAdmin/Types.hs
new/gogol-sqladmin-0.3.0/gen/Network/Google/SQLAdmin/Types.hs
--- old/gogol-sqladmin-0.1.1/gen/Network/Google/SQLAdmin/Types.hs
2016-11-03 14:26:27.000000000 +0100
+++ new/gogol-sqladmin-0.3.0/gen/Network/Google/SQLAdmin/Types.hs
2017-07-12 16:51:29.000000000 +0200
@@ -114,6 +114,7 @@
, ipMApping
, imaIPAddress
, imaTimeToRetire
+ , imaType
-- * Database
, Database
@@ -353,6 +354,12 @@
, opeCode
, opeMessage
+ -- * TruncateLogContext
+ , TruncateLogContext
+ , truncateLogContext
+ , tlcKind
+ , tlcLogType
+
-- * InstancesCloneRequest
, InstancesCloneRequest
, instancesCloneRequest
@@ -412,6 +419,11 @@
, flrKind
, flrItems
+ -- * InstancesTruncateLogRequest
+ , InstancesTruncateLogRequest
+ , instancesTruncateLogRequest
+ , itlrTruncateLogContext
+
-- * ExportContextSQLExportOptions
, ExportContextSQLExportOptions
, exportContextSQLExportOptions
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/gogol-sqladmin-0.1.1/gen/Network/Google/SQLAdmin.hs
new/gogol-sqladmin-0.3.0/gen/Network/Google/SQLAdmin.hs
--- old/gogol-sqladmin-0.1.1/gen/Network/Google/SQLAdmin.hs 2016-11-03
14:26:27.000000000 +0100
+++ new/gogol-sqladmin-0.3.0/gen/Network/Google/SQLAdmin.hs 2017-07-12
16:51:29.000000000 +0200
@@ -109,6 +109,9 @@
-- ** sql.instances.stopReplica
, module Network.Google.Resource.SQL.Instances.StopReplica
+ -- ** sql.instances.truncateLog
+ , module Network.Google.Resource.SQL.Instances.TruncateLog
+
-- ** sql.instances.update
, module Network.Google.Resource.SQL.Instances.Update
@@ -241,6 +244,7 @@
, ipMApping
, imaIPAddress
, imaTimeToRetire
+ , imaType
-- ** Database
, Database
@@ -480,6 +484,12 @@
, opeCode
, opeMessage
+ -- ** TruncateLogContext
+ , TruncateLogContext
+ , truncateLogContext
+ , tlcKind
+ , tlcLogType
+
-- ** InstancesCloneRequest
, InstancesCloneRequest
, instancesCloneRequest
@@ -539,6 +549,11 @@
, flrKind
, flrItems
+ -- ** InstancesTruncateLogRequest
+ , InstancesTruncateLogRequest
+ , instancesTruncateLogRequest
+ , itlrTruncateLogContext
+
-- ** ExportContextSQLExportOptions
, ExportContextSQLExportOptions
, exportContextSQLExportOptions
@@ -580,6 +595,7 @@
import Network.Google.Resource.SQL.Instances.RestoreBackup
import Network.Google.Resource.SQL.Instances.StartReplica
import Network.Google.Resource.SQL.Instances.StopReplica
+import Network.Google.Resource.SQL.Instances.TruncateLog
import Network.Google.Resource.SQL.Instances.Update
import Network.Google.Resource.SQL.Operations.Get
import Network.Google.Resource.SQL.Operations.List
@@ -625,6 +641,7 @@
:<|> InstancesRestoreBackupResource
:<|> InstancesFailoverResource
:<|> InstancesRestartResource
+ :<|> InstancesTruncateLogResource
:<|> InstancesImportResource
:<|> InstancesStopReplicaResource
:<|> InstancesResetSSLConfigResource
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/gogol-sqladmin-0.1.1/gogol-sqladmin.cabal
new/gogol-sqladmin-0.3.0/gogol-sqladmin.cabal
--- old/gogol-sqladmin-0.1.1/gogol-sqladmin.cabal 2016-11-03
14:26:27.000000000 +0100
+++ new/gogol-sqladmin-0.3.0/gogol-sqladmin.cabal 2017-07-12
16:51:29.000000000 +0200
@@ -1,5 +1,5 @@
name: gogol-sqladmin
-version: 0.1.1
+version: 0.3.0
synopsis: Google Cloud SQL Administration SDK.
homepage: https://github.com/brendanhay/gogol
bug-reports: https://github.com/brendanhay/gogol/issues
@@ -60,6 +60,7 @@
, Network.Google.Resource.SQL.Instances.RestoreBackup
, Network.Google.Resource.SQL.Instances.StartReplica
, Network.Google.Resource.SQL.Instances.StopReplica
+ , Network.Google.Resource.SQL.Instances.TruncateLog
, Network.Google.Resource.SQL.Instances.Update
, Network.Google.Resource.SQL.Operations.Get
, Network.Google.Resource.SQL.Operations.List
@@ -81,5 +82,5 @@
, Network.Google.SQLAdmin.Types.Sum
build-depends:
- gogol-core == 0.1.1.*
+ gogol-core == 0.3.0.*
, base >= 4.7 && < 5
