on develop help sign in
Regenerating all services
commitb790df892eb2f5320ca542ccd245037020537dcd authorBrendan Hay <brendan.g.hay@gmail.com> dateSat 26 Sep 2015, 17:30 (11 years ago) parent4c5c18d
255 files changed+8601−815
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types.hs+3−7 gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Product.hs+2 gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Sum.hs+3 gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types.hs+3−7 gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Product.hs+2 gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Sum.hs+3 gogol-admin/gen/Network/Google/DataTransfer/Types.hs+3−7 gogol-admin/gen/Network/Google/DataTransfer/Types/Product.hs+2 gogol-admin/gen/Network/Google/DataTransfer/Types/Sum.hs+3 gogol-admin/gen/Network/Google/Directory/Types.hs+3−7 gogol-admin/gen/Network/Google/Directory/Types/Product.hs+2 gogol-admin/gen/Network/Google/Directory/Types/Sum.hs+3 gogol-admin/gen/Network/Google/EmailMigration/Types.hs+3−7 gogol-admin/gen/Network/Google/EmailMigration/Types/Product.hs+2 gogol-admin/gen/Network/Google/EmailMigration/Types/Sum.hs+3 gogol-admin/gen/Network/Google/Reports/Types.hs+3−7 gogol-admin/gen/Network/Google/Reports/Types/Product.hs+2 gogol-admin/gen/Network/Google/Reports/Types/Sum.hs+3 gogol-adsense-host/gen/Network/Google/AdSenseHost/Types.hs+3−7 gogol-adsense-host/gen/Network/Google/AdSenseHost/Types/Product.hs+2 gogol-adsense-host/gen/Network/Google/AdSenseHost/Types/Sum.hs+3 gogol-adsense/gen/Network/Google/AdSense/Types.hs+3−7 gogol-adsense/gen/Network/Google/AdSense/Types/Product.hs+2 gogol-adsense/gen/Network/Google/AdSense/Types/Sum.hs+3 gogol-affiliatenetwork/gen/Network/Google/AffiliateNetwork/Types.hs+3−7 gogol-affiliatenetwork/gen/Network/Google/AffiliateNetwork/Types/Product.hs+2 gogol-affiliatenetwork/gen/Network/Google/AffiliateNetwork/Types/Sum.hs+3 gogol-analytics/gen/Network/Google/Analytics/Types.hs+3−7 gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+2 gogol-analytics/gen/Network/Google/Analytics/Types/Sum.hs+3 gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types.hs+3−7 gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Product.hs+2 gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Sum.hs+3 gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs+3−7 gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+2 gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Sum.hs+3 gogol-appengine/gen/Network/Google/AppEngineAdmin/Types.hs+3−7 gogol-appengine/gen/Network/Google/AppEngineAdmin/Types/Product.hs+2 gogol-appengine/gen/Network/Google/AppEngineAdmin/Types/Sum.hs+3 gogol-appsactivity/gen/Network/Google/AppsActivity/Types.hs+3−7 gogol-appsactivity/gen/Network/Google/AppsActivity/Types/Product.hs+4−2 gogol-appsactivity/gen/Network/Google/AppsActivity/Types/Sum.hs+91 gogol-appstate/gen/Network/Google/AppState/Types.hs+3−7 gogol-appstate/gen/Network/Google/AppState/Types/Product.hs+2 gogol-appstate/gen/Network/Google/AppState/Types/Sum.hs+3 gogol-autoscaler/gen/Network/Google/ComputeEngineAutoscaler/Types.hs+3−7 gogol-autoscaler/gen/Network/Google/ComputeEngineAutoscaler/Types/Product.hs+2 gogol-autoscaler/gen/Network/Google/ComputeEngineAutoscaler/Types/Sum.hs+3 gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+3−7 gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+2 gogol-bigquery/gen/Network/Google/BigQuery/Types/Sum.hs+3 gogol-blogger/gen/Network/Google/Blogger/Types.hs+3−7 gogol-blogger/gen/Network/Google/Blogger/Types/Product.hs+2 gogol-blogger/gen/Network/Google/Blogger/Types/Sum.hs+3 gogol-books/gen/Network/Google/Books/Types.hs+3−7 gogol-books/gen/Network/Google/Books/Types/Product.hs+2 gogol-books/gen/Network/Google/Books/Types/Sum.hs+3 gogol-calendar/gen/Network/Google/Calendar/Types.hs+3−7 gogol-calendar/gen/Network/Google/Calendar/Types/Product.hs+2 gogol-calendar/gen/Network/Google/Calendar/Types/Sum.hs+3 gogol-civicinfo/gen/Network/Google/CivicInfo/Types.hs+3−7 gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+2 gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Sum.hs+3 gogol-classroom/gen/Network/Google/Classroom/Types.hs+3−7 gogol-classroom/gen/Network/Google/Classroom/Types/Product.hs+2 gogol-classroom/gen/Network/Google/Classroom/Types/Sum.hs+3 gogol-cloud-billing/gen/Network/Google/CloudBilling/Types.hs+3−7 gogol-cloud-billing/gen/Network/Google/CloudBilling/Types/Product.hs+2 gogol-cloud-billing/gen/Network/Google/CloudBilling/Types/Sum.hs+3 gogol-cloud-datastore/gen/Network/Google/CloudDatastore/Types.hs+3−7 gogol-cloud-datastore/gen/Network/Google/CloudDatastore/Types/Product.hs+10−8 gogol-cloud-datastore/gen/Network/Google/CloudDatastore/Types/Sum.hs+112 gogol-cloud-debugger/gen/Network/Google/CloudDebugger/Types.hs+3−7 gogol-cloud-debugger/gen/Network/Google/CloudDebugger/Types/Product.hs+2 gogol-cloud-debugger/gen/Network/Google/CloudDebugger/Types/Sum.hs+3 gogol-cloud-deployments/gen/Network/Google/DeploymentManager/Types.hs+3−7 gogol-cloud-deployments/gen/Network/Google/DeploymentManager/Types/Product.hs+2 gogol-cloud-deployments/gen/Network/Google/DeploymentManager/Types/Sum.hs+3 gogol-cloud-dns/gen/Network/Google/CloudDNS/Types.hs+3−7 gogol-cloud-dns/gen/Network/Google/CloudDNS/Types/Product.hs+2 gogol-cloud-dns/gen/Network/Google/CloudDNS/Types/Sum.hs+3 gogol-cloud-latencytest/gen/Network/Google/CloudNetworkPerformanceMonitoring/Types.hs+3−7 gogol-cloud-latencytest/gen/Network/Google/CloudNetworkPerformanceMonitoring/Types/Product.hs+2 gogol-cloud-latencytest/gen/Network/Google/CloudNetworkPerformanceMonitoring/Types/Sum.hs+3 gogol-cloud-logging/gen/Network/Google/CloudLogging/Types.hs+3−7 gogol-cloud-logging/gen/Network/Google/CloudLogging/Types/Product.hs+2 gogol-cloud-logging/gen/Network/Google/CloudLogging/Types/Sum.hs+3 gogol-cloud-monitoring/gen/Network/Google/CloudMonitoring/Types.hs+3−7 gogol-cloud-monitoring/gen/Network/Google/CloudMonitoring/Types/Product.hs+2 gogol-cloud-monitoring/gen/Network/Google/CloudMonitoring/Types/Sum.hs+3 gogol-cloud-pubsub/gen/Network/Google/CloudPubSub/Types.hs+3−7 gogol-cloud-pubsub/gen/Network/Google/CloudPubSub/Types/Product.hs+2 gogol-cloud-pubsub/gen/Network/Google/CloudPubSub/Types/Sum.hs+3 gogol-cloud-resources/gen/Network/Google/CloudResourceManager/Types.hs+3−7 gogol-cloud-resources/gen/Network/Google/CloudResourceManager/Types/Product.hs+2 gogol-cloud-resources/gen/Network/Google/CloudResourceManager/Types/Sum.hs+3 gogol-cloud-sqladmin/gen/Network/Google/SQLAdmin/Types.hs+3−7 gogol-cloud-sqladmin/gen/Network/Google/SQLAdmin/Types/Product.hs+2 gogol-cloud-sqladmin/gen/Network/Google/SQLAdmin/Types/Sum.hs+3 gogol-cloud-users/gen/Network/Google/CloudUserAccounts/Types.hs+3−7 gogol-cloud-users/gen/Network/Google/CloudUserAccounts/Types/Product.hs+4−2 gogol-cloud-users/gen/Network/Google/CloudUserAccounts/Types/Sum.hs+51 gogol-compute/gen/Network/Google/Compute/Types.hs+3−7 gogol-compute/gen/Network/Google/Compute/Types/Product.hs+59−57 gogol-compute/gen/Network/Google/Compute/Types/Sum.hs+1032 gogol-container/gen/Network/Google/ContainerEngine/Types.hs+3−7 gogol-container/gen/Network/Google/ContainerEngine/Types/Product.hs+4−2 gogol-container/gen/Network/Google/ContainerEngine/Types/Sum.hs+42 gogol-content/gen/Network/Google/ShoppingContent/Types.hs+3−7 gogol-content/gen/Network/Google/ShoppingContent/Types/Product.hs+2 gogol-content/gen/Network/Google/ShoppingContent/Types/Sum.hs+3 gogol-customsearch/gen/Network/Google/CustomSearch/Types.hs+3−7 gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+2 gogol-customsearch/gen/Network/Google/CustomSearch/Types/Sum.hs+3 gogol-dataflow/gen/Network/Google/Dataflow/Types.hs+3−7 gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+2 gogol-dataflow/gen/Network/Google/Dataflow/Types/Sum.hs+3 gogol-dfareporting/gen/Network/Google/DFAReporting/Types.hs+3−7 gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Product.hs+55−53 gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Sum.hs+2027 gogol-discovery/gen/Network/Google/Discovery/Types.hs+3−7 gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+2 gogol-discovery/gen/Network/Google/Discovery/Types/Sum.hs+3 gogol-doubleclick-bids/gen/Network/Google/DoubleClickBidManager/Types.hs+3−7 gogol-doubleclick-bids/gen/Network/Google/DoubleClickBidManager/Types/Product.hs+11−9 gogol-doubleclick-bids/gen/Network/Google/DoubleClickBidManager/Types/Sum.hs+1093 gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types.hs+3−7 gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+2 gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Sum.hs+3 gogol-drive/gen/Network/Google/Drive/Types.hs+3−7 gogol-drive/gen/Network/Google/Drive/Types/Product.hs+2 gogol-drive/gen/Network/Google/Drive/Types/Sum.hs+3 gogol-fitness/gen/Network/Google/Fitness/Types.hs+3−7 gogol-fitness/gen/Network/Google/Fitness/Types/Product.hs+6−4 gogol-fitness/gen/Network/Google/Fitness/Types/Sum.hs+69 gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types.hs+3−7 gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Product.hs+2 gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Sum.hs+3 gogol-fusiontables/gen/Network/Google/FusionTables/Types.hs+3−7 gogol-fusiontables/gen/Network/Google/FusionTables/Types/Product.hs+2 gogol-fusiontables/gen/Network/Google/FusionTables/Types/Sum.hs+3 gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types.hs+3−7 gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types/Product.hs+2 gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types/Sum.hs+3 gogol-games-management/gen/Network/Google/GamesManagement/Types.hs+3−7 gogol-games-management/gen/Network/Google/GamesManagement/Types/Product.hs+2 gogol-games-management/gen/Network/Google/GamesManagement/Types/Sum.hs+3 gogol-games/gen/Network/Google/Games/Types.hs+3−7 gogol-games/gen/Network/Google/Games/Types/Product.hs+2 gogol-games/gen/Network/Google/Games/Types/Sum.hs+3 gogol-genomics/gen/Network/Google/Genomics/Types.hs+3−7 gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+14−12 gogol-genomics/gen/Network/Google/Genomics/Types/Sum.hs+273 gogol-gmail/gen/Network/Google/Gmail/Types.hs+3−7 gogol-gmail/gen/Network/Google/Gmail/Types/Product.hs+4−2 gogol-gmail/gen/Network/Google/Gmail/Types/Sum.hs+49 gogol-groups/gen/Network/Google/GroupsMigration/Types.hs+3−7 gogol-groups/gen/Network/Google/GroupsMigration/Types/Product.hs+2 gogol-groups/gen/Network/Google/GroupsMigration/Types/Sum.hs+3 gogol-groups/gen/Network/Google/GroupsSettings/Types.hs+3−7 gogol-groups/gen/Network/Google/GroupsSettings/Types/Product.hs+2 gogol-groups/gen/Network/Google/GroupsSettings/Types/Sum.hs+3 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+3−7 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+2 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Sum.hs+3 gogol-licensing/gen/Network/Google/EnterpriseLicenseManager/Types.hs+3−7 gogol-licensing/gen/Network/Google/EnterpriseLicenseManager/Types/Product.hs+2 gogol-licensing/gen/Network/Google/EnterpriseLicenseManager/Types/Sum.hs+3 gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types.hs+3−7 gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types/Product.hs+2 gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types/Sum.hs+3 gogol-maps-engine/gen/Network/Google/MapsEngine/Types.hs+3−7 gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+28−26 gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Sum.hs+429 gogol-mirror/gen/Network/Google/Mirror/Types.hs+3−7 gogol-mirror/gen/Network/Google/Mirror/Types/Product.hs+2 gogol-mirror/gen/Network/Google/Mirror/Types/Sum.hs+3 gogol-oauth2/gen/Network/Google/OAuth2/Types.hs+3−7 gogol-oauth2/gen/Network/Google/OAuth2/Types/Product.hs+2 gogol-oauth2/gen/Network/Google/OAuth2/Types/Sum.hs+3 gogol-pagespeed/gen/Network/Google/PageSpeedInsights/Types.hs+3−7 gogol-pagespeed/gen/Network/Google/PageSpeedInsights/Types/Product.hs+2 gogol-pagespeed/gen/Network/Google/PageSpeedInsights/Types/Sum.hs+3 gogol-partners/gen/Network/Google/Partners/Types.hs+3−7 gogol-partners/gen/Network/Google/Partners/Types/Product.hs+2 gogol-partners/gen/Network/Google/Partners/Types/Sum.hs+3 gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types.hs+3−7 gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types/Product.hs+2 gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types/Sum.hs+3 gogol-plus-domains/gen/Network/Google/PlusDomains/Types.hs+3−7 gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Product.hs+2 gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Sum.hs+3 gogol-plus/gen/Network/Google/Plus/Types.hs+3−7 gogol-plus/gen/Network/Google/Plus/Types/Product.hs+2 gogol-plus/gen/Network/Google/Plus/Types/Sum.hs+3 gogol-prediction/gen/Network/Google/Prediction/Types.hs+3−7 gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+2 gogol-prediction/gen/Network/Google/Prediction/Types/Sum.hs+3 gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types.hs+3−7 gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+2 gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Sum.hs+3 gogol-qpxexpress/gen/Network/Google/QPXExpress/Types.hs+3−7 gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Product.hs+2 gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Sum.hs+3 gogol-replicapool-updater/gen/Network/Google/ComputeEngineInstanceGroupUpdater/Types.hs+3−7 gogol-replicapool-updater/gen/Network/Google/ComputeEngineInstanceGroupUpdater/Types/Product.hs+2 gogol-replicapool-updater/gen/Network/Google/ComputeEngineInstanceGroupUpdater/Types/Sum.hs+3 gogol-replicapool/gen/Network/Google/ComputeEngineInstanceGroupManager/Types.hs+3−7 gogol-replicapool/gen/Network/Google/ComputeEngineInstanceGroupManager/Types/Product.hs+5−3 gogol-replicapool/gen/Network/Google/ComputeEngineInstanceGroupManager/Types/Sum.hs+60 gogol-reseller/gen/Network/Google/EnterpriseAppsReseller/Types.hs+3−7 gogol-reseller/gen/Network/Google/EnterpriseAppsReseller/Types/Product.hs+2 gogol-reseller/gen/Network/Google/EnterpriseAppsReseller/Types/Sum.hs+3 gogol-resourceviews/gen/Network/Google/ComputeEngineInstanceGroups/Types.hs+3−7 gogol-resourceviews/gen/Network/Google/ComputeEngineInstanceGroups/Types/Product.hs+2 gogol-resourceviews/gen/Network/Google/ComputeEngineInstanceGroups/Types/Sum.hs+3 gogol-siteverification/gen/Network/Google/SiteVerification/Types.hs+3−7 gogol-siteverification/gen/Network/Google/SiteVerification/Types/Product.hs+2 gogol-siteverification/gen/Network/Google/SiteVerification/Types/Sum.hs+3 gogol-spectrum/gen/Network/Google/Spectrum/Types.hs+3−7 gogol-spectrum/gen/Network/Google/Spectrum/Types/Product.hs+2 gogol-spectrum/gen/Network/Google/Spectrum/Types/Sum.hs+3 gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types.hs+3−7 gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+2 gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Sum.hs+3 gogol-storage/gen/Network/Google/CloudStorage/Types.hs+3−7 gogol-storage/gen/Network/Google/CloudStorage/Types/Product.hs+2 gogol-storage/gen/Network/Google/CloudStorage/Types/Sum.hs+3 gogol-tagmanager/gen/Network/Google/TagManager/Types.hs+3−7 gogol-tagmanager/gen/Network/Google/TagManager/Types/Product.hs+9−7 gogol-tagmanager/gen/Network/Google/TagManager/Types/Sum.hs+233 gogol-taskqueue/gen/Network/Google/TaskQueue/Types.hs+3−7 gogol-taskqueue/gen/Network/Google/TaskQueue/Types/Product.hs+2 gogol-taskqueue/gen/Network/Google/TaskQueue/Types/Sum.hs+3 gogol-tasks/gen/Network/Google/Tasks/Types.hs+3−7 gogol-tasks/gen/Network/Google/Tasks/Types/Product.hs+2 gogol-tasks/gen/Network/Google/Tasks/Types/Sum.hs+3 gogol-translate/gen/Network/Google/Translate/Types.hs+3−7 gogol-translate/gen/Network/Google/Translate/Types/Product.hs+2 gogol-translate/gen/Network/Google/Translate/Types/Sum.hs+3 gogol-urlshortener/gen/Network/Google/URLShortener/Types.hs+3−7 gogol-urlshortener/gen/Network/Google/URLShortener/Types/Product.hs+2 gogol-urlshortener/gen/Network/Google/URLShortener/Types/Sum.hs+3 gogol-webfonts/gen/Network/Google/WebFonts/Types.hs+3−7 gogol-webfonts/gen/Network/Google/WebFonts/Types/Product.hs+2 gogol-webfonts/gen/Network/Google/WebFonts/Types/Sum.hs+3 gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types.hs+3−7 gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Product.hs+2 gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Sum.hs+3 gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types.hs+3−7 gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types/Product.hs+2 gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types/Sum.hs+3 gogol-youtube/gen/Network/Google/YouTube/Types.hs+3−7 gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+35−33 gogol-youtube/gen/Network/Google/YouTube/Types/Sum.hs+2182
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AdExchangeBuyer.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AdExchangeBuyer.Types
1416 (
15− -- * API Definition
16− adexchangebuyer
17−
1817
1918 -- * Account
20− , Account
19+ Account
2120 , account
2221 , aMaximumTotalQps
2322 , aKind
@@ -837,6 +836,3 @@ module Network.Google.AdExchangeBuyer.Types
837836import Network.Google.AdExchangeBuyer.Types.Product
838837import Network.Google.AdExchangeBuyer.Types.Sum
839838import Network.Google.Prelude
840−
841−adexchangebuyer :: a
842−adexchangebuyer = error "adexchangebuyer"
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AdExchangeBuyer.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AdExchangeBuyer.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AdExchangeSeller.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AdExchangeSeller.Types
1416 (
15− -- * API Definition
16− adexchangeseller
17−
1817
1918 -- * Account
20− , Account
19+ Account
2120 , account
2221 , accKind
2322 , accName
@@ -175,6 +174,3 @@ module Network.Google.AdExchangeSeller.Types
175174import Network.Google.AdExchangeSeller.Types.Product
176175import Network.Google.AdExchangeSeller.Types.Sum
177176import Network.Google.Prelude
178−
179−adexchangeseller :: a
180−adexchangeseller = error "adexchangeseller"
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AdExchangeSeller.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AdExchangeSeller.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-admin/gen/Network/Google/DataTransfer/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DataTransfer.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.DataTransfer.Types
1416 (
15− -- * API Definition
16− admin
17−
1817
1918 -- * Application
20− , Application
19+ Application
2120 , application
2221 , aTransferParams
2322 , aEtag
@@ -70,6 +69,3 @@ module Network.Google.DataTransfer.Types
7069import Network.Google.DataTransfer.Types.Product
7170import Network.Google.DataTransfer.Types.Sum
7271import Network.Google.Prelude
73−
74−admin :: a
75−admin = error "admin"
gogol-admin/gen/Network/Google/DataTransfer/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DataTransfer.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-admin/gen/Network/Google/DataTransfer/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.DataTransfer.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-admin/gen/Network/Google/Directory/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Directory.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Directory.Types
1416 (
15− -- * API Definition
16− admin
17−
1817
1918 -- * Alias
20− , Alias
19+ Alias
2120 , alias
2221 , aEtag
2322 , aKind
@@ -499,6 +498,3 @@ module Network.Google.Directory.Types
499498import Network.Google.Directory.Types.Product
500499import Network.Google.Directory.Types.Sum
501500import Network.Google.Prelude
502−
503−admin :: a
504−admin = error "admin"
gogol-admin/gen/Network/Google/Directory/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Directory.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-admin/gen/Network/Google/Directory/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Directory.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-admin/gen/Network/Google/EmailMigration/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.EmailMigration.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.EmailMigration.Types
1416 (
15− -- * API Definition
16− admin
17−
1817
1918 -- * MailItem
20− , MailItem
19+ MailItem
2120 , mailItem
2221 , miIsDeleted
2322 , miIsDraft
@@ -33,6 +32,3 @@ module Network.Google.EmailMigration.Types
3332import Network.Google.EmailMigration.Types.Product
3433import Network.Google.EmailMigration.Types.Sum
3534import Network.Google.Prelude
36−
37−admin :: a
38−admin = error "admin"
gogol-admin/gen/Network/Google/EmailMigration/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.EmailMigration.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-admin/gen/Network/Google/EmailMigration/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.EmailMigration.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-admin/gen/Network/Google/Reports/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Reports.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Reports.Types
1416 (
15− -- * API Definition
16− admin
17−
1817
1918 -- * Activities
20− , Activities
19+ Activities
2120 , activities
2221 , actEtag
2322 , actNextPageToken
@@ -143,6 +142,3 @@ module Network.Google.Reports.Types
143142import Network.Google.Prelude
144143import Network.Google.Reports.Types.Product
145144import Network.Google.Reports.Types.Sum
146−
147−admin :: a
148−admin = error "admin"
gogol-admin/gen/Network/Google/Reports/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Reports.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-admin/gen/Network/Google/Reports/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Reports.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-adsense-host/gen/Network/Google/AdSenseHost/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AdSenseHost.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AdSenseHost.Types
1416 (
15− -- * API Definition
16− adsensehost
17−
1817
1918 -- * Account
20− , Account
19+ Account
2120 , account
2221 , accStatus
2322 , accKind
@@ -185,6 +184,3 @@ module Network.Google.AdSenseHost.Types
185184import Network.Google.AdSenseHost.Types.Product
186185import Network.Google.AdSenseHost.Types.Sum
187186import Network.Google.Prelude
188−
189−adsensehost :: a
190−adsensehost = error "adsensehost"
gogol-adsense-host/gen/Network/Google/AdSenseHost/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AdSenseHost.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-adsense-host/gen/Network/Google/AdSenseHost/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AdSenseHost.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-adsense/gen/Network/Google/AdSense/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AdSense.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AdSense.Types
1416 (
15− -- * API Definition
16− adsense
17−
1817
1918 -- * Account
20− , Account
19+ Account
2120 , account
2221 , accKind
2322 , accPremium
@@ -276,6 +275,3 @@ module Network.Google.AdSense.Types
276275import Network.Google.AdSense.Types.Product
277276import Network.Google.AdSense.Types.Sum
278277import Network.Google.Prelude
279−
280−adsense :: a
281−adsense = error "adsense"
gogol-adsense/gen/Network/Google/AdSense/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AdSense.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-adsense/gen/Network/Google/AdSense/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AdSense.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-affiliatenetwork/gen/Network/Google/AffiliateNetwork/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AffiliateNetwork.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AffiliateNetwork.Types
1416 (
15− -- * API Definition
16− gan
17−
1817
1918 -- * Advertiser
20− , Advertiser
19+ Advertiser
2120 , advertiser
2221 , aAllowPublisherCreatedLinks
2322 , aContactPhone
@@ -275,6 +274,3 @@ module Network.Google.AffiliateNetwork.Types
275274import Network.Google.AffiliateNetwork.Types.Product
276275import Network.Google.AffiliateNetwork.Types.Sum
277276import Network.Google.Prelude
278−
279−gan :: a
280−gan = error "gan"
gogol-affiliatenetwork/gen/Network/Google/AffiliateNetwork/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AffiliateNetwork.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-affiliatenetwork/gen/Network/Google/AffiliateNetwork/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AffiliateNetwork.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-analytics/gen/Network/Google/Analytics/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Analytics.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Analytics.Types
1416 (
15− -- * API Definition
16− analytics
17−
1817
1918 -- * Account
20− , Account
19+ Account
2120 , account
2221 , accChildLink
2322 , accKind
@@ -993,6 +992,3 @@ module Network.Google.Analytics.Types
993992import Network.Google.Analytics.Types.Product
994993import Network.Google.Analytics.Types.Sum
995994import Network.Google.Prelude
996−
997−analytics :: a
998−analytics = error "analytics"
gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Analytics.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-analytics/gen/Network/Google/Analytics/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Analytics.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AndroidEnterprise.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AndroidEnterprise.Types
1416 (
15− -- * API Definition
16− androidenterprise
17−
1817
1918 -- * AppRestrictionsSchema
20− , AppRestrictionsSchema
19+ AppRestrictionsSchema
2120 , appRestrictionsSchema
2221 , arsKind
2322 , arsRestrictions
@@ -244,6 +243,3 @@ module Network.Google.AndroidEnterprise.Types
244243import Network.Google.AndroidEnterprise.Types.Product
245244import Network.Google.AndroidEnterprise.Types.Sum
246245import Network.Google.Prelude
247−
248−androidenterprise :: a
249−androidenterprise = error "androidenterprise"
gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AndroidEnterprise.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AndroidEnterprise.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AndroidPublisher.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AndroidPublisher.Types
1416 (
15− -- * API Definition
16− androidpublisher
17−
1817
1918 -- * Apk
20− , Apk
19+ Apk
2120 , apk
2221 , apkVersionCode
2322 , apkBinary
@@ -327,6 +326,3 @@ module Network.Google.AndroidPublisher.Types
327326import Network.Google.AndroidPublisher.Types.Product
328327import Network.Google.AndroidPublisher.Types.Sum
329328import Network.Google.Prelude
330−
331−androidpublisher :: a
332−androidpublisher = error "androidpublisher"
gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AndroidPublisher.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AndroidPublisher.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-appengine/gen/Network/Google/AppEngineAdmin/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AppEngineAdmin.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AppEngineAdmin.Types
1416 (
15− -- * API Definition
16− appengine
17−
1817
1918 -- * ApiConfigHandler
20− , ApiConfigHandler
19+ ApiConfigHandler
2120 , apiConfigHandler
2221 , achScript
2322 , achSecurityLevel
@@ -295,6 +294,3 @@ module Network.Google.AppEngineAdmin.Types
295294import Network.Google.AppEngineAdmin.Types.Product
296295import Network.Google.AppEngineAdmin.Types.Sum
297296import Network.Google.Prelude
298−
299−appengine :: a
300−appengine = error "appengine"
gogol-appengine/gen/Network/Google/AppEngineAdmin/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AppEngineAdmin.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-appengine/gen/Network/Google/AppEngineAdmin/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AppEngineAdmin.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-appsactivity/gen/Network/Google/AppsActivity/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AppsActivity.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AppsActivity.Types
1416 (
15− -- * API Definition
16− appsactivity
17−
1817
1918 -- * Activity
20− , Activity
19+ Activity
2120 , activity
2221 , aSingleEvents
2322 , aCombinedEvent
@@ -110,6 +109,3 @@ module Network.Google.AppsActivity.Types
110109import Network.Google.AppsActivity.Types.Product
111110import Network.Google.AppsActivity.Types.Sum
112111import Network.Google.Prelude
113−
114−appsactivity :: a
115−appsactivity = error "appsactivity"
gogol-appsactivity/gen/Network/Google/AppsActivity/Types/Product.hs+4−2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AppsActivity.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -67,7 +69,7 @@ data Event = Event
6769 , _ePermissionChanges :: !(Maybe [Maybe PermissionChange])
6870 , _eTarget :: !(Maybe (Maybe Target))
6971 , _eMove :: !(Maybe (Maybe Move))
70− }
72+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
7173
7274-- | Creates a value of 'Event' with the minimum fields required to make a request.
7375--
@@ -291,7 +293,7 @@ data Permission = Permission
291293 , _pName :: !(Maybe Text)
292294 , _pType :: !(Maybe PermissionType)
293295 , _pPermissionId :: !(Maybe Text)
294− }
296+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
295297
296298-- | Creates a value of 'Permission' with the minimum fields required to make a request.
297299--
gogol-appsactivity/gen/Network/Google/AppsActivity/Types/Sum.hs+91
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AppsActivity.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -41,6 +44,35 @@ data EventItemAdditionalEventTypes
4144
4245instance Hashable EventItemAdditionalEventTypes
4346
47+instance FromText EventItemAdditionalEventTypes where
48+ fromText = \case
49+ "comment" -> Just EIAETComment
50+ "create" -> Just EIAETCreate
51+ "edit" -> Just EIAETEdit
52+ "emptyTrash" -> Just EIAETEmptyTrash
53+ "move" -> Just EIAETMove
54+ "permissionChange" -> Just EIAETPermissionChange
55+ "rename" -> Just EIAETRename
56+ "trash" -> Just EIAETTrash
57+ "unknown" -> Just EIAETUnknown
58+ "untrash" -> Just EIAETUntrash
59+ "upload" -> Just EIAETUpload
60+ _ -> Nothing
61+
62+instance ToText EventItemAdditionalEventTypes where
63+ toText = \case
64+ EIAETComment -> "comment"
65+ EIAETCreate -> "create"
66+ EIAETEdit -> "edit"
67+ EIAETEmptyTrash -> "emptyTrash"
68+ EIAETMove -> "move"
69+ EIAETPermissionChange -> "permissionChange"
70+ EIAETRename -> "rename"
71+ EIAETTrash -> "trash"
72+ EIAETUnknown -> "unknown"
73+ EIAETUntrash -> "untrash"
74+ EIAETUpload -> "upload"
75+
4476-- | The main type of event that occurred.
4577data EventPrimaryEventType
4678 = EPETComment
@@ -69,6 +101,35 @@ data EventPrimaryEventType
69101
70102instance Hashable EventPrimaryEventType
71103
104+instance FromText EventPrimaryEventType where
105+ fromText = \case
106+ "comment" -> Just EPETComment
107+ "create" -> Just EPETCreate
108+ "edit" -> Just EPETEdit
109+ "emptyTrash" -> Just EPETEmptyTrash
110+ "move" -> Just EPETMove
111+ "permissionChange" -> Just EPETPermissionChange
112+ "rename" -> Just EPETRename
113+ "trash" -> Just EPETTrash
114+ "unknown" -> Just EPETUnknown
115+ "untrash" -> Just EPETUntrash
116+ "upload" -> Just EPETUpload
117+ _ -> Nothing
118+
119+instance ToText EventPrimaryEventType where
120+ toText = \case
121+ EPETComment -> "comment"
122+ EPETCreate -> "create"
123+ EPETEdit -> "edit"
124+ EPETEmptyTrash -> "emptyTrash"
125+ EPETMove -> "move"
126+ EPETPermissionChange -> "permissionChange"
127+ EPETRename -> "rename"
128+ EPETTrash -> "trash"
129+ EPETUnknown -> "unknown"
130+ EPETUntrash -> "untrash"
131+ EPETUpload -> "upload"
132+
72133-- | Indicates the Google Drive permissions role. The role determines a
73134-- user\'s ability to read, write, or comment on the file.
74135data PermissionRole
@@ -84,6 +145,21 @@ data PermissionRole
84145
85146instance Hashable PermissionRole
86147
148+instance FromText PermissionRole where
149+ fromText = \case
150+ "commenter" -> Just PRCommenter
151+ "owner" -> Just PROwner
152+ "reader" -> Just PRReader
153+ "writer" -> Just PRWriter
154+ _ -> Nothing
155+
156+instance ToText PermissionRole where
157+ toText = \case
158+ PRCommenter -> "commenter"
159+ PROwner -> "owner"
160+ PRReader -> "reader"
161+ PRWriter -> "writer"
162+
87163-- | Indicates how widely permissions are granted.
88164data PermissionType
89165 = PTAnyone
@@ -97,3 +173,18 @@ data PermissionType
97173 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
98174
99175instance Hashable PermissionType
176+
177+instance FromText PermissionType where
178+ fromText = \case
179+ "anyone" -> Just PTAnyone
180+ "domain" -> Just PTDomain
181+ "group" -> Just PTGroup
182+ "user" -> Just PTUser
183+ _ -> Nothing
184+
185+instance ToText PermissionType where
186+ toText = \case
187+ PTAnyone -> "anyone"
188+ PTDomain -> "domain"
189+ PTGroup -> "group"
190+ PTUser -> "user"
gogol-appstate/gen/Network/Google/AppState/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AppState.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.AppState.Types
1416 (
15− -- * API Definition
16− appstate
17−
1817
1918 -- * GetResponse
20− , GetResponse
19+ GetResponse
2120 , getResponse
2221 , grCurrentStateVersion
2322 , grKind
@@ -48,6 +47,3 @@ module Network.Google.AppState.Types
4847import Network.Google.AppState.Types.Product
4948import Network.Google.AppState.Types.Sum
5049import Network.Google.Prelude
51−
52−appstate :: a
53−appstate = error "appstate"
gogol-appstate/gen/Network/Google/AppState/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.AppState.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-appstate/gen/Network/Google/AppState/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.AppState.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-autoscaler/gen/Network/Google/ComputeEngineAutoscaler/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ComputeEngineAutoscaler.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.ComputeEngineAutoscaler.Types
1416 (
15− -- * API Definition
16− autoscaler
17−
1817
1918 -- * Autoscaler
20− , Autoscaler
19+ Autoscaler
2120 , autoscaler
2221 , aKind
2322 , aSelfLink
@@ -166,6 +165,3 @@ module Network.Google.ComputeEngineAutoscaler.Types
166165import Network.Google.ComputeEngineAutoscaler.Types.Product
167166import Network.Google.ComputeEngineAutoscaler.Types.Sum
168167import Network.Google.Prelude
169−
170−autoscaler :: a
171−autoscaler = error "autoscaler"
gogol-autoscaler/gen/Network/Google/ComputeEngineAutoscaler/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ComputeEngineAutoscaler.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-autoscaler/gen/Network/Google/ComputeEngineAutoscaler/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.ComputeEngineAutoscaler.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.BigQuery.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.BigQuery.Types
1416 (
15− -- * API Definition
16− bigquery
17−
1817
1918 -- * CsvOptions
20− , CsvOptions
19+ CsvOptions
2120 , csvOptions
2221 , coSkipLeadingRows
2322 , coAllowJaggedRows
@@ -453,6 +452,3 @@ module Network.Google.BigQuery.Types
453452import Network.Google.BigQuery.Types.Product
454453import Network.Google.BigQuery.Types.Sum
455454import Network.Google.Prelude
456−
457−bigquery :: a
458−bigquery = error "bigquery"
gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.BigQuery.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-bigquery/gen/Network/Google/BigQuery/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.BigQuery.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-blogger/gen/Network/Google/Blogger/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Blogger.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Blogger.Types
1416 (
15− -- * API Definition
16− blogger
17−
1817
1918 -- * Blog
20− , Blog
19+ Blog
2120 , blog
2221 , bStatus
2322 , bKind
@@ -305,6 +304,3 @@ module Network.Google.Blogger.Types
305304import Network.Google.Blogger.Types.Product
306305import Network.Google.Blogger.Types.Sum
307306import Network.Google.Prelude
308−
309−blogger :: a
310−blogger = error "blogger"
gogol-blogger/gen/Network/Google/Blogger/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Blogger.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-blogger/gen/Network/Google/Blogger/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Blogger.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-books/gen/Network/Google/Books/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Books.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Books.Types
1416 (
15− -- * API Definition
16− books
17−
1817
1918 -- * Annotation
20− , Annotation
19+ Annotation
2120 , annotation
2221 , aaSelectedText
2322 , aaLayerSummary
@@ -741,6 +740,3 @@ module Network.Google.Books.Types
741740import Network.Google.Books.Types.Product
742741import Network.Google.Books.Types.Sum
743742import Network.Google.Prelude
744−
745−books :: a
746−books = error "books"
gogol-books/gen/Network/Google/Books/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Books.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-books/gen/Network/Google/Books/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Books.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-calendar/gen/Network/Google/Calendar/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Calendar.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Calendar.Types
1416 (
15− -- * API Definition
16− calendar
17−
1817
1918 -- * Acl
20− , Acl
19+ Acl
2120 , acl
2221 , aclEtag
2322 , aclNextPageToken
@@ -360,6 +359,3 @@ module Network.Google.Calendar.Types
360359import Network.Google.Calendar.Types.Product
361360import Network.Google.Calendar.Types.Sum
362361import Network.Google.Prelude
363−
364−calendar :: a
365−calendar = error "calendar"
gogol-calendar/gen/Network/Google/Calendar/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Calendar.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-calendar/gen/Network/Google/Calendar/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Calendar.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-civicinfo/gen/Network/Google/CivicInfo/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CivicInfo.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CivicInfo.Types
1416 (
15− -- * API Definition
16− civicinfo
17−
1817
1918 -- * AdministrationRegion
20− , AdministrationRegion
19+ AdministrationRegion
2120 , administrationRegion
2221 , arLocalJurisdiction
2322 , arSources
@@ -233,6 +232,3 @@ module Network.Google.CivicInfo.Types
233232import Network.Google.CivicInfo.Types.Product
234233import Network.Google.CivicInfo.Types.Sum
235234import Network.Google.Prelude
236−
237−civicinfo :: a
238−civicinfo = error "civicinfo"
gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CivicInfo.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CivicInfo.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-classroom/gen/Network/Google/Classroom/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Classroom.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Classroom.Types
1416 (
15− -- * API Definition
16− classroom
17−
1817
1918 -- * Course
20− , Course
19+ Course
2120 , course
2221 , cCreationTime
2322 , cRoom
@@ -118,6 +117,3 @@ module Network.Google.Classroom.Types
118117import Network.Google.Classroom.Types.Product
119118import Network.Google.Classroom.Types.Sum
120119import Network.Google.Prelude
121−
122−classroom :: a
123−classroom = error "classroom"
gogol-classroom/gen/Network/Google/Classroom/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Classroom.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-classroom/gen/Network/Google/Classroom/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Classroom.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-billing/gen/Network/Google/CloudBilling/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudBilling.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudBilling.Types
1416 (
15− -- * API Definition
16− cloudbilling
17−
1817
1918 -- * BillingAccount
20− , BillingAccount
19+ BillingAccount
2120 , billingAccount
2221 , baOpen
2322 , baName
@@ -47,6 +46,3 @@ module Network.Google.CloudBilling.Types
4746import Network.Google.CloudBilling.Types.Product
4847import Network.Google.CloudBilling.Types.Sum
4948import Network.Google.Prelude
50−
51−cloudbilling :: a
52−cloudbilling = error "cloudbilling"
gogol-cloud-billing/gen/Network/Google/CloudBilling/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudBilling.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-billing/gen/Network/Google/CloudBilling/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudBilling.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-datastore/gen/Network/Google/CloudDatastore/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudDatastore.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudDatastore.Types
1416 (
15− -- * API Definition
16− datastore
17−
1817
1918 -- * AllocateIdsRequest
20− , AllocateIdsRequest
19+ AllocateIdsRequest
2120 , allocateIdsRequest
2221 , airKeys
2322
@@ -292,6 +291,3 @@ module Network.Google.CloudDatastore.Types
292291import Network.Google.CloudDatastore.Types.Product
293292import Network.Google.CloudDatastore.Types.Sum
294293import Network.Google.Prelude
295−
296−datastore :: a
297−datastore = error "datastore"
gogol-cloud-datastore/gen/Network/Google/CloudDatastore/Types/Product.hs+10−8
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudDatastore.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -76,7 +78,7 @@ aHeader = lens _aHeader (\ s a -> s{_aHeader = a})
7678-- /See:/ 'beginTransactionRequest' smart constructor.
7779newtype BeginTransactionRequest = BeginTransactionRequest
7880 { _btrIsolationLevel :: Maybe BeginTransactionRequestIsolationLevel
79− }
81+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
8082
8183-- | Creates a value of 'BeginTransactionRequest' with the minimum fields required to make a request.
8284--
@@ -140,7 +142,7 @@ data CommitRequest = CommitRequest
140142 , _crMutation :: !(Maybe (Maybe Mutation))
141143 , _crTransaction :: !(Maybe Word8)
142144 , _crIgnoreReadOnly :: !(Maybe Bool)
143− }
145+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
144146
145147-- | Creates a value of 'CommitRequest' with the minimum fields required to make a request.
146148--
@@ -223,7 +225,7 @@ crHeader = lens _crHeader (\ s a -> s{_crHeader = a})
223225data CompositeFilter = CompositeFilter
224226 { _cfOperator :: !(Maybe CompositeFilterOperator)
225227 , _cfFilters :: !(Maybe [Maybe Filter])
226− }
228+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
227229
228230-- | Creates a value of 'CompositeFilter' with the minimum fields required to make a request.
229231--
@@ -961,7 +963,7 @@ pBlobValue
961963data PropertyExpression = PropertyExpression
962964 { _peProperty :: !(Maybe (Maybe PropertyReference))
963965 , _peAggregationFunction :: !(Maybe PropertyExpressionAggregationFunction)
964− }
966+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
965967
966968-- | Creates a value of 'PropertyExpression' with the minimum fields required to make a request.
967969--
@@ -1000,7 +1002,7 @@ data PropertyFilter = PropertyFilter
10001002 { _pfProperty :: !(Maybe (Maybe PropertyReference))
10011003 , _pfOperator :: !(Maybe PropertyFilterOperator)
10021004 , _pfValue :: !(Maybe (Maybe Value))
1003− }
1005+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
10041006
10051007-- | Creates a value of 'PropertyFilter' with the minimum fields required to make a request.
10061008--
@@ -1041,7 +1043,7 @@ pfValue = lens _pfValue (\ s a -> s{_pfValue = a})
10411043data PropertyOrder = PropertyOrder
10421044 { _poProperty :: !(Maybe (Maybe PropertyReference))
10431045 , _poDirection :: !(Maybe PropertyOrderDirection)
1044− }
1046+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
10451047
10461048-- | Creates a value of 'PropertyOrder' with the minimum fields required to make a request.
10471049--
@@ -1206,7 +1208,7 @@ data QueryResultBatch = QueryResultBatch
12061208 , _qrbEntityResults :: !(Maybe [Maybe EntityResult])
12071209 , _qrbMoreResults :: !(Maybe QueryResultBatchMoreResults)
12081210 , _qrbEndCursor :: !(Maybe Word8)
1209− }
1211+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
12101212
12111213-- | Creates a value of 'QueryResultBatch' with the minimum fields required to make a request.
12121214--
@@ -1273,7 +1275,7 @@ qrbEndCursor
12731275data ReadOptions = ReadOptions
12741276 { _roReadConsistency :: !(Maybe ReadOptionsReadConsistency)
12751277 , _roTransaction :: !(Maybe Word8)
1276− }
1278+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
12771279
12781280-- | Creates a value of 'ReadOptions' with the minimum fields required to make a request.
12791281--
gogol-cloud-datastore/gen/Network/Google/CloudDatastore/Types/Sum.hs+112
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudDatastore.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -29,6 +32,17 @@ data BeginTransactionRequestIsolationLevel
2932
3033instance Hashable BeginTransactionRequestIsolationLevel
3134
35+instance FromText BeginTransactionRequestIsolationLevel where
36+ fromText = \case
37+ "SERIALIZABLE" -> Just BTRILSerializable
38+ "SNAPSHOT" -> Just BTRILSnapshot
39+ _ -> Nothing
40+
41+instance ToText BeginTransactionRequestIsolationLevel where
42+ toText = \case
43+ BTRILSerializable -> "SERIALIZABLE"
44+ BTRILSnapshot -> "SNAPSHOT"
45+
3246-- | The type of commit to perform. Either TRANSACTIONAL or
3347-- NON_TRANSACTIONAL.
3448data CommitRequestMode
@@ -40,6 +54,17 @@ data CommitRequestMode
4054
4155instance Hashable CommitRequestMode
4256
57+instance FromText CommitRequestMode where
58+ fromText = \case
59+ "NON_TRANSACTIONAL" -> Just CRMNonTransactional
60+ "TRANSACTIONAL" -> Just CRMTransactional
61+ _ -> Nothing
62+
63+instance ToText CommitRequestMode where
64+ toText = \case
65+ CRMNonTransactional -> "NON_TRANSACTIONAL"
66+ CRMTransactional -> "TRANSACTIONAL"
67+
4368-- | The operator for combining multiple filters. Only \"and\" is currently
4469-- supported.
4570data CompositeFilterOperator
@@ -49,6 +74,15 @@ data CompositeFilterOperator
4974
5075instance Hashable CompositeFilterOperator
5176
77+instance FromText CompositeFilterOperator where
78+ fromText = \case
79+ "AND" -> Just CFOAnd
80+ _ -> Nothing
81+
82+instance ToText CompositeFilterOperator where
83+ toText = \case
84+ CFOAnd -> "AND"
85+
5286-- | The aggregation function to apply to the property. Optional. Can only be
5387-- used when grouping by at least one property. Must then be set on all
5488-- properties in the projection that are not being grouped by. Aggregation
@@ -61,6 +95,15 @@ data PropertyExpressionAggregationFunction
6195
6296instance Hashable PropertyExpressionAggregationFunction
6397
98+instance FromText PropertyExpressionAggregationFunction where
99+ fromText = \case
100+ "FIRST" -> Just PEAFFirst
101+ _ -> Nothing
102+
103+instance ToText PropertyExpressionAggregationFunction where
104+ toText = \case
105+ PEAFFirst -> "FIRST"
106+
64107-- | The operator to filter by. One of lessThan, lessThanOrEqual,
65108-- greaterThan, greaterThanOrEqual, equal, or hasAncestor.
66109data PropertyFilterOperator
@@ -80,6 +123,25 @@ data PropertyFilterOperator
80123
81124instance Hashable PropertyFilterOperator
82125
126+instance FromText PropertyFilterOperator where
127+ fromText = \case
128+ "EQUAL" -> Just PFOEqual
129+ "GREATER_THAN" -> Just PFOGreaterThan
130+ "GREATER_THAN_OR_EQUAL" -> Just PFOGreaterThanOrEqual
131+ "HAS_ANCESTOR" -> Just PFOHasAncestor
132+ "LESS_THAN" -> Just PFOLessThan
133+ "LESS_THAN_OR_EQUAL" -> Just PFOLessThanOrEqual
134+ _ -> Nothing
135+
136+instance ToText PropertyFilterOperator where
137+ toText = \case
138+ PFOEqual -> "EQUAL"
139+ PFOGreaterThan -> "GREATER_THAN"
140+ PFOGreaterThanOrEqual -> "GREATER_THAN_OR_EQUAL"
141+ PFOHasAncestor -> "HAS_ANCESTOR"
142+ PFOLessThan -> "LESS_THAN"
143+ PFOLessThanOrEqual -> "LESS_THAN_OR_EQUAL"
144+
83145-- | The direction to order by. One of ascending or descending. Optional,
84146-- defaults to ascending.
85147data PropertyOrderDirection
@@ -91,6 +153,17 @@ data PropertyOrderDirection
91153
92154instance Hashable PropertyOrderDirection
93155
156+instance FromText PropertyOrderDirection where
157+ fromText = \case
158+ "ASCENDING" -> Just PODAscending
159+ "DESCENDING" -> Just PODDescending
160+ _ -> Nothing
161+
162+instance ToText PropertyOrderDirection where
163+ toText = \case
164+ PODAscending -> "ASCENDING"
165+ PODDescending -> "DESCENDING"
166+
94167-- | The result type for every entity in entityResults. full for full
95168-- entities, projection for entities with only projected properties,
96169-- keyOnly for entities with only a key.
@@ -105,6 +178,19 @@ data QueryResultBatchEntityResultType
105178
106179instance Hashable QueryResultBatchEntityResultType
107180
181+instance FromText QueryResultBatchEntityResultType where
182+ fromText = \case
183+ "FULL" -> Just QRBERTFull
184+ "KEY_ONLY" -> Just QRBERTKeyOnly
185+ "PROJECTION" -> Just QRBERTProjection
186+ _ -> Nothing
187+
188+instance ToText QueryResultBatchEntityResultType where
189+ toText = \case
190+ QRBERTFull -> "FULL"
191+ QRBERTKeyOnly -> "KEY_ONLY"
192+ QRBERTProjection -> "PROJECTION"
193+
108194-- | The state of the query after the current batch. One of notFinished,
109195-- moreResultsAfterLimit, noMoreResults.
110196data QueryResultBatchMoreResults
@@ -118,6 +204,19 @@ data QueryResultBatchMoreResults
118204
119205instance Hashable QueryResultBatchMoreResults
120206
207+instance FromText QueryResultBatchMoreResults where
208+ fromText = \case
209+ "MORE_RESULTS_AFTER_LIMIT" -> Just QRBMRMoreResultsAfterLimit
210+ "NOT_FINISHED" -> Just QRBMRNotFinished
211+ "NO_MORE_RESULTS" -> Just QRBMRNoMoreResults
212+ _ -> Nothing
213+
214+instance ToText QueryResultBatchMoreResults where
215+ toText = \case
216+ QRBMRMoreResultsAfterLimit -> "MORE_RESULTS_AFTER_LIMIT"
217+ QRBMRNotFinished -> "NOT_FINISHED"
218+ QRBMRNoMoreResults -> "NO_MORE_RESULTS"
219+
121220-- | The read consistency to use. One of default, strong, or eventual. Cannot
122221-- be set when transaction is set. Lookup and ancestor queries default to
123222-- strong, global queries default to eventual and cannot be set to strong.
@@ -132,3 +231,16 @@ data ReadOptionsReadConsistency
132231 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
133232
134233instance Hashable ReadOptionsReadConsistency
234+
235+instance FromText ReadOptionsReadConsistency where
236+ fromText = \case
237+ "DEFAULT" -> Just RORCDefault
238+ "EVENTUAL" -> Just RORCEventual
239+ "STRONG" -> Just RORCStrong
240+ _ -> Nothing
241+
242+instance ToText ReadOptionsReadConsistency where
243+ toText = \case
244+ RORCDefault -> "DEFAULT"
245+ RORCEventual -> "EVENTUAL"
246+ RORCStrong -> "STRONG"
gogol-cloud-debugger/gen/Network/Google/CloudDebugger/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudDebugger.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudDebugger.Types
1416 (
15− -- * API Definition
16− clouddebugger
17−
1817
1918 -- * Breakpoint
20− , Breakpoint
19+ Breakpoint
2120 , breakpoint
2221 , bStatus
2322 , bLogLevel
@@ -196,6 +195,3 @@ module Network.Google.CloudDebugger.Types
196195import Network.Google.CloudDebugger.Types.Product
197196import Network.Google.CloudDebugger.Types.Sum
198197import Network.Google.Prelude
199−
200−clouddebugger :: a
201−clouddebugger = error "clouddebugger"
gogol-cloud-debugger/gen/Network/Google/CloudDebugger/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudDebugger.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-debugger/gen/Network/Google/CloudDebugger/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudDebugger.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-deployments/gen/Network/Google/DeploymentManager/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DeploymentManager.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.DeploymentManager.Types
1416 (
15− -- * API Definition
16− deploymentmanager
17−
1817
1918 -- * Deployment
20− , Deployment
19+ Deployment
2120 , deployment
2221 , dState
2322 , dInsertTime
@@ -178,6 +177,3 @@ module Network.Google.DeploymentManager.Types
178177import Network.Google.DeploymentManager.Types.Product
179178import Network.Google.DeploymentManager.Types.Sum
180179import Network.Google.Prelude
181−
182−deploymentmanager :: a
183−deploymentmanager = error "deploymentmanager"
gogol-cloud-deployments/gen/Network/Google/DeploymentManager/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DeploymentManager.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-deployments/gen/Network/Google/DeploymentManager/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.DeploymentManager.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-dns/gen/Network/Google/CloudDNS/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudDNS.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudDNS.Types
1416 (
15− -- * API Definition
16− dns
17−
1817
1918 -- * Change
20− , Change
19+ Change
2120 , change
2221 , cStatus
2322 , cAdditions
@@ -91,6 +90,3 @@ module Network.Google.CloudDNS.Types
9190import Network.Google.CloudDNS.Types.Product
9291import Network.Google.CloudDNS.Types.Sum
9392import Network.Google.Prelude
94−
95−dns :: a
96−dns = error "dns"
gogol-cloud-dns/gen/Network/Google/CloudDNS/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudDNS.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-dns/gen/Network/Google/CloudDNS/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudDNS.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-latencytest/gen/Network/Google/CloudNetworkPerformanceMonitoring/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudNetworkPerformanceMonitoring.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudNetworkPerformanceMonitoring.Types
1416 (
15− -- * API Definition
16− cloudlatencytest
17−
1817
1918 -- * AggregatedStats
20− , AggregatedStats
19+ AggregatedStats
2120 , aggregatedStats
2221 , asStats
2322
@@ -61,6 +60,3 @@ module Network.Google.CloudNetworkPerformanceMonitoring.Types
6160import Network.Google.CloudNetworkPerformanceMonitoring.Types.Product
6261import Network.Google.CloudNetworkPerformanceMonitoring.Types.Sum
6362import Network.Google.Prelude
64−
65−cloudlatencytest :: a
66−cloudlatencytest = error "cloudlatencytest"
gogol-cloud-latencytest/gen/Network/Google/CloudNetworkPerformanceMonitoring/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudNetworkPerformanceMonitoring.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-latencytest/gen/Network/Google/CloudNetworkPerformanceMonitoring/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudNetworkPerformanceMonitoring.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-logging/gen/Network/Google/CloudLogging/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudLogging.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudLogging.Types
1416 (
15− -- * API Definition
16− logging
17−
1817
1918 -- * Empty
20− , Empty
19+ Empty
2120 , empty
2221
2322 -- * HttpRequest
@@ -213,6 +212,3 @@ module Network.Google.CloudLogging.Types
213212import Network.Google.CloudLogging.Types.Product
214213import Network.Google.CloudLogging.Types.Sum
215214import Network.Google.Prelude
216−
217−logging :: a
218−logging = error "logging"
gogol-cloud-logging/gen/Network/Google/CloudLogging/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudLogging.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-logging/gen/Network/Google/CloudLogging/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudLogging.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-monitoring/gen/Network/Google/CloudMonitoring/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudMonitoring.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudMonitoring.Types
1416 (
15− -- * API Definition
16− cloudmonitoring
17−
1817
1918 -- * DeleteMetricDescriptorResponse
20− , DeleteMetricDescriptorResponse
19+ DeleteMetricDescriptorResponse
2120 , deleteMetricDescriptorResponse
2221 , dmdrKind
2322
@@ -167,6 +166,3 @@ module Network.Google.CloudMonitoring.Types
167166import Network.Google.CloudMonitoring.Types.Product
168167import Network.Google.CloudMonitoring.Types.Sum
169168import Network.Google.Prelude
170−
171−cloudmonitoring :: a
172−cloudmonitoring = error "cloudmonitoring"
gogol-cloud-monitoring/gen/Network/Google/CloudMonitoring/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudMonitoring.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-monitoring/gen/Network/Google/CloudMonitoring/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudMonitoring.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-pubsub/gen/Network/Google/CloudPubSub/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudPubSub.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudPubSub.Types
1416 (
15− -- * API Definition
16− pubsub
17−
1817
1918 -- * AcknowledgeRequest
20− , AcknowledgeRequest
19+ AcknowledgeRequest
2120 , acknowledgeRequest
2221 , arAckIds
2322
@@ -148,6 +147,3 @@ module Network.Google.CloudPubSub.Types
148147import Network.Google.CloudPubSub.Types.Product
149148import Network.Google.CloudPubSub.Types.Sum
150149import Network.Google.Prelude
151−
152−pubsub :: a
153−pubsub = error "pubsub"
gogol-cloud-pubsub/gen/Network/Google/CloudPubSub/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudPubSub.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-pubsub/gen/Network/Google/CloudPubSub/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudPubSub.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-resources/gen/Network/Google/CloudResourceManager/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudResourceManager.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudResourceManager.Types
1416 (
15− -- * API Definition
16− cloudresourcemanager
17−
1817
1918 -- * Binding
20− , Binding
19+ Binding
2120 , binding
2221 , bMembers
2322 , bRole
@@ -101,6 +100,3 @@ module Network.Google.CloudResourceManager.Types
101100import Network.Google.CloudResourceManager.Types.Product
102101import Network.Google.CloudResourceManager.Types.Sum
103102import Network.Google.Prelude
104−
105−cloudresourcemanager :: a
106−cloudresourcemanager = error "cloudresourcemanager"
gogol-cloud-resources/gen/Network/Google/CloudResourceManager/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudResourceManager.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-resources/gen/Network/Google/CloudResourceManager/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudResourceManager.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-sqladmin/gen/Network/Google/SQLAdmin/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.SQLAdmin.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.SQLAdmin.Types
1416 (
15− -- * API Definition
16− sqladmin
17−
1817
1918 -- * AclEntry
20− , AclEntry
19+ AclEntry
2120 , aclEntry
2221 , aeKind
2322 , aeValue
@@ -384,6 +383,3 @@ module Network.Google.SQLAdmin.Types
384383import Network.Google.Prelude
385384import Network.Google.SQLAdmin.Types.Product
386385import Network.Google.SQLAdmin.Types.Sum
387−
388−sqladmin :: a
389−sqladmin = error "sqladmin"
gogol-cloud-sqladmin/gen/Network/Google/SQLAdmin/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.SQLAdmin.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-sqladmin/gen/Network/Google/SQLAdmin/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.SQLAdmin.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-cloud-users/gen/Network/Google/CloudUserAccounts/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudUserAccounts.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudUserAccounts.Types
1416 (
15− -- * API Definition
16− clouduseraccounts
17−
1817
1918 -- * AuthorizedKeysView
20− , AuthorizedKeysView
19+ AuthorizedKeysView
2120 , authorizedKeysView
2221 , akvSudoer
2322 , akvKeys
@@ -187,6 +186,3 @@ module Network.Google.CloudUserAccounts.Types
187186import Network.Google.CloudUserAccounts.Types.Product
188187import Network.Google.CloudUserAccounts.Types.Sum
189188import Network.Google.Prelude
190−
191−clouduseraccounts :: a
192−clouduseraccounts = error "clouduseraccounts"
gogol-cloud-users/gen/Network/Google/CloudUserAccounts/Types/Product.hs+4−2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudUserAccounts.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -475,7 +477,7 @@ data Operation = Operation
475477 , _oRegion :: !(Maybe Text)
476478 , _oTargetLink :: !(Maybe Text)
477479 , _oClientOperationId :: !(Maybe Text)
478− }
480+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
479481
480482-- | Creates a value of 'Operation' with the minimum fields required to make a request.
481483--
@@ -787,7 +789,7 @@ data OperationItemWarnings = OperationItemWarnings
787789 { _oiwData :: !(Maybe [OperationItemDataItemWarnings])
788790 , _oiwCode :: !(Maybe OperationCodeItemWarnings)
789791 , _oiwMessage :: !(Maybe Text)
790− }
792+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
791793
792794-- | Creates a value of 'OperationItemWarnings' with the minimum fields required to make a request.
793795--
gogol-cloud-users/gen/Network/Google/CloudUserAccounts/Types/Sum.hs+51
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudUserAccounts.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -48,6 +51,41 @@ data OperationCodeItemWarnings
4851
4952instance Hashable OperationCodeItemWarnings
5053
54+instance FromText OperationCodeItemWarnings where
55+ fromText = \case
56+ "DEPRECATED_RESOURCE_USED" -> Just OCIWDeprecatedResourceUsed
57+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just OCIWDiskSizeLargerThanImageSize
58+ "INJECTED_KERNELS_DEPRECATED" -> Just OCIWInjectedKernelsDeprecated
59+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just OCIWNextHopAddressNotAssigned
60+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just OCIWNextHopCannotIPForward
61+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just OCIWNextHopInstanceNotFound
62+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just OCIWNextHopInstanceNotOnNetwork
63+ "NEXT_HOP_NOT_RUNNING" -> Just OCIWNextHopNotRunning
64+ "NOT_CRITICAL_ERROR" -> Just OCIWNotCriticalError
65+ "NO_RESULTS_ON_PAGE" -> Just OCIWNoResultsOnPage
66+ "REQUIRED_TOS_AGREEMENT" -> Just OCIWRequiredTosAgreement
67+ "RESOURCE_NOT_DELETED" -> Just OCIWResourceNotDeleted
68+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just OCIWSingleInstancePropertyTemplate
69+ "UNREACHABLE" -> Just OCIWUnreachable
70+ _ -> Nothing
71+
72+instance ToText OperationCodeItemWarnings where
73+ toText = \case
74+ OCIWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
75+ OCIWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
76+ OCIWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
77+ OCIWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
78+ OCIWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
79+ OCIWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
80+ OCIWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
81+ OCIWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
82+ OCIWNotCriticalError -> "NOT_CRITICAL_ERROR"
83+ OCIWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
84+ OCIWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
85+ OCIWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
86+ OCIWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
87+ OCIWUnreachable -> "UNREACHABLE"
88+
5189-- | [Output Only] Status of the operation. Can be one of the following:
5290-- PENDING, RUNNING, or DONE.
5391data OperationStatus
@@ -60,3 +98,16 @@ data OperationStatus
6098 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
6199
62100instance Hashable OperationStatus
101+
102+instance FromText OperationStatus where
103+ fromText = \case
104+ "DONE" -> Just OSDone
105+ "PENDING" -> Just OSPending
106+ "RUNNING" -> Just OSRunning
107+ _ -> Nothing
108+
109+instance ToText OperationStatus where
110+ toText = \case
111+ OSDone -> "DONE"
112+ OSPending -> "PENDING"
113+ OSRunning -> "RUNNING"
gogol-compute/gen/Network/Google/Compute/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Compute.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Compute.Types
1416 (
15− -- * API Definition
16− compute
17−
1817
1918 -- * AccessConfig
20− , AccessConfig
19+ AccessConfig
2120 , accessConfig
2221 , acKind
2322 , acName
@@ -1745,6 +1744,3 @@ module Network.Google.Compute.Types
17451744import Network.Google.Compute.Types.Product
17461745import Network.Google.Compute.Types.Sum
17471746import Network.Google.Prelude
1748−
1749−compute :: a
1750−compute = error "compute"
gogol-compute/gen/Network/Google/Compute/Types/Product.hs+59−57
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Compute.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -23,7 +25,7 @@ data AccessConfig = AccessConfig
2325 , _acName :: !(Maybe Text)
2426 , _acNatIP :: !(Maybe Text)
2527 , _acType :: !AccessConfigType
26− }
28+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
2729
2830-- | Creates a value of 'AccessConfig' with the minimum fields required to make a request.
2931--
@@ -82,7 +84,7 @@ data Address = Address
8284 , _addId :: !(Maybe Word64)
8385 , _addRegion :: !(Maybe Text)
8486 , _addDescription :: !(Maybe Text)
85− }
87+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
8688
8789-- | Creates a value of 'Address' with the minimum fields required to make a request.
8890--
@@ -323,7 +325,7 @@ alId = lens _alId (\ s a -> s{_alId = a})
323325data AddressesScopedList = AddressesScopedList
324326 { _aslAddresses :: !(Maybe [Maybe Address])
325327 , _aslWarning :: !(Maybe AddressesScopedListWarning)
326− }
328+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
327329
328330-- | Creates a value of 'AddressesScopedList' with the minimum fields required to make a request.
329331--
@@ -393,7 +395,7 @@ data AddressesScopedListWarning = AddressesScopedListWarning
393395 { _aslwData :: !(Maybe [AddressesScopedListItemDataWarning])
394396 , _aslwCode :: !(Maybe AddressesScopedListCodeWarning)
395397 , _aslwMessage :: !(Maybe Text)
396− }
398+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
397399
398400-- | Creates a value of 'AddressesScopedListWarning' with the minimum fields required to make a request.
399401--
@@ -444,7 +446,7 @@ data AttachedDisk = AttachedDisk
444446 , _adLicenses :: !(Maybe [Text])
445447 , _adType :: !(Maybe AttachedDiskType)
446448 , _adIndex :: !(Maybe Int32)
447− }
449+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
448450
449451-- | Creates a value of 'AttachedDisk' with the minimum fields required to make a request.
450452--
@@ -871,7 +873,7 @@ aId = lens _aId (\ s a -> s{_aId = a})
871873data AutoscalersScopedList = AutoscalersScopedList
872874 { _aAutoscalers :: !(Maybe [Maybe Autoscaler])
873875 , _aWarning :: !(Maybe AutoscalersScopedListWarning)
874− }
876+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
875877
876878-- | Creates a value of 'AutoscalersScopedList' with the minimum fields required to make a request.
877879--
@@ -938,7 +940,7 @@ data AutoscalersScopedListWarning = AutoscalersScopedListWarning
938940 { _aData :: !(Maybe [AutoscalersScopedListItemDataWarning])
939941 , _aCode :: !(Maybe AutoscalersScopedListCodeWarning)
940942 , _aMessage :: !(Maybe Text)
941− }
943+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
942944
943945-- | Creates a value of 'AutoscalersScopedListWarning' with the minimum fields required to make a request.
944946--
@@ -1095,7 +1097,7 @@ data AutoscalingPolicyCustomMetricUtilization = AutoscalingPolicyCustomMetricUti
10951097 { _apcmuUtilizationTarget :: !(Maybe Double)
10961098 , _apcmuMetric :: !(Maybe Text)
10971099 , _apcmuUtilizationTargetType :: !(Maybe AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType)
1098− }
1100+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
10991101
11001102-- | Creates a value of 'AutoscalingPolicyCustomMetricUtilization' with the minimum fields required to make a request.
11011103--
@@ -1178,7 +1180,7 @@ data Backend = Backend
11781180 , _bMaxRatePerInstance :: !(Maybe Float)
11791181 , _bDescription :: !(Maybe Text)
11801182 , _bCapacityScaler :: !(Maybe Float)
1181− }
1183+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
11821184
11831185-- | Creates a value of 'Backend' with the minimum fields required to make a request.
11841186--
@@ -1283,7 +1285,7 @@ data BackendService = BackendService
12831285 , _bsPortName :: !(Maybe Text)
12841286 , _bsHealthChecks :: !(Maybe [Text])
12851287 , _bsPort :: !(Maybe Int32)
1286− }
1288+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
12871289
12881290-- | Creates a value of 'BackendService' with the minimum fields required to make a request.
12891291--
@@ -1522,7 +1524,7 @@ data DeprecationStatus = DeprecationStatus
15221524 , _dsReplacement :: !(Maybe Text)
15231525 , _dsObsolete :: !(Maybe Text)
15241526 , _dsDeprecated :: !(Maybe Text)
1525− }
1527+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
15261528
15271529-- | Creates a value of 'DeprecationStatus' with the minimum fields required to make a request.
15281530--
@@ -1606,7 +1608,7 @@ data Disk = Disk
16061608 , _dType :: !(Maybe Text)
16071609 , _dDescription :: !(Maybe Text)
16081610 , _dSourceSnapshot :: !(Maybe Text)
1609− }
1611+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
16101612
16111613-- | Creates a value of 'Disk' with the minimum fields required to make a request.
16121614--
@@ -2227,7 +2229,7 @@ dtlId = lens _dtlId (\ s a -> s{_dtlId = a})
22272229data DiskTypesScopedList = DiskTypesScopedList
22282230 { _dtslDiskTypes :: !(Maybe [Maybe DiskType])
22292231 , _dtslWarning :: !(Maybe DiskTypesScopedListWarning)
2230− }
2232+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
22312233
22322234-- | Creates a value of 'DiskTypesScopedList' with the minimum fields required to make a request.
22332235--
@@ -2298,7 +2300,7 @@ data DiskTypesScopedListWarning = DiskTypesScopedListWarning
22982300 { _dtslwData :: !(Maybe [DiskTypesScopedListItemDataWarning])
22992301 , _dtslwCode :: !(Maybe DiskTypesScopedListCodeWarning)
23002302 , _dtslwMessage :: !(Maybe Text)
2301− }
2303+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
23022304
23032305-- | Creates a value of 'DiskTypesScopedListWarning' with the minimum fields required to make a request.
23042306--
@@ -2340,7 +2342,7 @@ dtslwMessage
23402342data DisksScopedList = DisksScopedList
23412343 { _dslWarning :: !(Maybe DisksScopedListWarning)
23422344 , _dslDisks :: !(Maybe [Maybe Disk])
2343− }
2345+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
23442346
23452347-- | Creates a value of 'DisksScopedList' with the minimum fields required to make a request.
23462348--
@@ -2410,7 +2412,7 @@ data DisksScopedListWarning = DisksScopedListWarning
24102412 { _dslwData :: !(Maybe [DisksScopedListItemDataWarning])
24112413 , _dslwCode :: !(Maybe DisksScopedListCodeWarning)
24122414 , _dslwMessage :: !(Maybe Text)
2413− }
2415+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
24142416
24152417-- | Creates a value of 'DisksScopedListWarning' with the minimum fields required to make a request.
24162418--
@@ -2714,7 +2716,7 @@ data ForwardingRule = ForwardingRule
27142716 , _frRegion :: !(Maybe Text)
27152717 , _frDescription :: !(Maybe Text)
27162718 , _frTarget :: !(Maybe Text)
2717− }
2719+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
27182720
27192721-- | Creates a value of 'ForwardingRule' with the minimum fields required to make a request.
27202722--
@@ -2967,7 +2969,7 @@ frlId = lens _frlId (\ s a -> s{_frlId = a})
29672969data ForwardingRulesScopedList = ForwardingRulesScopedList
29682970 { _frslWarning :: !(Maybe ForwardingRulesScopedListWarning)
29692971 , _frslForwardingRules :: !(Maybe [Maybe ForwardingRule])
2970− }
2972+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
29712973
29722974-- | Creates a value of 'ForwardingRulesScopedList' with the minimum fields required to make a request.
29732975--
@@ -3038,7 +3040,7 @@ data ForwardingRulesScopedListWarning = ForwardingRulesScopedListWarning
30383040 { _frslwData :: !(Maybe [ForwardingRulesScopedListItemDataWarning])
30393041 , _frslwCode :: !(Maybe ForwardingRulesScopedListCodeWarning)
30403042 , _frslwMessage :: !(Maybe Text)
3041− }
3043+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
30423044
30433045-- | Creates a value of 'ForwardingRulesScopedListWarning' with the minimum fields required to make a request.
30443046--
@@ -3105,7 +3107,7 @@ data HealthStatus = HealthStatus
31053107 , _hsHealthState :: !(Maybe HealthStatusHealthState)
31063108 , _hsPort :: !(Maybe Int32)
31073109 , _hsInstance :: !(Maybe Text)
3108− }
3110+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
31093111
31103112-- | Creates a value of 'HealthStatus' with the minimum fields required to make a request.
31113113--
@@ -3428,7 +3430,7 @@ data Image = Image
34283430 , _imaSourceDisk :: !(Maybe Text)
34293431 , _imaDescription :: !(Maybe Text)
34303432 , _imaDeprecated :: !(Maybe (Maybe DeprecationStatus))
3431− }
3433+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
34323434
34333435-- | Creates a value of 'Image' with the minimum fields required to make a request.
34343436--
@@ -3653,7 +3655,7 @@ data ImageRawDisk = ImageRawDisk
36533655 { _irdContainerType :: !(Maybe ImageContainerTypeRawDisk)
36543656 , _irdSource :: !(Maybe Text)
36553657 , _irdSha1Checksum :: !(Maybe Text)
3656− }
3658+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
36573659
36583660-- | Creates a value of 'ImageRawDisk' with the minimum fields required to make a request.
36593661--
@@ -3717,7 +3719,7 @@ data Instance = Instance
37173719 , _iCanIpForward :: !(Maybe Bool)
37183720 , _iDescription :: !(Maybe Text)
37193721 , _iTags :: !(Maybe (Maybe Tags))
3720− }
3722+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
37213723
37223724-- | Creates a value of 'Instance' with the minimum fields required to make a request.
37233725--
@@ -4749,7 +4751,7 @@ igmrirInstances
47494751data InstanceGroupManagersScopedList = InstanceGroupManagersScopedList
47504752 { _igmslWarning :: !(Maybe InstanceGroupManagersScopedListWarning)
47514753 , _igmslInstanceGroupManagers :: !(Maybe [Maybe InstanceGroupManager])
4752− }
4754+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
47534755
47544756-- | Creates a value of 'InstanceGroupManagersScopedList' with the minimum fields required to make a request.
47554757--
@@ -4822,7 +4824,7 @@ data InstanceGroupManagersScopedListWarning = InstanceGroupManagersScopedListWar
48224824 { _igmslwData :: !(Maybe [InstanceGroupManagersScopedListItemDataWarning])
48234825 , _igmslwCode :: !(Maybe InstanceGroupManagersScopedListCodeWarning)
48244826 , _igmslwMessage :: !(Maybe Text)
4825− }
4827+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
48264828
48274829-- | Creates a value of 'InstanceGroupManagersScopedListWarning' with the minimum fields required to make a request.
48284830--
@@ -5023,7 +5025,7 @@ igliId = lens _igliId (\ s a -> s{_igliId = a})
50235025-- /See:/ 'instanceGroupsListInstancesRequest' smart constructor.
50245026newtype InstanceGroupsListInstancesRequest = InstanceGroupsListInstancesRequest
50255027 { _iglirInstanceState :: Maybe InstanceGroupsListInstancesRequestInstanceState
5026− }
5028+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
50275029
50285030-- | Creates a value of 'InstanceGroupsListInstancesRequest' with the minimum fields required to make a request.
50295031--
@@ -5076,7 +5078,7 @@ igrirInstances
50765078data InstanceGroupsScopedList = InstanceGroupsScopedList
50775079 { _igslWarning :: !(Maybe InstanceGroupsScopedListWarning)
50785080 , _igslInstanceGroups :: !(Maybe [Maybe InstanceGroup])
5079− }
5081+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
50805082
50815083-- | Creates a value of 'InstanceGroupsScopedList' with the minimum fields required to make a request.
50825084--
@@ -5148,7 +5150,7 @@ data InstanceGroupsScopedListWarning = InstanceGroupsScopedListWarning
51485150 { _igslwData :: !(Maybe [InstanceGroupsScopedListItemDataWarning])
51495151 , _igslwCode :: !(Maybe InstanceGroupsScopedListCodeWarning)
51505152 , _igslwMessage :: !(Maybe Text)
5151− }
5153+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
51525154
51535155-- | Creates a value of 'InstanceGroupsScopedListWarning' with the minimum fields required to make a request.
51545156--
@@ -5626,7 +5628,7 @@ data InstanceWithNamedPorts = InstanceWithNamedPorts
56265628 { _iwnpStatus :: !(Maybe InstanceWithNamedPortsStatus)
56275629 , _iwnpNamedPorts :: !(Maybe [Maybe NamedPort])
56285630 , _iwnpInstance :: !(Maybe Text)
5629− }
5631+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
56305632
56315633-- | Creates a value of 'InstanceWithNamedPorts' with the minimum fields required to make a request.
56325634--
@@ -5669,7 +5671,7 @@ iwnpInstance
56695671data InstancesScopedList = InstancesScopedList
56705672 { _islWarning :: !(Maybe InstancesScopedListWarning)
56715673 , _islInstances :: !(Maybe [Maybe Instance])
5672− }
5674+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
56735675
56745676-- | Creates a value of 'InstancesScopedList' with the minimum fields required to make a request.
56755677--
@@ -5739,7 +5741,7 @@ data InstancesScopedListWarning = InstancesScopedListWarning
57395741 { _islwData :: !(Maybe [InstancesScopedListItemDataWarning])
57405742 , _islwCode :: !(Maybe InstancesScopedListCodeWarning)
57415743 , _islwMessage :: !(Maybe Text)
5742− }
5744+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
57435745
57445746-- | Creates a value of 'InstancesScopedListWarning' with the minimum fields required to make a request.
57455747--
@@ -6137,7 +6139,7 @@ mtlId = lens _mtlId (\ s a -> s{_mtlId = a})
61376139data MachineTypesScopedList = MachineTypesScopedList
61386140 { _mtslMachineTypes :: !(Maybe [Maybe MachineType])
61396141 , _mtslWarning :: !(Maybe MachineTypesScopedListWarning)
6140− }
6142+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
61416143
61426144-- | Creates a value of 'MachineTypesScopedList' with the minimum fields required to make a request.
61436145--
@@ -6208,7 +6210,7 @@ data MachineTypesScopedListWarning = MachineTypesScopedListWarning
62086210 { _mtslwData :: !(Maybe [MachineTypesScopedListItemDataWarning])
62096211 , _mtslwCode :: !(Maybe MachineTypesScopedListCodeWarning)
62106212 , _mtslwMessage :: !(Maybe Text)
6211− }
6213+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
62126214
62136215-- | Creates a value of 'MachineTypesScopedListWarning' with the minimum fields required to make a request.
62146216--
@@ -6253,7 +6255,7 @@ data ManagedInstance = ManagedInstance
62536255 , _miId :: !(Maybe Word64)
62546256 , _miInstanceStatus :: !(Maybe ManagedInstanceInstanceStatus)
62556257 , _miInstance :: !(Maybe Text)
6256− }
6258+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
62576259
62586260-- | Creates a value of 'ManagedInstance' with the minimum fields required to make a request.
62596261--
@@ -6768,7 +6770,7 @@ data Operation = Operation
67686770 , _oRegion :: !(Maybe Text)
67696771 , _oTargetLink :: !(Maybe Text)
67706772 , _oClientOperationId :: !(Maybe Text)
6771− }
6773+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
67726774
67736775-- | Creates a value of 'Operation' with the minimum fields required to make a request.
67746776--
@@ -7150,7 +7152,7 @@ data OperationItemWarnings = OperationItemWarnings
71507152 { _oiwData :: !(Maybe [OperationItemDataItemWarnings])
71517153 , _oiwCode :: !(Maybe OperationCodeItemWarnings)
71527154 , _oiwMessage :: !(Maybe Text)
7153− }
7155+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
71547156
71557157-- | Creates a value of 'OperationItemWarnings' with the minimum fields required to make a request.
71567158--
@@ -7251,7 +7253,7 @@ olId = lens _olId (\ s a -> s{_olId = a})
72517253data OperationsScopedList = OperationsScopedList
72527254 { _oslWarning :: !(Maybe OperationsScopedListWarning)
72537255 , _oslOperations :: !(Maybe [Maybe Operation])
7254− }
7256+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
72557257
72567258-- | Creates a value of 'OperationsScopedList' with the minimum fields required to make a request.
72577259--
@@ -7322,7 +7324,7 @@ data OperationsScopedListWarning = OperationsScopedListWarning
73227324 { _oslwData :: !(Maybe [OperationsScopedListItemDataWarning])
73237325 , _oslwCode :: !(Maybe OperationsScopedListCodeWarning)
73247326 , _oslwMessage :: !(Maybe Text)
7325− }
7327+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
73267328
73277329-- | Creates a value of 'OperationsScopedListWarning' with the minimum fields required to make a request.
73287330--
@@ -7574,7 +7576,7 @@ data Quota = Quota
75747576 { _qMetric :: !(Maybe QuotaMetric)
75757577 , _qLimit :: !(Maybe Double)
75767578 , _qUsage :: !(Maybe Double)
7577− }
7579+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
75787580
75797581-- | Creates a value of 'Quota' with the minimum fields required to make a request.
75807582--
@@ -7620,7 +7622,7 @@ data Region = Region
76207622 , _rId :: !(Maybe Word64)
76217623 , _rDescription :: !(Maybe Text)
76227624 , _rDeprecated :: !(Maybe (Maybe DeprecationStatus))
7623− }
7625+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
76247626
76257627-- | Creates a value of 'Region' with the minimum fields required to make a request.
76267628--
@@ -7829,7 +7831,7 @@ data Route = Route
78297831 , _rrDescription :: !(Maybe Text)
78307832 , _rrTags :: !(Maybe [Text])
78317833 , _rrNextHopInstance :: !(Maybe Text)
7832− }
7834+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
78337835
78347836-- | Creates a value of 'Route' with the minimum fields required to make a request.
78357837--
@@ -8027,7 +8029,7 @@ data RouteItemWarnings = RouteItemWarnings
80278029 { _riwData :: !(Maybe [RouteItemDataItemWarnings])
80288030 , _riwCode :: !(Maybe RouteCodeItemWarnings)
80298031 , _riwMessage :: !(Maybe Text)
8030− }
8032+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
80318033
80328034-- | Creates a value of 'RouteItemWarnings' with the minimum fields required to make a request.
80338035--
@@ -8130,7 +8132,7 @@ data Scheduling = Scheduling
81308132 { _sAutomaticRestart :: !(Maybe Bool)
81318133 , _sOnHostMaintenance :: !(Maybe SchedulingOnHostMaintenance)
81328134 , _sPreemptible :: !(Maybe Bool)
8133− }
8135+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
81348136
81358137-- | Creates a value of 'Scheduling' with the minimum fields required to make a request.
81368138--
@@ -8266,7 +8268,7 @@ data Snapshot = Snapshot
82668268 , _sLicenses :: !(Maybe [Text])
82678269 , _sSourceDisk :: !(Maybe Text)
82688270 , _sDescription :: !(Maybe Text)
8269− }
8271+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
82708272
82718273-- | Creates a value of 'Snapshot' with the minimum fields required to make a request.
82728274--
@@ -8658,7 +8660,7 @@ data TargetInstance = TargetInstance
86588660 , _tiId :: !(Maybe Word64)
86598661 , _tiDescription :: !(Maybe Text)
86608662 , _tiInstance :: !(Maybe Text)
8661− }
8663+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
86628664
86638665-- | Creates a value of 'TargetInstance' with the minimum fields required to make a request.
86648666--
@@ -8884,7 +8886,7 @@ tilId = lens _tilId (\ s a -> s{_tilId = a})
88848886data TargetInstancesScopedList = TargetInstancesScopedList
88858887 { _tislWarning :: !(Maybe TargetInstancesScopedListWarning)
88868888 , _tislTargetInstances :: !(Maybe [Maybe TargetInstance])
8887− }
8889+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
88888890
88898891-- | Creates a value of 'TargetInstancesScopedList' with the minimum fields required to make a request.
88908892--
@@ -8955,7 +8957,7 @@ data TargetInstancesScopedListWarning = TargetInstancesScopedListWarning
89558957 { _tislwData :: !(Maybe [TargetInstancesScopedListItemDataWarning])
89568958 , _tislwCode :: !(Maybe TargetInstancesScopedListCodeWarning)
89578959 , _tislwMessage :: !(Maybe Text)
8958− }
8960+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
89598961
89608962-- | Creates a value of 'TargetInstancesScopedListWarning' with the minimum fields required to make a request.
89618963--
@@ -9009,7 +9011,7 @@ data TargetPool = TargetPool
90099011 , _tpRegion :: !(Maybe Text)
90109012 , _tpDescription :: !(Maybe Text)
90119013 , _tpHealthChecks :: !(Maybe [Text])
9012− }
9014+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
90139015
90149016-- | Creates a value of 'TargetPool' with the minimum fields required to make a request.
90159017--
@@ -9433,7 +9435,7 @@ tprirInstances
94339435data TargetPoolsScopedList = TargetPoolsScopedList
94349436 { _tpslWarning :: !(Maybe TargetPoolsScopedListWarning)
94359437 , _tpslTargetPools :: !(Maybe [Maybe TargetPool])
9436− }
9438+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
94379439
94389440-- | Creates a value of 'TargetPoolsScopedList' with the minimum fields required to make a request.
94399441--
@@ -9504,7 +9506,7 @@ data TargetPoolsScopedListWarning = TargetPoolsScopedListWarning
95049506 { _tpslwData :: !(Maybe [TargetPoolsScopedListItemDataWarning])
95059507 , _tpslwCode :: !(Maybe TargetPoolsScopedListCodeWarning)
95069508 , _tpslwMessage :: !(Maybe Text)
9507− }
9509+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
95089510
95099511-- | Creates a value of 'TargetPoolsScopedListWarning' with the minimum fields required to make a request.
95109512--
@@ -9576,7 +9578,7 @@ data TargetVpnGateway = TargetVpnGateway
95769578 , _tvgTunnels :: !(Maybe [Text])
95779579 , _tvgDescription :: !(Maybe Text)
95789580 , _tvgForwardingRules :: !(Maybe [Text])
9579− }
9581+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
95809582
95819583-- | Creates a value of 'TargetVpnGateway' with the minimum fields required to make a request.
95829584--
@@ -9832,7 +9834,7 @@ tvglId = lens _tvglId (\ s a -> s{_tvglId = a})
98329834data TargetVpnGatewaysScopedList = TargetVpnGatewaysScopedList
98339835 { _tvgslTargetVpnGateways :: !(Maybe [Maybe TargetVpnGateway])
98349836 , _tvgslWarning :: !(Maybe TargetVpnGatewaysScopedListWarning)
9835− }
9837+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
98369838
98379839-- | Creates a value of 'TargetVpnGatewaysScopedList' with the minimum fields required to make a request.
98389840--
@@ -9904,7 +9906,7 @@ data TargetVpnGatewaysScopedListWarning = TargetVpnGatewaysScopedListWarning
99049906 { _tvgslwData :: !(Maybe [TargetVpnGatewaysScopedListItemDataWarning])
99059907 , _tvgslwCode :: !(Maybe TargetVpnGatewaysScopedListCodeWarning)
99069908 , _tvgslwMessage :: !(Maybe Text)
9907− }
9909+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
99089910
99099911-- | Creates a value of 'TargetVpnGatewaysScopedListWarning' with the minimum fields required to make a request.
99109912--
@@ -10419,7 +10421,7 @@ data VpnTunnel = VpnTunnel
1041910421 , _vtIkeVersion :: !(Maybe Int32)
1042010422 , _vtRegion :: !(Maybe Text)
1042110423 , _vtDescription :: !(Maybe Text)
10422− }
10424+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1042310425
1042410426-- | Creates a value of 'VpnTunnel' with the minimum fields required to make a request.
1042510427--
@@ -10692,7 +10694,7 @@ vtlId = lens _vtlId (\ s a -> s{_vtlId = a})
1069210694data VpnTunnelsScopedList = VpnTunnelsScopedList
1069310695 { _vtslVpnTunnels :: !(Maybe [Maybe VpnTunnel])
1069410696 , _vtslWarning :: !(Maybe VpnTunnelsScopedListWarning)
10695− }
10697+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1069610698
1069710699-- | Creates a value of 'VpnTunnelsScopedList' with the minimum fields required to make a request.
1069810700--
@@ -10763,7 +10765,7 @@ data VpnTunnelsScopedListWarning = VpnTunnelsScopedListWarning
1076310765 { _vtslwData :: !(Maybe [VpnTunnelsScopedListItemDataWarning])
1076410766 , _vtslwCode :: !(Maybe VpnTunnelsScopedListCodeWarning)
1076510767 , _vtslwMessage :: !(Maybe Text)
10766− }
10768+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1076710769
1076810770-- | Creates a value of 'VpnTunnelsScopedListWarning' with the minimum fields required to make a request.
1076910771--
@@ -10814,7 +10816,7 @@ data Zone = Zone
1081410816 , _zRegion :: !(Maybe Text)
1081510817 , _zDescription :: !(Maybe Text)
1081610818 , _zDeprecated :: !(Maybe (Maybe DeprecationStatus))
10817− }
10819+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1081810820
1081910821-- | Creates a value of 'Zone' with the minimum fields required to make a request.
1082010822--
gogol-compute/gen/Network/Google/Compute/Types/Sum.hs+1032
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Compute.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -23,6 +26,15 @@ data AccessConfigType
2326
2427instance Hashable AccessConfigType
2528
29+instance FromText AccessConfigType where
30+ fromText = \case
31+ "ONE_TO_ONE_NAT" -> Just ACTOneToOneNAT
32+ _ -> Nothing
33+
34+instance ToText AccessConfigType where
35+ toText = \case
36+ ACTOneToOneNAT -> "ONE_TO_ONE_NAT"
37+
2638-- | [Output Only] The status of the address, which can be either IN_USE or
2739-- RESERVED. An address that is RESERVED is currently reserved and
2840-- available to use. An IN_USE address is currently being used by another
@@ -36,6 +48,17 @@ data AddressStatus
3648
3749instance Hashable AddressStatus
3850
51+instance FromText AddressStatus where
52+ fromText = \case
53+ "IN_USE" -> Just ASInUse
54+ "RESERVED" -> Just ASReserved
55+ _ -> Nothing
56+
57+instance ToText AddressStatus where
58+ toText = \case
59+ ASInUse -> "IN_USE"
60+ ASReserved -> "RESERVED"
61+
3962-- | [Output Only] The warning type identifier for this warning.
4063data AddressesScopedListCodeWarning
4164 = ASLCWDeprecatedResourceUsed
@@ -70,6 +93,41 @@ data AddressesScopedListCodeWarning
7093
7194instance Hashable AddressesScopedListCodeWarning
7295
96+instance FromText AddressesScopedListCodeWarning where
97+ fromText = \case
98+ "DEPRECATED_RESOURCE_USED" -> Just ASLCWDeprecatedResourceUsed
99+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just ASLCWDiskSizeLargerThanImageSize
100+ "INJECTED_KERNELS_DEPRECATED" -> Just ASLCWInjectedKernelsDeprecated
101+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just ASLCWNextHopAddressNotAssigned
102+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just ASLCWNextHopCannotIPForward
103+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just ASLCWNextHopInstanceNotFound
104+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just ASLCWNextHopInstanceNotOnNetwork
105+ "NEXT_HOP_NOT_RUNNING" -> Just ASLCWNextHopNotRunning
106+ "NOT_CRITICAL_ERROR" -> Just ASLCWNotCriticalError
107+ "NO_RESULTS_ON_PAGE" -> Just ASLCWNoResultsOnPage
108+ "REQUIRED_TOS_AGREEMENT" -> Just ASLCWRequiredTosAgreement
109+ "RESOURCE_NOT_DELETED" -> Just ASLCWResourceNotDeleted
110+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just ASLCWSingleInstancePropertyTemplate
111+ "UNREACHABLE" -> Just ASLCWUnreachable
112+ _ -> Nothing
113+
114+instance ToText AddressesScopedListCodeWarning where
115+ toText = \case
116+ ASLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
117+ ASLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
118+ ASLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
119+ ASLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
120+ ASLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
121+ ASLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
122+ ASLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
123+ ASLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
124+ ASLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
125+ ASLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
126+ ASLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
127+ ASLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
128+ ASLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
129+ ASLCWUnreachable -> "UNREACHABLE"
130+
73131data AttachedDiskInterface
74132 = ADINvme
75133 -- ^ @NVME@
@@ -79,6 +137,17 @@ data AttachedDiskInterface
79137
80138instance Hashable AttachedDiskInterface
81139
140+instance FromText AttachedDiskInterface where
141+ fromText = \case
142+ "NVME" -> Just ADINvme
143+ "SCSI" -> Just ADIScsi
144+ _ -> Nothing
145+
146+instance ToText AttachedDiskInterface where
147+ toText = \case
148+ ADINvme -> "NVME"
149+ ADIScsi -> "SCSI"
150+
82151-- | The mode in which to attach this disk, either READ_WRITE or READ_ONLY.
83152-- If not specified, the default is to attach the disk in READ_WRITE mode.
84153data AttachedDiskMode
@@ -90,6 +159,17 @@ data AttachedDiskMode
90159
91160instance Hashable AttachedDiskMode
92161
162+instance FromText AttachedDiskMode where
163+ fromText = \case
164+ "READ_ONLY" -> Just ADMReadOnly
165+ "READ_WRITE" -> Just ADMReadWrite
166+ _ -> Nothing
167+
168+instance ToText AttachedDiskMode where
169+ toText = \case
170+ ADMReadOnly -> "READ_ONLY"
171+ ADMReadWrite -> "READ_WRITE"
172+
93173-- | Specifies the type of the disk, either SCRATCH or PERSISTENT. If not
94174-- specified, the default is PERSISTENT.
95175data AttachedDiskType
@@ -101,6 +181,17 @@ data AttachedDiskType
101181
102182instance Hashable AttachedDiskType
103183
184+instance FromText AttachedDiskType where
185+ fromText = \case
186+ "PERSISTENT" -> Just ADTPersistent
187+ "SCRATCH" -> Just ADTScratch
188+ _ -> Nothing
189+
190+instance ToText AttachedDiskType where
191+ toText = \case
192+ ADTPersistent -> "PERSISTENT"
193+ ADTScratch -> "SCRATCH"
194+
104195-- | [Output Only] The warning type identifier for this warning.
105196data AutoscalersScopedListCodeWarning
106197 = ADeprecatedResourceUsed
@@ -135,6 +226,41 @@ data AutoscalersScopedListCodeWarning
135226
136227instance Hashable AutoscalersScopedListCodeWarning
137228
229+instance FromText AutoscalersScopedListCodeWarning where
230+ fromText = \case
231+ "DEPRECATED_RESOURCE_USED" -> Just ADeprecatedResourceUsed
232+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just ADiskSizeLargerThanImageSize
233+ "INJECTED_KERNELS_DEPRECATED" -> Just AInjectedKernelsDeprecated
234+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just ANextHopAddressNotAssigned
235+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just ANextHopCannotIPForward
236+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just ANextHopInstanceNotFound
237+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just ANextHopInstanceNotOnNetwork
238+ "NEXT_HOP_NOT_RUNNING" -> Just ANextHopNotRunning
239+ "NOT_CRITICAL_ERROR" -> Just ANotCriticalError
240+ "NO_RESULTS_ON_PAGE" -> Just ANoResultsOnPage
241+ "REQUIRED_TOS_AGREEMENT" -> Just ARequiredTosAgreement
242+ "RESOURCE_NOT_DELETED" -> Just AResourceNotDeleted
243+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just ASingleInstancePropertyTemplate
244+ "UNREACHABLE" -> Just AUnreachable
245+ _ -> Nothing
246+
247+instance ToText AutoscalersScopedListCodeWarning where
248+ toText = \case
249+ ADeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
250+ ADiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
251+ AInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
252+ ANextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
253+ ANextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
254+ ANextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
255+ ANextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
256+ ANextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
257+ ANotCriticalError -> "NOT_CRITICAL_ERROR"
258+ ANoResultsOnPage -> "NO_RESULTS_ON_PAGE"
259+ ARequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
260+ AResourceNotDeleted -> "RESOURCE_NOT_DELETED"
261+ ASingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
262+ AUnreachable -> "UNREACHABLE"
263+
138264-- | Defines type in which utilization_target is expressed.
139265data AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType
140266 = APCMUUTTDeltaPerMinute
@@ -147,6 +273,19 @@ data AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType
147273
148274instance Hashable AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType
149275
276+instance FromText AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType where
277+ fromText = \case
278+ "DELTA_PER_MINUTE" -> Just APCMUUTTDeltaPerMinute
279+ "DELTA_PER_SECOND" -> Just APCMUUTTDeltaPerSecond
280+ "GAUGE" -> Just APCMUUTTGauge
281+ _ -> Nothing
282+
283+instance ToText AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType where
284+ toText = \case
285+ APCMUUTTDeltaPerMinute -> "DELTA_PER_MINUTE"
286+ APCMUUTTDeltaPerSecond -> "DELTA_PER_SECOND"
287+ APCMUUTTGauge -> "GAUGE"
288+
150289-- | Specifies the balancing mode for this backend. The default is
151290-- UTILIZATION but available values are UTILIZATION and RATE.
152291data BackendBalancingMode
@@ -158,6 +297,17 @@ data BackendBalancingMode
158297
159298instance Hashable BackendBalancingMode
160299
300+instance FromText BackendBalancingMode where
301+ fromText = \case
302+ "RATE" -> Just BBMRate
303+ "UTILIZATION" -> Just BBMUtilization
304+ _ -> Nothing
305+
306+instance ToText BackendBalancingMode where
307+ toText = \case
308+ BBMRate -> "RATE"
309+ BBMUtilization -> "UTILIZATION"
310+
161311data BackendServiceProtocol
162312 = BSPHTTP
163313 -- ^ @HTTP@
@@ -165,6 +315,15 @@ data BackendServiceProtocol
165315
166316instance Hashable BackendServiceProtocol
167317
318+instance FromText BackendServiceProtocol where
319+ fromText = \case
320+ "HTTP" -> Just BSPHTTP
321+ _ -> Nothing
322+
323+instance ToText BackendServiceProtocol where
324+ toText = \case
325+ BSPHTTP -> "HTTP"
326+
168327-- | The deprecation state of this resource. This can be DEPRECATED,
169328-- OBSOLETE, or DELETED. Operations which create a new resource using a
170329-- DEPRECATED resource will return successfully, but with a warning
@@ -182,6 +341,19 @@ data DeprecationStatusState
182341
183342instance Hashable DeprecationStatusState
184343
344+instance FromText DeprecationStatusState where
345+ fromText = \case
346+ "DELETED" -> Just DSSDeleted
347+ "DEPRECATED" -> Just DSSDeprecated
348+ "OBSOLETE" -> Just DSSObsolete
349+ _ -> Nothing
350+
351+instance ToText DeprecationStatusState where
352+ toText = \case
353+ DSSDeleted -> "DELETED"
354+ DSSDeprecated -> "DEPRECATED"
355+ DSSObsolete -> "OBSOLETE"
356+
185357-- | [Output Only] The status of disk creation. Applicable statuses includes:
186358-- CREATING, FAILED, READY, RESTORING.
187359data DiskStatus
@@ -197,6 +369,21 @@ data DiskStatus
197369
198370instance Hashable DiskStatus
199371
372+instance FromText DiskStatus where
373+ fromText = \case
374+ "CREATING" -> Just DSCreating
375+ "FAILED" -> Just DSFailed
376+ "READY" -> Just DSReady
377+ "RESTORING" -> Just DSRestoring
378+ _ -> Nothing
379+
380+instance ToText DiskStatus where
381+ toText = \case
382+ DSCreating -> "CREATING"
383+ DSFailed -> "FAILED"
384+ DSReady -> "READY"
385+ DSRestoring -> "RESTORING"
386+
200387-- | [Output Only] The warning type identifier for this warning.
201388data DiskTypesScopedListCodeWarning
202389 = DTSLCWDeprecatedResourceUsed
@@ -231,6 +418,41 @@ data DiskTypesScopedListCodeWarning
231418
232419instance Hashable DiskTypesScopedListCodeWarning
233420
421+instance FromText DiskTypesScopedListCodeWarning where
422+ fromText = \case
423+ "DEPRECATED_RESOURCE_USED" -> Just DTSLCWDeprecatedResourceUsed
424+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just DTSLCWDiskSizeLargerThanImageSize
425+ "INJECTED_KERNELS_DEPRECATED" -> Just DTSLCWInjectedKernelsDeprecated
426+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just DTSLCWNextHopAddressNotAssigned
427+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just DTSLCWNextHopCannotIPForward
428+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just DTSLCWNextHopInstanceNotFound
429+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just DTSLCWNextHopInstanceNotOnNetwork
430+ "NEXT_HOP_NOT_RUNNING" -> Just DTSLCWNextHopNotRunning
431+ "NOT_CRITICAL_ERROR" -> Just DTSLCWNotCriticalError
432+ "NO_RESULTS_ON_PAGE" -> Just DTSLCWNoResultsOnPage
433+ "REQUIRED_TOS_AGREEMENT" -> Just DTSLCWRequiredTosAgreement
434+ "RESOURCE_NOT_DELETED" -> Just DTSLCWResourceNotDeleted
435+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just DTSLCWSingleInstancePropertyTemplate
436+ "UNREACHABLE" -> Just DTSLCWUnreachable
437+ _ -> Nothing
438+
439+instance ToText DiskTypesScopedListCodeWarning where
440+ toText = \case
441+ DTSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
442+ DTSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
443+ DTSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
444+ DTSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
445+ DTSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
446+ DTSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
447+ DTSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
448+ DTSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
449+ DTSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
450+ DTSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
451+ DTSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
452+ DTSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
453+ DTSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
454+ DTSLCWUnreachable -> "UNREACHABLE"
455+
234456-- | [Output Only] The warning type identifier for this warning.
235457data DisksScopedListCodeWarning
236458 = DSLCWDeprecatedResourceUsed
@@ -265,6 +487,41 @@ data DisksScopedListCodeWarning
265487
266488instance Hashable DisksScopedListCodeWarning
267489
490+instance FromText DisksScopedListCodeWarning where
491+ fromText = \case
492+ "DEPRECATED_RESOURCE_USED" -> Just DSLCWDeprecatedResourceUsed
493+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just DSLCWDiskSizeLargerThanImageSize
494+ "INJECTED_KERNELS_DEPRECATED" -> Just DSLCWInjectedKernelsDeprecated
495+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just DSLCWNextHopAddressNotAssigned
496+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just DSLCWNextHopCannotIPForward
497+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just DSLCWNextHopInstanceNotFound
498+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just DSLCWNextHopInstanceNotOnNetwork
499+ "NEXT_HOP_NOT_RUNNING" -> Just DSLCWNextHopNotRunning
500+ "NOT_CRITICAL_ERROR" -> Just DSLCWNotCriticalError
501+ "NO_RESULTS_ON_PAGE" -> Just DSLCWNoResultsOnPage
502+ "REQUIRED_TOS_AGREEMENT" -> Just DSLCWRequiredTosAgreement
503+ "RESOURCE_NOT_DELETED" -> Just DSLCWResourceNotDeleted
504+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just DSLCWSingleInstancePropertyTemplate
505+ "UNREACHABLE" -> Just DSLCWUnreachable
506+ _ -> Nothing
507+
508+instance ToText DisksScopedListCodeWarning where
509+ toText = \case
510+ DSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
511+ DSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
512+ DSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
513+ DSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
514+ DSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
515+ DSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
516+ DSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
517+ DSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
518+ DSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
519+ DSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
520+ DSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
521+ DSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
522+ DSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
523+ DSLCWUnreachable -> "UNREACHABLE"
524+
268525-- | The IP protocol to which this rule applies. Valid options are TCP, UDP,
269526-- ESP, AH or SCTP.
270527data ForwardingRuleIPProtocol
@@ -282,6 +539,23 @@ data ForwardingRuleIPProtocol
282539
283540instance Hashable ForwardingRuleIPProtocol
284541
542+instance FromText ForwardingRuleIPProtocol where
543+ fromText = \case
544+ "AH" -> Just FRIPAH
545+ "ESP" -> Just FRIPEsp
546+ "SCTP" -> Just FRIPSctp
547+ "TCP" -> Just FRIPTCP
548+ "UDP" -> Just FRIPUdp
549+ _ -> Nothing
550+
551+instance ToText ForwardingRuleIPProtocol where
552+ toText = \case
553+ FRIPAH -> "AH"
554+ FRIPEsp -> "ESP"
555+ FRIPSctp -> "SCTP"
556+ FRIPTCP -> "TCP"
557+ FRIPUdp -> "UDP"
558+
285559-- | [Output Only] The warning type identifier for this warning.
286560data ForwardingRulesScopedListCodeWarning
287561 = FRSLCWDeprecatedResourceUsed
@@ -316,6 +590,41 @@ data ForwardingRulesScopedListCodeWarning
316590
317591instance Hashable ForwardingRulesScopedListCodeWarning
318592
593+instance FromText ForwardingRulesScopedListCodeWarning where
594+ fromText = \case
595+ "DEPRECATED_RESOURCE_USED" -> Just FRSLCWDeprecatedResourceUsed
596+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just FRSLCWDiskSizeLargerThanImageSize
597+ "INJECTED_KERNELS_DEPRECATED" -> Just FRSLCWInjectedKernelsDeprecated
598+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just FRSLCWNextHopAddressNotAssigned
599+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just FRSLCWNextHopCannotIPForward
600+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just FRSLCWNextHopInstanceNotFound
601+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just FRSLCWNextHopInstanceNotOnNetwork
602+ "NEXT_HOP_NOT_RUNNING" -> Just FRSLCWNextHopNotRunning
603+ "NOT_CRITICAL_ERROR" -> Just FRSLCWNotCriticalError
604+ "NO_RESULTS_ON_PAGE" -> Just FRSLCWNoResultsOnPage
605+ "REQUIRED_TOS_AGREEMENT" -> Just FRSLCWRequiredTosAgreement
606+ "RESOURCE_NOT_DELETED" -> Just FRSLCWResourceNotDeleted
607+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just FRSLCWSingleInstancePropertyTemplate
608+ "UNREACHABLE" -> Just FRSLCWUnreachable
609+ _ -> Nothing
610+
611+instance ToText ForwardingRulesScopedListCodeWarning where
612+ toText = \case
613+ FRSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
614+ FRSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
615+ FRSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
616+ FRSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
617+ FRSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
618+ FRSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
619+ FRSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
620+ FRSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
621+ FRSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
622+ FRSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
623+ FRSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
624+ FRSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
625+ FRSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
626+ FRSLCWUnreachable -> "UNREACHABLE"
627+
319628-- | Health state of the instance.
320629data HealthStatusHealthState
321630 = HSHSHealthy
@@ -326,6 +635,17 @@ data HealthStatusHealthState
326635
327636instance Hashable HealthStatusHealthState
328637
638+instance FromText HealthStatusHealthState where
639+ fromText = \case
640+ "HEALTHY" -> Just HSHSHealthy
641+ "UNHEALTHY" -> Just HSHSUnhealthy
642+ _ -> Nothing
643+
644+instance ToText HealthStatusHealthState where
645+ toText = \case
646+ HSHSHealthy -> "HEALTHY"
647+ HSHSUnhealthy -> "UNHEALTHY"
648+
329649-- | The format used to encode and transmit the block device, which should be
330650-- TAR. This is just a container and transmission format and not a runtime
331651-- format. Provided by the client when the disk image is created.
@@ -336,6 +656,15 @@ data ImageContainerTypeRawDisk
336656
337657instance Hashable ImageContainerTypeRawDisk
338658
659+instance FromText ImageContainerTypeRawDisk where
660+ fromText = \case
661+ "TAR" -> Just ICTRDTAR
662+ _ -> Nothing
663+
664+instance ToText ImageContainerTypeRawDisk where
665+ toText = \case
666+ ICTRDTAR -> "TAR"
667+
339668-- | The type of the image used to create this disk. The default and only
340669-- value is RAW
341670data ImageSourceType
@@ -345,6 +674,15 @@ data ImageSourceType
345674
346675instance Hashable ImageSourceType
347676
677+instance FromText ImageSourceType where
678+ fromText = \case
679+ "RAW" -> Just ISTRaw
680+ _ -> Nothing
681+
682+instance ToText ImageSourceType where
683+ toText = \case
684+ ISTRaw -> "RAW"
685+
348686-- | [Output Only] The status of the image. An image can be used to create
349687-- other resources, such as instances, only after the image has been
350688-- successfully created and the status is set to READY. Possible values are
@@ -360,6 +698,19 @@ data ImageStatus
360698
361699instance Hashable ImageStatus
362700
701+instance FromText ImageStatus where
702+ fromText = \case
703+ "FAILED" -> Just ISFailed
704+ "PENDING" -> Just ISPending
705+ "READY" -> Just ISReady
706+ _ -> Nothing
707+
708+instance ToText ImageStatus where
709+ toText = \case
710+ ISFailed -> "FAILED"
711+ ISPending -> "PENDING"
712+ ISReady -> "READY"
713+
363714-- | [Output Only] The warning type identifier for this warning.
364715data InstanceGroupManagersScopedListCodeWarning
365716 = IGMSLCWDeprecatedResourceUsed
@@ -394,6 +745,41 @@ data InstanceGroupManagersScopedListCodeWarning
394745
395746instance Hashable InstanceGroupManagersScopedListCodeWarning
396747
748+instance FromText InstanceGroupManagersScopedListCodeWarning where
749+ fromText = \case
750+ "DEPRECATED_RESOURCE_USED" -> Just IGMSLCWDeprecatedResourceUsed
751+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just IGMSLCWDiskSizeLargerThanImageSize
752+ "INJECTED_KERNELS_DEPRECATED" -> Just IGMSLCWInjectedKernelsDeprecated
753+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just IGMSLCWNextHopAddressNotAssigned
754+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just IGMSLCWNextHopCannotIPForward
755+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just IGMSLCWNextHopInstanceNotFound
756+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just IGMSLCWNextHopInstanceNotOnNetwork
757+ "NEXT_HOP_NOT_RUNNING" -> Just IGMSLCWNextHopNotRunning
758+ "NOT_CRITICAL_ERROR" -> Just IGMSLCWNotCriticalError
759+ "NO_RESULTS_ON_PAGE" -> Just IGMSLCWNoResultsOnPage
760+ "REQUIRED_TOS_AGREEMENT" -> Just IGMSLCWRequiredTosAgreement
761+ "RESOURCE_NOT_DELETED" -> Just IGMSLCWResourceNotDeleted
762+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just IGMSLCWSingleInstancePropertyTemplate
763+ "UNREACHABLE" -> Just IGMSLCWUnreachable
764+ _ -> Nothing
765+
766+instance ToText InstanceGroupManagersScopedListCodeWarning where
767+ toText = \case
768+ IGMSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
769+ IGMSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
770+ IGMSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
771+ IGMSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
772+ IGMSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
773+ IGMSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
774+ IGMSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
775+ IGMSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
776+ IGMSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
777+ IGMSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
778+ IGMSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
779+ IGMSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
780+ IGMSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
781+ IGMSLCWUnreachable -> "UNREACHABLE"
782+
397783-- | A filter for the state of the instances in the instance group. Valid
398784-- options are ALL or RUNNING. If you do not specify this parameter the
399785-- list includes all instances regardless of their state.
@@ -406,6 +792,17 @@ data InstanceGroupsListInstancesRequestInstanceState
406792
407793instance Hashable InstanceGroupsListInstancesRequestInstanceState
408794
795+instance FromText InstanceGroupsListInstancesRequestInstanceState where
796+ fromText = \case
797+ "ALL" -> Just IGLIRISAll
798+ "RUNNING" -> Just IGLIRISRunning
799+ _ -> Nothing
800+
801+instance ToText InstanceGroupsListInstancesRequestInstanceState where
802+ toText = \case
803+ IGLIRISAll -> "ALL"
804+ IGLIRISRunning -> "RUNNING"
805+
409806-- | [Output Only] The warning type identifier for this warning.
410807data InstanceGroupsScopedListCodeWarning
411808 = IGSLCWDeprecatedResourceUsed
@@ -440,6 +837,41 @@ data InstanceGroupsScopedListCodeWarning
440837
441838instance Hashable InstanceGroupsScopedListCodeWarning
442839
840+instance FromText InstanceGroupsScopedListCodeWarning where
841+ fromText = \case
842+ "DEPRECATED_RESOURCE_USED" -> Just IGSLCWDeprecatedResourceUsed
843+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just IGSLCWDiskSizeLargerThanImageSize
844+ "INJECTED_KERNELS_DEPRECATED" -> Just IGSLCWInjectedKernelsDeprecated
845+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just IGSLCWNextHopAddressNotAssigned
846+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just IGSLCWNextHopCannotIPForward
847+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just IGSLCWNextHopInstanceNotFound
848+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just IGSLCWNextHopInstanceNotOnNetwork
849+ "NEXT_HOP_NOT_RUNNING" -> Just IGSLCWNextHopNotRunning
850+ "NOT_CRITICAL_ERROR" -> Just IGSLCWNotCriticalError
851+ "NO_RESULTS_ON_PAGE" -> Just IGSLCWNoResultsOnPage
852+ "REQUIRED_TOS_AGREEMENT" -> Just IGSLCWRequiredTosAgreement
853+ "RESOURCE_NOT_DELETED" -> Just IGSLCWResourceNotDeleted
854+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just IGSLCWSingleInstancePropertyTemplate
855+ "UNREACHABLE" -> Just IGSLCWUnreachable
856+ _ -> Nothing
857+
858+instance ToText InstanceGroupsScopedListCodeWarning where
859+ toText = \case
860+ IGSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
861+ IGSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
862+ IGSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
863+ IGSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
864+ IGSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
865+ IGSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
866+ IGSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
867+ IGSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
868+ IGSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
869+ IGSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
870+ IGSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
871+ IGSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
872+ IGSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
873+ IGSLCWUnreachable -> "UNREACHABLE"
874+
443875-- | [Output Only] The status of the instance. One of the following values:
444876-- PROVISIONING, STAGING, RUNNING, STOPPING, and TERMINATED.
445877data InstanceStatus
@@ -463,6 +895,29 @@ data InstanceStatus
463895
464896instance Hashable InstanceStatus
465897
898+instance FromText InstanceStatus where
899+ fromText = \case
900+ "PROVISIONING" -> Just ISProvisioning
901+ "RUNNING" -> Just ISRunning
902+ "STAGING" -> Just ISStaging
903+ "STOPPED" -> Just ISStopped
904+ "STOPPING" -> Just ISStopping
905+ "SUSPENDED" -> Just ISSuspended
906+ "SUSPENDING" -> Just ISSuspending
907+ "TERMINATED" -> Just ISTerminated
908+ _ -> Nothing
909+
910+instance ToText InstanceStatus where
911+ toText = \case
912+ ISProvisioning -> "PROVISIONING"
913+ ISRunning -> "RUNNING"
914+ ISStaging -> "STAGING"
915+ ISStopped -> "STOPPED"
916+ ISStopping -> "STOPPING"
917+ ISSuspended -> "SUSPENDED"
918+ ISSuspending -> "SUSPENDING"
919+ ISTerminated -> "TERMINATED"
920+
466921-- | The status of the instance.
467922data InstanceWithNamedPortsStatus
468923 = IWNPSProvisioning
@@ -485,6 +940,29 @@ data InstanceWithNamedPortsStatus
485940
486941instance Hashable InstanceWithNamedPortsStatus
487942
943+instance FromText InstanceWithNamedPortsStatus where
944+ fromText = \case
945+ "PROVISIONING" -> Just IWNPSProvisioning
946+ "RUNNING" -> Just IWNPSRunning
947+ "STAGING" -> Just IWNPSStaging
948+ "STOPPED" -> Just IWNPSStopped
949+ "STOPPING" -> Just IWNPSStopping
950+ "SUSPENDED" -> Just IWNPSSuspended
951+ "SUSPENDING" -> Just IWNPSSuspending
952+ "TERMINATED" -> Just IWNPSTerminated
953+ _ -> Nothing
954+
955+instance ToText InstanceWithNamedPortsStatus where
956+ toText = \case
957+ IWNPSProvisioning -> "PROVISIONING"
958+ IWNPSRunning -> "RUNNING"
959+ IWNPSStaging -> "STAGING"
960+ IWNPSStopped -> "STOPPED"
961+ IWNPSStopping -> "STOPPING"
962+ IWNPSSuspended -> "SUSPENDED"
963+ IWNPSSuspending -> "SUSPENDING"
964+ IWNPSTerminated -> "TERMINATED"
965+
488966-- | [Output Only] The warning type identifier for this warning.
489967data InstancesScopedListCodeWarning
490968 = ISLCWDeprecatedResourceUsed
@@ -519,6 +997,41 @@ data InstancesScopedListCodeWarning
519997
520998instance Hashable InstancesScopedListCodeWarning
521999
1000+instance FromText InstancesScopedListCodeWarning where
1001+ fromText = \case
1002+ "DEPRECATED_RESOURCE_USED" -> Just ISLCWDeprecatedResourceUsed
1003+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just ISLCWDiskSizeLargerThanImageSize
1004+ "INJECTED_KERNELS_DEPRECATED" -> Just ISLCWInjectedKernelsDeprecated
1005+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just ISLCWNextHopAddressNotAssigned
1006+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just ISLCWNextHopCannotIPForward
1007+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just ISLCWNextHopInstanceNotFound
1008+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just ISLCWNextHopInstanceNotOnNetwork
1009+ "NEXT_HOP_NOT_RUNNING" -> Just ISLCWNextHopNotRunning
1010+ "NOT_CRITICAL_ERROR" -> Just ISLCWNotCriticalError
1011+ "NO_RESULTS_ON_PAGE" -> Just ISLCWNoResultsOnPage
1012+ "REQUIRED_TOS_AGREEMENT" -> Just ISLCWRequiredTosAgreement
1013+ "RESOURCE_NOT_DELETED" -> Just ISLCWResourceNotDeleted
1014+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just ISLCWSingleInstancePropertyTemplate
1015+ "UNREACHABLE" -> Just ISLCWUnreachable
1016+ _ -> Nothing
1017+
1018+instance ToText InstancesScopedListCodeWarning where
1019+ toText = \case
1020+ ISLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
1021+ ISLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
1022+ ISLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
1023+ ISLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
1024+ ISLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
1025+ ISLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
1026+ ISLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
1027+ ISLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
1028+ ISLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
1029+ ISLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
1030+ ISLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
1031+ ISLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
1032+ ISLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
1033+ ISLCWUnreachable -> "UNREACHABLE"
1034+
5221035-- | [Output Only] The warning type identifier for this warning.
5231036data MachineTypesScopedListCodeWarning
5241037 = MTSLCWDeprecatedResourceUsed
@@ -553,6 +1066,41 @@ data MachineTypesScopedListCodeWarning
5531066
5541067instance Hashable MachineTypesScopedListCodeWarning
5551068
1069+instance FromText MachineTypesScopedListCodeWarning where
1070+ fromText = \case
1071+ "DEPRECATED_RESOURCE_USED" -> Just MTSLCWDeprecatedResourceUsed
1072+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just MTSLCWDiskSizeLargerThanImageSize
1073+ "INJECTED_KERNELS_DEPRECATED" -> Just MTSLCWInjectedKernelsDeprecated
1074+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just MTSLCWNextHopAddressNotAssigned
1075+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just MTSLCWNextHopCannotIPForward
1076+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just MTSLCWNextHopInstanceNotFound
1077+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just MTSLCWNextHopInstanceNotOnNetwork
1078+ "NEXT_HOP_NOT_RUNNING" -> Just MTSLCWNextHopNotRunning
1079+ "NOT_CRITICAL_ERROR" -> Just MTSLCWNotCriticalError
1080+ "NO_RESULTS_ON_PAGE" -> Just MTSLCWNoResultsOnPage
1081+ "REQUIRED_TOS_AGREEMENT" -> Just MTSLCWRequiredTosAgreement
1082+ "RESOURCE_NOT_DELETED" -> Just MTSLCWResourceNotDeleted
1083+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just MTSLCWSingleInstancePropertyTemplate
1084+ "UNREACHABLE" -> Just MTSLCWUnreachable
1085+ _ -> Nothing
1086+
1087+instance ToText MachineTypesScopedListCodeWarning where
1088+ toText = \case
1089+ MTSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
1090+ MTSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
1091+ MTSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
1092+ MTSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
1093+ MTSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
1094+ MTSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
1095+ MTSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
1096+ MTSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
1097+ MTSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
1098+ MTSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
1099+ MTSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
1100+ MTSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
1101+ MTSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
1102+ MTSLCWUnreachable -> "UNREACHABLE"
1103+
5561104-- | The current action that the managed instance group has scheduled for the
5571105-- instance.
5581106data ManagedInstanceCurrentAction
@@ -574,6 +1122,27 @@ data ManagedInstanceCurrentAction
5741122
5751123instance Hashable ManagedInstanceCurrentAction
5761124
1125+instance FromText ManagedInstanceCurrentAction where
1126+ fromText = \case
1127+ "ABANDONING" -> Just MICAAbandoning
1128+ "CREATING" -> Just MICACreating
1129+ "DELETING" -> Just MICADeleting
1130+ "NONE" -> Just MICANone
1131+ "RECREATING" -> Just MICARecreating
1132+ "REFRESHING" -> Just MICARefreshing
1133+ "RESTARTING" -> Just MICARestarting
1134+ _ -> Nothing
1135+
1136+instance ToText ManagedInstanceCurrentAction where
1137+ toText = \case
1138+ MICAAbandoning -> "ABANDONING"
1139+ MICACreating -> "CREATING"
1140+ MICADeleting -> "DELETING"
1141+ MICANone -> "NONE"
1142+ MICARecreating -> "RECREATING"
1143+ MICARefreshing -> "REFRESHING"
1144+ MICARestarting -> "RESTARTING"
1145+
5771146-- | The status of the instance (empty when instance does not exist).
5781147data ManagedInstanceInstanceStatus
5791148 = MIISProvisioning
@@ -596,6 +1165,29 @@ data ManagedInstanceInstanceStatus
5961165
5971166instance Hashable ManagedInstanceInstanceStatus
5981167
1168+instance FromText ManagedInstanceInstanceStatus where
1169+ fromText = \case
1170+ "PROVISIONING" -> Just MIISProvisioning
1171+ "RUNNING" -> Just MIISRunning
1172+ "STAGING" -> Just MIISStaging
1173+ "STOPPED" -> Just MIISStopped
1174+ "STOPPING" -> Just MIISStopping
1175+ "SUSPENDED" -> Just MIISSuspended
1176+ "SUSPENDING" -> Just MIISSuspending
1177+ "TERMINATED" -> Just MIISTerminated
1178+ _ -> Nothing
1179+
1180+instance ToText ManagedInstanceInstanceStatus where
1181+ toText = \case
1182+ MIISProvisioning -> "PROVISIONING"
1183+ MIISRunning -> "RUNNING"
1184+ MIISStaging -> "STAGING"
1185+ MIISStopped -> "STOPPED"
1186+ MIISStopping -> "STOPPING"
1187+ MIISSuspended -> "SUSPENDED"
1188+ MIISSuspending -> "SUSPENDING"
1189+ MIISTerminated -> "TERMINATED"
1190+
5991191-- | [Output Only] The warning type identifier for this warning.
6001192data OperationCodeItemWarnings
6011193 = OCIWDeprecatedResourceUsed
@@ -630,6 +1222,41 @@ data OperationCodeItemWarnings
6301222
6311223instance Hashable OperationCodeItemWarnings
6321224
1225+instance FromText OperationCodeItemWarnings where
1226+ fromText = \case
1227+ "DEPRECATED_RESOURCE_USED" -> Just OCIWDeprecatedResourceUsed
1228+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just OCIWDiskSizeLargerThanImageSize
1229+ "INJECTED_KERNELS_DEPRECATED" -> Just OCIWInjectedKernelsDeprecated
1230+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just OCIWNextHopAddressNotAssigned
1231+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just OCIWNextHopCannotIPForward
1232+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just OCIWNextHopInstanceNotFound
1233+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just OCIWNextHopInstanceNotOnNetwork
1234+ "NEXT_HOP_NOT_RUNNING" -> Just OCIWNextHopNotRunning
1235+ "NOT_CRITICAL_ERROR" -> Just OCIWNotCriticalError
1236+ "NO_RESULTS_ON_PAGE" -> Just OCIWNoResultsOnPage
1237+ "REQUIRED_TOS_AGREEMENT" -> Just OCIWRequiredTosAgreement
1238+ "RESOURCE_NOT_DELETED" -> Just OCIWResourceNotDeleted
1239+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just OCIWSingleInstancePropertyTemplate
1240+ "UNREACHABLE" -> Just OCIWUnreachable
1241+ _ -> Nothing
1242+
1243+instance ToText OperationCodeItemWarnings where
1244+ toText = \case
1245+ OCIWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
1246+ OCIWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
1247+ OCIWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
1248+ OCIWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
1249+ OCIWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
1250+ OCIWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
1251+ OCIWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
1252+ OCIWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
1253+ OCIWNotCriticalError -> "NOT_CRITICAL_ERROR"
1254+ OCIWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
1255+ OCIWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
1256+ OCIWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
1257+ OCIWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
1258+ OCIWUnreachable -> "UNREACHABLE"
1259+
6331260-- | [Output Only] Status of the operation. Can be one of the following:
6341261-- PENDING, RUNNING, or DONE.
6351262data OperationStatus
@@ -643,6 +1270,19 @@ data OperationStatus
6431270
6441271instance Hashable OperationStatus
6451272
1273+instance FromText OperationStatus where
1274+ fromText = \case
1275+ "DONE" -> Just OSDone
1276+ "PENDING" -> Just OSPending
1277+ "RUNNING" -> Just OSRunning
1278+ _ -> Nothing
1279+
1280+instance ToText OperationStatus where
1281+ toText = \case
1282+ OSDone -> "DONE"
1283+ OSPending -> "PENDING"
1284+ OSRunning -> "RUNNING"
1285+
6461286-- | [Output Only] The warning type identifier for this warning.
6471287data OperationsScopedListCodeWarning
6481288 = OSLCWDeprecatedResourceUsed
@@ -677,6 +1317,41 @@ data OperationsScopedListCodeWarning
6771317
6781318instance Hashable OperationsScopedListCodeWarning
6791319
1320+instance FromText OperationsScopedListCodeWarning where
1321+ fromText = \case
1322+ "DEPRECATED_RESOURCE_USED" -> Just OSLCWDeprecatedResourceUsed
1323+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just OSLCWDiskSizeLargerThanImageSize
1324+ "INJECTED_KERNELS_DEPRECATED" -> Just OSLCWInjectedKernelsDeprecated
1325+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just OSLCWNextHopAddressNotAssigned
1326+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just OSLCWNextHopCannotIPForward
1327+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just OSLCWNextHopInstanceNotFound
1328+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just OSLCWNextHopInstanceNotOnNetwork
1329+ "NEXT_HOP_NOT_RUNNING" -> Just OSLCWNextHopNotRunning
1330+ "NOT_CRITICAL_ERROR" -> Just OSLCWNotCriticalError
1331+ "NO_RESULTS_ON_PAGE" -> Just OSLCWNoResultsOnPage
1332+ "REQUIRED_TOS_AGREEMENT" -> Just OSLCWRequiredTosAgreement
1333+ "RESOURCE_NOT_DELETED" -> Just OSLCWResourceNotDeleted
1334+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just OSLCWSingleInstancePropertyTemplate
1335+ "UNREACHABLE" -> Just OSLCWUnreachable
1336+ _ -> Nothing
1337+
1338+instance ToText OperationsScopedListCodeWarning where
1339+ toText = \case
1340+ OSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
1341+ OSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
1342+ OSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
1343+ OSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
1344+ OSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
1345+ OSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
1346+ OSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
1347+ OSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
1348+ OSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
1349+ OSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
1350+ OSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
1351+ OSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
1352+ OSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
1353+ OSLCWUnreachable -> "UNREACHABLE"
1354+
6801355-- | [Output Only] Name of the quota metric.
6811356data QuotaMetric
6821357 = QMBackendServices
@@ -731,6 +1406,61 @@ data QuotaMetric
7311406
7321407instance Hashable QuotaMetric
7331408
1409+instance FromText QuotaMetric where
1410+ fromText = \case
1411+ "BACKEND_SERVICES" -> Just QMBackendServices
1412+ "CPUS" -> Just QMCPUs
1413+ "DISKS_TOTAL_GB" -> Just QMDisksTotalGb
1414+ "FIREWALLS" -> Just QMFirewalls
1415+ "FORWARDING_RULES" -> Just QMForwardingRules
1416+ "HEALTH_CHECKS" -> Just QMHealthChecks
1417+ "IMAGES" -> Just QMImages
1418+ "INSTANCES" -> Just QMInstances
1419+ "INSTANCE_GROUPS" -> Just QMInstanceGroups
1420+ "INSTANCE_GROUP_MANAGERS" -> Just QMInstanceGroupManagers
1421+ "INSTANCE_TEMPLATES" -> Just QMInstanceTemplates
1422+ "IN_USE_ADDRESSES" -> Just QMInUseAddresses
1423+ "LOCAL_SSD_TOTAL_GB" -> Just QMLocalSsdTotalGb
1424+ "NETWORKS" -> Just QMNetworks
1425+ "ROUTES" -> Just QMRoutes
1426+ "SNAPSHOTS" -> Just QMSnapshots
1427+ "SSD_TOTAL_GB" -> Just QMSsdTotalGb
1428+ "STATIC_ADDRESSES" -> Just QMStaticAddresses
1429+ "TARGET_HTTP_PROXIES" -> Just QMTargetHTTPProxies
1430+ "TARGET_INSTANCES" -> Just QMTargetInstances
1431+ "TARGET_POOLS" -> Just QMTargetPools
1432+ "TARGET_VPN_GATEWAYS" -> Just QMTargetVPNGateways
1433+ "URL_MAPS" -> Just QMURLMaps
1434+ "VPN_TUNNELS" -> Just QMVPNTunnels
1435+ _ -> Nothing
1436+
1437+instance ToText QuotaMetric where
1438+ toText = \case
1439+ QMBackendServices -> "BACKEND_SERVICES"
1440+ QMCPUs -> "CPUS"
1441+ QMDisksTotalGb -> "DISKS_TOTAL_GB"
1442+ QMFirewalls -> "FIREWALLS"
1443+ QMForwardingRules -> "FORWARDING_RULES"
1444+ QMHealthChecks -> "HEALTH_CHECKS"
1445+ QMImages -> "IMAGES"
1446+ QMInstances -> "INSTANCES"
1447+ QMInstanceGroups -> "INSTANCE_GROUPS"
1448+ QMInstanceGroupManagers -> "INSTANCE_GROUP_MANAGERS"
1449+ QMInstanceTemplates -> "INSTANCE_TEMPLATES"
1450+ QMInUseAddresses -> "IN_USE_ADDRESSES"
1451+ QMLocalSsdTotalGb -> "LOCAL_SSD_TOTAL_GB"
1452+ QMNetworks -> "NETWORKS"
1453+ QMRoutes -> "ROUTES"
1454+ QMSnapshots -> "SNAPSHOTS"
1455+ QMSsdTotalGb -> "SSD_TOTAL_GB"
1456+ QMStaticAddresses -> "STATIC_ADDRESSES"
1457+ QMTargetHTTPProxies -> "TARGET_HTTP_PROXIES"
1458+ QMTargetInstances -> "TARGET_INSTANCES"
1459+ QMTargetPools -> "TARGET_POOLS"
1460+ QMTargetVPNGateways -> "TARGET_VPN_GATEWAYS"
1461+ QMURLMaps -> "URL_MAPS"
1462+ QMVPNTunnels -> "VPN_TUNNELS"
1463+
7341464-- | [Output Only] Status of the region, either UP or DOWN.
7351465data RegionStatus
7361466 = RSDown
@@ -741,6 +1471,17 @@ data RegionStatus
7411471
7421472instance Hashable RegionStatus
7431473
1474+instance FromText RegionStatus where
1475+ fromText = \case
1476+ "DOWN" -> Just RSDown
1477+ "UP" -> Just RSUP
1478+ _ -> Nothing
1479+
1480+instance ToText RegionStatus where
1481+ toText = \case
1482+ RSDown -> "DOWN"
1483+ RSUP -> "UP"
1484+
7441485-- | [Output Only] The warning type identifier for this warning.
7451486data RouteCodeItemWarnings
7461487 = RCIWDeprecatedResourceUsed
@@ -775,6 +1516,41 @@ data RouteCodeItemWarnings
7751516
7761517instance Hashable RouteCodeItemWarnings
7771518
1519+instance FromText RouteCodeItemWarnings where
1520+ fromText = \case
1521+ "DEPRECATED_RESOURCE_USED" -> Just RCIWDeprecatedResourceUsed
1522+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just RCIWDiskSizeLargerThanImageSize
1523+ "INJECTED_KERNELS_DEPRECATED" -> Just RCIWInjectedKernelsDeprecated
1524+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just RCIWNextHopAddressNotAssigned
1525+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just RCIWNextHopCannotIPForward
1526+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just RCIWNextHopInstanceNotFound
1527+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just RCIWNextHopInstanceNotOnNetwork
1528+ "NEXT_HOP_NOT_RUNNING" -> Just RCIWNextHopNotRunning
1529+ "NOT_CRITICAL_ERROR" -> Just RCIWNotCriticalError
1530+ "NO_RESULTS_ON_PAGE" -> Just RCIWNoResultsOnPage
1531+ "REQUIRED_TOS_AGREEMENT" -> Just RCIWRequiredTosAgreement
1532+ "RESOURCE_NOT_DELETED" -> Just RCIWResourceNotDeleted
1533+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just RCIWSingleInstancePropertyTemplate
1534+ "UNREACHABLE" -> Just RCIWUnreachable
1535+ _ -> Nothing
1536+
1537+instance ToText RouteCodeItemWarnings where
1538+ toText = \case
1539+ RCIWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
1540+ RCIWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
1541+ RCIWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
1542+ RCIWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
1543+ RCIWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
1544+ RCIWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
1545+ RCIWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
1546+ RCIWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
1547+ RCIWNotCriticalError -> "NOT_CRITICAL_ERROR"
1548+ RCIWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
1549+ RCIWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
1550+ RCIWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
1551+ RCIWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
1552+ RCIWUnreachable -> "UNREACHABLE"
1553+
7781554-- | Defines the maintenance behavior for this instance. For standard
7791555-- instances, the default behavior is MIGRATE. For preemptible instances,
7801556-- the default and only possible behavior is TERMINATE. For more
@@ -788,6 +1564,17 @@ data SchedulingOnHostMaintenance
7881564
7891565instance Hashable SchedulingOnHostMaintenance
7901566
1567+instance FromText SchedulingOnHostMaintenance where
1568+ fromText = \case
1569+ "MIGRATE" -> Just SOHMMigrate
1570+ "TERMINATE" -> Just SOHMTerminate
1571+ _ -> Nothing
1572+
1573+instance ToText SchedulingOnHostMaintenance where
1574+ toText = \case
1575+ SOHMMigrate -> "MIGRATE"
1576+ SOHMTerminate -> "TERMINATE"
1577+
7911578-- | [Output Only] The status of the snapshot.
7921579data SnapshotStatus
7931580 = SSCreating
@@ -804,6 +1591,23 @@ data SnapshotStatus
8041591
8051592instance Hashable SnapshotStatus
8061593
1594+instance FromText SnapshotStatus where
1595+ fromText = \case
1596+ "CREATING" -> Just SSCreating
1597+ "DELETING" -> Just SSDeleting
1598+ "FAILED" -> Just SSFailed
1599+ "READY" -> Just SSReady
1600+ "UPLOADING" -> Just SSUploading
1601+ _ -> Nothing
1602+
1603+instance ToText SnapshotStatus where
1604+ toText = \case
1605+ SSCreating -> "CREATING"
1606+ SSDeleting -> "DELETING"
1607+ SSFailed -> "FAILED"
1608+ SSReady -> "READY"
1609+ SSUploading -> "UPLOADING"
1610+
8071611-- | [Output Only] An indicator whether storageBytes is in a stable state or
8081612-- it is being adjusted as a result of shared storage reallocation.
8091613data SnapshotStorageBytesStatus
@@ -815,6 +1619,17 @@ data SnapshotStorageBytesStatus
8151619
8161620instance Hashable SnapshotStorageBytesStatus
8171621
1622+instance FromText SnapshotStorageBytesStatus where
1623+ fromText = \case
1624+ "UPDATING" -> Just SSBSUpdating
1625+ "UP_TO_DATE" -> Just SSBSUpToDate
1626+ _ -> Nothing
1627+
1628+instance ToText SnapshotStorageBytesStatus where
1629+ toText = \case
1630+ SSBSUpdating -> "UPDATING"
1631+ SSBSUpToDate -> "UP_TO_DATE"
1632+
8181633-- | NAT option controlling how IPs are NAT\'ed to the instance. Currently
8191634-- only NO_NAT (default value) is supported.
8201635data TargetInstanceNatPolicy
@@ -824,6 +1639,15 @@ data TargetInstanceNatPolicy
8241639
8251640instance Hashable TargetInstanceNatPolicy
8261641
1642+instance FromText TargetInstanceNatPolicy where
1643+ fromText = \case
1644+ "NO_NAT" -> Just TINPNoNAT
1645+ _ -> Nothing
1646+
1647+instance ToText TargetInstanceNatPolicy where
1648+ toText = \case
1649+ TINPNoNAT -> "NO_NAT"
1650+
8271651-- | [Output Only] The warning type identifier for this warning.
8281652data TargetInstancesScopedListCodeWarning
8291653 = TISLCWDeprecatedResourceUsed
@@ -858,6 +1682,41 @@ data TargetInstancesScopedListCodeWarning
8581682
8591683instance Hashable TargetInstancesScopedListCodeWarning
8601684
1685+instance FromText TargetInstancesScopedListCodeWarning where
1686+ fromText = \case
1687+ "DEPRECATED_RESOURCE_USED" -> Just TISLCWDeprecatedResourceUsed
1688+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just TISLCWDiskSizeLargerThanImageSize
1689+ "INJECTED_KERNELS_DEPRECATED" -> Just TISLCWInjectedKernelsDeprecated
1690+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just TISLCWNextHopAddressNotAssigned
1691+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just TISLCWNextHopCannotIPForward
1692+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just TISLCWNextHopInstanceNotFound
1693+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just TISLCWNextHopInstanceNotOnNetwork
1694+ "NEXT_HOP_NOT_RUNNING" -> Just TISLCWNextHopNotRunning
1695+ "NOT_CRITICAL_ERROR" -> Just TISLCWNotCriticalError
1696+ "NO_RESULTS_ON_PAGE" -> Just TISLCWNoResultsOnPage
1697+ "REQUIRED_TOS_AGREEMENT" -> Just TISLCWRequiredTosAgreement
1698+ "RESOURCE_NOT_DELETED" -> Just TISLCWResourceNotDeleted
1699+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just TISLCWSingleInstancePropertyTemplate
1700+ "UNREACHABLE" -> Just TISLCWUnreachable
1701+ _ -> Nothing
1702+
1703+instance ToText TargetInstancesScopedListCodeWarning where
1704+ toText = \case
1705+ TISLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
1706+ TISLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
1707+ TISLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
1708+ TISLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
1709+ TISLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
1710+ TISLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
1711+ TISLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
1712+ TISLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
1713+ TISLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
1714+ TISLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
1715+ TISLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
1716+ TISLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
1717+ TISLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
1718+ TISLCWUnreachable -> "UNREACHABLE"
1719+
8611720-- | Sesssion affinity option, must be one of the following values: NONE:
8621721-- Connections from the same client IP may go to any instance in the pool;
8631722-- CLIENT_IP: Connections from the same client IP will go to the same
@@ -876,6 +1735,19 @@ data TargetPoolSessionAffinity
8761735
8771736instance Hashable TargetPoolSessionAffinity
8781737
1738+instance FromText TargetPoolSessionAffinity where
1739+ fromText = \case
1740+ "CLIENT_IP" -> Just TPSAClientIP
1741+ "CLIENT_IP_PROTO" -> Just TPSAClientIPProto
1742+ "NONE" -> Just TPSANone
1743+ _ -> Nothing
1744+
1745+instance ToText TargetPoolSessionAffinity where
1746+ toText = \case
1747+ TPSAClientIP -> "CLIENT_IP"
1748+ TPSAClientIPProto -> "CLIENT_IP_PROTO"
1749+ TPSANone -> "NONE"
1750+
8791751-- | [Output Only] The warning type identifier for this warning.
8801752data TargetPoolsScopedListCodeWarning
8811753 = TPSLCWDeprecatedResourceUsed
@@ -910,6 +1782,41 @@ data TargetPoolsScopedListCodeWarning
9101782
9111783instance Hashable TargetPoolsScopedListCodeWarning
9121784
1785+instance FromText TargetPoolsScopedListCodeWarning where
1786+ fromText = \case
1787+ "DEPRECATED_RESOURCE_USED" -> Just TPSLCWDeprecatedResourceUsed
1788+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just TPSLCWDiskSizeLargerThanImageSize
1789+ "INJECTED_KERNELS_DEPRECATED" -> Just TPSLCWInjectedKernelsDeprecated
1790+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just TPSLCWNextHopAddressNotAssigned
1791+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just TPSLCWNextHopCannotIPForward
1792+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just TPSLCWNextHopInstanceNotFound
1793+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just TPSLCWNextHopInstanceNotOnNetwork
1794+ "NEXT_HOP_NOT_RUNNING" -> Just TPSLCWNextHopNotRunning
1795+ "NOT_CRITICAL_ERROR" -> Just TPSLCWNotCriticalError
1796+ "NO_RESULTS_ON_PAGE" -> Just TPSLCWNoResultsOnPage
1797+ "REQUIRED_TOS_AGREEMENT" -> Just TPSLCWRequiredTosAgreement
1798+ "RESOURCE_NOT_DELETED" -> Just TPSLCWResourceNotDeleted
1799+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just TPSLCWSingleInstancePropertyTemplate
1800+ "UNREACHABLE" -> Just TPSLCWUnreachable
1801+ _ -> Nothing
1802+
1803+instance ToText TargetPoolsScopedListCodeWarning where
1804+ toText = \case
1805+ TPSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
1806+ TPSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
1807+ TPSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
1808+ TPSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
1809+ TPSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
1810+ TPSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
1811+ TPSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
1812+ TPSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
1813+ TPSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
1814+ TPSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
1815+ TPSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
1816+ TPSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
1817+ TPSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
1818+ TPSLCWUnreachable -> "UNREACHABLE"
1819+
9131820-- | [Output Only] The status of the VPN gateway.
9141821data TargetVpnGatewayStatus
9151822 = TVGSCreating
@@ -924,6 +1831,21 @@ data TargetVpnGatewayStatus
9241831
9251832instance Hashable TargetVpnGatewayStatus
9261833
1834+instance FromText TargetVpnGatewayStatus where
1835+ fromText = \case
1836+ "CREATING" -> Just TVGSCreating
1837+ "DELETING" -> Just TVGSDeleting
1838+ "FAILED" -> Just TVGSFailed
1839+ "READY" -> Just TVGSReady
1840+ _ -> Nothing
1841+
1842+instance ToText TargetVpnGatewayStatus where
1843+ toText = \case
1844+ TVGSCreating -> "CREATING"
1845+ TVGSDeleting -> "DELETING"
1846+ TVGSFailed -> "FAILED"
1847+ TVGSReady -> "READY"
1848+
9271849-- | [Output Only] The warning type identifier for this warning.
9281850data TargetVpnGatewaysScopedListCodeWarning
9291851 = TVGSLCWDeprecatedResourceUsed
@@ -958,6 +1880,41 @@ data TargetVpnGatewaysScopedListCodeWarning
9581880
9591881instance Hashable TargetVpnGatewaysScopedListCodeWarning
9601882
1883+instance FromText TargetVpnGatewaysScopedListCodeWarning where
1884+ fromText = \case
1885+ "DEPRECATED_RESOURCE_USED" -> Just TVGSLCWDeprecatedResourceUsed
1886+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just TVGSLCWDiskSizeLargerThanImageSize
1887+ "INJECTED_KERNELS_DEPRECATED" -> Just TVGSLCWInjectedKernelsDeprecated
1888+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just TVGSLCWNextHopAddressNotAssigned
1889+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just TVGSLCWNextHopCannotIPForward
1890+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just TVGSLCWNextHopInstanceNotFound
1891+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just TVGSLCWNextHopInstanceNotOnNetwork
1892+ "NEXT_HOP_NOT_RUNNING" -> Just TVGSLCWNextHopNotRunning
1893+ "NOT_CRITICAL_ERROR" -> Just TVGSLCWNotCriticalError
1894+ "NO_RESULTS_ON_PAGE" -> Just TVGSLCWNoResultsOnPage
1895+ "REQUIRED_TOS_AGREEMENT" -> Just TVGSLCWRequiredTosAgreement
1896+ "RESOURCE_NOT_DELETED" -> Just TVGSLCWResourceNotDeleted
1897+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just TVGSLCWSingleInstancePropertyTemplate
1898+ "UNREACHABLE" -> Just TVGSLCWUnreachable
1899+ _ -> Nothing
1900+
1901+instance ToText TargetVpnGatewaysScopedListCodeWarning where
1902+ toText = \case
1903+ TVGSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
1904+ TVGSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
1905+ TVGSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
1906+ TVGSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
1907+ TVGSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
1908+ TVGSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
1909+ TVGSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
1910+ TVGSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
1911+ TVGSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
1912+ TVGSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
1913+ TVGSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
1914+ TVGSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
1915+ TVGSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
1916+ TVGSLCWUnreachable -> "UNREACHABLE"
1917+
9611918-- | [Output Only] The status of the VPN tunnel.
9621919data VpnTunnelStatus
9631920 = VTSAuthorizationError
@@ -986,6 +1943,35 @@ data VpnTunnelStatus
9861943
9871944instance Hashable VpnTunnelStatus
9881945
1946+instance FromText VpnTunnelStatus where
1947+ fromText = \case
1948+ "AUTHORIZATION_ERROR" -> Just VTSAuthorizationError
1949+ "DEPROVISIONING" -> Just VTSDeprovisioning
1950+ "ESTABLISHED" -> Just VTSEstablished
1951+ "FAILED" -> Just VTSFailed
1952+ "FIRST_HANDSHAKE" -> Just VTSFirstHandshake
1953+ "NEGOTIATION_FAILURE" -> Just VTSNegotiationFailure
1954+ "NETWORK_ERROR" -> Just VTSNetworkError
1955+ "NO_INCOMING_PACKETS" -> Just VTSNoIncomingPackets
1956+ "PROVISIONING" -> Just VTSProvisioning
1957+ "REJECTED" -> Just VTSRejected
1958+ "WAITING_FOR_FULL_CONFIG" -> Just VTSWaitingForFullConfig
1959+ _ -> Nothing
1960+
1961+instance ToText VpnTunnelStatus where
1962+ toText = \case
1963+ VTSAuthorizationError -> "AUTHORIZATION_ERROR"
1964+ VTSDeprovisioning -> "DEPROVISIONING"
1965+ VTSEstablished -> "ESTABLISHED"
1966+ VTSFailed -> "FAILED"
1967+ VTSFirstHandshake -> "FIRST_HANDSHAKE"
1968+ VTSNegotiationFailure -> "NEGOTIATION_FAILURE"
1969+ VTSNetworkError -> "NETWORK_ERROR"
1970+ VTSNoIncomingPackets -> "NO_INCOMING_PACKETS"
1971+ VTSProvisioning -> "PROVISIONING"
1972+ VTSRejected -> "REJECTED"
1973+ VTSWaitingForFullConfig -> "WAITING_FOR_FULL_CONFIG"
1974+
9891975-- | [Output Only] The warning type identifier for this warning.
9901976data VpnTunnelsScopedListCodeWarning
9911977 = VTSLCWDeprecatedResourceUsed
@@ -1020,6 +2006,41 @@ data VpnTunnelsScopedListCodeWarning
10202006
10212007instance Hashable VpnTunnelsScopedListCodeWarning
10222008
2009+instance FromText VpnTunnelsScopedListCodeWarning where
2010+ fromText = \case
2011+ "DEPRECATED_RESOURCE_USED" -> Just VTSLCWDeprecatedResourceUsed
2012+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just VTSLCWDiskSizeLargerThanImageSize
2013+ "INJECTED_KERNELS_DEPRECATED" -> Just VTSLCWInjectedKernelsDeprecated
2014+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just VTSLCWNextHopAddressNotAssigned
2015+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just VTSLCWNextHopCannotIPForward
2016+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just VTSLCWNextHopInstanceNotFound
2017+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just VTSLCWNextHopInstanceNotOnNetwork
2018+ "NEXT_HOP_NOT_RUNNING" -> Just VTSLCWNextHopNotRunning
2019+ "NOT_CRITICAL_ERROR" -> Just VTSLCWNotCriticalError
2020+ "NO_RESULTS_ON_PAGE" -> Just VTSLCWNoResultsOnPage
2021+ "REQUIRED_TOS_AGREEMENT" -> Just VTSLCWRequiredTosAgreement
2022+ "RESOURCE_NOT_DELETED" -> Just VTSLCWResourceNotDeleted
2023+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just VTSLCWSingleInstancePropertyTemplate
2024+ "UNREACHABLE" -> Just VTSLCWUnreachable
2025+ _ -> Nothing
2026+
2027+instance ToText VpnTunnelsScopedListCodeWarning where
2028+ toText = \case
2029+ VTSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
2030+ VTSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
2031+ VTSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
2032+ VTSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
2033+ VTSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
2034+ VTSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
2035+ VTSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
2036+ VTSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
2037+ VTSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"
2038+ VTSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
2039+ VTSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
2040+ VTSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
2041+ VTSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
2042+ VTSLCWUnreachable -> "UNREACHABLE"
2043+
10232044-- | [Output Only] Status of the zone, either UP or DOWN.
10242045data ZoneStatus
10252046 = ZSDown
@@ -1029,3 +2050,14 @@ data ZoneStatus
10292050 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
10302051
10312052instance Hashable ZoneStatus
2053+
2054+instance FromText ZoneStatus where
2055+ fromText = \case
2056+ "DOWN" -> Just ZSDown
2057+ "UP" -> Just ZSUP
2058+ _ -> Nothing
2059+
2060+instance ToText ZoneStatus where
2061+ toText = \case
2062+ ZSDown -> "DOWN"
2063+ ZSUP -> "UP"
gogol-container/gen/Network/Google/ContainerEngine/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ContainerEngine.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.ContainerEngine.Types
1416 (
15− -- * API Definition
16− container
17−
1817
1918 -- * Cluster
20− , Cluster
19+ Cluster
2120 , cluster
2221 , cStatus
2322 , cNodeConfig
@@ -112,6 +111,3 @@ module Network.Google.ContainerEngine.Types
112111import Network.Google.ContainerEngine.Types.Product
113112import Network.Google.ContainerEngine.Types.Sum
114113import Network.Google.Prelude
115−
116−container :: a
117−container = error "container"
gogol-container/gen/Network/Google/ContainerEngine/Types/Product.hs+4−2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ContainerEngine.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -37,7 +39,7 @@ data Cluster = Cluster
3739 , _cDescription :: !(Maybe Text)
3840 , _cInstanceGroupUrls :: !(Maybe [Text])
3941 , _cNodeRoutingPrefixSize :: !(Maybe Int32)
40− }
42+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
4143
4244-- | Creates a value of 'Cluster' with the minimum fields required to make a request.
4345--
@@ -511,7 +513,7 @@ data Operation = Operation
511513 , _oErrorMessage :: !(Maybe Text)
512514 , _oTargetLink :: !(Maybe Text)
513515 , _oTarget :: !(Maybe Text)
514− }
516+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
515517
516518-- | Creates a value of 'Operation' with the minimum fields required to make a request.
517519--
gogol-container/gen/Network/Google/ContainerEngine/Types/Sum.hs+42
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.ContainerEngine.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -28,6 +31,21 @@ data ClusterStatus
2831
2932instance Hashable ClusterStatus
3033
34+instance FromText ClusterStatus where
35+ fromText = \case
36+ "error" -> Just CSError
37+ "provisioning" -> Just CSProvisioning
38+ "running" -> Just CSRunning
39+ "stopping" -> Just CSStopping
40+ _ -> Nothing
41+
42+instance ToText ClusterStatus where
43+ toText = \case
44+ CSError -> "error"
45+ CSProvisioning -> "provisioning"
46+ CSRunning -> "running"
47+ CSStopping -> "stopping"
48+
3149-- | The operation type.
3250data OperationOperationType
3351 = OOTCreateCluster
@@ -38,6 +56,17 @@ data OperationOperationType
3856
3957instance Hashable OperationOperationType
4058
59+instance FromText OperationOperationType where
60+ fromText = \case
61+ "createCluster" -> Just OOTCreateCluster
62+ "deleteCluster" -> Just OOTDeleteCluster
63+ _ -> Nothing
64+
65+instance ToText OperationOperationType where
66+ toText = \case
67+ OOTCreateCluster -> "createCluster"
68+ OOTDeleteCluster -> "deleteCluster"
69+
4170-- | The current status of the operation.
4271data OperationStatus
4372 = OSDone
@@ -49,3 +78,16 @@ data OperationStatus
4978 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
5079
5180instance Hashable OperationStatus
81+
82+instance FromText OperationStatus where
83+ fromText = \case
84+ "done" -> Just OSDone
85+ "pending" -> Just OSPending
86+ "running" -> Just OSRunning
87+ _ -> Nothing
88+
89+instance ToText OperationStatus where
90+ toText = \case
91+ OSDone -> "done"
92+ OSPending -> "pending"
93+ OSRunning -> "running"
gogol-content/gen/Network/Google/ShoppingContent/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ShoppingContent.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.ShoppingContent.Types
1416 (
15− -- * API Definition
16− content
17−
1817
1918 -- * Error
20− , Error
19+ Error
2120 , error'
2221 , errDomain
2322 , errReason
@@ -487,6 +486,3 @@ module Network.Google.ShoppingContent.Types
487486import Network.Google.Prelude
488487import Network.Google.ShoppingContent.Types.Product
489488import Network.Google.ShoppingContent.Types.Sum
490−
491−content :: a
492−content = error "content"
gogol-content/gen/Network/Google/ShoppingContent/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ShoppingContent.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-content/gen/Network/Google/ShoppingContent/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.ShoppingContent.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-customsearch/gen/Network/Google/CustomSearch/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CustomSearch.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CustomSearch.Types
1416 (
15− -- * API Definition
16− customsearch
17−
1817
1918 -- * Context
20− , Context
19+ Context
2120 , context
2221 , cFacets
2322 , cTitle
@@ -176,6 +175,3 @@ module Network.Google.CustomSearch.Types
176175import Network.Google.CustomSearch.Types.Product
177176import Network.Google.CustomSearch.Types.Sum
178177import Network.Google.Prelude
179−
180−customsearch :: a
181−customsearch = error "customsearch"
gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CustomSearch.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-customsearch/gen/Network/Google/CustomSearch/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CustomSearch.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-dataflow/gen/Network/Google/Dataflow/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Dataflow.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Dataflow.Types
1416 (
15− -- * API Definition
16− dataflow
17−
1817
1918 -- * ApproximateProgress
20− , ApproximateProgress
19+ ApproximateProgress
2120 , approximateProgress
2221 , apRemainingTime
2322 , apPercentComplete
@@ -675,6 +674,3 @@ module Network.Google.Dataflow.Types
675674import Network.Google.Dataflow.Types.Product
676675import Network.Google.Dataflow.Types.Sum
677676import Network.Google.Prelude
678−
679−dataflow :: a
680−dataflow = error "dataflow"
gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Dataflow.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-dataflow/gen/Network/Google/Dataflow/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Dataflow.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-dfareporting/gen/Network/Google/DFAReporting/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DFAReporting.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.DFAReporting.Types
1416 (
15− -- * API Definition
16− dfareporting
17−
1817
1918 -- * Account
20− , Account
19+ Account
2120 , account
2221 , aaAccountPermissionIds
2322 , aaMaximumImageSize
@@ -2270,6 +2269,3 @@ module Network.Google.DFAReporting.Types
22702269import Network.Google.DFAReporting.Types.Product
22712270import Network.Google.DFAReporting.Types.Sum
22722271import Network.Google.Prelude
2273−
2274−dfareporting :: a
2275−dfareporting = error "dfareporting"
gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Product.hs+55−53
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DFAReporting.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -38,7 +40,7 @@ data Account = Account
3840 , _aaActiveAdsLimitTier :: !(Maybe AccountActiveAdsLimitTier)
3941 , _aaDefaultCreativeSizeId :: !(Maybe Int64)
4042 , _aaDescription :: !(Maybe Text)
41− }
43+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
4244
4345-- | Creates a value of 'Account' with the minimum fields required to make a request.
4446--
@@ -242,7 +244,7 @@ data AccountActiveAdSummary = AccountActiveAdSummary
242244 , _aaasAccountId :: !(Maybe Int64)
243245 , _aaasActiveAds :: !(Maybe Int64)
244246 , _aaasActiveAdsLimitTier :: !(Maybe AccountActiveAdSummaryActiveAdsLimitTier)
245− }
247+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
246248
247249-- | Creates a value of 'AccountActiveAdSummary' with the minimum fields required to make a request.
248250--
@@ -309,7 +311,7 @@ data AccountPermission = AccountPermission
309311 , _apId :: !(Maybe Int64)
310312 , _apLevel :: !(Maybe AccountPermissionLevel)
311313 , _apPermissionGroupId :: !(Maybe Int64)
312− }
314+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
313315
314316-- | Creates a value of 'AccountPermission' with the minimum fields required to make a request.
315317--
@@ -506,7 +508,7 @@ data AccountUserProfile = AccountUserProfile
506508 , _aupComments :: !(Maybe Text)
507509 , _aupSubaccountId :: !(Maybe Int64)
508510 , _aupCampaignFilter :: !(Maybe (Maybe ObjectFilter))
509− }
511+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
510512
511513-- | Creates a value of 'AccountUserProfile' with the minimum fields required to make a request.
512514--
@@ -844,7 +846,7 @@ data Ad = Ad
844846 , _addArchived :: !(Maybe Bool)
845847 , _addDefaultClickThroughEventTagProperties :: !(Maybe (Maybe DefaultClickThroughEventTagProperties))
846848 , _addPlacementAssignments :: !(Maybe [Maybe PlacementAssignment])
847− }
849+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
848850
849851-- | Creates a value of 'Ad' with the minimum fields required to make a request.
850852--
@@ -1228,7 +1230,7 @@ data AdSlot = AdSlot
12281230 , _adName :: !(Maybe Text)
12291231 , _adComment :: !(Maybe Text)
12301232 , _adCompatibility :: !(Maybe AdSlotCompatibility)
1231− }
1233+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
12321234
12331235-- | Creates a value of 'AdSlot' with the minimum fields required to make a request.
12341236--
@@ -1371,7 +1373,7 @@ data Advertiser = Advertiser
13711373 , _aSubaccountId :: !(Maybe Int64)
13721374 , _aFloodlightConfigurationIdDimensionValue :: !(Maybe (Maybe DimensionValue))
13731375 , _aClickThroughUrlSuffix :: !(Maybe Text)
1374− }
1376+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
13751377
13761378-- | Creates a value of 'Advertiser' with the minimum fields required to make a request.
13771379--
@@ -3251,7 +3253,7 @@ data Creative = Creative
32513253 , _ccRedirectUrl :: !(Maybe Text)
32523254 , _ccAutoAdvanceImages :: !(Maybe Bool)
32533255 , _ccCreativeFieldAssignments :: !(Maybe [Maybe CreativeFieldAssignment])
3254− }
3256+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
32553257
32563258-- | Creates a value of 'Creative' with the minimum fields required to make a request.
32573259--
@@ -3951,7 +3953,7 @@ data CreativeAsset = CreativeAsset
39513953 , _cBackupImageExit :: !(Maybe (Maybe CreativeCustomEvent))
39523954 , _cPosition :: !(Maybe (Maybe OffsetPosition))
39533955 , _cHorizontallyLocked :: !(Maybe Bool)
3954− }
3956+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
39553957
39563958-- | Creates a value of 'CreativeAsset' with the minimum fields required to make a request.
39573959--
@@ -4413,7 +4415,7 @@ cHorizontallyLocked
44134415data CreativeAssetId = CreativeAssetId
44144416 { _caiName :: !(Maybe Text)
44154417 , _caiType :: !(Maybe CreativeAssetIdType)
4416− }
4418+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
44174419
44184420-- | Creates a value of 'CreativeAssetId' with the minimum fields required to make a request.
44194421--
@@ -4453,7 +4455,7 @@ data CreativeAssetMetadata = CreativeAssetMetadata
44534455 , _camaClickTags :: !(Maybe [Maybe ClickTag])
44544456 , _camaWarnedValidationRules :: !(Maybe [CreativeAssetMetadataItemWarnedValidationRules])
44554457 , _camaDetectedFeatures :: !(Maybe [CreativeAssetMetadataItemDetectedFeatures])
4456− }
4458+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
44574459
44584460-- | Creates a value of 'CreativeAssetMetadata' with the minimum fields required to make a request.
44594461--
@@ -4702,7 +4704,7 @@ data CreativeCustomEvent = CreativeCustomEvent
47024704 , _cceId :: !(Maybe Int64)
47034705 , _cceArtworkLabel :: !(Maybe Text)
47044706 , _cceArtworkType :: !(Maybe CreativeCustomEventArtworkType)
4705− }
4707+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
47064708
47074709-- | Creates a value of 'CreativeCustomEvent' with the minimum fields required to make a request.
47084710--
@@ -5155,7 +5157,7 @@ cgSubaccountId
51555157data CreativeGroupAssignment = CreativeGroupAssignment
51565158 { _cgaCreativeGroupNumber :: !(Maybe CreativeGroupAssignmentCreativeGroupNumber)
51575159 , _cgaCreativeGroupId :: !(Maybe Int64)
5158− }
5160+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
51595161
51605162-- | Creates a value of 'CreativeGroupAssignment' with the minimum fields required to make a request.
51615163--
@@ -5238,7 +5240,7 @@ data CreativeOptimizationConfiguration = CreativeOptimizationConfiguration
52385240 , _cocName :: !(Maybe Text)
52395241 , _cocOptimizationActivitys :: !(Maybe [Maybe OptimizationActivity])
52405242 , _cocId :: !(Maybe Int64)
5241− }
5243+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
52425244
52435245-- | Creates a value of 'CreativeOptimizationConfiguration' with the minimum fields required to make a request.
52445246--
@@ -5294,7 +5296,7 @@ data CreativeRotation = CreativeRotation
52945296 , _crCreativeAssignments :: !(Maybe [Maybe CreativeAssignment])
52955297 , _crCreativeOptimizationConfigurationId :: !(Maybe Int64)
52965298 , _crType :: !(Maybe CreativeRotationType)
5297− }
5299+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
52985300
52995301-- | Creates a value of 'CreativeRotation' with the minimum fields required to make a request.
53005302--
@@ -5553,7 +5555,7 @@ data DateRange = DateRange
55535555 , _drEndDate :: !(Maybe UTCTime)
55545556 , _drStartDate :: !(Maybe UTCTime)
55555557 , _drRelativeDateRange :: !(Maybe DateRangeRelativeDateRange)
5556− }
5558+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
55575559
55585560-- | Creates a value of 'DateRange' with the minimum fields required to make a request.
55595561--
@@ -5605,7 +5607,7 @@ data DayPartTargeting = DayPartTargeting
56055607 { _dptDaysOfWeek :: !(Maybe [DayPartTargetingItemDaysOfWeek])
56065608 , _dptHoursOfDay :: !(Maybe [Int32])
56075609 , _dptUserLocalTime :: !(Maybe Bool)
5608− }
5610+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
56095611
56105612-- | Creates a value of 'DayPartTargeting' with the minimum fields required to make a request.
56115613--
@@ -5704,7 +5706,7 @@ data DeliverySchedule = DeliverySchedule
57045706 , _dsPriority :: !(Maybe DeliverySchedulePriority)
57055707 , _dsImpressionRatio :: !(Maybe Int64)
57065708 , _dsFrequencyCap :: !(Maybe (Maybe FrequencyCap))
5707− }
5709+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
57085710
57095711-- | Creates a value of 'DeliverySchedule' with the minimum fields required to make a request.
57105712--
@@ -5904,7 +5906,7 @@ data DimensionValue = DimensionValue
59045906 , _dvMatchType :: !(Maybe DimensionValueMatchType)
59055907 , _dvDimensionName :: !(Maybe Text)
59065908 , _dvId :: !(Maybe Text)
5907− }
5909+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
59085910
59095911-- | Creates a value of 'DimensionValue' with the minimum fields required to make a request.
59105912--
@@ -6104,7 +6106,7 @@ data DirectorySite = DirectorySite
61046106 , _dsContactAssignments :: !(Maybe [Maybe DirectorySiteContactAssignment])
61056107 , _dsDescription :: !(Maybe Text)
61066108 , _dsParentId :: !(Maybe Int64)
6107− }
6109+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
61086110
61096111-- | Creates a value of 'DirectorySite' with the minimum fields required to make a request.
61106112--
@@ -6262,7 +6264,7 @@ data DirectorySiteContact = DirectorySiteContact
62626264 , _dscId :: !(Maybe Int64)
62636265 , _dscTitle :: !(Maybe Text)
62646266 , _dscType :: !(Maybe DirectorySiteContactType)
6265− }
6267+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
62666268
62676269-- | Creates a value of 'DirectorySiteContact' with the minimum fields required to make a request.
62686270--
@@ -6354,7 +6356,7 @@ dscType = lens _dscType (\ s a -> s{_dscType = a})
63546356data DirectorySiteContactAssignment = DirectorySiteContactAssignment
63556357 { _dscaVisibility :: !(Maybe DirectorySiteContactAssignmentVisibility)
63566358 , _dscaContactId :: !(Maybe Int64)
6357− }
6359+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
63586360
63596361-- | Creates a value of 'DirectorySiteContactAssignment' with the minimum fields required to make a request.
63606362--
@@ -6588,7 +6590,7 @@ data EventTag = EventTag
65886590 , _etSubaccountId :: !(Maybe Int64)
65896591 , _etType :: !(Maybe EventTagType)
65906592 , _etSiteFilterType :: !(Maybe EventTagSiteFilterType)
6591− }
6593+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
65926594
65936595-- | Creates a value of 'EventTag' with the minimum fields required to make a request.
65946596--
@@ -6856,7 +6858,7 @@ data File = File
68566858 , _fLastModifiedTime :: !(Maybe Int64)
68576859 , _fId :: !(Maybe Int64)
68586860 , _fFileName :: !(Maybe Text)
6859− }
6861+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
68606862
68616863-- | Creates a value of 'File' with the minimum fields required to make a request.
68626864--
@@ -7193,7 +7195,7 @@ data FloodlightActivity = FloodlightActivity
71937195 , _faSubaccountId :: !(Maybe Int64)
71947196 , _faNotes :: !(Maybe Text)
71957197 , _faFloodlightConfigurationIdDimensionValue :: !(Maybe (Maybe DimensionValue))
7196− }
7198+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
71977199
71987200-- | Creates a value of 'FloodlightActivity' with the minimum fields required to make a request.
71997201--
@@ -7534,7 +7536,7 @@ data FloodlightActivityGroup = FloodlightActivityGroup
75347536 , _fagSubaccountId :: !(Maybe Int64)
75357537 , _fagType :: !(Maybe FloodlightActivityGroupType)
75367538 , _fagFloodlightConfigurationIdDimensionValue :: !(Maybe (Maybe DimensionValue))
7537− }
7539+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
75387540
75397541-- | Creates a value of 'FloodlightActivityGroup' with the minimum fields required to make a request.
75407542--
@@ -7810,7 +7812,7 @@ data FloodlightConfiguration = FloodlightConfiguration
78107812 , _fcFirstDayOfWeek :: !(Maybe FloodlightConfigurationFirstDayOfWeek)
78117813 , _fcOmnitureSettings :: !(Maybe (Maybe OmnitureSettings))
78127814 , _fcStandardVariableTypes :: !(Maybe [FloodlightConfigurationItemStandardVariableTypes])
7813− }
7815+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
78147816
78157817-- | Creates a value of 'FloodlightConfiguration' with the minimum fields required to make a request.
78167818--
@@ -8151,7 +8153,7 @@ data FsCommand = FsCommand
81518153 , _fcWindowHeight :: !(Maybe Int32)
81528154 , _fcWindowWidth :: !(Maybe Int32)
81538155 , _fcTop :: !(Maybe Int32)
8154− }
8156+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
81558157
81568158-- | Creates a value of 'FsCommand' with the minimum fields required to make a request.
81578159--
@@ -8782,7 +8784,7 @@ data ListPopulationTerm = ListPopulationTerm
87828784 , _lptRemarketingListId :: !(Maybe Int64)
87838785 , _lptType :: !(Maybe ListPopulationTermType)
87848786 , _lptContains :: !(Maybe Bool)
8785− }
8787+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
87868788
87878789-- | Creates a value of 'ListPopulationTerm' with the minimum fields required to make a request.
87888790--
@@ -9189,7 +9191,7 @@ data ObjectFilter = ObjectFilter
91899191 { _ofStatus :: !(Maybe ObjectFilterStatus)
91909192 , _ofKind :: !Text
91919193 , _ofObjectIds :: !(Maybe [Int64])
9192− }
9194+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
91939195
91949196-- | Creates a value of 'ObjectFilter' with the minimum fields required to make a request.
91959197--
@@ -9765,7 +9767,7 @@ data OrderContact = OrderContact
97659767 , _ocContactTitle :: !(Maybe Text)
97669768 , _ocContactType :: !(Maybe OrderContactContactType)
97679769 , _ocContactInfo :: !(Maybe Text)
9768− }
9770+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
97699771
97709772-- | Creates a value of 'OrderContact' with the minimum fields required to make a request.
97719773--
@@ -9845,7 +9847,7 @@ data OrderDocument = OrderDocument
98459847 , _odOrderId :: !(Maybe Int64)
98469848 , _odCancelled :: !(Maybe Bool)
98479849 , _odCreatedInfo :: !(Maybe (Maybe LastModifiedInfo))
9848− }
9850+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
98499851
98509852-- | Creates a value of 'OrderDocument' with the minimum fields required to make a request.
98519853--
@@ -10211,7 +10213,7 @@ data Placement = Placement
1021110213 , _pArchived :: !(Maybe Bool)
1021210214 , _pPaymentApproved :: !(Maybe Bool)
1021310215 , _pPublisherUpdateInfo :: !(Maybe (Maybe LastModifiedInfo))
10214− }
10216+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1021510217
1021610218-- | Creates a value of 'Placement' with the minimum fields required to make a request.
1021710219--
@@ -10648,7 +10650,7 @@ data PlacementGroup = PlacementGroup
1064810650 , _pgPrimaryPlacementIdDimensionValue :: !(Maybe (Maybe DimensionValue))
1064910651 , _pgSiteId :: !(Maybe Int64)
1065010652 , _pgArchived :: !(Maybe Bool)
10651− }
10653+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1065210654
1065310655-- | Creates a value of 'PlacementGroup' with the minimum fields required to make a request.
1065410656--
@@ -11262,7 +11264,7 @@ data PopupWindowProperties = PopupWindowProperties
1126211264 , _pwpShowScrollBar :: !(Maybe Bool)
1126311265 , _pwpShowToolBar :: !(Maybe Bool)
1126411266 , _pwpTitle :: !(Maybe Text)
11265− }
11267+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1126611268
1126711269-- | Creates a value of 'PopupWindowProperties' with the minimum fields required to make a request.
1126811270--
@@ -11458,7 +11460,7 @@ data Pricing = Pricing
1145811460 , _pPricingType :: !(Maybe PricingPricingType)
1145911461 , _pFlights :: !(Maybe [Maybe Flight])
1146011462 , _pCapCostType :: !(Maybe PricingCapCostType)
11461− }
11463+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1146211464
1146311465-- | Creates a value of 'Pricing' with the minimum fields required to make a request.
1146411466--
@@ -11540,7 +11542,7 @@ data PricingSchedule = PricingSchedule
1154011542 , _psPricingType :: !(Maybe PricingSchedulePricingType)
1154111543 , _psPricingPeriods :: !(Maybe [Maybe PricingSchedulePricingPeriod])
1154211544 , _psFlighted :: !(Maybe Bool)
11543− }
11545+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1154411546
1154511547-- | Creates a value of 'PricingSchedule' with the minimum fields required to make a request.
1154611548--
@@ -11738,7 +11740,7 @@ data Project = Project
1173811740 , _ppAudienceGender :: !(Maybe ProjectAudienceGender)
1173911741 , _ppClientName :: !(Maybe Text)
1174011742 , _ppTargetCpaNanos :: !(Maybe Int64)
11741− }
11743+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1174211744
1174311745-- | Creates a value of 'Project' with the minimum fields required to make a request.
1174411746--
@@ -12070,7 +12072,7 @@ data Recipient = Recipient
1207012072 { _recEmail :: !(Maybe Text)
1207112073 , _recKind :: !Text
1207212074 , _recDeliveryType :: !(Maybe RecipientDeliveryType)
12073− }
12075+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1207412076
1207512077-- | Creates a value of 'Recipient' with the minimum fields required to make a request.
1207612078--
@@ -12230,7 +12232,7 @@ data RemarketingList = RemarketingList
1223012232 , _remId :: !(Maybe Int64)
1223112233 , _remSubaccountId :: !(Maybe Int64)
1223212234 , _remDescription :: !(Maybe Text)
12233− }
12235+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1223412236
1223512237-- | Creates a value of 'RemarketingList' with the minimum fields required to make a request.
1223612238--
@@ -12484,7 +12486,7 @@ data Report = Report
1248412486 , _repFloodlightCriteria :: !(Maybe ReportFloodlightCriteria)
1248512487 , _repCriteria :: !(Maybe ReportCriteria)
1248612488 , _repFileName :: !(Maybe Text)
12487− }
12489+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1248812490
1248912491-- | Creates a value of 'Report' with the minimum fields required to make a request.
1249012492--
@@ -12813,7 +12815,7 @@ data ReportCrossDimensionReachCriteria = ReportCrossDimensionReachCriteria
1281312815 , _rcdrcDimensionFilters :: !(Maybe [Maybe DimensionValue])
1281412816 , _rcdrcDateRange :: !(Maybe (Maybe DateRange))
1281512817 , _rcdrcOverlapMetricNames :: !(Maybe [Text])
12816− }
12818+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1281712819
1281812820-- | Creates a value of 'ReportCrossDimensionReachCriteria' with the minimum fields required to make a request.
1281912821--
@@ -12902,7 +12904,7 @@ data ReportDelivery = ReportDelivery
1290212904 , _rdRecipients :: !(Maybe [Maybe Recipient])
1290312905 , _rdMessage :: !(Maybe Text)
1290412906 , _rdEmailOwnerDeliveryType :: !(Maybe ReportEmailOwnerDeliveryTypeDelivery)
12905− }
12907+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1290612908
1290712909-- | Creates a value of 'ReportDelivery' with the minimum fields required to make a request.
1290812910--
@@ -13515,7 +13517,7 @@ data ReportSchedule = ReportSchedule
1351513517 , _rsExpirationDate :: !(Maybe UTCTime)
1351613518 , _rsRunsOnDayOfMonth :: !(Maybe ReportRunsOnDayOfMonthSchedule)
1351713519 , _rsRepeatsOnWeekDays :: !(Maybe [ReportItemRepeatsOnWeekDaysSchedule])
13518− }
13520+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1351913521
1352013522-- | Creates a value of 'ReportSchedule' with the minimum fields required to make a request.
1352113523--
@@ -13845,7 +13847,7 @@ data SiteContact = SiteContact
1384513847 , _scId :: !(Maybe Int64)
1384613848 , _scTitle :: !(Maybe Text)
1384713849 , _scContactType :: !(Maybe SiteContactContactType)
13848− }
13850+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1384913851
1385013852-- | Creates a value of 'SiteContact' with the minimum fields required to make a request.
1385113853--
@@ -14135,7 +14137,7 @@ data SortedDimension = SortedDimension
1413514137 { _sdKind :: !Text
1413614138 , _sdSortOrder :: !(Maybe SortedDimensionSortOrder)
1413714139 , _sdName :: !(Maybe Text)
14138− }
14140+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1413914141
1414014142-- | Creates a value of 'SortedDimension' with the minimum fields required to make a request.
1414114143--
@@ -14287,7 +14289,7 @@ data TagData = TagData
1428714289 , _tdCreativeId :: !(Maybe Int64)
1428814290 , _tdAdId :: !(Maybe Int64)
1428914291 , _tdImpressionTag :: !(Maybe Text)
14290− }
14292+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1429114293
1429214294-- | Creates a value of 'TagData' with the minimum fields required to make a request.
1429314295--
@@ -14345,7 +14347,7 @@ data TagSetting = TagSetting
1434514347 , _tsIncludeClickThroughUrls :: !(Maybe Bool)
1434614348 , _tsIncludeClickTracking :: !(Maybe Bool)
1434714349 , _tsAdditionalKeyValues :: !(Maybe Text)
14348− }
14350+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1434914351
1435014352-- | Creates a value of 'TagSetting' with the minimum fields required to make a request.
1435114353--
@@ -14440,7 +14442,7 @@ tsImageTagEnabled
1444014442data TargetWindow = TargetWindow
1444114443 { _twCustomHtml :: !(Maybe Text)
1444214444 , _twTargetWindowOption :: !(Maybe TargetWindowTargetWindowOption)
14443− }
14445+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1444414446
1444514447-- | Creates a value of 'TargetWindow' with the minimum fields required to make a request.
1444614448--
@@ -14492,7 +14494,7 @@ data TargetableRemarketingList = TargetableRemarketingList
1449214494 , _trlId :: !(Maybe Int64)
1449314495 , _trlSubaccountId :: !(Maybe Int64)
1449414496 , _trlDescription :: !(Maybe Text)
14495− }
14497+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1449614498
1449714499-- | Creates a value of 'TargetableRemarketingList' with the minimum fields required to make a request.
1449814500--
@@ -14798,7 +14800,7 @@ tpatName = lens _tpatName (\ s a -> s{_tpatName = a})
1479814800data ThirdPartyTrackingUrl = ThirdPartyTrackingUrl
1479914801 { _tptuUrl :: !(Maybe Text)
1480014802 , _tptuThirdPartyUrlType :: !(Maybe ThirdPartyTrackingUrlThirdPartyUrlType)
14801− }
14803+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1480214804
1480314805-- | Creates a value of 'ThirdPartyTrackingUrl' with the minimum fields required to make a request.
1480414806--
@@ -14832,7 +14834,7 @@ data UserDefinedVariableConfiguration = UserDefinedVariableConfiguration
1483214834 { _udvcReportName :: !(Maybe Text)
1483314835 , _udvcDataType :: !(Maybe UserDefinedVariableConfigurationDataType)
1483414836 , _udvcVariableType :: !(Maybe UserDefinedVariableConfigurationVariableType)
14835− }
14837+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1483614838
1483714839-- | Creates a value of 'UserDefinedVariableConfiguration' with the minimum fields required to make a request.
1483814840--
@@ -15111,7 +15113,7 @@ data UserRolePermission = UserRolePermission
1511115113 , _urpName :: !(Maybe Text)
1511215114 , _urpId :: !(Maybe Int64)
1511315115 , _urpPermissionGroupId :: !(Maybe Int64)
15114− }
15116+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1511515117
1511615118-- | Creates a value of 'UserRolePermission' with the minimum fields required to make a request.
1511715119--
gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Sum.hs+2027
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.DFAReporting.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -25,6 +28,17 @@ data AccountAccountProfile
2528
2629instance Hashable AccountAccountProfile
2730
31+instance FromText AccountAccountProfile where
32+ fromText = \case
33+ "ACCOUNT_PROFILE_BASIC" -> Just AAPAccountProfileBasic
34+ "ACCOUNT_PROFILE_STANDARD" -> Just AAPAccountProfileStandard
35+ _ -> Nothing
36+
37+instance ToText AccountAccountProfile where
38+ toText = \case
39+ AAPAccountProfileBasic -> "ACCOUNT_PROFILE_BASIC"
40+ AAPAccountProfileStandard -> "ACCOUNT_PROFILE_STANDARD"
41+
2842-- | Maximum number of active ads allowed for the account.
2943data AccountActiveAdSummaryActiveAdsLimitTier
3044 = AAASAALTActiveAdsTier100K
@@ -41,6 +55,23 @@ data AccountActiveAdSummaryActiveAdsLimitTier
4155
4256instance Hashable AccountActiveAdSummaryActiveAdsLimitTier
4357
58+instance FromText AccountActiveAdSummaryActiveAdsLimitTier where
59+ fromText = \case
60+ "ACTIVE_ADS_TIER_100K" -> Just AAASAALTActiveAdsTier100K
61+ "ACTIVE_ADS_TIER_200K" -> Just AAASAALTActiveAdsTier200K
62+ "ACTIVE_ADS_TIER_300K" -> Just AAASAALTActiveAdsTier300K
63+ "ACTIVE_ADS_TIER_40K" -> Just AAASAALTActiveAdsTier40K
64+ "ACTIVE_ADS_TIER_75K" -> Just AAASAALTActiveAdsTier75K
65+ _ -> Nothing
66+
67+instance ToText AccountActiveAdSummaryActiveAdsLimitTier where
68+ toText = \case
69+ AAASAALTActiveAdsTier100K -> "ACTIVE_ADS_TIER_100K"
70+ AAASAALTActiveAdsTier200K -> "ACTIVE_ADS_TIER_200K"
71+ AAASAALTActiveAdsTier300K -> "ACTIVE_ADS_TIER_300K"
72+ AAASAALTActiveAdsTier40K -> "ACTIVE_ADS_TIER_40K"
73+ AAASAALTActiveAdsTier75K -> "ACTIVE_ADS_TIER_75K"
74+
4475-- | Maximum number of active ads allowed for this account.
4576data AccountActiveAdsLimitTier
4677 = AAALTActiveAdsTier100K
@@ -57,6 +88,23 @@ data AccountActiveAdsLimitTier
5788
5889instance Hashable AccountActiveAdsLimitTier
5990
91+instance FromText AccountActiveAdsLimitTier where
92+ fromText = \case
93+ "ACTIVE_ADS_TIER_100K" -> Just AAALTActiveAdsTier100K
94+ "ACTIVE_ADS_TIER_200K" -> Just AAALTActiveAdsTier200K
95+ "ACTIVE_ADS_TIER_300K" -> Just AAALTActiveAdsTier300K
96+ "ACTIVE_ADS_TIER_40K" -> Just AAALTActiveAdsTier40K
97+ "ACTIVE_ADS_TIER_75K" -> Just AAALTActiveAdsTier75K
98+ _ -> Nothing
99+
100+instance ToText AccountActiveAdsLimitTier where
101+ toText = \case
102+ AAALTActiveAdsTier100K -> "ACTIVE_ADS_TIER_100K"
103+ AAALTActiveAdsTier200K -> "ACTIVE_ADS_TIER_200K"
104+ AAALTActiveAdsTier300K -> "ACTIVE_ADS_TIER_300K"
105+ AAALTActiveAdsTier40K -> "ACTIVE_ADS_TIER_40K"
106+ AAALTActiveAdsTier75K -> "ACTIVE_ADS_TIER_75K"
107+
60108data AccountPermissionItemAccountProfiles
61109 = APIAPAccountProfileBasic
62110 -- ^ @ACCOUNT_PROFILE_BASIC@
@@ -66,6 +114,17 @@ data AccountPermissionItemAccountProfiles
66114
67115instance Hashable AccountPermissionItemAccountProfiles
68116
117+instance FromText AccountPermissionItemAccountProfiles where
118+ fromText = \case
119+ "ACCOUNT_PROFILE_BASIC" -> Just APIAPAccountProfileBasic
120+ "ACCOUNT_PROFILE_STANDARD" -> Just APIAPAccountProfileStandard
121+ _ -> Nothing
122+
123+instance ToText AccountPermissionItemAccountProfiles where
124+ toText = \case
125+ APIAPAccountProfileBasic -> "ACCOUNT_PROFILE_BASIC"
126+ APIAPAccountProfileStandard -> "ACCOUNT_PROFILE_STANDARD"
127+
69128-- | Administrative level required to enable this account permission.
70129data AccountPermissionLevel
71130 = APLAdministrator
@@ -76,6 +135,17 @@ data AccountPermissionLevel
76135
77136instance Hashable AccountPermissionLevel
78137
138+instance FromText AccountPermissionLevel where
139+ fromText = \case
140+ "ADMINISTRATOR" -> Just APLAdministrator
141+ "USER" -> Just APLUser
142+ _ -> Nothing
143+
144+instance ToText AccountPermissionLevel where
145+ toText = \case
146+ APLAdministrator -> "ADMINISTRATOR"
147+ APLUser -> "USER"
148+
79149-- | Trafficker type of this user profile.
80150data AccountUserProfileTraffickerType
81151 = AUPTTExternalTrafficker
@@ -88,6 +158,19 @@ data AccountUserProfileTraffickerType
88158
89159instance Hashable AccountUserProfileTraffickerType
90160
161+instance FromText AccountUserProfileTraffickerType where
162+ fromText = \case
163+ "EXTERNAL_TRAFFICKER" -> Just AUPTTExternalTrafficker
164+ "INTERNAL_NON_TRAFFICKER" -> Just AUPTTInternalNonTrafficker
165+ "INTERNAL_TRAFFICKER" -> Just AUPTTInternalTrafficker
166+ _ -> Nothing
167+
168+instance ToText AccountUserProfileTraffickerType where
169+ toText = \case
170+ AUPTTExternalTrafficker -> "EXTERNAL_TRAFFICKER"
171+ AUPTTInternalNonTrafficker -> "INTERNAL_NON_TRAFFICKER"
172+ AUPTTInternalTrafficker -> "INTERNAL_TRAFFICKER"
173+
91174-- | User type of the user profile. This is a read-only field that can be
92175-- left blank.
93176data AccountUserProfileUserAccessType
@@ -101,6 +184,19 @@ data AccountUserProfileUserAccessType
101184
102185instance Hashable AccountUserProfileUserAccessType
103186
187+instance FromText AccountUserProfileUserAccessType where
188+ fromText = \case
189+ "INTERNAL_ADMINISTRATOR" -> Just AUPUATInternalAdministrator
190+ "NORMAL_USER" -> Just AUPUATNormalUser
191+ "SUPER_USER" -> Just AUPUATSuperUser
192+ _ -> Nothing
193+
194+instance ToText AccountUserProfileUserAccessType where
195+ toText = \case
196+ AUPUATInternalAdministrator -> "INTERNAL_ADMINISTRATOR"
197+ AUPUATNormalUser -> "NORMAL_USER"
198+ AUPUATSuperUser -> "SUPER_USER"
199+
104200-- | Compatibility of this ad. Applicable when type is AD_SERVING_DEFAULT_AD.
105201-- WEB and WEB_INTERSTITIAL refer to rendering either on desktop or on
106202-- mobile devices for regular or interstitial ads, respectively. APP and
@@ -122,6 +218,23 @@ data AdCompatibility
122218
123219instance Hashable AdCompatibility
124220
221+instance FromText AdCompatibility where
222+ fromText = \case
223+ "APP" -> Just ACApp
224+ "APP_INTERSTITIAL" -> Just ACAppInterstitial
225+ "IN_STREAM_VIDEO" -> Just ACInStreamVideo
226+ "WEB" -> Just ACWeb
227+ "WEB_INTERSTITIAL" -> Just ACWebInterstitial
228+ _ -> Nothing
229+
230+instance ToText AdCompatibility where
231+ toText = \case
232+ ACApp -> "APP"
233+ ACAppInterstitial -> "APP_INTERSTITIAL"
234+ ACInStreamVideo -> "IN_STREAM_VIDEO"
235+ ACWeb -> "WEB"
236+ ACWebInterstitial -> "WEB_INTERSTITIAL"
237+
125238-- | Ad slot compatibility. WEB and WEB_INTERSTITIAL refer to rendering
126239-- either on desktop or on mobile devices for regular or interstitial ads
127240-- respectively. APP and APP_INTERSTITIAL are for rendering in mobile apps.
@@ -142,6 +255,23 @@ data AdSlotCompatibility
142255
143256instance Hashable AdSlotCompatibility
144257
258+instance FromText AdSlotCompatibility where
259+ fromText = \case
260+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP" -> Just ASCPlanningRenderingEnvironmentTypeApp
261+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP_INTERSTITIAL" -> Just ASCPlanningRenderingEnvironmentTypeAppInterstitial
262+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_IN_STREAM_VIDEO" -> Just ASCPlanningRenderingEnvironmentTypeInStreamVideo
263+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB" -> Just ASCPlanningRenderingEnvironmentTypeWeb
264+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB_INTERSTITIAL" -> Just ASCPlanningRenderingEnvironmentTypeWebInterstitial
265+ _ -> Nothing
266+
267+instance ToText AdSlotCompatibility where
268+ toText = \case
269+ ASCPlanningRenderingEnvironmentTypeApp -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP"
270+ ASCPlanningRenderingEnvironmentTypeAppInterstitial -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP_INTERSTITIAL"
271+ ASCPlanningRenderingEnvironmentTypeInStreamVideo -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_IN_STREAM_VIDEO"
272+ ASCPlanningRenderingEnvironmentTypeWeb -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB"
273+ ASCPlanningRenderingEnvironmentTypeWebInterstitial -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB_INTERSTITIAL"
274+
145275-- | Payment source type of this ad slot.
146276data AdSlotPaymentSourceType
147277 = ASPSTPlanningPaymentSourceTypeAgencyPaid
@@ -152,6 +282,17 @@ data AdSlotPaymentSourceType
152282
153283instance Hashable AdSlotPaymentSourceType
154284
285+instance FromText AdSlotPaymentSourceType where
286+ fromText = \case
287+ "PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID" -> Just ASPSTPlanningPaymentSourceTypeAgencyPaid
288+ "PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID" -> Just ASPSTPlanningPaymentSourceTypePublisherPaid
289+ _ -> Nothing
290+
291+instance ToText AdSlotPaymentSourceType where
292+ toText = \case
293+ ASPSTPlanningPaymentSourceTypeAgencyPaid -> "PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID"
294+ ASPSTPlanningPaymentSourceTypePublisherPaid -> "PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID"
295+
155296-- | Type of ad. This is a required field on insertion. Note that default ads
156297-- (AD_SERVING_DEFAULT_AD) cannot be created directly (see Creative
157298-- resource).
@@ -168,6 +309,21 @@ data AdType
168309
169310instance Hashable AdType
170311
312+instance FromText AdType where
313+ fromText = \case
314+ "AD_SERVING_CLICK_TRACKER" -> Just ATAdServingClickTracker
315+ "AD_SERVING_DEFAULT_AD" -> Just ATAdServingDefaultAd
316+ "AD_SERVING_STANDARD_AD" -> Just ATAdServingStandardAd
317+ "AD_SERVING_TRACKING" -> Just ATAdServingTracking
318+ _ -> Nothing
319+
320+instance ToText AdType where
321+ toText = \case
322+ ATAdServingClickTracker -> "AD_SERVING_CLICK_TRACKER"
323+ ATAdServingDefaultAd -> "AD_SERVING_DEFAULT_AD"
324+ ATAdServingStandardAd -> "AD_SERVING_STANDARD_AD"
325+ ATAdServingTracking -> "AD_SERVING_TRACKING"
326+
171327-- | Status of this advertiser.
172328data AdvertiserStatus
173329 = ASApproved
@@ -178,6 +334,17 @@ data AdvertiserStatus
178334
179335instance Hashable AdvertiserStatus
180336
337+instance FromText AdvertiserStatus where
338+ fromText = \case
339+ "APPROVED" -> Just ASApproved
340+ "ON_HOLD" -> Just ASOnHold
341+ _ -> Nothing
342+
343+instance ToText AdvertiserStatus where
344+ toText = \case
345+ ASApproved -> "APPROVED"
346+ ASOnHold -> "ON_HOLD"
347+
181348-- | Type of artwork used for the creative. This is a read-only field.
182349-- Applicable to the following creative types: all RICH_MEDIA, and all
183350-- VPAID.
@@ -192,6 +359,19 @@ data CreativeArtworkType
192359
193360instance Hashable CreativeArtworkType
194361
362+instance FromText CreativeArtworkType where
363+ fromText = \case
364+ "ARTWORK_TYPE_FLASH" -> Just CATArtworkTypeFlash
365+ "ARTWORK_TYPE_HTML5" -> Just CATArtworkTypeHTML5
366+ "ARTWORK_TYPE_MIXED" -> Just CATArtworkTypeMixed
367+ _ -> Nothing
368+
369+instance ToText CreativeArtworkType where
370+ toText = \case
371+ CATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"
372+ CATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"
373+ CATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"
374+
195375-- | Possible alignments for an asset. This is a read-only field. Applicable
196376-- to the following creative types: RICH_MEDIA_MULTI_FLOATING.
197377data CreativeAssetAlignment
@@ -207,6 +387,21 @@ data CreativeAssetAlignment
207387
208388instance Hashable CreativeAssetAlignment
209389
390+instance FromText CreativeAssetAlignment where
391+ fromText = \case
392+ "ALIGNMENT_BOTTOM" -> Just CAAAlignmentBottom
393+ "ALIGNMENT_LEFT" -> Just CAAAlignmentLeft
394+ "ALIGNMENT_RIGHT" -> Just CAAAlignmentRight
395+ "ALIGNMENT_TOP" -> Just CAAAlignmentTop
396+ _ -> Nothing
397+
398+instance ToText CreativeAssetAlignment where
399+ toText = \case
400+ CAAAlignmentBottom -> "ALIGNMENT_BOTTOM"
401+ CAAAlignmentLeft -> "ALIGNMENT_LEFT"
402+ CAAAlignmentRight -> "ALIGNMENT_RIGHT"
403+ CAAAlignmentTop -> "ALIGNMENT_TOP"
404+
210405-- | Artwork type of rich media creative. This is a read-only field.
211406-- Applicable to the following creative types: all RICH_MEDIA.
212407data CreativeAssetArtworkType
@@ -220,6 +415,19 @@ data CreativeAssetArtworkType
220415
221416instance Hashable CreativeAssetArtworkType
222417
418+instance FromText CreativeAssetArtworkType where
419+ fromText = \case
420+ "ARTWORK_TYPE_FLASH" -> Just CAATArtworkTypeFlash
421+ "ARTWORK_TYPE_HTML5" -> Just CAATArtworkTypeHTML5
422+ "ARTWORK_TYPE_MIXED" -> Just CAATArtworkTypeMixed
423+ _ -> Nothing
424+
425+instance ToText CreativeAssetArtworkType where
426+ toText = \case
427+ CAATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"
428+ CAATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"
429+ CAATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"
430+
223431-- | Rich media child asset type. This is a read-only field. Applicable to
224432-- the following creative types: all VPAID.
225433data CreativeAssetChildAssetType
@@ -235,6 +443,21 @@ data CreativeAssetChildAssetType
235443
236444instance Hashable CreativeAssetChildAssetType
237445
446+instance FromText CreativeAssetChildAssetType where
447+ fromText = \case
448+ "CHILD_ASSET_TYPE_DATA" -> Just CACATChildAssetTypeData
449+ "CHILD_ASSET_TYPE_FLASH" -> Just CACATChildAssetTypeFlash
450+ "CHILD_ASSET_TYPE_IMAGE" -> Just CACATChildAssetTypeImage
451+ "CHILD_ASSET_TYPE_VIDEO" -> Just CACATChildAssetTypeVideo
452+ _ -> Nothing
453+
454+instance ToText CreativeAssetChildAssetType where
455+ toText = \case
456+ CACATChildAssetTypeData -> "CHILD_ASSET_TYPE_DATA"
457+ CACATChildAssetTypeFlash -> "CHILD_ASSET_TYPE_FLASH"
458+ CACATChildAssetTypeImage -> "CHILD_ASSET_TYPE_IMAGE"
459+ CACATChildAssetTypeVideo -> "CHILD_ASSET_TYPE_VIDEO"
460+
238461-- | Type of rich media asset. This is a read-only field. Applicable to the
239462-- following creative types: all RICH_MEDIA.
240463data CreativeAssetDisplayType
@@ -260,6 +483,31 @@ data CreativeAssetDisplayType
260483
261484instance Hashable CreativeAssetDisplayType
262485
486+instance FromText CreativeAssetDisplayType where
487+ fromText = \case
488+ "ASSET_DISPLAY_TYPE_EXPANDING" -> Just CADTAssetDisplayTypeExpanding
489+ "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH" -> Just CADTAssetDisplayTypeFlashInFlash
490+ "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING" -> Just CADTAssetDisplayTypeFlashInFlashExpanding
491+ "ASSET_DISPLAY_TYPE_FLOATING" -> Just CADTAssetDisplayTypeFloating
492+ "ASSET_DISPLAY_TYPE_INPAGE" -> Just CADTAssetDisplayTypeInpage
493+ "ASSET_DISPLAY_TYPE_OVERLAY" -> Just CADTAssetDisplayTypeOverlay
494+ "ASSET_DISPLAY_TYPE_PEEL_DOWN" -> Just CADTAssetDisplayTypePeelDown
495+ "ASSET_DISPLAY_TYPE_VPAID_LINEAR" -> Just CADTAssetDisplayTypeVpaidLinear
496+ "ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR" -> Just CADTAssetDisplayTypeVpaidNonLinear
497+ _ -> Nothing
498+
499+instance ToText CreativeAssetDisplayType where
500+ toText = \case
501+ CADTAssetDisplayTypeExpanding -> "ASSET_DISPLAY_TYPE_EXPANDING"
502+ CADTAssetDisplayTypeFlashInFlash -> "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH"
503+ CADTAssetDisplayTypeFlashInFlashExpanding -> "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING"
504+ CADTAssetDisplayTypeFloating -> "ASSET_DISPLAY_TYPE_FLOATING"
505+ CADTAssetDisplayTypeInpage -> "ASSET_DISPLAY_TYPE_INPAGE"
506+ CADTAssetDisplayTypeOverlay -> "ASSET_DISPLAY_TYPE_OVERLAY"
507+ CADTAssetDisplayTypePeelDown -> "ASSET_DISPLAY_TYPE_PEEL_DOWN"
508+ CADTAssetDisplayTypeVpaidLinear -> "ASSET_DISPLAY_TYPE_VPAID_LINEAR"
509+ CADTAssetDisplayTypeVpaidNonLinear -> "ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR"
510+
263511-- | Duration type for which an asset will be displayed. Applicable to the
264512-- following creative types: all RICH_MEDIA.
265513data CreativeAssetDurationType
@@ -273,6 +521,19 @@ data CreativeAssetDurationType
273521
274522instance Hashable CreativeAssetDurationType
275523
524+instance FromText CreativeAssetDurationType where
525+ fromText = \case
526+ "ASSET_DURATION_TYPE_AUTO" -> Just CADTAssetDurationTypeAuto
527+ "ASSET_DURATION_TYPE_CUSTOM" -> Just CADTAssetDurationTypeCustom
528+ "ASSET_DURATION_TYPE_NONE" -> Just CADTAssetDurationTypeNone
529+ _ -> Nothing
530+
531+instance ToText CreativeAssetDurationType where
532+ toText = \case
533+ CADTAssetDurationTypeAuto -> "ASSET_DURATION_TYPE_AUTO"
534+ CADTAssetDurationTypeCustom -> "ASSET_DURATION_TYPE_CUSTOM"
535+ CADTAssetDurationTypeNone -> "ASSET_DURATION_TYPE_NONE"
536+
276537-- | Type of asset to upload. This is a required field. IMAGE is solely used
277538-- for IMAGE creatives. Other image assets should use HTML_IMAGE.
278539data CreativeAssetIdType
@@ -290,6 +551,23 @@ data CreativeAssetIdType
290551
291552instance Hashable CreativeAssetIdType
292553
554+instance FromText CreativeAssetIdType where
555+ fromText = \case
556+ "FLASH" -> Just CAITFlash
557+ "HTML" -> Just CAITHTML
558+ "HTML_IMAGE" -> Just CAITHTMLImage
559+ "IMAGE" -> Just CAITImage
560+ "VIDEO" -> Just CAITVideo
561+ _ -> Nothing
562+
563+instance ToText CreativeAssetIdType where
564+ toText = \case
565+ CAITFlash -> "FLASH"
566+ CAITHTML -> "HTML"
567+ CAITHTMLImage -> "HTML_IMAGE"
568+ CAITImage -> "IMAGE"
569+ CAITVideo -> "VIDEO"
570+
293571data CreativeAssetItemDetectedFeatures
294572 = CAIDFApplicationCache
295573 -- ^ @APPLICATION_CACHE@
@@ -427,6 +705,145 @@ data CreativeAssetItemDetectedFeatures
427705
428706instance Hashable CreativeAssetItemDetectedFeatures
429707
708+instance FromText CreativeAssetItemDetectedFeatures where
709+ fromText = \case
710+ "APPLICATION_CACHE" -> Just CAIDFApplicationCache
711+ "AUDIO" -> Just CAIDFAudio
712+ "CANVAS" -> Just CAIDFCanvas
713+ "CANVAS_TEXT" -> Just CAIDFCanvasText
714+ "CSS_ANIMATIONS" -> Just CAIDFCssAnimations
715+ "CSS_BACKGROUND_SIZE" -> Just CAIDFCssBackgroundSize
716+ "CSS_BORDER_IMAGE" -> Just CAIDFCssBorderImage
717+ "CSS_BORDER_RADIUS" -> Just CAIDFCssBorderRadius
718+ "CSS_BOX_SHADOW" -> Just CAIDFCssBoxShadow
719+ "CSS_COLUMNS" -> Just CAIDFCssColumns
720+ "CSS_FLEX_BOX" -> Just CAIDFCssFlexBox
721+ "CSS_FONT_FACE" -> Just CAIDFCssFontFace
722+ "CSS_GENERATED_CONTENT" -> Just CAIDFCssGeneratedContent
723+ "CSS_GRADIENTS" -> Just CAIDFCssGradients
724+ "CSS_HSLA" -> Just CAIDFCssHsla
725+ "CSS_MULTIPLE_BGS" -> Just CAIDFCssMultipleBgs
726+ "CSS_OPACITY" -> Just CAIDFCssOpacity
727+ "CSS_REFLECTIONS" -> Just CAIDFCssReflections
728+ "CSS_RGBA" -> Just CAIDFCssRgba
729+ "CSS_TEXT_SHADOW" -> Just CAIDFCssTextShadow
730+ "CSS_TRANSFORMS" -> Just CAIDFCssTransforms
731+ "CSS_TRANSFORMS3D" -> Just CAIDFCssTRANSFORMS3D
732+ "CSS_TRANSITIONS" -> Just CAIDFCssTransitions
733+ "DRAG_AND_DROP" -> Just CAIDFDragAndDrop
734+ "GEO_LOCATION" -> Just CAIDFGeoLocation
735+ "HASH_CHANGE" -> Just CAIDFHashChange
736+ "HISTORY" -> Just CAIDFHistory
737+ "INDEXED_DB" -> Just CAIDFIndexedDB
738+ "INLINE_SVG" -> Just CAIDFInlineSvg
739+ "INPUT_ATTR_AUTOCOMPLETE" -> Just CAIDFInputAttrAutocomplete
740+ "INPUT_ATTR_AUTOFOCUS" -> Just CAIDFInputAttrAutofocus
741+ "INPUT_ATTR_LIST" -> Just CAIDFInputAttrList
742+ "INPUT_ATTR_MAX" -> Just CAIDFInputAttrMax
743+ "INPUT_ATTR_MIN" -> Just CAIDFInputAttrMin
744+ "INPUT_ATTR_MULTIPLE" -> Just CAIDFInputAttrMultiple
745+ "INPUT_ATTR_PATTERN" -> Just CAIDFInputAttrPattern
746+ "INPUT_ATTR_PLACEHOLDER" -> Just CAIDFInputAttrPlaceholder
747+ "INPUT_ATTR_REQUIRED" -> Just CAIDFInputAttrRequired
748+ "INPUT_ATTR_STEP" -> Just CAIDFInputAttrStep
749+ "INPUT_TYPE_COLOR" -> Just CAIDFInputTypeColor
750+ "INPUT_TYPE_DATE" -> Just CAIDFInputTypeDate
751+ "INPUT_TYPE_DATETIME" -> Just CAIDFInputTypeDatetime
752+ "INPUT_TYPE_DATETIME_LOCAL" -> Just CAIDFInputTypeDatetimeLocal
753+ "INPUT_TYPE_EMAIL" -> Just CAIDFInputTypeEmail
754+ "INPUT_TYPE_MONTH" -> Just CAIDFInputTypeMonth
755+ "INPUT_TYPE_NUMBER" -> Just CAIDFInputTypeNumber
756+ "INPUT_TYPE_RANGE" -> Just CAIDFInputTypeRange
757+ "INPUT_TYPE_SEARCH" -> Just CAIDFInputTypeSearch
758+ "INPUT_TYPE_TEL" -> Just CAIDFInputTypeTel
759+ "INPUT_TYPE_TIME" -> Just CAIDFInputTypeTime
760+ "INPUT_TYPE_URL" -> Just CAIDFInputTypeURL
761+ "INPUT_TYPE_WEEK" -> Just CAIDFInputTypeWeek
762+ "LOCAL_STORAGE" -> Just CAIDFLocalStorage
763+ "POST_MESSAGE" -> Just CAIDFPostMessage
764+ "SESSION_STORAGE" -> Just CAIDFSessionStorage
765+ "SMIL" -> Just CAIDFSmil
766+ "SVG_CLIP_PATHS" -> Just CAIDFSvgClipPaths
767+ "SVG_FE_IMAGE" -> Just CAIDFSvgFeImage
768+ "SVG_FILTERS" -> Just CAIDFSvgFilters
769+ "SVG_HREF" -> Just CAIDFSvgHref
770+ "TOUCH" -> Just CAIDFTouch
771+ "VIDEO" -> Just CAIDFVideo
772+ "WEBGL" -> Just CAIDFWebgl
773+ "WEB_SOCKETS" -> Just CAIDFWebSockets
774+ "WEB_SQL_DATABASE" -> Just CAIDFWebSqlDatabase
775+ "WEB_WORKERS" -> Just CAIDFWebWorkers
776+ _ -> Nothing
777+
778+instance ToText CreativeAssetItemDetectedFeatures where
779+ toText = \case
780+ CAIDFApplicationCache -> "APPLICATION_CACHE"
781+ CAIDFAudio -> "AUDIO"
782+ CAIDFCanvas -> "CANVAS"
783+ CAIDFCanvasText -> "CANVAS_TEXT"
784+ CAIDFCssAnimations -> "CSS_ANIMATIONS"
785+ CAIDFCssBackgroundSize -> "CSS_BACKGROUND_SIZE"
786+ CAIDFCssBorderImage -> "CSS_BORDER_IMAGE"
787+ CAIDFCssBorderRadius -> "CSS_BORDER_RADIUS"
788+ CAIDFCssBoxShadow -> "CSS_BOX_SHADOW"
789+ CAIDFCssColumns -> "CSS_COLUMNS"
790+ CAIDFCssFlexBox -> "CSS_FLEX_BOX"
791+ CAIDFCssFontFace -> "CSS_FONT_FACE"
792+ CAIDFCssGeneratedContent -> "CSS_GENERATED_CONTENT"
793+ CAIDFCssGradients -> "CSS_GRADIENTS"
794+ CAIDFCssHsla -> "CSS_HSLA"
795+ CAIDFCssMultipleBgs -> "CSS_MULTIPLE_BGS"
796+ CAIDFCssOpacity -> "CSS_OPACITY"
797+ CAIDFCssReflections -> "CSS_REFLECTIONS"
798+ CAIDFCssRgba -> "CSS_RGBA"
799+ CAIDFCssTextShadow -> "CSS_TEXT_SHADOW"
800+ CAIDFCssTransforms -> "CSS_TRANSFORMS"
801+ CAIDFCssTRANSFORMS3D -> "CSS_TRANSFORMS3D"
802+ CAIDFCssTransitions -> "CSS_TRANSITIONS"
803+ CAIDFDragAndDrop -> "DRAG_AND_DROP"
804+ CAIDFGeoLocation -> "GEO_LOCATION"
805+ CAIDFHashChange -> "HASH_CHANGE"
806+ CAIDFHistory -> "HISTORY"
807+ CAIDFIndexedDB -> "INDEXED_DB"
808+ CAIDFInlineSvg -> "INLINE_SVG"
809+ CAIDFInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"
810+ CAIDFInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"
811+ CAIDFInputAttrList -> "INPUT_ATTR_LIST"
812+ CAIDFInputAttrMax -> "INPUT_ATTR_MAX"
813+ CAIDFInputAttrMin -> "INPUT_ATTR_MIN"
814+ CAIDFInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"
815+ CAIDFInputAttrPattern -> "INPUT_ATTR_PATTERN"
816+ CAIDFInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"
817+ CAIDFInputAttrRequired -> "INPUT_ATTR_REQUIRED"
818+ CAIDFInputAttrStep -> "INPUT_ATTR_STEP"
819+ CAIDFInputTypeColor -> "INPUT_TYPE_COLOR"
820+ CAIDFInputTypeDate -> "INPUT_TYPE_DATE"
821+ CAIDFInputTypeDatetime -> "INPUT_TYPE_DATETIME"
822+ CAIDFInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"
823+ CAIDFInputTypeEmail -> "INPUT_TYPE_EMAIL"
824+ CAIDFInputTypeMonth -> "INPUT_TYPE_MONTH"
825+ CAIDFInputTypeNumber -> "INPUT_TYPE_NUMBER"
826+ CAIDFInputTypeRange -> "INPUT_TYPE_RANGE"
827+ CAIDFInputTypeSearch -> "INPUT_TYPE_SEARCH"
828+ CAIDFInputTypeTel -> "INPUT_TYPE_TEL"
829+ CAIDFInputTypeTime -> "INPUT_TYPE_TIME"
830+ CAIDFInputTypeURL -> "INPUT_TYPE_URL"
831+ CAIDFInputTypeWeek -> "INPUT_TYPE_WEEK"
832+ CAIDFLocalStorage -> "LOCAL_STORAGE"
833+ CAIDFPostMessage -> "POST_MESSAGE"
834+ CAIDFSessionStorage -> "SESSION_STORAGE"
835+ CAIDFSmil -> "SMIL"
836+ CAIDFSvgClipPaths -> "SVG_CLIP_PATHS"
837+ CAIDFSvgFeImage -> "SVG_FE_IMAGE"
838+ CAIDFSvgFilters -> "SVG_FILTERS"
839+ CAIDFSvgHref -> "SVG_HREF"
840+ CAIDFTouch -> "TOUCH"
841+ CAIDFVideo -> "VIDEO"
842+ CAIDFWebgl -> "WEBGL"
843+ CAIDFWebSockets -> "WEB_SOCKETS"
844+ CAIDFWebSqlDatabase -> "WEB_SQL_DATABASE"
845+ CAIDFWebWorkers -> "WEB_WORKERS"
846+
430847data CreativeAssetMetadataItemDetectedFeatures
431848 = CAMIDFApplicationCache
432849 -- ^ @APPLICATION_CACHE@
@@ -564,6 +981,145 @@ data CreativeAssetMetadataItemDetectedFeatures
564981
565982instance Hashable CreativeAssetMetadataItemDetectedFeatures
566983
984+instance FromText CreativeAssetMetadataItemDetectedFeatures where
985+ fromText = \case
986+ "APPLICATION_CACHE" -> Just CAMIDFApplicationCache
987+ "AUDIO" -> Just CAMIDFAudio
988+ "CANVAS" -> Just CAMIDFCanvas
989+ "CANVAS_TEXT" -> Just CAMIDFCanvasText
990+ "CSS_ANIMATIONS" -> Just CAMIDFCssAnimations
991+ "CSS_BACKGROUND_SIZE" -> Just CAMIDFCssBackgroundSize
992+ "CSS_BORDER_IMAGE" -> Just CAMIDFCssBorderImage
993+ "CSS_BORDER_RADIUS" -> Just CAMIDFCssBorderRadius
994+ "CSS_BOX_SHADOW" -> Just CAMIDFCssBoxShadow
995+ "CSS_COLUMNS" -> Just CAMIDFCssColumns
996+ "CSS_FLEX_BOX" -> Just CAMIDFCssFlexBox
997+ "CSS_FONT_FACE" -> Just CAMIDFCssFontFace
998+ "CSS_GENERATED_CONTENT" -> Just CAMIDFCssGeneratedContent
999+ "CSS_GRADIENTS" -> Just CAMIDFCssGradients
1000+ "CSS_HSLA" -> Just CAMIDFCssHsla
1001+ "CSS_MULTIPLE_BGS" -> Just CAMIDFCssMultipleBgs
1002+ "CSS_OPACITY" -> Just CAMIDFCssOpacity
1003+ "CSS_REFLECTIONS" -> Just CAMIDFCssReflections
1004+ "CSS_RGBA" -> Just CAMIDFCssRgba
1005+ "CSS_TEXT_SHADOW" -> Just CAMIDFCssTextShadow
1006+ "CSS_TRANSFORMS" -> Just CAMIDFCssTransforms
1007+ "CSS_TRANSFORMS3D" -> Just CAMIDFCssTRANSFORMS3D
1008+ "CSS_TRANSITIONS" -> Just CAMIDFCssTransitions
1009+ "DRAG_AND_DROP" -> Just CAMIDFDragAndDrop
1010+ "GEO_LOCATION" -> Just CAMIDFGeoLocation
1011+ "HASH_CHANGE" -> Just CAMIDFHashChange
1012+ "HISTORY" -> Just CAMIDFHistory
1013+ "INDEXED_DB" -> Just CAMIDFIndexedDB
1014+ "INLINE_SVG" -> Just CAMIDFInlineSvg
1015+ "INPUT_ATTR_AUTOCOMPLETE" -> Just CAMIDFInputAttrAutocomplete
1016+ "INPUT_ATTR_AUTOFOCUS" -> Just CAMIDFInputAttrAutofocus
1017+ "INPUT_ATTR_LIST" -> Just CAMIDFInputAttrList
1018+ "INPUT_ATTR_MAX" -> Just CAMIDFInputAttrMax
1019+ "INPUT_ATTR_MIN" -> Just CAMIDFInputAttrMin
1020+ "INPUT_ATTR_MULTIPLE" -> Just CAMIDFInputAttrMultiple
1021+ "INPUT_ATTR_PATTERN" -> Just CAMIDFInputAttrPattern
1022+ "INPUT_ATTR_PLACEHOLDER" -> Just CAMIDFInputAttrPlaceholder
1023+ "INPUT_ATTR_REQUIRED" -> Just CAMIDFInputAttrRequired
1024+ "INPUT_ATTR_STEP" -> Just CAMIDFInputAttrStep
1025+ "INPUT_TYPE_COLOR" -> Just CAMIDFInputTypeColor
1026+ "INPUT_TYPE_DATE" -> Just CAMIDFInputTypeDate
1027+ "INPUT_TYPE_DATETIME" -> Just CAMIDFInputTypeDatetime
1028+ "INPUT_TYPE_DATETIME_LOCAL" -> Just CAMIDFInputTypeDatetimeLocal
1029+ "INPUT_TYPE_EMAIL" -> Just CAMIDFInputTypeEmail
1030+ "INPUT_TYPE_MONTH" -> Just CAMIDFInputTypeMonth
1031+ "INPUT_TYPE_NUMBER" -> Just CAMIDFInputTypeNumber
1032+ "INPUT_TYPE_RANGE" -> Just CAMIDFInputTypeRange
1033+ "INPUT_TYPE_SEARCH" -> Just CAMIDFInputTypeSearch
1034+ "INPUT_TYPE_TEL" -> Just CAMIDFInputTypeTel
1035+ "INPUT_TYPE_TIME" -> Just CAMIDFInputTypeTime
1036+ "INPUT_TYPE_URL" -> Just CAMIDFInputTypeURL
1037+ "INPUT_TYPE_WEEK" -> Just CAMIDFInputTypeWeek
1038+ "LOCAL_STORAGE" -> Just CAMIDFLocalStorage
1039+ "POST_MESSAGE" -> Just CAMIDFPostMessage
1040+ "SESSION_STORAGE" -> Just CAMIDFSessionStorage
1041+ "SMIL" -> Just CAMIDFSmil
1042+ "SVG_CLIP_PATHS" -> Just CAMIDFSvgClipPaths
1043+ "SVG_FE_IMAGE" -> Just CAMIDFSvgFeImage
1044+ "SVG_FILTERS" -> Just CAMIDFSvgFilters
1045+ "SVG_HREF" -> Just CAMIDFSvgHref
1046+ "TOUCH" -> Just CAMIDFTouch
1047+ "VIDEO" -> Just CAMIDFVideo
1048+ "WEBGL" -> Just CAMIDFWebgl
1049+ "WEB_SOCKETS" -> Just CAMIDFWebSockets
1050+ "WEB_SQL_DATABASE" -> Just CAMIDFWebSqlDatabase
1051+ "WEB_WORKERS" -> Just CAMIDFWebWorkers
1052+ _ -> Nothing
1053+
1054+instance ToText CreativeAssetMetadataItemDetectedFeatures where
1055+ toText = \case
1056+ CAMIDFApplicationCache -> "APPLICATION_CACHE"
1057+ CAMIDFAudio -> "AUDIO"
1058+ CAMIDFCanvas -> "CANVAS"
1059+ CAMIDFCanvasText -> "CANVAS_TEXT"
1060+ CAMIDFCssAnimations -> "CSS_ANIMATIONS"
1061+ CAMIDFCssBackgroundSize -> "CSS_BACKGROUND_SIZE"
1062+ CAMIDFCssBorderImage -> "CSS_BORDER_IMAGE"
1063+ CAMIDFCssBorderRadius -> "CSS_BORDER_RADIUS"
1064+ CAMIDFCssBoxShadow -> "CSS_BOX_SHADOW"
1065+ CAMIDFCssColumns -> "CSS_COLUMNS"
1066+ CAMIDFCssFlexBox -> "CSS_FLEX_BOX"
1067+ CAMIDFCssFontFace -> "CSS_FONT_FACE"
1068+ CAMIDFCssGeneratedContent -> "CSS_GENERATED_CONTENT"
1069+ CAMIDFCssGradients -> "CSS_GRADIENTS"
1070+ CAMIDFCssHsla -> "CSS_HSLA"
1071+ CAMIDFCssMultipleBgs -> "CSS_MULTIPLE_BGS"
1072+ CAMIDFCssOpacity -> "CSS_OPACITY"
1073+ CAMIDFCssReflections -> "CSS_REFLECTIONS"
1074+ CAMIDFCssRgba -> "CSS_RGBA"
1075+ CAMIDFCssTextShadow -> "CSS_TEXT_SHADOW"
1076+ CAMIDFCssTransforms -> "CSS_TRANSFORMS"
1077+ CAMIDFCssTRANSFORMS3D -> "CSS_TRANSFORMS3D"
1078+ CAMIDFCssTransitions -> "CSS_TRANSITIONS"
1079+ CAMIDFDragAndDrop -> "DRAG_AND_DROP"
1080+ CAMIDFGeoLocation -> "GEO_LOCATION"
1081+ CAMIDFHashChange -> "HASH_CHANGE"
1082+ CAMIDFHistory -> "HISTORY"
1083+ CAMIDFIndexedDB -> "INDEXED_DB"
1084+ CAMIDFInlineSvg -> "INLINE_SVG"
1085+ CAMIDFInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"
1086+ CAMIDFInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"
1087+ CAMIDFInputAttrList -> "INPUT_ATTR_LIST"
1088+ CAMIDFInputAttrMax -> "INPUT_ATTR_MAX"
1089+ CAMIDFInputAttrMin -> "INPUT_ATTR_MIN"
1090+ CAMIDFInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"
1091+ CAMIDFInputAttrPattern -> "INPUT_ATTR_PATTERN"
1092+ CAMIDFInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"
1093+ CAMIDFInputAttrRequired -> "INPUT_ATTR_REQUIRED"
1094+ CAMIDFInputAttrStep -> "INPUT_ATTR_STEP"
1095+ CAMIDFInputTypeColor -> "INPUT_TYPE_COLOR"
1096+ CAMIDFInputTypeDate -> "INPUT_TYPE_DATE"
1097+ CAMIDFInputTypeDatetime -> "INPUT_TYPE_DATETIME"
1098+ CAMIDFInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"
1099+ CAMIDFInputTypeEmail -> "INPUT_TYPE_EMAIL"
1100+ CAMIDFInputTypeMonth -> "INPUT_TYPE_MONTH"
1101+ CAMIDFInputTypeNumber -> "INPUT_TYPE_NUMBER"
1102+ CAMIDFInputTypeRange -> "INPUT_TYPE_RANGE"
1103+ CAMIDFInputTypeSearch -> "INPUT_TYPE_SEARCH"
1104+ CAMIDFInputTypeTel -> "INPUT_TYPE_TEL"
1105+ CAMIDFInputTypeTime -> "INPUT_TYPE_TIME"
1106+ CAMIDFInputTypeURL -> "INPUT_TYPE_URL"
1107+ CAMIDFInputTypeWeek -> "INPUT_TYPE_WEEK"
1108+ CAMIDFLocalStorage -> "LOCAL_STORAGE"
1109+ CAMIDFPostMessage -> "POST_MESSAGE"
1110+ CAMIDFSessionStorage -> "SESSION_STORAGE"
1111+ CAMIDFSmil -> "SMIL"
1112+ CAMIDFSvgClipPaths -> "SVG_CLIP_PATHS"
1113+ CAMIDFSvgFeImage -> "SVG_FE_IMAGE"
1114+ CAMIDFSvgFilters -> "SVG_FILTERS"
1115+ CAMIDFSvgHref -> "SVG_HREF"
1116+ CAMIDFTouch -> "TOUCH"
1117+ CAMIDFVideo -> "VIDEO"
1118+ CAMIDFWebgl -> "WEBGL"
1119+ CAMIDFWebSockets -> "WEB_SOCKETS"
1120+ CAMIDFWebSqlDatabase -> "WEB_SQL_DATABASE"
1121+ CAMIDFWebWorkers -> "WEB_WORKERS"
1122+
5671123data CreativeAssetMetadataItemWarnedValidationRules
5681124 = CAMIWVRADMobReferenced
5691125 -- ^ @ADMOB_REFERENCED@
@@ -611,6 +1167,55 @@ data CreativeAssetMetadataItemWarnedValidationRules
6111167
6121168instance Hashable CreativeAssetMetadataItemWarnedValidationRules
6131169
1170+instance FromText CreativeAssetMetadataItemWarnedValidationRules where
1171+ fromText = \case
1172+ "ADMOB_REFERENCED" -> Just CAMIWVRADMobReferenced
1173+ "ASSET_FORMAT_UNSUPPORTED_DCM" -> Just CAMIWVRAssetFormatUnsupportedDcm
1174+ "ASSET_INVALID" -> Just CAMIWVRAssetInvalid
1175+ "CLICK_TAG_INVALID" -> Just CAMIWVRClickTagInvalid
1176+ "CLICK_TAG_MISSING" -> Just CAMIWVRClickTagMissing
1177+ "CLICK_TAG_MORE_THAN_ONE" -> Just CAMIWVRClickTagMoreThanOne
1178+ "CLICK_TAG_NON_TOP_LEVEL" -> Just CAMIWVRClickTagNonTopLevel
1179+ "COMPONENT_UNSUPPORTED_DCM" -> Just CAMIWVRComponentUnsupportedDcm
1180+ "ENABLER_UNSUPPORTED_METHOD_DCM" -> Just CAMIWVREnablerUnsupportedMethodDcm
1181+ "EXTERNAL_FILE_REFERENCED" -> Just CAMIWVRExternalFileReferenced
1182+ "FILE_DETAIL_EMPTY" -> Just CAMIWVRFileDetailEmpty
1183+ "FILE_TYPE_INVALID" -> Just CAMIWVRFileTypeInvalid
1184+ "GWD_PROPERTIES_INVALID" -> Just CAMIWVRGwdPropertiesInvalid
1185+ "HTML5_FEATURE_UNSUPPORTED" -> Just CAMIWVRHTML5FeatureUnsupported
1186+ "LINKED_FILE_NOT_FOUND" -> Just CAMIWVRLinkedFileNotFound
1187+ "MAX_FLASH_VERSION_11" -> Just CAMIWVRMaxFlashVersion11
1188+ "MRAID_REFERENCED" -> Just CAMIWVRMraidReferenced
1189+ "NOT_SSL_COMPLIANT" -> Just CAMIWVRNotSSLCompliant
1190+ "ORPHANED_ASSET" -> Just CAMIWVROrphanedAsset
1191+ "PRIMARY_HTML_MISSING" -> Just CAMIWVRPrimaryHTMLMissing
1192+ "ZIP_INVALID" -> Just CAMIWVRZipInvalid
1193+ _ -> Nothing
1194+
1195+instance ToText CreativeAssetMetadataItemWarnedValidationRules where
1196+ toText = \case
1197+ CAMIWVRADMobReferenced -> "ADMOB_REFERENCED"
1198+ CAMIWVRAssetFormatUnsupportedDcm -> "ASSET_FORMAT_UNSUPPORTED_DCM"
1199+ CAMIWVRAssetInvalid -> "ASSET_INVALID"
1200+ CAMIWVRClickTagInvalid -> "CLICK_TAG_INVALID"
1201+ CAMIWVRClickTagMissing -> "CLICK_TAG_MISSING"
1202+ CAMIWVRClickTagMoreThanOne -> "CLICK_TAG_MORE_THAN_ONE"
1203+ CAMIWVRClickTagNonTopLevel -> "CLICK_TAG_NON_TOP_LEVEL"
1204+ CAMIWVRComponentUnsupportedDcm -> "COMPONENT_UNSUPPORTED_DCM"
1205+ CAMIWVREnablerUnsupportedMethodDcm -> "ENABLER_UNSUPPORTED_METHOD_DCM"
1206+ CAMIWVRExternalFileReferenced -> "EXTERNAL_FILE_REFERENCED"
1207+ CAMIWVRFileDetailEmpty -> "FILE_DETAIL_EMPTY"
1208+ CAMIWVRFileTypeInvalid -> "FILE_TYPE_INVALID"
1209+ CAMIWVRGwdPropertiesInvalid -> "GWD_PROPERTIES_INVALID"
1210+ CAMIWVRHTML5FeatureUnsupported -> "HTML5_FEATURE_UNSUPPORTED"
1211+ CAMIWVRLinkedFileNotFound -> "LINKED_FILE_NOT_FOUND"
1212+ CAMIWVRMaxFlashVersion11 -> "MAX_FLASH_VERSION_11"
1213+ CAMIWVRMraidReferenced -> "MRAID_REFERENCED"
1214+ CAMIWVRNotSSLCompliant -> "NOT_SSL_COMPLIANT"
1215+ CAMIWVROrphanedAsset -> "ORPHANED_ASSET"
1216+ CAMIWVRPrimaryHTMLMissing -> "PRIMARY_HTML_MISSING"
1217+ CAMIWVRZipInvalid -> "ZIP_INVALID"
1218+
6141219-- | Offset left unit for an asset. This is a read-only field. Applicable to
6151220-- the following creative types: all RICH_MEDIA.
6161221data CreativeAssetPositionLeftUnit
@@ -624,6 +1229,19 @@ data CreativeAssetPositionLeftUnit
6241229
6251230instance Hashable CreativeAssetPositionLeftUnit
6261231
1232+instance FromText CreativeAssetPositionLeftUnit where
1233+ fromText = \case
1234+ "OFFSET_UNIT_PERCENT" -> Just CAPLUOffsetUnitPercent
1235+ "OFFSET_UNIT_PIXEL" -> Just CAPLUOffsetUnitPixel
1236+ "OFFSET_UNIT_PIXEL_FROM_CENTER" -> Just CAPLUOffsetUnitPixelFromCenter
1237+ _ -> Nothing
1238+
1239+instance ToText CreativeAssetPositionLeftUnit where
1240+ toText = \case
1241+ CAPLUOffsetUnitPercent -> "OFFSET_UNIT_PERCENT"
1242+ CAPLUOffsetUnitPixel -> "OFFSET_UNIT_PIXEL"
1243+ CAPLUOffsetUnitPixelFromCenter -> "OFFSET_UNIT_PIXEL_FROM_CENTER"
1244+
6271245-- | Offset top unit for an asset. This is a read-only field if the asset
6281246-- displayType is ASSET_DISPLAY_TYPE_OVERLAY. Applicable to the following
6291247-- creative types: all RICH_MEDIA.
@@ -638,6 +1256,19 @@ data CreativeAssetPositionTopUnit
6381256
6391257instance Hashable CreativeAssetPositionTopUnit
6401258
1259+instance FromText CreativeAssetPositionTopUnit where
1260+ fromText = \case
1261+ "OFFSET_UNIT_PERCENT" -> Just CAPTUOffsetUnitPercent
1262+ "OFFSET_UNIT_PIXEL" -> Just CAPTUOffsetUnitPixel
1263+ "OFFSET_UNIT_PIXEL_FROM_CENTER" -> Just CAPTUOffsetUnitPixelFromCenter
1264+ _ -> Nothing
1265+
1266+instance ToText CreativeAssetPositionTopUnit where
1267+ toText = \case
1268+ CAPTUOffsetUnitPercent -> "OFFSET_UNIT_PERCENT"
1269+ CAPTUOffsetUnitPixel -> "OFFSET_UNIT_PIXEL"
1270+ CAPTUOffsetUnitPixelFromCenter -> "OFFSET_UNIT_PIXEL_FROM_CENTER"
1271+
6411272-- | Role of the asset in relation to creative. Applicable to all but the
6421273-- following creative types: all REDIRECT and TRACKING_TEXT. This is a
6431274-- required field. PRIMARY applies to ENHANCED_BANNER, FLASH_INPAGE,
@@ -679,6 +1310,29 @@ data CreativeAssetRole
6791310
6801311instance Hashable CreativeAssetRole
6811312
1313+instance FromText CreativeAssetRole where
1314+ fromText = \case
1315+ "ADDITIONAL_FLASH" -> Just CARAdditionalFlash
1316+ "ADDITIONAL_IMAGE" -> Just CARAdditionalImage
1317+ "ALTERNATE_VIDEO" -> Just CARAlternateVideo
1318+ "BACKUP_IMAGE" -> Just CARBackupImage
1319+ "OTHER" -> Just CAROther
1320+ "PARENT_VIDEO" -> Just CARParentVideo
1321+ "PRIMARY" -> Just CARPrimary
1322+ "TRANSCODED_VIDEO" -> Just CARTranscodedVideo
1323+ _ -> Nothing
1324+
1325+instance ToText CreativeAssetRole where
1326+ toText = \case
1327+ CARAdditionalFlash -> "ADDITIONAL_FLASH"
1328+ CARAdditionalImage -> "ADDITIONAL_IMAGE"
1329+ CARAlternateVideo -> "ALTERNATE_VIDEO"
1330+ CARBackupImage -> "BACKUP_IMAGE"
1331+ CAROther -> "OTHER"
1332+ CARParentVideo -> "PARENT_VIDEO"
1333+ CARPrimary -> "PRIMARY"
1334+ CARTranscodedVideo -> "TRANSCODED_VIDEO"
1335+
6821336-- | Initial wait time type before making the asset visible. Applicable to
6831337-- the following creative types: all RICH_MEDIA.
6841338data CreativeAssetStartTimeType
@@ -690,6 +1344,17 @@ data CreativeAssetStartTimeType
6901344
6911345instance Hashable CreativeAssetStartTimeType
6921346
1347+instance FromText CreativeAssetStartTimeType where
1348+ fromText = \case
1349+ "ASSET_START_TIME_TYPE_CUSTOM" -> Just CASTTAssetStartTimeTypeCustom
1350+ "ASSET_START_TIME_TYPE_NONE" -> Just CASTTAssetStartTimeTypeNone
1351+ _ -> Nothing
1352+
1353+instance ToText CreativeAssetStartTimeType where
1354+ toText = \case
1355+ CASTTAssetStartTimeTypeCustom -> "ASSET_START_TIME_TYPE_CUSTOM"
1356+ CASTTAssetStartTimeTypeNone -> "ASSET_START_TIME_TYPE_NONE"
1357+
6931358-- | Window mode options for flash assets. Applicable to the following
6941359-- creative types: FLASH_INPAGE, RICH_MEDIA_EXPANDING,
6951360-- RICH_MEDIA_IM_EXPAND, RICH_MEDIA_INPAGE, and RICH_MEDIA_INPAGE_FLOATING.
@@ -704,6 +1369,19 @@ data CreativeAssetWindowMode
7041369
7051370instance Hashable CreativeAssetWindowMode
7061371
1372+instance FromText CreativeAssetWindowMode where
1373+ fromText = \case
1374+ "OPAQUE" -> Just CAWMOpaque
1375+ "TRANSPARENT" -> Just CAWMTransparent
1376+ "WINDOW" -> Just CAWMWindow
1377+ _ -> Nothing
1378+
1379+instance ToText CreativeAssetWindowMode where
1380+ toText = \case
1381+ CAWMOpaque -> "OPAQUE"
1382+ CAWMTransparent -> "TRANSPARENT"
1383+ CAWMWindow -> "WINDOW"
1384+
7071385-- | Authoring tool for HTML5 banner creatives. This is a read-only field.
7081386-- Applicable to the following creative types: HTML5_BANNER.
7091387data CreativeAuthoringTool
@@ -715,6 +1393,17 @@ data CreativeAuthoringTool
7151393
7161394instance Hashable CreativeAuthoringTool
7171395
1396+instance FromText CreativeAuthoringTool where
1397+ fromText = \case
1398+ "NINJA" -> Just CATNinja
1399+ "SWIFFY" -> Just CATSwiffy
1400+ _ -> Nothing
1401+
1402+instance ToText CreativeAuthoringTool where
1403+ toText = \case
1404+ CATNinja -> "NINJA"
1405+ CATSwiffy -> "SWIFFY"
1406+
7181407-- | Type of the event. This is a read-only field.
7191408data CreativeCustomEventAdvertiserCustomEventType
7201409 = CCEACETAdvertiserEventCounter
@@ -727,6 +1416,19 @@ data CreativeCustomEventAdvertiserCustomEventType
7271416
7281417instance Hashable CreativeCustomEventAdvertiserCustomEventType
7291418
1419+instance FromText CreativeCustomEventAdvertiserCustomEventType where
1420+ fromText = \case
1421+ "ADVERTISER_EVENT_COUNTER" -> Just CCEACETAdvertiserEventCounter
1422+ "ADVERTISER_EVENT_EXIT" -> Just CCEACETAdvertiserEventExit
1423+ "ADVERTISER_EVENT_TIMER" -> Just CCEACETAdvertiserEventTimer
1424+ _ -> Nothing
1425+
1426+instance ToText CreativeCustomEventAdvertiserCustomEventType where
1427+ toText = \case
1428+ CCEACETAdvertiserEventCounter -> "ADVERTISER_EVENT_COUNTER"
1429+ CCEACETAdvertiserEventExit -> "ADVERTISER_EVENT_EXIT"
1430+ CCEACETAdvertiserEventTimer -> "ADVERTISER_EVENT_TIMER"
1431+
7301432-- | Artwork type used by the creative.This is a read-only field.
7311433data CreativeCustomEventArtworkType
7321434 = CCEATArtworkTypeFlash
@@ -739,6 +1441,19 @@ data CreativeCustomEventArtworkType
7391441
7401442instance Hashable CreativeCustomEventArtworkType
7411443
1444+instance FromText CreativeCustomEventArtworkType where
1445+ fromText = \case
1446+ "ARTWORK_TYPE_FLASH" -> Just CCEATArtworkTypeFlash
1447+ "ARTWORK_TYPE_HTML5" -> Just CCEATArtworkTypeHTML5
1448+ "ARTWORK_TYPE_MIXED" -> Just CCEATArtworkTypeMixed
1449+ _ -> Nothing
1450+
1451+instance ToText CreativeCustomEventArtworkType where
1452+ toText = \case
1453+ CCEATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"
1454+ CCEATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"
1455+ CCEATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"
1456+
7421457-- | Target type used by the event.
7431458data CreativeCustomEventTargetType
7441459 = CCETTTargetBlank
@@ -755,6 +1470,23 @@ data CreativeCustomEventTargetType
7551470
7561471instance Hashable CreativeCustomEventTargetType
7571472
1473+instance FromText CreativeCustomEventTargetType where
1474+ fromText = \case
1475+ "TARGET_BLANK" -> Just CCETTTargetBlank
1476+ "TARGET_PARENT" -> Just CCETTTargetParent
1477+ "TARGET_POPUP" -> Just CCETTTargetPopup
1478+ "TARGET_SELF" -> Just CCETTTargetSelf
1479+ "TARGET_TOP" -> Just CCETTTargetTop
1480+ _ -> Nothing
1481+
1482+instance ToText CreativeCustomEventTargetType where
1483+ toText = \case
1484+ CCETTTargetBlank -> "TARGET_BLANK"
1485+ CCETTTargetParent -> "TARGET_PARENT"
1486+ CCETTTargetPopup -> "TARGET_POPUP"
1487+ CCETTTargetSelf -> "TARGET_SELF"
1488+ CCETTTargetTop -> "TARGET_TOP"
1489+
7581490-- | Creative group number of the creative group assignment.
7591491data CreativeGroupAssignmentCreativeGroupNumber
7601492 = CGACGNCreativeGroupOne
@@ -765,6 +1497,17 @@ data CreativeGroupAssignmentCreativeGroupNumber
7651497
7661498instance Hashable CreativeGroupAssignmentCreativeGroupNumber
7671499
1500+instance FromText CreativeGroupAssignmentCreativeGroupNumber where
1501+ fromText = \case
1502+ "CREATIVE_GROUP_ONE" -> Just CGACGNCreativeGroupOne
1503+ "CREATIVE_GROUP_TWO" -> Just CGACGNCreativeGroupTwo
1504+ _ -> Nothing
1505+
1506+instance ToText CreativeGroupAssignmentCreativeGroupNumber where
1507+ toText = \case
1508+ CGACGNCreativeGroupOne -> "CREATIVE_GROUP_ONE"
1509+ CGACGNCreativeGroupTwo -> "CREATIVE_GROUP_TWO"
1510+
7681511data CreativeItemBackupImageFeatures
7691512 = CIBIFApplicationCache
7701513 -- ^ @APPLICATION_CACHE@
@@ -902,6 +1645,145 @@ data CreativeItemBackupImageFeatures
9021645
9031646instance Hashable CreativeItemBackupImageFeatures
9041647
1648+instance FromText CreativeItemBackupImageFeatures where
1649+ fromText = \case
1650+ "APPLICATION_CACHE" -> Just CIBIFApplicationCache
1651+ "AUDIO" -> Just CIBIFAudio
1652+ "CANVAS" -> Just CIBIFCanvas
1653+ "CANVAS_TEXT" -> Just CIBIFCanvasText
1654+ "CSS_ANIMATIONS" -> Just CIBIFCssAnimations
1655+ "CSS_BACKGROUND_SIZE" -> Just CIBIFCssBackgroundSize
1656+ "CSS_BORDER_IMAGE" -> Just CIBIFCssBorderImage
1657+ "CSS_BORDER_RADIUS" -> Just CIBIFCssBorderRadius
1658+ "CSS_BOX_SHADOW" -> Just CIBIFCssBoxShadow
1659+ "CSS_COLUMNS" -> Just CIBIFCssColumns
1660+ "CSS_FLEX_BOX" -> Just CIBIFCssFlexBox
1661+ "CSS_FONT_FACE" -> Just CIBIFCssFontFace
1662+ "CSS_GENERATED_CONTENT" -> Just CIBIFCssGeneratedContent
1663+ "CSS_GRADIENTS" -> Just CIBIFCssGradients
1664+ "CSS_HSLA" -> Just CIBIFCssHsla
1665+ "CSS_MULTIPLE_BGS" -> Just CIBIFCssMultipleBgs
1666+ "CSS_OPACITY" -> Just CIBIFCssOpacity
1667+ "CSS_REFLECTIONS" -> Just CIBIFCssReflections
1668+ "CSS_RGBA" -> Just CIBIFCssRgba
1669+ "CSS_TEXT_SHADOW" -> Just CIBIFCssTextShadow
1670+ "CSS_TRANSFORMS" -> Just CIBIFCssTransforms
1671+ "CSS_TRANSFORMS3D" -> Just CIBIFCssTRANSFORMS3D
1672+ "CSS_TRANSITIONS" -> Just CIBIFCssTransitions
1673+ "DRAG_AND_DROP" -> Just CIBIFDragAndDrop
1674+ "GEO_LOCATION" -> Just CIBIFGeoLocation
1675+ "HASH_CHANGE" -> Just CIBIFHashChange
1676+ "HISTORY" -> Just CIBIFHistory
1677+ "INDEXED_DB" -> Just CIBIFIndexedDB
1678+ "INLINE_SVG" -> Just CIBIFInlineSvg
1679+ "INPUT_ATTR_AUTOCOMPLETE" -> Just CIBIFInputAttrAutocomplete
1680+ "INPUT_ATTR_AUTOFOCUS" -> Just CIBIFInputAttrAutofocus
1681+ "INPUT_ATTR_LIST" -> Just CIBIFInputAttrList
1682+ "INPUT_ATTR_MAX" -> Just CIBIFInputAttrMax
1683+ "INPUT_ATTR_MIN" -> Just CIBIFInputAttrMin
1684+ "INPUT_ATTR_MULTIPLE" -> Just CIBIFInputAttrMultiple
1685+ "INPUT_ATTR_PATTERN" -> Just CIBIFInputAttrPattern
1686+ "INPUT_ATTR_PLACEHOLDER" -> Just CIBIFInputAttrPlaceholder
1687+ "INPUT_ATTR_REQUIRED" -> Just CIBIFInputAttrRequired
1688+ "INPUT_ATTR_STEP" -> Just CIBIFInputAttrStep
1689+ "INPUT_TYPE_COLOR" -> Just CIBIFInputTypeColor
1690+ "INPUT_TYPE_DATE" -> Just CIBIFInputTypeDate
1691+ "INPUT_TYPE_DATETIME" -> Just CIBIFInputTypeDatetime
1692+ "INPUT_TYPE_DATETIME_LOCAL" -> Just CIBIFInputTypeDatetimeLocal
1693+ "INPUT_TYPE_EMAIL" -> Just CIBIFInputTypeEmail
1694+ "INPUT_TYPE_MONTH" -> Just CIBIFInputTypeMonth
1695+ "INPUT_TYPE_NUMBER" -> Just CIBIFInputTypeNumber
1696+ "INPUT_TYPE_RANGE" -> Just CIBIFInputTypeRange
1697+ "INPUT_TYPE_SEARCH" -> Just CIBIFInputTypeSearch
1698+ "INPUT_TYPE_TEL" -> Just CIBIFInputTypeTel
1699+ "INPUT_TYPE_TIME" -> Just CIBIFInputTypeTime
1700+ "INPUT_TYPE_URL" -> Just CIBIFInputTypeURL
1701+ "INPUT_TYPE_WEEK" -> Just CIBIFInputTypeWeek
1702+ "LOCAL_STORAGE" -> Just CIBIFLocalStorage
1703+ "POST_MESSAGE" -> Just CIBIFPostMessage
1704+ "SESSION_STORAGE" -> Just CIBIFSessionStorage
1705+ "SMIL" -> Just CIBIFSmil
1706+ "SVG_CLIP_PATHS" -> Just CIBIFSvgClipPaths
1707+ "SVG_FE_IMAGE" -> Just CIBIFSvgFeImage
1708+ "SVG_FILTERS" -> Just CIBIFSvgFilters
1709+ "SVG_HREF" -> Just CIBIFSvgHref
1710+ "TOUCH" -> Just CIBIFTouch
1711+ "VIDEO" -> Just CIBIFVideo
1712+ "WEBGL" -> Just CIBIFWebgl
1713+ "WEB_SOCKETS" -> Just CIBIFWebSockets
1714+ "WEB_SQL_DATABASE" -> Just CIBIFWebSqlDatabase
1715+ "WEB_WORKERS" -> Just CIBIFWebWorkers
1716+ _ -> Nothing
1717+
1718+instance ToText CreativeItemBackupImageFeatures where
1719+ toText = \case
1720+ CIBIFApplicationCache -> "APPLICATION_CACHE"
1721+ CIBIFAudio -> "AUDIO"
1722+ CIBIFCanvas -> "CANVAS"
1723+ CIBIFCanvasText -> "CANVAS_TEXT"
1724+ CIBIFCssAnimations -> "CSS_ANIMATIONS"
1725+ CIBIFCssBackgroundSize -> "CSS_BACKGROUND_SIZE"
1726+ CIBIFCssBorderImage -> "CSS_BORDER_IMAGE"
1727+ CIBIFCssBorderRadius -> "CSS_BORDER_RADIUS"
1728+ CIBIFCssBoxShadow -> "CSS_BOX_SHADOW"
1729+ CIBIFCssColumns -> "CSS_COLUMNS"
1730+ CIBIFCssFlexBox -> "CSS_FLEX_BOX"
1731+ CIBIFCssFontFace -> "CSS_FONT_FACE"
1732+ CIBIFCssGeneratedContent -> "CSS_GENERATED_CONTENT"
1733+ CIBIFCssGradients -> "CSS_GRADIENTS"
1734+ CIBIFCssHsla -> "CSS_HSLA"
1735+ CIBIFCssMultipleBgs -> "CSS_MULTIPLE_BGS"
1736+ CIBIFCssOpacity -> "CSS_OPACITY"
1737+ CIBIFCssReflections -> "CSS_REFLECTIONS"
1738+ CIBIFCssRgba -> "CSS_RGBA"
1739+ CIBIFCssTextShadow -> "CSS_TEXT_SHADOW"
1740+ CIBIFCssTransforms -> "CSS_TRANSFORMS"
1741+ CIBIFCssTRANSFORMS3D -> "CSS_TRANSFORMS3D"
1742+ CIBIFCssTransitions -> "CSS_TRANSITIONS"
1743+ CIBIFDragAndDrop -> "DRAG_AND_DROP"
1744+ CIBIFGeoLocation -> "GEO_LOCATION"
1745+ CIBIFHashChange -> "HASH_CHANGE"
1746+ CIBIFHistory -> "HISTORY"
1747+ CIBIFIndexedDB -> "INDEXED_DB"
1748+ CIBIFInlineSvg -> "INLINE_SVG"
1749+ CIBIFInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"
1750+ CIBIFInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"
1751+ CIBIFInputAttrList -> "INPUT_ATTR_LIST"
1752+ CIBIFInputAttrMax -> "INPUT_ATTR_MAX"
1753+ CIBIFInputAttrMin -> "INPUT_ATTR_MIN"
1754+ CIBIFInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"
1755+ CIBIFInputAttrPattern -> "INPUT_ATTR_PATTERN"
1756+ CIBIFInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"
1757+ CIBIFInputAttrRequired -> "INPUT_ATTR_REQUIRED"
1758+ CIBIFInputAttrStep -> "INPUT_ATTR_STEP"
1759+ CIBIFInputTypeColor -> "INPUT_TYPE_COLOR"
1760+ CIBIFInputTypeDate -> "INPUT_TYPE_DATE"
1761+ CIBIFInputTypeDatetime -> "INPUT_TYPE_DATETIME"
1762+ CIBIFInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"
1763+ CIBIFInputTypeEmail -> "INPUT_TYPE_EMAIL"
1764+ CIBIFInputTypeMonth -> "INPUT_TYPE_MONTH"
1765+ CIBIFInputTypeNumber -> "INPUT_TYPE_NUMBER"
1766+ CIBIFInputTypeRange -> "INPUT_TYPE_RANGE"
1767+ CIBIFInputTypeSearch -> "INPUT_TYPE_SEARCH"
1768+ CIBIFInputTypeTel -> "INPUT_TYPE_TEL"
1769+ CIBIFInputTypeTime -> "INPUT_TYPE_TIME"
1770+ CIBIFInputTypeURL -> "INPUT_TYPE_URL"
1771+ CIBIFInputTypeWeek -> "INPUT_TYPE_WEEK"
1772+ CIBIFLocalStorage -> "LOCAL_STORAGE"
1773+ CIBIFPostMessage -> "POST_MESSAGE"
1774+ CIBIFSessionStorage -> "SESSION_STORAGE"
1775+ CIBIFSmil -> "SMIL"
1776+ CIBIFSvgClipPaths -> "SVG_CLIP_PATHS"
1777+ CIBIFSvgFeImage -> "SVG_FE_IMAGE"
1778+ CIBIFSvgFilters -> "SVG_FILTERS"
1779+ CIBIFSvgHref -> "SVG_HREF"
1780+ CIBIFTouch -> "TOUCH"
1781+ CIBIFVideo -> "VIDEO"
1782+ CIBIFWebgl -> "WEBGL"
1783+ CIBIFWebSockets -> "WEB_SOCKETS"
1784+ CIBIFWebSqlDatabase -> "WEB_SQL_DATABASE"
1785+ CIBIFWebWorkers -> "WEB_WORKERS"
1786+
9051787data CreativeItemCompatibility
9061788 = CICApp
9071789 -- ^ @APP@
@@ -917,6 +1799,23 @@ data CreativeItemCompatibility
9171799
9181800instance Hashable CreativeItemCompatibility
9191801
1802+instance FromText CreativeItemCompatibility where
1803+ fromText = \case
1804+ "APP" -> Just CICApp
1805+ "APP_INTERSTITIAL" -> Just CICAppInterstitial
1806+ "IN_STREAM_VIDEO" -> Just CICInStreamVideo
1807+ "WEB" -> Just CICWeb
1808+ "WEB_INTERSTITIAL" -> Just CICWebInterstitial
1809+ _ -> Nothing
1810+
1811+instance ToText CreativeItemCompatibility where
1812+ toText = \case
1813+ CICApp -> "APP"
1814+ CICAppInterstitial -> "APP_INTERSTITIAL"
1815+ CICInStreamVideo -> "IN_STREAM_VIDEO"
1816+ CICWeb -> "WEB"
1817+ CICWebInterstitial -> "WEB_INTERSTITIAL"
1818+
9201819-- | Optimization model for this configuration.
9211820data CreativeOptimizationConfigurationOptimizationModel
9221821 = COCOMClick
@@ -931,6 +1830,21 @@ data CreativeOptimizationConfigurationOptimizationModel
9311830
9321831instance Hashable CreativeOptimizationConfigurationOptimizationModel
9331832
1833+instance FromText CreativeOptimizationConfigurationOptimizationModel where
1834+ fromText = \case
1835+ "CLICK" -> Just COCOMClick
1836+ "POST_CLICK" -> Just COCOMPostClick
1837+ "POST_CLICK_AND_IMPRESSION" -> Just COCOMPostClickAndImpression
1838+ "POST_IMPRESSION" -> Just COCOMPostImpression
1839+ _ -> Nothing
1840+
1841+instance ToText CreativeOptimizationConfigurationOptimizationModel where
1842+ toText = \case
1843+ COCOMClick -> "CLICK"
1844+ COCOMPostClick -> "POST_CLICK"
1845+ COCOMPostClickAndImpression -> "POST_CLICK_AND_IMPRESSION"
1846+ COCOMPostImpression -> "POST_IMPRESSION"
1847+
9341848-- | Type of creative rotation. Can be used to specify whether to use
9351849-- sequential or random rotation.
9361850data CreativeRotationType
@@ -942,6 +1856,17 @@ data CreativeRotationType
9421856
9431857instance Hashable CreativeRotationType
9441858
1859+instance FromText CreativeRotationType where
1860+ fromText = \case
1861+ "CREATIVE_ROTATION_TYPE_RANDOM" -> Just CRTCreativeRotationTypeRandom
1862+ "CREATIVE_ROTATION_TYPE_SEQUENTIAL" -> Just CRTCreativeRotationTypeSequential
1863+ _ -> Nothing
1864+
1865+instance ToText CreativeRotationType where
1866+ toText = \case
1867+ CRTCreativeRotationTypeRandom -> "CREATIVE_ROTATION_TYPE_RANDOM"
1868+ CRTCreativeRotationTypeSequential -> "CREATIVE_ROTATION_TYPE_SEQUENTIAL"
1869+
9451870-- | Strategy for calculating weights. Used with
9461871-- CREATIVE_ROTATION_TYPE_RANDOM.
9471872data CreativeRotationWeightCalculationStrategy
@@ -957,6 +1882,21 @@ data CreativeRotationWeightCalculationStrategy
9571882
9581883instance Hashable CreativeRotationWeightCalculationStrategy
9591884
1885+instance FromText CreativeRotationWeightCalculationStrategy where
1886+ fromText = \case
1887+ "WEIGHT_STRATEGY_CUSTOM" -> Just CRWCSWeightStrategyCustom
1888+ "WEIGHT_STRATEGY_EQUAL" -> Just CRWCSWeightStrategyEqual
1889+ "WEIGHT_STRATEGY_HIGHEST_CTR" -> Just CRWCSWeightStrategyHighestCtr
1890+ "WEIGHT_STRATEGY_OPTIMIZED" -> Just CRWCSWeightStrategyOptimized
1891+ _ -> Nothing
1892+
1893+instance ToText CreativeRotationWeightCalculationStrategy where
1894+ toText = \case
1895+ CRWCSWeightStrategyCustom -> "WEIGHT_STRATEGY_CUSTOM"
1896+ CRWCSWeightStrategyEqual -> "WEIGHT_STRATEGY_EQUAL"
1897+ CRWCSWeightStrategyHighestCtr -> "WEIGHT_STRATEGY_HIGHEST_CTR"
1898+ CRWCSWeightStrategyOptimized -> "WEIGHT_STRATEGY_OPTIMIZED"
1899+
9601900-- | Type of this creative.This is a required field. Applicable to all
9611901-- creative types.
9621902data CreativeType
@@ -1012,6 +1952,61 @@ data CreativeType
10121952
10131953instance Hashable CreativeType
10141954
1955+instance FromText CreativeType where
1956+ fromText = \case
1957+ "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO" -> Just CTBrandSafeDefaultInstreamVideo
1958+ "CUSTOM_INPAGE" -> Just CTCustomInpage
1959+ "CUSTOM_INTERSTITIAL" -> Just CTCustomInterstitial
1960+ "ENHANCED_BANNER" -> Just CTEnhancedBanner
1961+ "ENHANCED_IMAGE" -> Just CTEnhancedImage
1962+ "FLASH_INPAGE" -> Just CTFlashInpage
1963+ "HTML5_BANNER" -> Just CTHTML5Banner
1964+ "IMAGE" -> Just CTImage
1965+ "INSTREAM_VIDEO" -> Just CTInstreamVideo
1966+ "INTERNAL_REDIRECT" -> Just CTInternalRedirect
1967+ "INTERSTITIAL_INTERNAL_REDIRECT" -> Just CTInterstitialInternalRedirect
1968+ "REDIRECT" -> Just CTRedirect
1969+ "RICH_MEDIA_EXPANDING" -> Just CTRichMediaExpanding
1970+ "RICH_MEDIA_IM_EXPAND" -> Just CTRichMediaImExpand
1971+ "RICH_MEDIA_INPAGE" -> Just CTRichMediaInpage
1972+ "RICH_MEDIA_INPAGE_FLOATING" -> Just CTRichMediaInpageFloating
1973+ "RICH_MEDIA_INTERSTITIAL_FLOAT" -> Just CTRichMediaInterstitialFloat
1974+ "RICH_MEDIA_MOBILE_IN_APP" -> Just CTRichMediaMobileInApp
1975+ "RICH_MEDIA_MULTI_FLOATING" -> Just CTRichMediaMultiFloating
1976+ "RICH_MEDIA_PEEL_DOWN" -> Just CTRichMediaPeelDown
1977+ "TRACKING_TEXT" -> Just CTTrackingText
1978+ "VAST_REDIRECT" -> Just CTVastRedirect
1979+ "VPAID_LINEAR" -> Just CTVpaidLinear
1980+ "VPAID_NON_LINEAR" -> Just CTVpaidNonLinear
1981+ _ -> Nothing
1982+
1983+instance ToText CreativeType where
1984+ toText = \case
1985+ CTBrandSafeDefaultInstreamVideo -> "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO"
1986+ CTCustomInpage -> "CUSTOM_INPAGE"
1987+ CTCustomInterstitial -> "CUSTOM_INTERSTITIAL"
1988+ CTEnhancedBanner -> "ENHANCED_BANNER"
1989+ CTEnhancedImage -> "ENHANCED_IMAGE"
1990+ CTFlashInpage -> "FLASH_INPAGE"
1991+ CTHTML5Banner -> "HTML5_BANNER"
1992+ CTImage -> "IMAGE"
1993+ CTInstreamVideo -> "INSTREAM_VIDEO"
1994+ CTInternalRedirect -> "INTERNAL_REDIRECT"
1995+ CTInterstitialInternalRedirect -> "INTERSTITIAL_INTERNAL_REDIRECT"
1996+ CTRedirect -> "REDIRECT"
1997+ CTRichMediaExpanding -> "RICH_MEDIA_EXPANDING"
1998+ CTRichMediaImExpand -> "RICH_MEDIA_IM_EXPAND"
1999+ CTRichMediaInpage -> "RICH_MEDIA_INPAGE"
2000+ CTRichMediaInpageFloating -> "RICH_MEDIA_INPAGE_FLOATING"
2001+ CTRichMediaInterstitialFloat -> "RICH_MEDIA_INTERSTITIAL_FLOAT"
2002+ CTRichMediaMobileInApp -> "RICH_MEDIA_MOBILE_IN_APP"
2003+ CTRichMediaMultiFloating -> "RICH_MEDIA_MULTI_FLOATING"
2004+ CTRichMediaPeelDown -> "RICH_MEDIA_PEEL_DOWN"
2005+ CTTrackingText -> "TRACKING_TEXT"
2006+ CTVastRedirect -> "VAST_REDIRECT"
2007+ CTVpaidLinear -> "VPAID_LINEAR"
2008+ CTVpaidNonLinear -> "VPAID_NON_LINEAR"
2009+
10152010-- | The date range relative to the date of when the report is run.
10162011data DateRangeRelativeDateRange
10172012 = DRRDRLast24Months
@@ -1048,6 +2043,43 @@ data DateRangeRelativeDateRange
10482043
10492044instance Hashable DateRangeRelativeDateRange
10502045
2046+instance FromText DateRangeRelativeDateRange where
2047+ fromText = \case
2048+ "LAST_24_MONTHS" -> Just DRRDRLast24Months
2049+ "LAST_30_DAYS" -> Just DRRDRLast30Days
2050+ "LAST_365_DAYS" -> Just DRRDRLast365Days
2051+ "LAST_7_DAYS" -> Just DRRDRLast7Days
2052+ "LAST_90_DAYS" -> Just DRRDRLast90Days
2053+ "MONTH_TO_DATE" -> Just DRRDRMonthToDate
2054+ "PREVIOUS_MONTH" -> Just DRRDRPreviousMonth
2055+ "PREVIOUS_QUARTER" -> Just DRRDRPreviousQuarter
2056+ "PREVIOUS_WEEK" -> Just DRRDRPreviousWeek
2057+ "PREVIOUS_YEAR" -> Just DRRDRPreviousYear
2058+ "QUARTER_TO_DATE" -> Just DRRDRQuarterToDate
2059+ "TODAY" -> Just DRRDRToday
2060+ "WEEK_TO_DATE" -> Just DRRDRWeekToDate
2061+ "YEAR_TO_DATE" -> Just DRRDRYearToDate
2062+ "YESTERDAY" -> Just DRRDRYesterday
2063+ _ -> Nothing
2064+
2065+instance ToText DateRangeRelativeDateRange where
2066+ toText = \case
2067+ DRRDRLast24Months -> "LAST_24_MONTHS"
2068+ DRRDRLast30Days -> "LAST_30_DAYS"
2069+ DRRDRLast365Days -> "LAST_365_DAYS"
2070+ DRRDRLast7Days -> "LAST_7_DAYS"
2071+ DRRDRLast90Days -> "LAST_90_DAYS"
2072+ DRRDRMonthToDate -> "MONTH_TO_DATE"
2073+ DRRDRPreviousMonth -> "PREVIOUS_MONTH"
2074+ DRRDRPreviousQuarter -> "PREVIOUS_QUARTER"
2075+ DRRDRPreviousWeek -> "PREVIOUS_WEEK"
2076+ DRRDRPreviousYear -> "PREVIOUS_YEAR"
2077+ DRRDRQuarterToDate -> "QUARTER_TO_DATE"
2078+ DRRDRToday -> "TODAY"
2079+ DRRDRWeekToDate -> "WEEK_TO_DATE"
2080+ DRRDRYearToDate -> "YEAR_TO_DATE"
2081+ DRRDRYesterday -> "YESTERDAY"
2082+
10512083data DayPartTargetingItemDaysOfWeek
10522084 = DPTIDOWFriday
10532085 -- ^ @FRIDAY@
@@ -1067,6 +2099,27 @@ data DayPartTargetingItemDaysOfWeek
10672099
10682100instance Hashable DayPartTargetingItemDaysOfWeek
10692101
2102+instance FromText DayPartTargetingItemDaysOfWeek where
2103+ fromText = \case
2104+ "FRIDAY" -> Just DPTIDOWFriday
2105+ "MONDAY" -> Just DPTIDOWMonday
2106+ "SATURDAY" -> Just DPTIDOWSaturday
2107+ "SUNDAY" -> Just DPTIDOWSunday
2108+ "THURSDAY" -> Just DPTIDOWThursday
2109+ "TUESDAY" -> Just DPTIDOWTuesday
2110+ "WEDNESDAY" -> Just DPTIDOWWednesday
2111+ _ -> Nothing
2112+
2113+instance ToText DayPartTargetingItemDaysOfWeek where
2114+ toText = \case
2115+ DPTIDOWFriday -> "FRIDAY"
2116+ DPTIDOWMonday -> "MONDAY"
2117+ DPTIDOWSaturday -> "SATURDAY"
2118+ DPTIDOWSunday -> "SUNDAY"
2119+ DPTIDOWThursday -> "THURSDAY"
2120+ DPTIDOWTuesday -> "TUESDAY"
2121+ DPTIDOWWednesday -> "WEDNESDAY"
2122+
10702123-- | Serving priority of an ad, with respect to other ads. The lower the
10712124-- priority number, the greater the priority with which it is served.
10722125data DeliverySchedulePriority
@@ -1106,6 +2159,45 @@ data DeliverySchedulePriority
11062159
11072160instance Hashable DeliverySchedulePriority
11082161
2162+instance FromText DeliverySchedulePriority where
2163+ fromText = \case
2164+ "AD_PRIORITY_01" -> Just DSPAdPriority01
2165+ "AD_PRIORITY_02" -> Just DSPAdPriority02
2166+ "AD_PRIORITY_03" -> Just DSPAdPriority03
2167+ "AD_PRIORITY_04" -> Just DSPAdPriority04
2168+ "AD_PRIORITY_05" -> Just DSPAdPriority05
2169+ "AD_PRIORITY_06" -> Just DSPAdPriority06
2170+ "AD_PRIORITY_07" -> Just DSPAdPriority07
2171+ "AD_PRIORITY_08" -> Just DSPAdPriority08
2172+ "AD_PRIORITY_09" -> Just DSPAdPriority09
2173+ "AD_PRIORITY_10" -> Just DSPAdPriority10
2174+ "AD_PRIORITY_11" -> Just DSPAdPriority11
2175+ "AD_PRIORITY_12" -> Just DSPAdPriority12
2176+ "AD_PRIORITY_13" -> Just DSPAdPriority13
2177+ "AD_PRIORITY_14" -> Just DSPAdPriority14
2178+ "AD_PRIORITY_15" -> Just DSPAdPriority15
2179+ "AD_PRIORITY_16" -> Just DSPAdPriority16
2180+ _ -> Nothing
2181+
2182+instance ToText DeliverySchedulePriority where
2183+ toText = \case
2184+ DSPAdPriority01 -> "AD_PRIORITY_01"
2185+ DSPAdPriority02 -> "AD_PRIORITY_02"
2186+ DSPAdPriority03 -> "AD_PRIORITY_03"
2187+ DSPAdPriority04 -> "AD_PRIORITY_04"
2188+ DSPAdPriority05 -> "AD_PRIORITY_05"
2189+ DSPAdPriority06 -> "AD_PRIORITY_06"
2190+ DSPAdPriority07 -> "AD_PRIORITY_07"
2191+ DSPAdPriority08 -> "AD_PRIORITY_08"
2192+ DSPAdPriority09 -> "AD_PRIORITY_09"
2193+ DSPAdPriority10 -> "AD_PRIORITY_10"
2194+ DSPAdPriority11 -> "AD_PRIORITY_11"
2195+ DSPAdPriority12 -> "AD_PRIORITY_12"
2196+ DSPAdPriority13 -> "AD_PRIORITY_13"
2197+ DSPAdPriority14 -> "AD_PRIORITY_14"
2198+ DSPAdPriority15 -> "AD_PRIORITY_15"
2199+ DSPAdPriority16 -> "AD_PRIORITY_16"
2200+
11092201-- | Determines how the \'value\' field is matched when filtering. If not
11102202-- specified, defaults to EXACT. If set to WILDCARD_EXPRESSION, \'*\' is
11112203-- allowed as a placeholder for variable length character sequences, and it
@@ -1124,6 +2216,21 @@ data DimensionValueMatchType
11242216
11252217instance Hashable DimensionValueMatchType
11262218
2219+instance FromText DimensionValueMatchType where
2220+ fromText = \case
2221+ "BEGINS_WITH" -> Just DVMTBeginsWith
2222+ "CONTAINS" -> Just DVMTContains
2223+ "EXACT" -> Just DVMTExact
2224+ "WILDCARD_EXPRESSION" -> Just DVMTWildcardExpression
2225+ _ -> Nothing
2226+
2227+instance ToText DimensionValueMatchType where
2228+ toText = \case
2229+ DVMTBeginsWith -> "BEGINS_WITH"
2230+ DVMTContains -> "CONTAINS"
2231+ DVMTExact -> "EXACT"
2232+ DVMTWildcardExpression -> "WILDCARD_EXPRESSION"
2233+
11272234-- | Visibility of this directory site contact assignment. When set to PUBLIC
11282235-- this contact assignment is visible to all account and agency users; when
11292236-- set to PRIVATE it is visible only to the site.
@@ -1136,6 +2243,17 @@ data DirectorySiteContactAssignmentVisibility
11362243
11372244instance Hashable DirectorySiteContactAssignmentVisibility
11382245
2246+instance FromText DirectorySiteContactAssignmentVisibility where
2247+ fromText = \case
2248+ "PRIVATE" -> Just DSCAVPrivate
2249+ "PUBLIC" -> Just DSCAVPublic
2250+ _ -> Nothing
2251+
2252+instance ToText DirectorySiteContactAssignmentVisibility where
2253+ toText = \case
2254+ DSCAVPrivate -> "PRIVATE"
2255+ DSCAVPublic -> "PUBLIC"
2256+
11392257-- | Directory site contact role.
11402258data DirectorySiteContactRole
11412259 = DSCRAdmin
@@ -1148,6 +2266,19 @@ data DirectorySiteContactRole
11482266
11492267instance Hashable DirectorySiteContactRole
11502268
2269+instance FromText DirectorySiteContactRole where
2270+ fromText = \case
2271+ "ADMIN" -> Just DSCRAdmin
2272+ "EDIT" -> Just DSCREdit
2273+ "VIEW" -> Just DSCRView
2274+ _ -> Nothing
2275+
2276+instance ToText DirectorySiteContactRole where
2277+ toText = \case
2278+ DSCRAdmin -> "ADMIN"
2279+ DSCREdit -> "EDIT"
2280+ DSCRView -> "VIEW"
2281+
11512282-- | Directory site contact type.
11522283data DirectorySiteContactType
11532284 = DSCTBilling
@@ -1162,6 +2293,21 @@ data DirectorySiteContactType
11622293
11632294instance Hashable DirectorySiteContactType
11642295
2296+instance FromText DirectorySiteContactType where
2297+ fromText = \case
2298+ "BILLING" -> Just DSCTBilling
2299+ "OTHER" -> Just DSCTOther
2300+ "SALES" -> Just DSCTSales
2301+ "TECHNICAL" -> Just DSCTTechnical
2302+ _ -> Nothing
2303+
2304+instance ToText DirectorySiteContactType where
2305+ toText = \case
2306+ DSCTBilling -> "BILLING"
2307+ DSCTOther -> "OTHER"
2308+ DSCTSales -> "SALES"
2309+ DSCTTechnical -> "TECHNICAL"
2310+
11652311data DirectorySiteItemInpageTagFormats
11662312 = DSIITFIframeJavascriptInpage
11672313 -- ^ @IFRAME_JAVASCRIPT_INPAGE@
@@ -1175,6 +2321,21 @@ data DirectorySiteItemInpageTagFormats
11752321
11762322instance Hashable DirectorySiteItemInpageTagFormats
11772323
2324+instance FromText DirectorySiteItemInpageTagFormats where
2325+ fromText = \case
2326+ "IFRAME_JAVASCRIPT_INPAGE" -> Just DSIITFIframeJavascriptInpage
2327+ "INTERNAL_REDIRECT_INPAGE" -> Just DSIITFInternalRedirectInpage
2328+ "JAVASCRIPT_INPAGE" -> Just DSIITFJavascriptInpage
2329+ "STANDARD" -> Just DSIITFStandard
2330+ _ -> Nothing
2331+
2332+instance ToText DirectorySiteItemInpageTagFormats where
2333+ toText = \case
2334+ DSIITFIframeJavascriptInpage -> "IFRAME_JAVASCRIPT_INPAGE"
2335+ DSIITFInternalRedirectInpage -> "INTERNAL_REDIRECT_INPAGE"
2336+ DSIITFJavascriptInpage -> "JAVASCRIPT_INPAGE"
2337+ DSIITFStandard -> "STANDARD"
2338+
11782339data DirectorySiteItemInterstitialTagFormats
11792340 = DSIITFIframeJavascriptInterstitial
11802341 -- ^ @IFRAME_JAVASCRIPT_INTERSTITIAL@
@@ -1186,6 +2347,19 @@ data DirectorySiteItemInterstitialTagFormats
11862347
11872348instance Hashable DirectorySiteItemInterstitialTagFormats
11882349
2350+instance FromText DirectorySiteItemInterstitialTagFormats where
2351+ fromText = \case
2352+ "IFRAME_JAVASCRIPT_INTERSTITIAL" -> Just DSIITFIframeJavascriptInterstitial
2353+ "INTERNAL_REDIRECT_INTERSTITIAL" -> Just DSIITFInternalRedirectInterstitial
2354+ "JAVASCRIPT_INTERSTITIAL" -> Just DSIITFJavascriptInterstitial
2355+ _ -> Nothing
2356+
2357+instance ToText DirectorySiteItemInterstitialTagFormats where
2358+ toText = \case
2359+ DSIITFIframeJavascriptInterstitial -> "IFRAME_JAVASCRIPT_INTERSTITIAL"
2360+ DSIITFInternalRedirectInterstitial -> "INTERNAL_REDIRECT_INTERSTITIAL"
2361+ DSIITFJavascriptInterstitial -> "JAVASCRIPT_INTERSTITIAL"
2362+
11892363-- | Site filter type for this event tag. If no type is specified then the
11902364-- event tag will be applied to all sites.
11912365data EventTagSiteFilterType
@@ -1197,6 +2371,17 @@ data EventTagSiteFilterType
11972371
11982372instance Hashable EventTagSiteFilterType
11992373
2374+instance FromText EventTagSiteFilterType where
2375+ fromText = \case
2376+ "BLACKLIST" -> Just ETSFTBlacklist
2377+ "WHITELIST" -> Just ETSFTWhitelist
2378+ _ -> Nothing
2379+
2380+instance ToText EventTagSiteFilterType where
2381+ toText = \case
2382+ ETSFTBlacklist -> "BLACKLIST"
2383+ ETSFTWhitelist -> "WHITELIST"
2384+
12002385-- | Status of this event tag. Must be ENABLED for this event tag to fire.
12012386-- This is a required field.
12022387data EventTagStatus
@@ -1208,6 +2393,17 @@ data EventTagStatus
12082393
12092394instance Hashable EventTagStatus
12102395
2396+instance FromText EventTagStatus where
2397+ fromText = \case
2398+ "DISABLED" -> Just ETSDisabled
2399+ "ENABLED" -> Just ETSEnabled
2400+ _ -> Nothing
2401+
2402+instance ToText EventTagStatus where
2403+ toText = \case
2404+ ETSDisabled -> "DISABLED"
2405+ ETSEnabled -> "ENABLED"
2406+
12112407-- | Event tag type. Can be used to specify whether to use a third-party
12122408-- pixel, a third-party JavaScript URL, or a third-party click-through URL
12132409-- for either impression or click tracking. This is a required field.
@@ -1222,6 +2418,19 @@ data EventTagType
12222418
12232419instance Hashable EventTagType
12242420
2421+instance FromText EventTagType where
2422+ fromText = \case
2423+ "CLICK_THROUGH_EVENT_TAG" -> Just ETTClickThroughEventTag
2424+ "IMPRESSION_IMAGE_EVENT_TAG" -> Just ETTImpressionImageEventTag
2425+ "IMPRESSION_JAVASCRIPT_EVENT_TAG" -> Just ETTImpressionJavascriptEventTag
2426+ _ -> Nothing
2427+
2428+instance ToText EventTagType where
2429+ toText = \case
2430+ ETTClickThroughEventTag -> "CLICK_THROUGH_EVENT_TAG"
2431+ ETTImpressionImageEventTag -> "IMPRESSION_IMAGE_EVENT_TAG"
2432+ ETTImpressionJavascriptEventTag -> "IMPRESSION_JAVASCRIPT_EVENT_TAG"
2433+
12252434-- | The output format of the report. Only available once the file is
12262435-- available.
12272436data FileFormat
@@ -1233,6 +2442,17 @@ data FileFormat
12332442
12342443instance Hashable FileFormat
12352444
2445+instance FromText FileFormat where
2446+ fromText = \case
2447+ "CSV" -> Just FFCSV
2448+ "EXCEL" -> Just FFExcel
2449+ _ -> Nothing
2450+
2451+instance ToText FileFormat where
2452+ toText = \case
2453+ FFCSV -> "CSV"
2454+ FFExcel -> "EXCEL"
2455+
12362456-- | The status of the report file.
12372457data FileStatus
12382458 = FSCancelled
@@ -1247,6 +2467,21 @@ data FileStatus
12472467
12482468instance Hashable FileStatus
12492469
2470+instance FromText FileStatus where
2471+ fromText = \case
2472+ "CANCELLED" -> Just FSCancelled
2473+ "FAILED" -> Just FSFailed
2474+ "PROCESSING" -> Just FSProcessing
2475+ "REPORT_AVAILABLE" -> Just FSReportAvailable
2476+ _ -> Nothing
2477+
2478+instance ToText FileStatus where
2479+ toText = \case
2480+ FSCancelled -> "CANCELLED"
2481+ FSFailed -> "FAILED"
2482+ FSProcessing -> "PROCESSING"
2483+ FSReportAvailable -> "REPORT_AVAILABLE"
2484+
12502485-- | Code type used for cache busting in the generated tag.
12512486data FloodlightActivityCacheBustingType
12522487 = FACBTActiveServerPage
@@ -1263,6 +2498,23 @@ data FloodlightActivityCacheBustingType
12632498
12642499instance Hashable FloodlightActivityCacheBustingType
12652500
2501+instance FromText FloodlightActivityCacheBustingType where
2502+ fromText = \case
2503+ "ACTIVE_SERVER_PAGE" -> Just FACBTActiveServerPage
2504+ "COLD_FUSION" -> Just FACBTColdFusion
2505+ "JAVASCRIPT" -> Just FACBTJavascript
2506+ "JSP" -> Just FACBTJsp
2507+ "PHP" -> Just FACBTPhp
2508+ _ -> Nothing
2509+
2510+instance ToText FloodlightActivityCacheBustingType where
2511+ toText = \case
2512+ FACBTActiveServerPage -> "ACTIVE_SERVER_PAGE"
2513+ FACBTColdFusion -> "COLD_FUSION"
2514+ FACBTJavascript -> "JAVASCRIPT"
2515+ FACBTJsp -> "JSP"
2516+ FACBTPhp -> "PHP"
2517+
12662518-- | Counting method for conversions for this floodlight activity. This is a
12672519-- required field.
12682520data FloodlightActivityCountingMethod
@@ -1280,6 +2532,23 @@ data FloodlightActivityCountingMethod
12802532
12812533instance Hashable FloodlightActivityCountingMethod
12822534
2535+instance FromText FloodlightActivityCountingMethod where
2536+ fromText = \case
2537+ "ITEMS_SOLD_COUNTING" -> Just FACMItemsSoldCounting
2538+ "SESSION_COUNTING" -> Just FACMSessionCounting
2539+ "STANDARD_COUNTING" -> Just FACMStandardCounting
2540+ "TRANSACTIONS_COUNTING" -> Just FACMTransactionsCounting
2541+ "UNIQUE_COUNTING" -> Just FACMUniqueCounting
2542+ _ -> Nothing
2543+
2544+instance ToText FloodlightActivityCountingMethod where
2545+ toText = \case
2546+ FACMItemsSoldCounting -> "ITEMS_SOLD_COUNTING"
2547+ FACMSessionCounting -> "SESSION_COUNTING"
2548+ FACMStandardCounting -> "STANDARD_COUNTING"
2549+ FACMTransactionsCounting -> "TRANSACTIONS_COUNTING"
2550+ FACMUniqueCounting -> "UNIQUE_COUNTING"
2551+
12832552-- | Type of the associated floodlight activity group. This is a read-only
12842553-- field.
12852554data FloodlightActivityFloodlightActivityGroupType
@@ -1291,6 +2560,17 @@ data FloodlightActivityFloodlightActivityGroupType
12912560
12922561instance Hashable FloodlightActivityFloodlightActivityGroupType
12932562
2563+instance FromText FloodlightActivityFloodlightActivityGroupType where
2564+ fromText = \case
2565+ "COUNTER" -> Just FAFAGTCounter
2566+ "SALE" -> Just FAFAGTSale
2567+ _ -> Nothing
2568+
2569+instance ToText FloodlightActivityFloodlightActivityGroupType where
2570+ toText = \case
2571+ FAFAGTCounter -> "COUNTER"
2572+ FAFAGTSale -> "SALE"
2573+
12942574-- | Type of the floodlight activity group. This is a required field that is
12952575-- read-only after insertion.
12962576data FloodlightActivityGroupType
@@ -1302,6 +2582,17 @@ data FloodlightActivityGroupType
13022582
13032583instance Hashable FloodlightActivityGroupType
13042584
2585+instance FromText FloodlightActivityGroupType where
2586+ fromText = \case
2587+ "COUNTER" -> Just FAGTCounter
2588+ "SALE" -> Just FAGTSale
2589+ _ -> Nothing
2590+
2591+instance ToText FloodlightActivityGroupType where
2592+ toText = \case
2593+ FAGTCounter -> "COUNTER"
2594+ FAGTSale -> "SALE"
2595+
13052596data FloodlightActivityItemUserDefinedVariableTypes
13062597 = FAIUDVTU1
13072598 -- ^ @U1@
@@ -1347,6 +2638,53 @@ data FloodlightActivityItemUserDefinedVariableTypes
13472638
13482639instance Hashable FloodlightActivityItemUserDefinedVariableTypes
13492640
2641+instance FromText FloodlightActivityItemUserDefinedVariableTypes where
2642+ fromText = \case
2643+ "U1" -> Just FAIUDVTU1
2644+ "U10" -> Just FAIUDVTU10
2645+ "U11" -> Just FAIUDVTU11
2646+ "U12" -> Just FAIUDVTU12
2647+ "U13" -> Just FAIUDVTU13
2648+ "U14" -> Just FAIUDVTU14
2649+ "U15" -> Just FAIUDVTU15
2650+ "U16" -> Just FAIUDVTU16
2651+ "U17" -> Just FAIUDVTU17
2652+ "U18" -> Just FAIUDVTU18
2653+ "U19" -> Just FAIUDVTU19
2654+ "U2" -> Just FAIUDVTU2
2655+ "U20" -> Just FAIUDVTU20
2656+ "U3" -> Just FAIUDVTU3
2657+ "U4" -> Just FAIUDVTU4
2658+ "U5" -> Just FAIUDVTU5
2659+ "U6" -> Just FAIUDVTU6
2660+ "U7" -> Just FAIUDVTU7
2661+ "U8" -> Just FAIUDVTU8
2662+ "U9" -> Just FAIUDVTU9
2663+ _ -> Nothing
2664+
2665+instance ToText FloodlightActivityItemUserDefinedVariableTypes where
2666+ toText = \case
2667+ FAIUDVTU1 -> "U1"
2668+ FAIUDVTU10 -> "U10"
2669+ FAIUDVTU11 -> "U11"
2670+ FAIUDVTU12 -> "U12"
2671+ FAIUDVTU13 -> "U13"
2672+ FAIUDVTU14 -> "U14"
2673+ FAIUDVTU15 -> "U15"
2674+ FAIUDVTU16 -> "U16"
2675+ FAIUDVTU17 -> "U17"
2676+ FAIUDVTU18 -> "U18"
2677+ FAIUDVTU19 -> "U19"
2678+ FAIUDVTU2 -> "U2"
2679+ FAIUDVTU20 -> "U20"
2680+ FAIUDVTU3 -> "U3"
2681+ FAIUDVTU4 -> "U4"
2682+ FAIUDVTU5 -> "U5"
2683+ FAIUDVTU6 -> "U6"
2684+ FAIUDVTU7 -> "U7"
2685+ FAIUDVTU8 -> "U8"
2686+ FAIUDVTU9 -> "U9"
2687+
13502688-- | Tag format type for the floodlight activity. If left blank, the tag
13512689-- format will default to HTML.
13522690data FloodlightActivityTagFormat
@@ -1358,6 +2696,17 @@ data FloodlightActivityTagFormat
13582696
13592697instance Hashable FloodlightActivityTagFormat
13602698
2699+instance FromText FloodlightActivityTagFormat where
2700+ fromText = \case
2701+ "HTML" -> Just FATFHTML
2702+ "XHTML" -> Just FATFXhtml
2703+ _ -> Nothing
2704+
2705+instance ToText FloodlightActivityTagFormat where
2706+ toText = \case
2707+ FATFHTML -> "HTML"
2708+ FATFXhtml -> "XHTML"
2709+
13612710-- | Day that will be counted as the first day of the week in reports. This
13622711-- is a required field.
13632712data FloodlightConfigurationFirstDayOfWeek
@@ -1369,6 +2718,17 @@ data FloodlightConfigurationFirstDayOfWeek
13692718
13702719instance Hashable FloodlightConfigurationFirstDayOfWeek
13712720
2721+instance FromText FloodlightConfigurationFirstDayOfWeek where
2722+ fromText = \case
2723+ "MONDAY" -> Just FCFDOWMonday
2724+ "SUNDAY" -> Just FCFDOWSunday
2725+ _ -> Nothing
2726+
2727+instance ToText FloodlightConfigurationFirstDayOfWeek where
2728+ toText = \case
2729+ FCFDOWMonday -> "MONDAY"
2730+ FCFDOWSunday -> "SUNDAY"
2731+
13722732data FloodlightConfigurationItemStandardVariableTypes
13732733 = FCISVTNum
13742734 -- ^ @NUM@
@@ -1382,6 +2742,21 @@ data FloodlightConfigurationItemStandardVariableTypes
13822742
13832743instance Hashable FloodlightConfigurationItemStandardVariableTypes
13842744
2745+instance FromText FloodlightConfigurationItemStandardVariableTypes where
2746+ fromText = \case
2747+ "NUM" -> Just FCISVTNum
2748+ "ORD" -> Just FCISVTOrd
2749+ "TRAN" -> Just FCISVTTran
2750+ "U" -> Just FCISVTU
2751+ _ -> Nothing
2752+
2753+instance ToText FloodlightConfigurationItemStandardVariableTypes where
2754+ toText = \case
2755+ FCISVTNum -> "NUM"
2756+ FCISVTOrd -> "ORD"
2757+ FCISVTTran -> "TRAN"
2758+ FCISVTU -> "U"
2759+
13852760-- | Types of attribution options for natural search conversions.
13862761data FloodlightConfigurationNaturalSearchConversionAttributionOption
13872762 = FCNSCAOExcludeNATuralSearchConversionAttribution
@@ -1394,6 +2769,19 @@ data FloodlightConfigurationNaturalSearchConversionAttributionOption
13942769
13952770instance Hashable FloodlightConfigurationNaturalSearchConversionAttributionOption
13962771
2772+instance FromText FloodlightConfigurationNaturalSearchConversionAttributionOption where
2773+ fromText = \case
2774+ "EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION" -> Just FCNSCAOExcludeNATuralSearchConversionAttribution
2775+ "INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION" -> Just FCNSCAOIncludeNATuralSearchConversionAttribution
2776+ "INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION" -> Just FCNSCAOIncludeNATuralSearchTieredConversionAttribution
2777+ _ -> Nothing
2778+
2779+instance ToText FloodlightConfigurationNaturalSearchConversionAttributionOption where
2780+ toText = \case
2781+ FCNSCAOExcludeNATuralSearchConversionAttribution -> "EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION"
2782+ FCNSCAOIncludeNATuralSearchConversionAttribution -> "INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION"
2783+ FCNSCAOIncludeNATuralSearchTieredConversionAttribution -> "INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION"
2784+
13972785-- | Position in the browser where the window will open.
13982786data FsCommandPositionOption
13992787 = FCPOCentered
@@ -1404,6 +2792,17 @@ data FsCommandPositionOption
14042792
14052793instance Hashable FsCommandPositionOption
14062794
2795+instance FromText FsCommandPositionOption where
2796+ fromText = \case
2797+ "CENTERED" -> Just FCPOCentered
2798+ "DISTANCE_FROM_TOP_LEFT_CORNER" -> Just FCPODistanceFromTopLeftCorner
2799+ _ -> Nothing
2800+
2801+instance ToText FsCommandPositionOption where
2802+ toText = \case
2803+ FCPOCentered -> "CENTERED"
2804+ FCPODistanceFromTopLeftCorner -> "DISTANCE_FROM_TOP_LEFT_CORNER"
2805+
14072806-- | Comparison operator of this term. This field is only relevant when type
14082807-- is left unset or set to CUSTOM_VARIABLE_TERM or REFERRER_TERM.
14092808data ListPopulationTermOperator
@@ -1425,6 +2824,27 @@ data ListPopulationTermOperator
14252824
14262825instance Hashable ListPopulationTermOperator
14272826
2827+instance FromText ListPopulationTermOperator where
2828+ fromText = \case
2829+ "NUM_EQUALS" -> Just LPTONumEquals
2830+ "NUM_GREATER_THAN" -> Just LPTONumGreaterThan
2831+ "NUM_GREATER_THAN_EQUAL" -> Just LPTONumGreaterThanEqual
2832+ "NUM_LESS_THAN" -> Just LPTONumLessThan
2833+ "NUM_LESS_THAN_EQUAL" -> Just LPTONumLessThanEqual
2834+ "STRING_CONTAINS" -> Just LPTOStringContains
2835+ "STRING_EQUALS" -> Just LPTOStringEquals
2836+ _ -> Nothing
2837+
2838+instance ToText ListPopulationTermOperator where
2839+ toText = \case
2840+ LPTONumEquals -> "NUM_EQUALS"
2841+ LPTONumGreaterThan -> "NUM_GREATER_THAN"
2842+ LPTONumGreaterThanEqual -> "NUM_GREATER_THAN_EQUAL"
2843+ LPTONumLessThan -> "NUM_LESS_THAN"
2844+ LPTONumLessThanEqual -> "NUM_LESS_THAN_EQUAL"
2845+ LPTOStringContains -> "STRING_CONTAINS"
2846+ LPTOStringEquals -> "STRING_EQUALS"
2847+
14282848-- | List population term type determines the applicable fields in this
14292849-- object. If left unset or set to CUSTOM_VARIABLE_TERM, then variableName,
14302850-- variableFriendlyName, operator, value, and negation are applicable. If
@@ -1442,6 +2862,19 @@ data ListPopulationTermType
14422862
14432863instance Hashable ListPopulationTermType
14442864
2865+instance FromText ListPopulationTermType where
2866+ fromText = \case
2867+ "CUSTOM_VARIABLE_TERM" -> Just LPTTCustomVariableTerm
2868+ "LIST_MEMBERSHIP_TERM" -> Just LPTTListMembershipTerm
2869+ "REFERRER_TERM" -> Just LPTTReferrerTerm
2870+ _ -> Nothing
2871+
2872+instance ToText ListPopulationTermType where
2873+ toText = \case
2874+ LPTTCustomVariableTerm -> "CUSTOM_VARIABLE_TERM"
2875+ LPTTListMembershipTerm -> "LIST_MEMBERSHIP_TERM"
2876+ LPTTReferrerTerm -> "REFERRER_TERM"
2877+
14452878-- | Status of the filter. NONE means the user has access to none of the
14462879-- objects. ALL means the user has access to all objects. ASSIGNED means
14472880-- the user has access to the objects with IDs in the objectIds list.
@@ -1456,6 +2889,19 @@ data ObjectFilterStatus
14562889
14572890instance Hashable ObjectFilterStatus
14582891
2892+instance FromText ObjectFilterStatus where
2893+ fromText = \case
2894+ "ALL" -> Just OFSAll
2895+ "ASSIGNED" -> Just OFSAssigned
2896+ "NONE" -> Just OFSNone
2897+ _ -> Nothing
2898+
2899+instance ToText ObjectFilterStatus where
2900+ toText = \case
2901+ OFSAll -> "ALL"
2902+ OFSAssigned -> "ASSIGNED"
2903+ OFSNone -> "NONE"
2904+
14592905-- | Type of this contact.
14602906data OrderContactContactType
14612907 = OCCTPlanningOrderContactBuyerBillingContact
@@ -1468,6 +2914,19 @@ data OrderContactContactType
14682914
14692915instance Hashable OrderContactContactType
14702916
2917+instance FromText OrderContactContactType where
2918+ fromText = \case
2919+ "PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT" -> Just OCCTPlanningOrderContactBuyerBillingContact
2920+ "PLANNING_ORDER_CONTACT_BUYER_CONTACT" -> Just OCCTPlanningOrderContactBuyerContact
2921+ "PLANNING_ORDER_CONTACT_SELLER_CONTACT" -> Just OCCTPlanningOrderContactSellerContact
2922+ _ -> Nothing
2923+
2924+instance ToText OrderContactContactType where
2925+ toText = \case
2926+ OCCTPlanningOrderContactBuyerBillingContact -> "PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT"
2927+ OCCTPlanningOrderContactBuyerContact -> "PLANNING_ORDER_CONTACT_BUYER_CONTACT"
2928+ OCCTPlanningOrderContactSellerContact -> "PLANNING_ORDER_CONTACT_SELLER_CONTACT"
2929+
14712930-- | Type of this order document
14722931data OrderDocumentType
14732932 = ODTPlanningOrderTypeChangeOrder
@@ -1478,6 +2937,17 @@ data OrderDocumentType
14782937
14792938instance Hashable OrderDocumentType
14802939
2940+instance FromText OrderDocumentType where
2941+ fromText = \case
2942+ "PLANNING_ORDER_TYPE_CHANGE_ORDER" -> Just ODTPlanningOrderTypeChangeOrder
2943+ "PLANNING_ORDER_TYPE_INSERTION_ORDER" -> Just ODTPlanningOrderTypeInsertionOrder
2944+ _ -> Nothing
2945+
2946+instance ToText OrderDocumentType where
2947+ toText = \case
2948+ ODTPlanningOrderTypeChangeOrder -> "PLANNING_ORDER_TYPE_CHANGE_ORDER"
2949+ ODTPlanningOrderTypeInsertionOrder -> "PLANNING_ORDER_TYPE_INSERTION_ORDER"
2950+
14812951-- | Placement compatibility. WEB and WEB_INTERSTITIAL refer to rendering
14822952-- either on desktop or on mobile devices for regular or interstitial ads,
14832953-- respectively. APP and APP_INTERSTITIAL are for rendering in mobile
@@ -1498,6 +2968,23 @@ data PlacementCompatibility
14982968
14992969instance Hashable PlacementCompatibility
15002970
2971+instance FromText PlacementCompatibility where
2972+ fromText = \case
2973+ "APP" -> Just PCApp
2974+ "APP_INTERSTITIAL" -> Just PCAppInterstitial
2975+ "IN_STREAM_VIDEO" -> Just PCInStreamVideo
2976+ "WEB" -> Just PCWeb
2977+ "WEB_INTERSTITIAL" -> Just PCWebInterstitial
2978+ _ -> Nothing
2979+
2980+instance ToText PlacementCompatibility where
2981+ toText = \case
2982+ PCApp -> "APP"
2983+ PCAppInterstitial -> "APP_INTERSTITIAL"
2984+ PCInStreamVideo -> "IN_STREAM_VIDEO"
2985+ PCWeb -> "WEB"
2986+ PCWebInterstitial -> "WEB_INTERSTITIAL"
2987+
15012988-- | Type of this placement group. A package is a simple group of placements
15022989-- that acts as a single pricing point for a group of tags. A roadblock is
15032990-- a group of placements that not only acts as a single pricing point, but
@@ -1513,6 +3000,17 @@ data PlacementGroupPlacementGroupType
15133000
15143001instance Hashable PlacementGroupPlacementGroupType
15153002
3003+instance FromText PlacementGroupPlacementGroupType where
3004+ fromText = \case
3005+ "PLACEMENT_PACKAGE" -> Just PGPGTPlacementPackage
3006+ "PLACEMENT_ROADBLOCK" -> Just PGPGTPlacementRoadblock
3007+ _ -> Nothing
3008+
3009+instance ToText PlacementGroupPlacementGroupType where
3010+ toText = \case
3011+ PGPGTPlacementPackage -> "PLACEMENT_PACKAGE"
3012+ PGPGTPlacementRoadblock -> "PLACEMENT_ROADBLOCK"
3013+
15163014data PlacementItemTagFormats
15173015 = PITFPlacementTagClickCommands
15183016 -- ^ @PLACEMENT_TAG_CLICK_COMMANDS@
@@ -1554,6 +3052,49 @@ data PlacementItemTagFormats
15543052
15553053instance Hashable PlacementItemTagFormats
15563054
3055+instance FromText PlacementItemTagFormats where
3056+ fromText = \case
3057+ "PLACEMENT_TAG_CLICK_COMMANDS" -> Just PITFPlacementTagClickCommands
3058+ "PLACEMENT_TAG_IFRAME_ILAYER" -> Just PITFPlacementTagIframeIlayer
3059+ "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Just PITFPlacementTagIframeJavascript
3060+ "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Just PITFPlacementTagIframeJavascriptLegacy
3061+ "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Just PITFPlacementTagInstreamVideoPrefetch
3062+ "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Just PITFPlacementTagInstreamVideoPrefetchVast3
3063+ "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Just PITFPlacementTagInternalRedirect
3064+ "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Just PITFPlacementTagInterstitialIframeJavascript
3065+ "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Just PITFPlacementTagInterstitialIframeJavascriptLegacy
3066+ "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Just PITFPlacementTagInterstitialInternalRedirect
3067+ "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Just PITFPlacementTagInterstitialJavascript
3068+ "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Just PITFPlacementTagInterstitialJavascriptLegacy
3069+ "PLACEMENT_TAG_JAVASCRIPT" -> Just PITFPlacementTagJavascript
3070+ "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Just PITFPlacementTagJavascriptLegacy
3071+ "PLACEMENT_TAG_STANDARD" -> Just PITFPlacementTagStandard
3072+ "PLACEMENT_TAG_TRACKING" -> Just PITFPlacementTagTracking
3073+ "PLACEMENT_TAG_TRACKING_IFRAME" -> Just PITFPlacementTagTrackingIframe
3074+ "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Just PITFPlacementTagTrackingJavascript
3075+ _ -> Nothing
3076+
3077+instance ToText PlacementItemTagFormats where
3078+ toText = \case
3079+ PITFPlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"
3080+ PITFPlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"
3081+ PITFPlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"
3082+ PITFPlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"
3083+ PITFPlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"
3084+ PITFPlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"
3085+ PITFPlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"
3086+ PITFPlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"
3087+ PITFPlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"
3088+ PITFPlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"
3089+ PITFPlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"
3090+ PITFPlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"
3091+ PITFPlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"
3092+ PITFPlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"
3093+ PITFPlacementTagStandard -> "PLACEMENT_TAG_STANDARD"
3094+ PITFPlacementTagTracking -> "PLACEMENT_TAG_TRACKING"
3095+ PITFPlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"
3096+ PITFPlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"
3097+
15573098-- | Payment source for this placement. This is a required field that is
15583099-- read-only after insertion.
15593100data PlacementPaymentSource
@@ -1565,6 +3106,17 @@ data PlacementPaymentSource
15653106
15663107instance Hashable PlacementPaymentSource
15673108
3109+instance FromText PlacementPaymentSource where
3110+ fromText = \case
3111+ "PLACEMENT_AGENCY_PAID" -> Just PPSPlacementAgencyPaid
3112+ "PLACEMENT_PUBLISHER_PAID" -> Just PPSPlacementPublisherPaid
3113+ _ -> Nothing
3114+
3115+instance ToText PlacementPaymentSource where
3116+ toText = \case
3117+ PPSPlacementAgencyPaid -> "PLACEMENT_AGENCY_PAID"
3118+ PPSPlacementPublisherPaid -> "PLACEMENT_PUBLISHER_PAID"
3119+
15683120-- | Third-party placement status.
15693121data PlacementStatus
15703122 = PSAcknowledgeAcceptance
@@ -1583,6 +3135,25 @@ data PlacementStatus
15833135
15843136instance Hashable PlacementStatus
15853137
3138+instance FromText PlacementStatus where
3139+ fromText = \case
3140+ "ACKNOWLEDGE_ACCEPTANCE" -> Just PSAcknowledgeAcceptance
3141+ "ACKNOWLEDGE_REJECTION" -> Just PSAcknowledgeRejection
3142+ "DRAFT" -> Just PSDraft
3143+ "PAYMENT_ACCEPTED" -> Just PSPaymentAccepted
3144+ "PAYMENT_REJECTED" -> Just PSPaymentRejected
3145+ "PENDING_REVIEW" -> Just PSPendingReview
3146+ _ -> Nothing
3147+
3148+instance ToText PlacementStatus where
3149+ toText = \case
3150+ PSAcknowledgeAcceptance -> "ACKNOWLEDGE_ACCEPTANCE"
3151+ PSAcknowledgeRejection -> "ACKNOWLEDGE_REJECTION"
3152+ PSDraft -> "DRAFT"
3153+ PSPaymentAccepted -> "PAYMENT_ACCEPTED"
3154+ PSPaymentRejected -> "PAYMENT_REJECTED"
3155+ PSPendingReview -> "PENDING_REVIEW"
3156+
15863157-- | Popup window position either centered or at specific coordinate.
15873158data PopupWindowPropertiesPositionType
15883159 = PWPPTCenter
@@ -1593,6 +3164,17 @@ data PopupWindowPropertiesPositionType
15933164
15943165instance Hashable PopupWindowPropertiesPositionType
15953166
3167+instance FromText PopupWindowPropertiesPositionType where
3168+ fromText = \case
3169+ "CENTER" -> Just PWPPTCenter
3170+ "COORDINATES" -> Just PWPPTCoordinates
3171+ _ -> Nothing
3172+
3173+instance ToText PopupWindowPropertiesPositionType where
3174+ toText = \case
3175+ PWPPTCenter -> "CENTER"
3176+ PWPPTCoordinates -> "COORDINATES"
3177+
15963178-- | Cap cost type of this inventory item.
15973179data PricingCapCostType
15983180 = PCCTPlanningPlacementCapCostTypeCumulative
@@ -1605,6 +3187,19 @@ data PricingCapCostType
16053187
16063188instance Hashable PricingCapCostType
16073189
3190+instance FromText PricingCapCostType where
3191+ fromText = \case
3192+ "PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE" -> Just PCCTPlanningPlacementCapCostTypeCumulative
3193+ "PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY" -> Just PCCTPlanningPlacementCapCostTypeMonthly
3194+ "PLANNING_PLACEMENT_CAP_COST_TYPE_NONE" -> Just PCCTPlanningPlacementCapCostTypeNone
3195+ _ -> Nothing
3196+
3197+instance ToText PricingCapCostType where
3198+ toText = \case
3199+ PCCTPlanningPlacementCapCostTypeCumulative -> "PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE"
3200+ PCCTPlanningPlacementCapCostTypeMonthly -> "PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY"
3201+ PCCTPlanningPlacementCapCostTypeNone -> "PLANNING_PLACEMENT_CAP_COST_TYPE_NONE"
3202+
16083203-- | Group type of this inventory item if it represents a placement group. Is
16093204-- null otherwise. There are two type of placement groups:
16103205-- PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE is a simple group of inventory
@@ -1622,6 +3217,17 @@ data PricingGroupType
16223217
16233218instance Hashable PricingGroupType
16243219
3220+instance FromText PricingGroupType where
3221+ fromText = \case
3222+ "PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE" -> Just PGTPlanningPlacementGroupTypePackage
3223+ "PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK" -> Just PGTPlanningPlacementGroupTypeRoadblock
3224+ _ -> Nothing
3225+
3226+instance ToText PricingGroupType where
3227+ toText = \case
3228+ PGTPlanningPlacementGroupTypePackage -> "PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE"
3229+ PGTPlanningPlacementGroupTypeRoadblock -> "PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK"
3230+
16253231-- | Pricing type of this inventory item.
16263232data PricingPricingType
16273233 = PPTPlanningPlacementPricingTypeClicks
@@ -1642,6 +3248,27 @@ data PricingPricingType
16423248
16433249instance Hashable PricingPricingType
16443250
3251+instance FromText PricingPricingType where
3252+ fromText = \case
3253+ "PLANNING_PLACEMENT_PRICING_TYPE_CLICKS" -> Just PPTPlanningPlacementPricingTypeClicks
3254+ "PLANNING_PLACEMENT_PRICING_TYPE_CPA" -> Just PPTPlanningPlacementPricingTypeCpa
3255+ "PLANNING_PLACEMENT_PRICING_TYPE_CPC" -> Just PPTPlanningPlacementPricingTypeCpc
3256+ "PLANNING_PLACEMENT_PRICING_TYPE_CPM" -> Just PPTPlanningPlacementPricingTypeCpm
3257+ "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS" -> Just PPTPlanningPlacementPricingTypeFlatRateClicks
3258+ "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Just PPTPlanningPlacementPricingTypeFlatRateImpressions
3259+ "PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS" -> Just PPTPlanningPlacementPricingTypeImpressions
3260+ _ -> Nothing
3261+
3262+instance ToText PricingPricingType where
3263+ toText = \case
3264+ PPTPlanningPlacementPricingTypeClicks -> "PLANNING_PLACEMENT_PRICING_TYPE_CLICKS"
3265+ PPTPlanningPlacementPricingTypeCpa -> "PLANNING_PLACEMENT_PRICING_TYPE_CPA"
3266+ PPTPlanningPlacementPricingTypeCpc -> "PLANNING_PLACEMENT_PRICING_TYPE_CPC"
3267+ PPTPlanningPlacementPricingTypeCpm -> "PLANNING_PLACEMENT_PRICING_TYPE_CPM"
3268+ PPTPlanningPlacementPricingTypeFlatRateClicks -> "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS"
3269+ PPTPlanningPlacementPricingTypeFlatRateImpressions -> "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS"
3270+ PPTPlanningPlacementPricingTypeImpressions -> "PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS"
3271+
16453272-- | Placement cap cost option.
16463273data PricingScheduleCapCostOption
16473274 = PSCCOCapCostCumulative
@@ -1654,6 +3281,19 @@ data PricingScheduleCapCostOption
16543281
16553282instance Hashable PricingScheduleCapCostOption
16563283
3284+instance FromText PricingScheduleCapCostOption where
3285+ fromText = \case
3286+ "CAP_COST_CUMULATIVE" -> Just PSCCOCapCostCumulative
3287+ "CAP_COST_MONTHLY" -> Just PSCCOCapCostMonthly
3288+ "CAP_COST_NONE" -> Just PSCCOCapCostNone
3289+ _ -> Nothing
3290+
3291+instance ToText PricingScheduleCapCostOption where
3292+ toText = \case
3293+ PSCCOCapCostCumulative -> "CAP_COST_CUMULATIVE"
3294+ PSCCOCapCostMonthly -> "CAP_COST_MONTHLY"
3295+ PSCCOCapCostNone -> "CAP_COST_NONE"
3296+
16573297-- | Placement pricing type. This field is required on insertion.
16583298data PricingSchedulePricingType
16593299 = PSPTPricingTypeCpa
@@ -1670,6 +3310,23 @@ data PricingSchedulePricingType
16703310
16713311instance Hashable PricingSchedulePricingType
16723312
3313+instance FromText PricingSchedulePricingType where
3314+ fromText = \case
3315+ "PRICING_TYPE_CPA" -> Just PSPTPricingTypeCpa
3316+ "PRICING_TYPE_CPC" -> Just PSPTPricingTypeCpc
3317+ "PRICING_TYPE_CPM" -> Just PSPTPricingTypeCpm
3318+ "PRICING_TYPE_FLAT_RATE_CLICKS" -> Just PSPTPricingTypeFlatRateClicks
3319+ "PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Just PSPTPricingTypeFlatRateImpressions
3320+ _ -> Nothing
3321+
3322+instance ToText PricingSchedulePricingType where
3323+ toText = \case
3324+ PSPTPricingTypeCpa -> "PRICING_TYPE_CPA"
3325+ PSPTPricingTypeCpc -> "PRICING_TYPE_CPC"
3326+ PSPTPricingTypeCpm -> "PRICING_TYPE_CPM"
3327+ PSPTPricingTypeFlatRateClicks -> "PRICING_TYPE_FLAT_RATE_CLICKS"
3328+ PSPTPricingTypeFlatRateImpressions -> "PRICING_TYPE_FLAT_RATE_IMPRESSIONS"
3329+
16733330-- | Audience age group of this project.
16743331data ProjectAudienceAgeGroup
16753332 = PAAGPlanningAudienceAge1824
@@ -1690,6 +3347,27 @@ data ProjectAudienceAgeGroup
16903347
16913348instance Hashable ProjectAudienceAgeGroup
16923349
3350+instance FromText ProjectAudienceAgeGroup where
3351+ fromText = \case
3352+ "PLANNING_AUDIENCE_AGE_18_24" -> Just PAAGPlanningAudienceAge1824
3353+ "PLANNING_AUDIENCE_AGE_25_34" -> Just PAAGPlanningAudienceAge2534
3354+ "PLANNING_AUDIENCE_AGE_35_44" -> Just PAAGPlanningAudienceAge3544
3355+ "PLANNING_AUDIENCE_AGE_45_54" -> Just PAAGPlanningAudienceAge4554
3356+ "PLANNING_AUDIENCE_AGE_55_64" -> Just PAAGPlanningAudienceAge5564
3357+ "PLANNING_AUDIENCE_AGE_65_OR_MORE" -> Just PAAGPlanningAudienceAge65OrMore
3358+ "PLANNING_AUDIENCE_AGE_UNKNOWN" -> Just PAAGPlanningAudienceAgeUnknown
3359+ _ -> Nothing
3360+
3361+instance ToText ProjectAudienceAgeGroup where
3362+ toText = \case
3363+ PAAGPlanningAudienceAge1824 -> "PLANNING_AUDIENCE_AGE_18_24"
3364+ PAAGPlanningAudienceAge2534 -> "PLANNING_AUDIENCE_AGE_25_34"
3365+ PAAGPlanningAudienceAge3544 -> "PLANNING_AUDIENCE_AGE_35_44"
3366+ PAAGPlanningAudienceAge4554 -> "PLANNING_AUDIENCE_AGE_45_54"
3367+ PAAGPlanningAudienceAge5564 -> "PLANNING_AUDIENCE_AGE_55_64"
3368+ PAAGPlanningAudienceAge65OrMore -> "PLANNING_AUDIENCE_AGE_65_OR_MORE"
3369+ PAAGPlanningAudienceAgeUnknown -> "PLANNING_AUDIENCE_AGE_UNKNOWN"
3370+
16933371-- | Audience gender of this project.
16943372data ProjectAudienceGender
16953373 = PAGPlanningAudienceGenderFemale
@@ -1700,6 +3378,17 @@ data ProjectAudienceGender
17003378
17013379instance Hashable ProjectAudienceGender
17023380
3381+instance FromText ProjectAudienceGender where
3382+ fromText = \case
3383+ "PLANNING_AUDIENCE_GENDER_FEMALE" -> Just PAGPlanningAudienceGenderFemale
3384+ "PLANNING_AUDIENCE_GENDER_MALE" -> Just PAGPlanningAudienceGenderMale
3385+ _ -> Nothing
3386+
3387+instance ToText ProjectAudienceGender where
3388+ toText = \case
3389+ PAGPlanningAudienceGenderFemale -> "PLANNING_AUDIENCE_GENDER_FEMALE"
3390+ PAGPlanningAudienceGenderMale -> "PLANNING_AUDIENCE_GENDER_MALE"
3391+
17033392-- | The delivery type for the recipient.
17043393data RecipientDeliveryType
17053394 = RDTAttachment
@@ -1710,6 +3399,17 @@ data RecipientDeliveryType
17103399
17113400instance Hashable RecipientDeliveryType
17123401
3402+instance FromText RecipientDeliveryType where
3403+ fromText = \case
3404+ "ATTACHMENT" -> Just RDTAttachment
3405+ "LINK" -> Just RDTLink
3406+ _ -> Nothing
3407+
3408+instance ToText RecipientDeliveryType where
3409+ toText = \case
3410+ RDTAttachment -> "ATTACHMENT"
3411+ RDTLink -> "LINK"
3412+
17133413-- | Product from which this remarketing list was originated.
17143414data RemarketingListListSource
17153415 = RLLSRemarketingListSourceDBm
@@ -1726,6 +3426,23 @@ data RemarketingListListSource
17263426
17273427instance Hashable RemarketingListListSource
17283428
3429+instance FromText RemarketingListListSource where
3430+ fromText = \case
3431+ "REMARKETING_LIST_SOURCE_DBM" -> Just RLLSRemarketingListSourceDBm
3432+ "REMARKETING_LIST_SOURCE_DFA" -> Just RLLSRemarketingListSourceDfa
3433+ "REMARKETING_LIST_SOURCE_DMP" -> Just RLLSRemarketingListSourceDmp
3434+ "REMARKETING_LIST_SOURCE_GA" -> Just RLLSRemarketingListSourceGa
3435+ "REMARKETING_LIST_SOURCE_OTHER" -> Just RLLSRemarketingListSourceOther
3436+ _ -> Nothing
3437+
3438+instance ToText RemarketingListListSource where
3439+ toText = \case
3440+ RLLSRemarketingListSourceDBm -> "REMARKETING_LIST_SOURCE_DBM"
3441+ RLLSRemarketingListSourceDfa -> "REMARKETING_LIST_SOURCE_DFA"
3442+ RLLSRemarketingListSourceDmp -> "REMARKETING_LIST_SOURCE_DMP"
3443+ RLLSRemarketingListSourceGa -> "REMARKETING_LIST_SOURCE_GA"
3444+ RLLSRemarketingListSourceOther -> "REMARKETING_LIST_SOURCE_OTHER"
3445+
17293446-- | The dimension option.
17303447data ReportDimensionCrossDimensionReachCriteria
17313448 = RDCDRCAdvertiser
@@ -1740,6 +3457,21 @@ data ReportDimensionCrossDimensionReachCriteria
17403457
17413458instance Hashable ReportDimensionCrossDimensionReachCriteria
17423459
3460+instance FromText ReportDimensionCrossDimensionReachCriteria where
3461+ fromText = \case
3462+ "ADVERTISER" -> Just RDCDRCAdvertiser
3463+ "CAMPAIGN" -> Just RDCDRCCampaign
3464+ "SITE_BY_ADVERTISER" -> Just RDCDRCSiteByAdvertiser
3465+ "SITE_BY_CAMPAIGN" -> Just RDCDRCSiteByCampaign
3466+ _ -> Nothing
3467+
3468+instance ToText ReportDimensionCrossDimensionReachCriteria where
3469+ toText = \case
3470+ RDCDRCAdvertiser -> "ADVERTISER"
3471+ RDCDRCCampaign -> "CAMPAIGN"
3472+ RDCDRCSiteByAdvertiser -> "SITE_BY_ADVERTISER"
3473+ RDCDRCSiteByCampaign -> "SITE_BY_CAMPAIGN"
3474+
17433475-- | The type of delivery for the owner to receive, if enabled.
17443476data ReportEmailOwnerDeliveryTypeDelivery
17453477 = REODTDAttachment
@@ -1750,6 +3482,17 @@ data ReportEmailOwnerDeliveryTypeDelivery
17503482
17513483instance Hashable ReportEmailOwnerDeliveryTypeDelivery
17523484
3485+instance FromText ReportEmailOwnerDeliveryTypeDelivery where
3486+ fromText = \case
3487+ "ATTACHMENT" -> Just REODTDAttachment
3488+ "LINK" -> Just REODTDLink
3489+ _ -> Nothing
3490+
3491+instance ToText ReportEmailOwnerDeliveryTypeDelivery where
3492+ toText = \case
3493+ REODTDAttachment -> "ATTACHMENT"
3494+ REODTDLink -> "LINK"
3495+
17533496-- | The output format of the report. If not specified, default format is
17543497-- \"CSV\". Note that the actual format in the completed report file might
17553498-- differ if for instance the report\'s size exceeds the format\'s
@@ -1763,6 +3506,17 @@ data ReportFormat
17633506
17643507instance Hashable ReportFormat
17653508
3509+instance FromText ReportFormat where
3510+ fromText = \case
3511+ "CSV" -> Just RFCSV
3512+ "EXCEL" -> Just RFExcel
3513+ _ -> Nothing
3514+
3515+instance ToText ReportFormat where
3516+ toText = \case
3517+ RFCSV -> "CSV"
3518+ RFExcel -> "EXCEL"
3519+
17663520data ReportItemRepeatsOnWeekDaysSchedule
17673521 = RIROWDSFriday
17683522 -- ^ @FRIDAY@
@@ -1782,6 +3536,27 @@ data ReportItemRepeatsOnWeekDaysSchedule
17823536
17833537instance Hashable ReportItemRepeatsOnWeekDaysSchedule
17843538
3539+instance FromText ReportItemRepeatsOnWeekDaysSchedule where
3540+ fromText = \case
3541+ "FRIDAY" -> Just RIROWDSFriday
3542+ "MONDAY" -> Just RIROWDSMonday
3543+ "SATURDAY" -> Just RIROWDSSaturday
3544+ "SUNDAY" -> Just RIROWDSSunday
3545+ "THURSDAY" -> Just RIROWDSThursday
3546+ "TUESDAY" -> Just RIROWDSTuesday
3547+ "WEDNESDAY" -> Just RIROWDSWednesday
3548+ _ -> Nothing
3549+
3550+instance ToText ReportItemRepeatsOnWeekDaysSchedule where
3551+ toText = \case
3552+ RIROWDSFriday -> "FRIDAY"
3553+ RIROWDSMonday -> "MONDAY"
3554+ RIROWDSSaturday -> "SATURDAY"
3555+ RIROWDSSunday -> "SUNDAY"
3556+ RIROWDSThursday -> "THURSDAY"
3557+ RIROWDSTuesday -> "TUESDAY"
3558+ RIROWDSWednesday -> "WEDNESDAY"
3559+
17853560-- | Enum to define for \"MONTHLY\" scheduled reports whether reports should
17863561-- be repeated on the same day of the month as \"startDate\" or the same
17873562-- day of the week of the month. Example: If \'startDate\' is Monday, April
@@ -1797,6 +3572,17 @@ data ReportRunsOnDayOfMonthSchedule
17973572
17983573instance Hashable ReportRunsOnDayOfMonthSchedule
17993574
3575+instance FromText ReportRunsOnDayOfMonthSchedule where
3576+ fromText = \case
3577+ "DAY_OF_MONTH" -> Just RRODOMSDayOfMonth
3578+ "WEEK_OF_MONTH" -> Just RRODOMSWeekOfMonth
3579+ _ -> Nothing
3580+
3581+instance ToText ReportRunsOnDayOfMonthSchedule where
3582+ toText = \case
3583+ RRODOMSDayOfMonth -> "DAY_OF_MONTH"
3584+ RRODOMSWeekOfMonth -> "WEEK_OF_MONTH"
3585+
18003586-- | The type of the report.
18013587data ReportType
18023588 = RTCrossDimensionReach
@@ -1813,6 +3599,23 @@ data ReportType
18133599
18143600instance Hashable ReportType
18153601
3602+instance FromText ReportType where
3603+ fromText = \case
3604+ "CROSS_DIMENSION_REACH" -> Just RTCrossDimensionReach
3605+ "FLOODLIGHT" -> Just RTFloodlight
3606+ "PATH_TO_CONVERSION" -> Just RTPathToConversion
3607+ "REACH" -> Just RTReach
3608+ "STANDARD" -> Just RTStandard
3609+ _ -> Nothing
3610+
3611+instance ToText ReportType where
3612+ toText = \case
3613+ RTCrossDimensionReach -> "CROSS_DIMENSION_REACH"
3614+ RTFloodlight -> "FLOODLIGHT"
3615+ RTPathToConversion -> "PATH_TO_CONVERSION"
3616+ RTReach -> "REACH"
3617+ RTStandard -> "STANDARD"
3618+
18163619-- | Site contact type.
18173620data SiteContactContactType
18183621 = SCCTSalesPerson
@@ -1823,6 +3626,17 @@ data SiteContactContactType
18233626
18243627instance Hashable SiteContactContactType
18253628
3629+instance FromText SiteContactContactType where
3630+ fromText = \case
3631+ "SALES_PERSON" -> Just SCCTSalesPerson
3632+ "TRAFFICKER" -> Just SCCTTrafficker
3633+ _ -> Nothing
3634+
3635+instance ToText SiteContactContactType where
3636+ toText = \case
3637+ SCCTSalesPerson -> "SALES_PERSON"
3638+ SCCTTrafficker -> "TRAFFICKER"
3639+
18263640-- | An optional sort order for the dimension column.
18273641data SortedDimensionSortOrder
18283642 = SDSOAscending
@@ -1833,6 +3647,17 @@ data SortedDimensionSortOrder
18333647
18343648instance Hashable SortedDimensionSortOrder
18353649
3650+instance FromText SortedDimensionSortOrder where
3651+ fromText = \case
3652+ "ASCENDING" -> Just SDSOAscending
3653+ "DESCENDING" -> Just SDSODescending
3654+ _ -> Nothing
3655+
3656+instance ToText SortedDimensionSortOrder where
3657+ toText = \case
3658+ SDSOAscending -> "ASCENDING"
3659+ SDSODescending -> "DESCENDING"
3660+
18363661-- | TagData tag format of this tag.
18373662data TagDataFormat
18383663 = TDFPlacementTagClickCommands
@@ -1875,6 +3700,49 @@ data TagDataFormat
18753700
18763701instance Hashable TagDataFormat
18773702
3703+instance FromText TagDataFormat where
3704+ fromText = \case
3705+ "PLACEMENT_TAG_CLICK_COMMANDS" -> Just TDFPlacementTagClickCommands
3706+ "PLACEMENT_TAG_IFRAME_ILAYER" -> Just TDFPlacementTagIframeIlayer
3707+ "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Just TDFPlacementTagIframeJavascript
3708+ "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Just TDFPlacementTagIframeJavascriptLegacy
3709+ "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Just TDFPlacementTagInstreamVideoPrefetch
3710+ "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Just TDFPlacementTagInstreamVideoPrefetchVast3
3711+ "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Just TDFPlacementTagInternalRedirect
3712+ "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Just TDFPlacementTagInterstitialIframeJavascript
3713+ "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Just TDFPlacementTagInterstitialIframeJavascriptLegacy
3714+ "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Just TDFPlacementTagInterstitialInternalRedirect
3715+ "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Just TDFPlacementTagInterstitialJavascript
3716+ "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Just TDFPlacementTagInterstitialJavascriptLegacy
3717+ "PLACEMENT_TAG_JAVASCRIPT" -> Just TDFPlacementTagJavascript
3718+ "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Just TDFPlacementTagJavascriptLegacy
3719+ "PLACEMENT_TAG_STANDARD" -> Just TDFPlacementTagStandard
3720+ "PLACEMENT_TAG_TRACKING" -> Just TDFPlacementTagTracking
3721+ "PLACEMENT_TAG_TRACKING_IFRAME" -> Just TDFPlacementTagTrackingIframe
3722+ "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Just TDFPlacementTagTrackingJavascript
3723+ _ -> Nothing
3724+
3725+instance ToText TagDataFormat where
3726+ toText = \case
3727+ TDFPlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"
3728+ TDFPlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"
3729+ TDFPlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"
3730+ TDFPlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"
3731+ TDFPlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"
3732+ TDFPlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"
3733+ TDFPlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"
3734+ TDFPlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"
3735+ TDFPlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"
3736+ TDFPlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"
3737+ TDFPlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"
3738+ TDFPlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"
3739+ TDFPlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"
3740+ TDFPlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"
3741+ TDFPlacementTagStandard -> "PLACEMENT_TAG_STANDARD"
3742+ TDFPlacementTagTracking -> "PLACEMENT_TAG_TRACKING"
3743+ TDFPlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"
3744+ TDFPlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"
3745+
18783746-- | Option specifying how keywords are embedded in ad tags. This setting can
18793747-- be used to specify whether keyword placeholders are inserted in
18803748-- placement tags for this site. Publishers can then add keywords to those
@@ -1890,6 +3758,19 @@ data TagSettingKeywordOption
18903758
18913759instance Hashable TagSettingKeywordOption
18923760
3761+instance FromText TagSettingKeywordOption where
3762+ fromText = \case
3763+ "GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD" -> Just TSKOGenerateSeparateTagForEachKeyword
3764+ "IGNORE" -> Just TSKOIgnore
3765+ "PLACEHOLDER_WITH_LIST_OF_KEYWORDS" -> Just TSKOPlaceholderWithListOfKeywords
3766+ _ -> Nothing
3767+
3768+instance ToText TagSettingKeywordOption where
3769+ toText = \case
3770+ TSKOGenerateSeparateTagForEachKeyword -> "GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD"
3771+ TSKOIgnore -> "IGNORE"
3772+ TSKOPlaceholderWithListOfKeywords -> "PLACEHOLDER_WITH_LIST_OF_KEYWORDS"
3773+
18933774-- | Type of browser window for which the backup image of the flash creative
18943775-- can be displayed.
18953776data TargetWindowTargetWindowOption
@@ -1903,6 +3784,19 @@ data TargetWindowTargetWindowOption
19033784
19043785instance Hashable TargetWindowTargetWindowOption
19053786
3787+instance FromText TargetWindowTargetWindowOption where
3788+ fromText = \case
3789+ "CURRENT_WINDOW" -> Just TWTWOCurrentWindow
3790+ "CUSTOM" -> Just TWTWOCustom
3791+ "NEW_WINDOW" -> Just TWTWONewWindow
3792+ _ -> Nothing
3793+
3794+instance ToText TargetWindowTargetWindowOption where
3795+ toText = \case
3796+ TWTWOCurrentWindow -> "CURRENT_WINDOW"
3797+ TWTWOCustom -> "CUSTOM"
3798+ TWTWONewWindow -> "NEW_WINDOW"
3799+
19063800-- | Product from which this targetable remarketing list was originated.
19073801data TargetableRemarketingListListSource
19083802 = TRLLSRemarketingListSourceDBm
@@ -1919,6 +3813,23 @@ data TargetableRemarketingListListSource
19193813
19203814instance Hashable TargetableRemarketingListListSource
19213815
3816+instance FromText TargetableRemarketingListListSource where
3817+ fromText = \case
3818+ "REMARKETING_LIST_SOURCE_DBM" -> Just TRLLSRemarketingListSourceDBm
3819+ "REMARKETING_LIST_SOURCE_DFA" -> Just TRLLSRemarketingListSourceDfa
3820+ "REMARKETING_LIST_SOURCE_DMP" -> Just TRLLSRemarketingListSourceDmp
3821+ "REMARKETING_LIST_SOURCE_GA" -> Just TRLLSRemarketingListSourceGa
3822+ "REMARKETING_LIST_SOURCE_OTHER" -> Just TRLLSRemarketingListSourceOther
3823+ _ -> Nothing
3824+
3825+instance ToText TargetableRemarketingListListSource where
3826+ toText = \case
3827+ TRLLSRemarketingListSourceDBm -> "REMARKETING_LIST_SOURCE_DBM"
3828+ TRLLSRemarketingListSourceDfa -> "REMARKETING_LIST_SOURCE_DFA"
3829+ TRLLSRemarketingListSourceDmp -> "REMARKETING_LIST_SOURCE_DMP"
3830+ TRLLSRemarketingListSourceGa -> "REMARKETING_LIST_SOURCE_GA"
3831+ TRLLSRemarketingListSourceOther -> "REMARKETING_LIST_SOURCE_OTHER"
3832+
19223833-- | Third-party URL type for in-stream video creatives.
19233834data ThirdPartyTrackingUrlThirdPartyUrlType
19243835 = TPTUTPUTClickTracking
@@ -1959,6 +3870,47 @@ data ThirdPartyTrackingUrlThirdPartyUrlType
19593870
19603871instance Hashable ThirdPartyTrackingUrlThirdPartyUrlType
19613872
3873+instance FromText ThirdPartyTrackingUrlThirdPartyUrlType where
3874+ fromText = \case
3875+ "CLICK_TRACKING" -> Just TPTUTPUTClickTracking
3876+ "IMPRESSION" -> Just TPTUTPUTImpression
3877+ "RICH_MEDIA_BACKUP_IMPRESSION" -> Just TPTUTPUTRichMediaBackupImpression
3878+ "RICH_MEDIA_IMPRESSION" -> Just TPTUTPUTRichMediaImpression
3879+ "RICH_MEDIA_RM_IMPRESSION" -> Just TPTUTPUTRichMediaRmImpression
3880+ "SURVEY" -> Just TPTUTPUTSurvey
3881+ "VIDEO_COMPLETE" -> Just TPTUTPUTVideoComplete
3882+ "VIDEO_CUSTOM" -> Just TPTUTPUTVideoCustom
3883+ "VIDEO_FIRST_QUARTILE" -> Just TPTUTPUTVideoFirstQuartile
3884+ "VIDEO_FULLSCREEN" -> Just TPTUTPUTVideoFullscreen
3885+ "VIDEO_MIDPOINT" -> Just TPTUTPUTVideoMidpoint
3886+ "VIDEO_MUTE" -> Just TPTUTPUTVideoMute
3887+ "VIDEO_PAUSE" -> Just TPTUTPUTVideoPause
3888+ "VIDEO_REWIND" -> Just TPTUTPUTVideoRewind
3889+ "VIDEO_START" -> Just TPTUTPUTVideoStart
3890+ "VIDEO_STOP" -> Just TPTUTPUTVideoStop
3891+ "VIDEO_THIRD_QUARTILE" -> Just TPTUTPUTVideoThirdQuartile
3892+ _ -> Nothing
3893+
3894+instance ToText ThirdPartyTrackingUrlThirdPartyUrlType where
3895+ toText = \case
3896+ TPTUTPUTClickTracking -> "CLICK_TRACKING"
3897+ TPTUTPUTImpression -> "IMPRESSION"
3898+ TPTUTPUTRichMediaBackupImpression -> "RICH_MEDIA_BACKUP_IMPRESSION"
3899+ TPTUTPUTRichMediaImpression -> "RICH_MEDIA_IMPRESSION"
3900+ TPTUTPUTRichMediaRmImpression -> "RICH_MEDIA_RM_IMPRESSION"
3901+ TPTUTPUTSurvey -> "SURVEY"
3902+ TPTUTPUTVideoComplete -> "VIDEO_COMPLETE"
3903+ TPTUTPUTVideoCustom -> "VIDEO_CUSTOM"
3904+ TPTUTPUTVideoFirstQuartile -> "VIDEO_FIRST_QUARTILE"
3905+ TPTUTPUTVideoFullscreen -> "VIDEO_FULLSCREEN"
3906+ TPTUTPUTVideoMidpoint -> "VIDEO_MIDPOINT"
3907+ TPTUTPUTVideoMute -> "VIDEO_MUTE"
3908+ TPTUTPUTVideoPause -> "VIDEO_PAUSE"
3909+ TPTUTPUTVideoRewind -> "VIDEO_REWIND"
3910+ TPTUTPUTVideoStart -> "VIDEO_START"
3911+ TPTUTPUTVideoStop -> "VIDEO_STOP"
3912+ TPTUTPUTVideoThirdQuartile -> "VIDEO_THIRD_QUARTILE"
3913+
19623914-- | Data type for the variable. This is a required field.
19633915data UserDefinedVariableConfigurationDataType
19643916 = UDVCDTNumber
@@ -1969,6 +3921,17 @@ data UserDefinedVariableConfigurationDataType
19693921
19703922instance Hashable UserDefinedVariableConfigurationDataType
19713923
3924+instance FromText UserDefinedVariableConfigurationDataType where
3925+ fromText = \case
3926+ "NUMBER" -> Just UDVCDTNumber
3927+ "STRING" -> Just UDVCDTString
3928+ _ -> Nothing
3929+
3930+instance ToText UserDefinedVariableConfigurationDataType where
3931+ toText = \case
3932+ UDVCDTNumber -> "NUMBER"
3933+ UDVCDTString -> "STRING"
3934+
19723935-- | Variable name in the tag. This is a required field.
19733936data UserDefinedVariableConfigurationVariableType
19743937 = UDVCVTU1
@@ -2015,6 +3978,53 @@ data UserDefinedVariableConfigurationVariableType
20153978
20163979instance Hashable UserDefinedVariableConfigurationVariableType
20173980
3981+instance FromText UserDefinedVariableConfigurationVariableType where
3982+ fromText = \case
3983+ "U1" -> Just UDVCVTU1
3984+ "U10" -> Just UDVCVTU10
3985+ "U11" -> Just UDVCVTU11
3986+ "U12" -> Just UDVCVTU12
3987+ "U13" -> Just UDVCVTU13
3988+ "U14" -> Just UDVCVTU14
3989+ "U15" -> Just UDVCVTU15
3990+ "U16" -> Just UDVCVTU16
3991+ "U17" -> Just UDVCVTU17
3992+ "U18" -> Just UDVCVTU18
3993+ "U19" -> Just UDVCVTU19
3994+ "U2" -> Just UDVCVTU2
3995+ "U20" -> Just UDVCVTU20
3996+ "U3" -> Just UDVCVTU3
3997+ "U4" -> Just UDVCVTU4
3998+ "U5" -> Just UDVCVTU5
3999+ "U6" -> Just UDVCVTU6
4000+ "U7" -> Just UDVCVTU7
4001+ "U8" -> Just UDVCVTU8
4002+ "U9" -> Just UDVCVTU9
4003+ _ -> Nothing
4004+
4005+instance ToText UserDefinedVariableConfigurationVariableType where
4006+ toText = \case
4007+ UDVCVTU1 -> "U1"
4008+ UDVCVTU10 -> "U10"
4009+ UDVCVTU11 -> "U11"
4010+ UDVCVTU12 -> "U12"
4011+ UDVCVTU13 -> "U13"
4012+ UDVCVTU14 -> "U14"
4013+ UDVCVTU15 -> "U15"
4014+ UDVCVTU16 -> "U16"
4015+ UDVCVTU17 -> "U17"
4016+ UDVCVTU18 -> "U18"
4017+ UDVCVTU19 -> "U19"
4018+ UDVCVTU2 -> "U2"
4019+ UDVCVTU20 -> "U20"
4020+ UDVCVTU3 -> "U3"
4021+ UDVCVTU4 -> "U4"
4022+ UDVCVTU5 -> "U5"
4023+ UDVCVTU6 -> "U6"
4024+ UDVCVTU7 -> "U7"
4025+ UDVCVTU8 -> "U8"
4026+ UDVCVTU9 -> "U9"
4027+
20184028-- | Levels of availability for a user role permission.
20194029data UserRolePermissionAvailability
20204030 = URPAAccountAlways
@@ -2030,3 +4040,20 @@ data UserRolePermissionAvailability
20304040 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
20314041
20324042instance Hashable UserRolePermissionAvailability
4043+
4044+instance FromText UserRolePermissionAvailability where
4045+ fromText = \case
4046+ "ACCOUNT_ALWAYS" -> Just URPAAccountAlways
4047+ "ACCOUNT_BY_DEFAULT" -> Just URPAAccountByDefault
4048+ "NOT_AVAILABLE_BY_DEFAULT" -> Just URPANotAvailableByDefault
4049+ "SUBACCOUNT_AND_ACCOUNT_ALWAYS" -> Just URPASubaccountAndAccountAlways
4050+ "SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT" -> Just URPASubaccountAndAccountByDefault
4051+ _ -> Nothing
4052+
4053+instance ToText UserRolePermissionAvailability where
4054+ toText = \case
4055+ URPAAccountAlways -> "ACCOUNT_ALWAYS"
4056+ URPAAccountByDefault -> "ACCOUNT_BY_DEFAULT"
4057+ URPANotAvailableByDefault -> "NOT_AVAILABLE_BY_DEFAULT"
4058+ URPASubaccountAndAccountAlways -> "SUBACCOUNT_AND_ACCOUNT_ALWAYS"
4059+ URPASubaccountAndAccountByDefault -> "SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT"
gogol-discovery/gen/Network/Google/Discovery/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Discovery.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Discovery.Types
1416 (
15− -- * API Definition
16− discovery
17−
1817
1918 -- * DirectoryList
20− , DirectoryList
19+ DirectoryList
2120 , directoryList
2221 , dlKind
2322 , dlItems
@@ -236,6 +235,3 @@ module Network.Google.Discovery.Types
236235import Network.Google.Discovery.Types.Product
237236import Network.Google.Discovery.Types.Sum
238237import Network.Google.Prelude
239−
240−discovery :: a
241−discovery = error "discovery"
gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Discovery.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-discovery/gen/Network/Google/Discovery/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Discovery.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-doubleclick-bids/gen/Network/Google/DoubleClickBidManager/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DoubleClickBidManager.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.DoubleClickBidManager.Types
1416 (
15− -- * API Definition
16− doubleclickbidmanager
17−
1817
1918 -- * DownloadLineItemsRequest
20− , DownloadLineItemsRequest
19+ DownloadLineItemsRequest
2120 , downloadLineItemsRequest
2221 , dlirFilterType
2322 , dlirFormat
@@ -206,6 +205,3 @@ module Network.Google.DoubleClickBidManager.Types
206205import Network.Google.DoubleClickBidManager.Types.Product
207206import Network.Google.DoubleClickBidManager.Types.Sum
208207import Network.Google.Prelude
209−
210−doubleclickbidmanager :: a
211−doubleclickbidmanager = error "doubleclickbidmanager"
gogol-doubleclick-bids/gen/Network/Google/DoubleClickBidManager/Types/Product.hs+11−9
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DoubleClickBidManager.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -22,7 +24,7 @@ data DownloadLineItemsRequest = DownloadLineItemsRequest
2224 { _dlirFilterType :: !(Maybe DownloadLineItemsRequestFilterType)
2325 , _dlirFormat :: !(Maybe DownloadLineItemsRequestFormat)
2426 , _dlirFilterIds :: !(Maybe [Int64])
25− }
27+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
2628
2729-- | Creates a value of 'DownloadLineItemsRequest' with the minimum fields required to make a request.
2830--
@@ -94,7 +96,7 @@ dlirLineItems
9496data FilterPair = FilterPair
9597 { _fpValue :: !(Maybe Text)
9698 , _fpType :: !(Maybe FilterPairType)
97− }
99+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
98100
99101-- | Creates a value of 'FilterPair' with the minimum fields required to make a request.
100102--
@@ -198,7 +200,7 @@ data Parameters = Parameters
198200 , _pFilters :: !(Maybe [Maybe FilterPair])
199201 , _pGroupBys :: !(Maybe [ParametersItemGroupBys])
200202 , _pType :: !(Maybe ParametersType)
201− }
203+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
202204
203205-- | Creates a value of 'Parameters' with the minimum fields required to make a request.
204206--
@@ -363,7 +365,7 @@ data QueryMetadata = QueryMetadata
363365 , _qmReportCount :: !(Maybe Int32)
364366 , _qmTitle :: !(Maybe Text)
365367 , _qmSendNotification :: !(Maybe Bool)
366− }
368+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
367369
368370-- | Creates a value of 'QueryMetadata' with the minimum fields required to make a request.
369371--
@@ -483,7 +485,7 @@ data QuerySchedule = QuerySchedule
483485 , _qsEndTimeMs :: !(Maybe Int64)
484486 , _qsNextRunMinuteOfDay :: !(Maybe Int32)
485487 , _qsNextRunTimezoneCode :: !(Maybe Text)
486− }
488+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
487489
488490-- | Creates a value of 'QuerySchedule' with the minimum fields required to make a request.
489491--
@@ -576,7 +578,7 @@ rMetadata
576578-- /See:/ 'reportFailure' smart constructor.
577579newtype ReportFailure = ReportFailure
578580 { _rfErrorCode :: Maybe ReportFailureErrorCode
579− }
581+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
580582
581583-- | Creates a value of 'ReportFailure' with the minimum fields required to make a request.
582584--
@@ -690,7 +692,7 @@ data ReportStatus = ReportStatus
690692 , _rsFinishTimeMs :: !(Maybe Int64)
691693 , _rsFormat :: !(Maybe ReportStatusFormat)
692694 , _rsFailure :: !(Maybe (Maybe ReportFailure))
693− }
695+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
694696
695697-- | Creates a value of 'ReportStatus' with the minimum fields required to make a request.
696698--
@@ -811,7 +813,7 @@ data RunQueryRequest = RunQueryRequest
811813 , _rqrDataRange :: !(Maybe RunQueryRequestDataRange)
812814 , _rqrReportDataStartTimeMs :: !(Maybe Int64)
813815 , _rqrTimezoneCode :: !(Maybe Text)
814− }
816+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
815817
816818-- | Creates a value of 'RunQueryRequest' with the minimum fields required to make a request.
817819--
@@ -869,7 +871,7 @@ data UploadLineItemsRequest = UploadLineItemsRequest
869871 { _ulirLineItems :: !(Maybe Text)
870872 , _ulirFormat :: !(Maybe UploadLineItemsRequestFormat)
871873 , _ulirDryRun :: !(Maybe Bool)
872− }
874+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
873875
874876-- | Creates a value of 'UploadLineItemsRequest' with the minimum fields required to make a request.
875877--
gogol-doubleclick-bids/gen/Network/Google/DoubleClickBidManager/Types/Sum.hs+1093
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.DoubleClickBidManager.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -26,6 +29,19 @@ data DownloadLineItemsRequestFilterType
2629
2730instance Hashable DownloadLineItemsRequestFilterType
2831
32+instance FromText DownloadLineItemsRequestFilterType where
33+ fromText = \case
34+ "ADVERTISER_ID" -> Just DLIRFTAdvertiserId
35+ "INSERTION_ORDER_ID" -> Just DLIRFTInsertionOrderId
36+ "LINE_ITEM_ID" -> Just DLIRFTLineItemId
37+ _ -> Nothing
38+
39+instance ToText DownloadLineItemsRequestFilterType where
40+ toText = \case
41+ DLIRFTAdvertiserId -> "ADVERTISER_ID"
42+ DLIRFTInsertionOrderId -> "INSERTION_ORDER_ID"
43+ DLIRFTLineItemId -> "LINE_ITEM_ID"
44+
2945-- | Format in which the line items will be returned. Default to CSV.
3046data DownloadLineItemsRequestFormat
3147 = DLIRFCSV
@@ -34,6 +50,15 @@ data DownloadLineItemsRequestFormat
3450
3551instance Hashable DownloadLineItemsRequestFormat
3652
53+instance FromText DownloadLineItemsRequestFormat where
54+ fromText = \case
55+ "CSV" -> Just DLIRFCSV
56+ _ -> Nothing
57+
58+instance ToText DownloadLineItemsRequestFormat where
59+ toText = \case
60+ DLIRFCSV -> "CSV"
61+
3762-- | Filter type.
3863data FilterPairType
3964 = FPTFilterActiveViewExpectedViewability
@@ -198,6 +223,171 @@ data FilterPairType
198223
199224instance Hashable FilterPairType
200225
226+instance FromText FilterPairType where
227+ fromText = \case
228+ "FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY" -> Just FPTFilterActiveViewExpectedViewability
229+ "FILTER_ACTIVITY_ID" -> Just FPTFilterActivityId
230+ "FILTER_ADVERTISER" -> Just FPTFilterAdvertiser
231+ "FILTER_ADVERTISER_CURRENCY" -> Just FPTFilterAdvertiserCurrency
232+ "FILTER_ADVERTISER_TIMEZONE" -> Just FPTFilterAdvertiserTimezone
233+ "FILTER_AD_POSITION" -> Just FPTFilterAdPosition
234+ "FILTER_AGE" -> Just FPTFilterAge
235+ "FILTER_BRANDSAFE_CHANNEL_ID" -> Just FPTFilterBrandsafeChannelId
236+ "FILTER_BROWSER" -> Just FPTFilterBrowser
237+ "FILTER_CAMPAIGN_DAILY_FREQUENCY" -> Just FPTFilterCampaignDailyFrequency
238+ "FILTER_CARRIER" -> Just FPTFilterCarrier
239+ "FILTER_CHANNEL_ID" -> Just FPTFilterChannelId
240+ "FILTER_CITY" -> Just FPTFilterCity
241+ "FILTER_CONVERSION_DELAY" -> Just FPTFilterConversionDelay
242+ "FILTER_COUNTRY" -> Just FPTFilterCountry
243+ "FILTER_CREATIVE_ID" -> Just FPTFilterCreativeId
244+ "FILTER_CREATIVE_SIZE" -> Just FPTFilterCreativeSize
245+ "FILTER_CREATIVE_TYPE" -> Just FPTFilterCreativeType
246+ "FILTER_DATA_PROVIDER" -> Just FPTFilterDataProvider
247+ "FILTER_DATE" -> Just FPTFilterDate
248+ "FILTER_DAY_OF_WEEK" -> Just FPTFilterDayOfWeek
249+ "FILTER_DMA" -> Just FPTFilterDma
250+ "FILTER_EXCHANGE_ID" -> Just FPTFilterExchangeId
251+ "FILTER_FLOODLIGHT_PIXEL_ID" -> Just FPTFilterFloodlightPixelId
252+ "FILTER_GENDER" -> Just FPTFilterGender
253+ "FILTER_INSERTION_ORDER" -> Just FPTFilterInsertionOrder
254+ "FILTER_INVENTORY_FORMAT" -> Just FPTFilterInventoryFormat
255+ "FILTER_INVENTORY_SOURCE" -> Just FPTFilterInventorySource
256+ "FILTER_INVENTORY_SOURCE_TYPE" -> Just FPTFilterInventorySourceType
257+ "FILTER_KEYWORD" -> Just FPTFilterKeyword
258+ "FILTER_LINE_ITEM" -> Just FPTFilterLineItem
259+ "FILTER_LINE_ITEM_DAILY_FREQUENCY" -> Just FPTFilterLineItemDailyFrequency
260+ "FILTER_LINE_ITEM_LIFETIME_FREQUENCY" -> Just FPTFilterLineItemLifetimeFrequency
261+ "FILTER_LINE_ITEM_TYPE" -> Just FPTFilterLineItemType
262+ "FILTER_MOBILE_DEVICE_MAKE" -> Just FPTFilterMobileDeviceMake
263+ "FILTER_MOBILE_DEVICE_MAKE_MODEL" -> Just FPTFilterMobileDeviceMakeModel
264+ "FILTER_MOBILE_DEVICE_TYPE" -> Just FPTFilterMobileDeviceType
265+ "FILTER_MOBILE_GEO" -> Just FPTFilterMobileGeo
266+ "FILTER_MONTH" -> Just FPTFilterMonth
267+ "FILTER_MRAID_SUPPORT" -> Just FPTFilterMraidSupport
268+ "FILTER_NIELSEN_AGE" -> Just FPTFilterNielsenAge
269+ "FILTER_NIELSEN_COUNTRY_CODE" -> Just FPTFilterNielsenCountryCode
270+ "FILTER_NIELSEN_DEVICE_ID" -> Just FPTFilterNielsenDeviceId
271+ "FILTER_NIELSEN_GENDER" -> Just FPTFilterNielsenGender
272+ "FILTER_ORDER_ID" -> Just FPTFilterOrderId
273+ "FILTER_OS" -> Just FPTFilterOs
274+ "FILTER_PAGE_CATEGORY" -> Just FPTFilterPageCategory
275+ "FILTER_PAGE_LAYOUT" -> Just FPTFilterPageLayout
276+ "FILTER_PARTNER" -> Just FPTFilterPartner
277+ "FILTER_PARTNER_CURRENCY" -> Just FPTFilterPartnerCurrency
278+ "FILTER_PUBLIC_INVENTORY" -> Just FPTFilterPublicInventory
279+ "FILTER_QUARTER" -> Just FPTFilterQuarter
280+ "FILTER_REGION" -> Just FPTFilterRegion
281+ "FILTER_REGULAR_CHANNEL_ID" -> Just FPTFilterRegularChannelId
282+ "FILTER_SITE_ID" -> Just FPTFilterSiteId
283+ "FILTER_SITE_LANGUAGE" -> Just FPTFilterSiteLanguage
284+ "FILTER_TARGETED_USER_LIST" -> Just FPTFilterTargetedUserList
285+ "FILTER_TIME_OF_DAY" -> Just FPTFilterTimeOfDay
286+ "FILTER_TRUEVIEW_CONVERSION_TYPE" -> Just FPTFilterTrueviewConversionType
287+ "FILTER_UNKNOWN" -> Just FPTFilterUnknown
288+ "FILTER_USER_LIST" -> Just FPTFilterUserList
289+ "FILTER_USER_LIST_FIRST_PARTY" -> Just FPTFilterUserListFirstParty
290+ "FILTER_USER_LIST_THIRD_PARTY" -> Just FPTFilterUserListThirdParty
291+ "FILTER_VIDEO_AD_POSITION_IN_STREAM" -> Just FPTFilterVideoAdPositionInStream
292+ "FILTER_VIDEO_COMPANION_SIZE" -> Just FPTFilterVideoCompanionSize
293+ "FILTER_VIDEO_COMPANION_TYPE" -> Just FPTFilterVideoCompanionType
294+ "FILTER_VIDEO_CREATIVE_DURATION" -> Just FPTFilterVideoCreativeDuration
295+ "FILTER_VIDEO_CREATIVE_DURATION_SKIPPABLE" -> Just FPTFilterVideoCreativeDurationSkippable
296+ "FILTER_VIDEO_DURATION_SECONDS" -> Just FPTFilterVideoDurationSeconds
297+ "FILTER_VIDEO_FORMAT_SUPPORT" -> Just FPTFilterVideoFormatSupport
298+ "FILTER_VIDEO_INVENTORY_TYPE" -> Just FPTFilterVideoInventoryType
299+ "FILTER_VIDEO_PLAYER_SIZE" -> Just FPTFilterVideoPlayerSize
300+ "FILTER_VIDEO_RATING_TIER" -> Just FPTFilterVideoRatingTier
301+ "FILTER_VIDEO_SKIPPABLE_SUPPORT" -> Just FPTFilterVideoSkippableSupport
302+ "FILTER_VIDEO_VPAID_SUPPORT" -> Just FPTFilterVideoVpaidSupport
303+ "FILTER_WEEK" -> Just FPTFilterWeek
304+ "FILTER_YEAR" -> Just FPTFilterYear
305+ "FILTER_YOUTUBE_VERTICAL" -> Just FPTFilterYoutubeVertical
306+ "FILTER_ZIP_CODE" -> Just FPTFilterZipCode
307+ _ -> Nothing
308+
309+instance ToText FilterPairType where
310+ toText = \case
311+ FPTFilterActiveViewExpectedViewability -> "FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY"
312+ FPTFilterActivityId -> "FILTER_ACTIVITY_ID"
313+ FPTFilterAdvertiser -> "FILTER_ADVERTISER"
314+ FPTFilterAdvertiserCurrency -> "FILTER_ADVERTISER_CURRENCY"
315+ FPTFilterAdvertiserTimezone -> "FILTER_ADVERTISER_TIMEZONE"
316+ FPTFilterAdPosition -> "FILTER_AD_POSITION"
317+ FPTFilterAge -> "FILTER_AGE"
318+ FPTFilterBrandsafeChannelId -> "FILTER_BRANDSAFE_CHANNEL_ID"
319+ FPTFilterBrowser -> "FILTER_BROWSER"
320+ FPTFilterCampaignDailyFrequency -> "FILTER_CAMPAIGN_DAILY_FREQUENCY"
321+ FPTFilterCarrier -> "FILTER_CARRIER"
322+ FPTFilterChannelId -> "FILTER_CHANNEL_ID"
323+ FPTFilterCity -> "FILTER_CITY"
324+ FPTFilterConversionDelay -> "FILTER_CONVERSION_DELAY"
325+ FPTFilterCountry -> "FILTER_COUNTRY"
326+ FPTFilterCreativeId -> "FILTER_CREATIVE_ID"
327+ FPTFilterCreativeSize -> "FILTER_CREATIVE_SIZE"
328+ FPTFilterCreativeType -> "FILTER_CREATIVE_TYPE"
329+ FPTFilterDataProvider -> "FILTER_DATA_PROVIDER"
330+ FPTFilterDate -> "FILTER_DATE"
331+ FPTFilterDayOfWeek -> "FILTER_DAY_OF_WEEK"
332+ FPTFilterDma -> "FILTER_DMA"
333+ FPTFilterExchangeId -> "FILTER_EXCHANGE_ID"
334+ FPTFilterFloodlightPixelId -> "FILTER_FLOODLIGHT_PIXEL_ID"
335+ FPTFilterGender -> "FILTER_GENDER"
336+ FPTFilterInsertionOrder -> "FILTER_INSERTION_ORDER"
337+ FPTFilterInventoryFormat -> "FILTER_INVENTORY_FORMAT"
338+ FPTFilterInventorySource -> "FILTER_INVENTORY_SOURCE"
339+ FPTFilterInventorySourceType -> "FILTER_INVENTORY_SOURCE_TYPE"
340+ FPTFilterKeyword -> "FILTER_KEYWORD"
341+ FPTFilterLineItem -> "FILTER_LINE_ITEM"
342+ FPTFilterLineItemDailyFrequency -> "FILTER_LINE_ITEM_DAILY_FREQUENCY"
343+ FPTFilterLineItemLifetimeFrequency -> "FILTER_LINE_ITEM_LIFETIME_FREQUENCY"
344+ FPTFilterLineItemType -> "FILTER_LINE_ITEM_TYPE"
345+ FPTFilterMobileDeviceMake -> "FILTER_MOBILE_DEVICE_MAKE"
346+ FPTFilterMobileDeviceMakeModel -> "FILTER_MOBILE_DEVICE_MAKE_MODEL"
347+ FPTFilterMobileDeviceType -> "FILTER_MOBILE_DEVICE_TYPE"
348+ FPTFilterMobileGeo -> "FILTER_MOBILE_GEO"
349+ FPTFilterMonth -> "FILTER_MONTH"
350+ FPTFilterMraidSupport -> "FILTER_MRAID_SUPPORT"
351+ FPTFilterNielsenAge -> "FILTER_NIELSEN_AGE"
352+ FPTFilterNielsenCountryCode -> "FILTER_NIELSEN_COUNTRY_CODE"
353+ FPTFilterNielsenDeviceId -> "FILTER_NIELSEN_DEVICE_ID"
354+ FPTFilterNielsenGender -> "FILTER_NIELSEN_GENDER"
355+ FPTFilterOrderId -> "FILTER_ORDER_ID"
356+ FPTFilterOs -> "FILTER_OS"
357+ FPTFilterPageCategory -> "FILTER_PAGE_CATEGORY"
358+ FPTFilterPageLayout -> "FILTER_PAGE_LAYOUT"
359+ FPTFilterPartner -> "FILTER_PARTNER"
360+ FPTFilterPartnerCurrency -> "FILTER_PARTNER_CURRENCY"
361+ FPTFilterPublicInventory -> "FILTER_PUBLIC_INVENTORY"
362+ FPTFilterQuarter -> "FILTER_QUARTER"
363+ FPTFilterRegion -> "FILTER_REGION"
364+ FPTFilterRegularChannelId -> "FILTER_REGULAR_CHANNEL_ID"
365+ FPTFilterSiteId -> "FILTER_SITE_ID"
366+ FPTFilterSiteLanguage -> "FILTER_SITE_LANGUAGE"
367+ FPTFilterTargetedUserList -> "FILTER_TARGETED_USER_LIST"
368+ FPTFilterTimeOfDay -> "FILTER_TIME_OF_DAY"
369+ FPTFilterTrueviewConversionType -> "FILTER_TRUEVIEW_CONVERSION_TYPE"
370+ FPTFilterUnknown -> "FILTER_UNKNOWN"
371+ FPTFilterUserList -> "FILTER_USER_LIST"
372+ FPTFilterUserListFirstParty -> "FILTER_USER_LIST_FIRST_PARTY"
373+ FPTFilterUserListThirdParty -> "FILTER_USER_LIST_THIRD_PARTY"
374+ FPTFilterVideoAdPositionInStream -> "FILTER_VIDEO_AD_POSITION_IN_STREAM"
375+ FPTFilterVideoCompanionSize -> "FILTER_VIDEO_COMPANION_SIZE"
376+ FPTFilterVideoCompanionType -> "FILTER_VIDEO_COMPANION_TYPE"
377+ FPTFilterVideoCreativeDuration -> "FILTER_VIDEO_CREATIVE_DURATION"
378+ FPTFilterVideoCreativeDurationSkippable -> "FILTER_VIDEO_CREATIVE_DURATION_SKIPPABLE"
379+ FPTFilterVideoDurationSeconds -> "FILTER_VIDEO_DURATION_SECONDS"
380+ FPTFilterVideoFormatSupport -> "FILTER_VIDEO_FORMAT_SUPPORT"
381+ FPTFilterVideoInventoryType -> "FILTER_VIDEO_INVENTORY_TYPE"
382+ FPTFilterVideoPlayerSize -> "FILTER_VIDEO_PLAYER_SIZE"
383+ FPTFilterVideoRatingTier -> "FILTER_VIDEO_RATING_TIER"
384+ FPTFilterVideoSkippableSupport -> "FILTER_VIDEO_SKIPPABLE_SUPPORT"
385+ FPTFilterVideoVpaidSupport -> "FILTER_VIDEO_VPAID_SUPPORT"
386+ FPTFilterWeek -> "FILTER_WEEK"
387+ FPTFilterYear -> "FILTER_YEAR"
388+ FPTFilterYoutubeVertical -> "FILTER_YOUTUBE_VERTICAL"
389+ FPTFilterZipCode -> "FILTER_ZIP_CODE"
390+
201391data ParametersItemGroupBys
202392 = PIGBFilterActiveViewExpectedViewability
203393 -- ^ @FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY@
@@ -361,6 +551,171 @@ data ParametersItemGroupBys
361551
362552instance Hashable ParametersItemGroupBys
363553
554+instance FromText ParametersItemGroupBys where
555+ fromText = \case
556+ "FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY" -> Just PIGBFilterActiveViewExpectedViewability
557+ "FILTER_ACTIVITY_ID" -> Just PIGBFilterActivityId
558+ "FILTER_ADVERTISER" -> Just PIGBFilterAdvertiser
559+ "FILTER_ADVERTISER_CURRENCY" -> Just PIGBFilterAdvertiserCurrency
560+ "FILTER_ADVERTISER_TIMEZONE" -> Just PIGBFilterAdvertiserTimezone
561+ "FILTER_AD_POSITION" -> Just PIGBFilterAdPosition
562+ "FILTER_AGE" -> Just PIGBFilterAge
563+ "FILTER_BRANDSAFE_CHANNEL_ID" -> Just PIGBFilterBrandsafeChannelId
564+ "FILTER_BROWSER" -> Just PIGBFilterBrowser
565+ "FILTER_CAMPAIGN_DAILY_FREQUENCY" -> Just PIGBFilterCampaignDailyFrequency
566+ "FILTER_CARRIER" -> Just PIGBFilterCarrier
567+ "FILTER_CHANNEL_ID" -> Just PIGBFilterChannelId
568+ "FILTER_CITY" -> Just PIGBFilterCity
569+ "FILTER_CONVERSION_DELAY" -> Just PIGBFilterConversionDelay
570+ "FILTER_COUNTRY" -> Just PIGBFilterCountry
571+ "FILTER_CREATIVE_ID" -> Just PIGBFilterCreativeId
572+ "FILTER_CREATIVE_SIZE" -> Just PIGBFilterCreativeSize
573+ "FILTER_CREATIVE_TYPE" -> Just PIGBFilterCreativeType
574+ "FILTER_DATA_PROVIDER" -> Just PIGBFilterDataProvider
575+ "FILTER_DATE" -> Just PIGBFilterDate
576+ "FILTER_DAY_OF_WEEK" -> Just PIGBFilterDayOfWeek
577+ "FILTER_DMA" -> Just PIGBFilterDma
578+ "FILTER_EXCHANGE_ID" -> Just PIGBFilterExchangeId
579+ "FILTER_FLOODLIGHT_PIXEL_ID" -> Just PIGBFilterFloodlightPixelId
580+ "FILTER_GENDER" -> Just PIGBFilterGender
581+ "FILTER_INSERTION_ORDER" -> Just PIGBFilterInsertionOrder
582+ "FILTER_INVENTORY_FORMAT" -> Just PIGBFilterInventoryFormat
583+ "FILTER_INVENTORY_SOURCE" -> Just PIGBFilterInventorySource
584+ "FILTER_INVENTORY_SOURCE_TYPE" -> Just PIGBFilterInventorySourceType
585+ "FILTER_KEYWORD" -> Just PIGBFilterKeyword
586+ "FILTER_LINE_ITEM" -> Just PIGBFilterLineItem
587+ "FILTER_LINE_ITEM_DAILY_FREQUENCY" -> Just PIGBFilterLineItemDailyFrequency
588+ "FILTER_LINE_ITEM_LIFETIME_FREQUENCY" -> Just PIGBFilterLineItemLifetimeFrequency
589+ "FILTER_LINE_ITEM_TYPE" -> Just PIGBFilterLineItemType
590+ "FILTER_MOBILE_DEVICE_MAKE" -> Just PIGBFilterMobileDeviceMake
591+ "FILTER_MOBILE_DEVICE_MAKE_MODEL" -> Just PIGBFilterMobileDeviceMakeModel
592+ "FILTER_MOBILE_DEVICE_TYPE" -> Just PIGBFilterMobileDeviceType
593+ "FILTER_MOBILE_GEO" -> Just PIGBFilterMobileGeo
594+ "FILTER_MONTH" -> Just PIGBFilterMonth
595+ "FILTER_MRAID_SUPPORT" -> Just PIGBFilterMraidSupport
596+ "FILTER_NIELSEN_AGE" -> Just PIGBFilterNielsenAge
597+ "FILTER_NIELSEN_COUNTRY_CODE" -> Just PIGBFilterNielsenCountryCode
598+ "FILTER_NIELSEN_DEVICE_ID" -> Just PIGBFilterNielsenDeviceId
599+ "FILTER_NIELSEN_GENDER" -> Just PIGBFilterNielsenGender
600+ "FILTER_ORDER_ID" -> Just PIGBFilterOrderId
601+ "FILTER_OS" -> Just PIGBFilterOs
602+ "FILTER_PAGE_CATEGORY" -> Just PIGBFilterPageCategory
603+ "FILTER_PAGE_LAYOUT" -> Just PIGBFilterPageLayout
604+ "FILTER_PARTNER" -> Just PIGBFilterPartner
605+ "FILTER_PARTNER_CURRENCY" -> Just PIGBFilterPartnerCurrency
606+ "FILTER_PUBLIC_INVENTORY" -> Just PIGBFilterPublicInventory
607+ "FILTER_QUARTER" -> Just PIGBFilterQuarter
608+ "FILTER_REGION" -> Just PIGBFilterRegion
609+ "FILTER_REGULAR_CHANNEL_ID" -> Just PIGBFilterRegularChannelId
610+ "FILTER_SITE_ID" -> Just PIGBFilterSiteId
611+ "FILTER_SITE_LANGUAGE" -> Just PIGBFilterSiteLanguage
612+ "FILTER_TARGETED_USER_LIST" -> Just PIGBFilterTargetedUserList
613+ "FILTER_TIME_OF_DAY" -> Just PIGBFilterTimeOfDay
614+ "FILTER_TRUEVIEW_CONVERSION_TYPE" -> Just PIGBFilterTrueviewConversionType
615+ "FILTER_UNKNOWN" -> Just PIGBFilterUnknown
616+ "FILTER_USER_LIST" -> Just PIGBFilterUserList
617+ "FILTER_USER_LIST_FIRST_PARTY" -> Just PIGBFilterUserListFirstParty
618+ "FILTER_USER_LIST_THIRD_PARTY" -> Just PIGBFilterUserListThirdParty
619+ "FILTER_VIDEO_AD_POSITION_IN_STREAM" -> Just PIGBFilterVideoAdPositionInStream
620+ "FILTER_VIDEO_COMPANION_SIZE" -> Just PIGBFilterVideoCompanionSize
621+ "FILTER_VIDEO_COMPANION_TYPE" -> Just PIGBFilterVideoCompanionType
622+ "FILTER_VIDEO_CREATIVE_DURATION" -> Just PIGBFilterVideoCreativeDuration
623+ "FILTER_VIDEO_CREATIVE_DURATION_SKIPPABLE" -> Just PIGBFilterVideoCreativeDurationSkippable
624+ "FILTER_VIDEO_DURATION_SECONDS" -> Just PIGBFilterVideoDurationSeconds
625+ "FILTER_VIDEO_FORMAT_SUPPORT" -> Just PIGBFilterVideoFormatSupport
626+ "FILTER_VIDEO_INVENTORY_TYPE" -> Just PIGBFilterVideoInventoryType
627+ "FILTER_VIDEO_PLAYER_SIZE" -> Just PIGBFilterVideoPlayerSize
628+ "FILTER_VIDEO_RATING_TIER" -> Just PIGBFilterVideoRatingTier
629+ "FILTER_VIDEO_SKIPPABLE_SUPPORT" -> Just PIGBFilterVideoSkippableSupport
630+ "FILTER_VIDEO_VPAID_SUPPORT" -> Just PIGBFilterVideoVpaidSupport
631+ "FILTER_WEEK" -> Just PIGBFilterWeek
632+ "FILTER_YEAR" -> Just PIGBFilterYear
633+ "FILTER_YOUTUBE_VERTICAL" -> Just PIGBFilterYoutubeVertical
634+ "FILTER_ZIP_CODE" -> Just PIGBFilterZipCode
635+ _ -> Nothing
636+
637+instance ToText ParametersItemGroupBys where
638+ toText = \case
639+ PIGBFilterActiveViewExpectedViewability -> "FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY"
640+ PIGBFilterActivityId -> "FILTER_ACTIVITY_ID"
641+ PIGBFilterAdvertiser -> "FILTER_ADVERTISER"
642+ PIGBFilterAdvertiserCurrency -> "FILTER_ADVERTISER_CURRENCY"
643+ PIGBFilterAdvertiserTimezone -> "FILTER_ADVERTISER_TIMEZONE"
644+ PIGBFilterAdPosition -> "FILTER_AD_POSITION"
645+ PIGBFilterAge -> "FILTER_AGE"
646+ PIGBFilterBrandsafeChannelId -> "FILTER_BRANDSAFE_CHANNEL_ID"
647+ PIGBFilterBrowser -> "FILTER_BROWSER"
648+ PIGBFilterCampaignDailyFrequency -> "FILTER_CAMPAIGN_DAILY_FREQUENCY"
649+ PIGBFilterCarrier -> "FILTER_CARRIER"
650+ PIGBFilterChannelId -> "FILTER_CHANNEL_ID"
651+ PIGBFilterCity -> "FILTER_CITY"
652+ PIGBFilterConversionDelay -> "FILTER_CONVERSION_DELAY"
653+ PIGBFilterCountry -> "FILTER_COUNTRY"
654+ PIGBFilterCreativeId -> "FILTER_CREATIVE_ID"
655+ PIGBFilterCreativeSize -> "FILTER_CREATIVE_SIZE"
656+ PIGBFilterCreativeType -> "FILTER_CREATIVE_TYPE"
657+ PIGBFilterDataProvider -> "FILTER_DATA_PROVIDER"
658+ PIGBFilterDate -> "FILTER_DATE"
659+ PIGBFilterDayOfWeek -> "FILTER_DAY_OF_WEEK"
660+ PIGBFilterDma -> "FILTER_DMA"
661+ PIGBFilterExchangeId -> "FILTER_EXCHANGE_ID"
662+ PIGBFilterFloodlightPixelId -> "FILTER_FLOODLIGHT_PIXEL_ID"
663+ PIGBFilterGender -> "FILTER_GENDER"
664+ PIGBFilterInsertionOrder -> "FILTER_INSERTION_ORDER"
665+ PIGBFilterInventoryFormat -> "FILTER_INVENTORY_FORMAT"
666+ PIGBFilterInventorySource -> "FILTER_INVENTORY_SOURCE"
667+ PIGBFilterInventorySourceType -> "FILTER_INVENTORY_SOURCE_TYPE"
668+ PIGBFilterKeyword -> "FILTER_KEYWORD"
669+ PIGBFilterLineItem -> "FILTER_LINE_ITEM"
670+ PIGBFilterLineItemDailyFrequency -> "FILTER_LINE_ITEM_DAILY_FREQUENCY"
671+ PIGBFilterLineItemLifetimeFrequency -> "FILTER_LINE_ITEM_LIFETIME_FREQUENCY"
672+ PIGBFilterLineItemType -> "FILTER_LINE_ITEM_TYPE"
673+ PIGBFilterMobileDeviceMake -> "FILTER_MOBILE_DEVICE_MAKE"
674+ PIGBFilterMobileDeviceMakeModel -> "FILTER_MOBILE_DEVICE_MAKE_MODEL"
675+ PIGBFilterMobileDeviceType -> "FILTER_MOBILE_DEVICE_TYPE"
676+ PIGBFilterMobileGeo -> "FILTER_MOBILE_GEO"
677+ PIGBFilterMonth -> "FILTER_MONTH"
678+ PIGBFilterMraidSupport -> "FILTER_MRAID_SUPPORT"
679+ PIGBFilterNielsenAge -> "FILTER_NIELSEN_AGE"
680+ PIGBFilterNielsenCountryCode -> "FILTER_NIELSEN_COUNTRY_CODE"
681+ PIGBFilterNielsenDeviceId -> "FILTER_NIELSEN_DEVICE_ID"
682+ PIGBFilterNielsenGender -> "FILTER_NIELSEN_GENDER"
683+ PIGBFilterOrderId -> "FILTER_ORDER_ID"
684+ PIGBFilterOs -> "FILTER_OS"
685+ PIGBFilterPageCategory -> "FILTER_PAGE_CATEGORY"
686+ PIGBFilterPageLayout -> "FILTER_PAGE_LAYOUT"
687+ PIGBFilterPartner -> "FILTER_PARTNER"
688+ PIGBFilterPartnerCurrency -> "FILTER_PARTNER_CURRENCY"
689+ PIGBFilterPublicInventory -> "FILTER_PUBLIC_INVENTORY"
690+ PIGBFilterQuarter -> "FILTER_QUARTER"
691+ PIGBFilterRegion -> "FILTER_REGION"
692+ PIGBFilterRegularChannelId -> "FILTER_REGULAR_CHANNEL_ID"
693+ PIGBFilterSiteId -> "FILTER_SITE_ID"
694+ PIGBFilterSiteLanguage -> "FILTER_SITE_LANGUAGE"
695+ PIGBFilterTargetedUserList -> "FILTER_TARGETED_USER_LIST"
696+ PIGBFilterTimeOfDay -> "FILTER_TIME_OF_DAY"
697+ PIGBFilterTrueviewConversionType -> "FILTER_TRUEVIEW_CONVERSION_TYPE"
698+ PIGBFilterUnknown -> "FILTER_UNKNOWN"
699+ PIGBFilterUserList -> "FILTER_USER_LIST"
700+ PIGBFilterUserListFirstParty -> "FILTER_USER_LIST_FIRST_PARTY"
701+ PIGBFilterUserListThirdParty -> "FILTER_USER_LIST_THIRD_PARTY"
702+ PIGBFilterVideoAdPositionInStream -> "FILTER_VIDEO_AD_POSITION_IN_STREAM"
703+ PIGBFilterVideoCompanionSize -> "FILTER_VIDEO_COMPANION_SIZE"
704+ PIGBFilterVideoCompanionType -> "FILTER_VIDEO_COMPANION_TYPE"
705+ PIGBFilterVideoCreativeDuration -> "FILTER_VIDEO_CREATIVE_DURATION"
706+ PIGBFilterVideoCreativeDurationSkippable -> "FILTER_VIDEO_CREATIVE_DURATION_SKIPPABLE"
707+ PIGBFilterVideoDurationSeconds -> "FILTER_VIDEO_DURATION_SECONDS"
708+ PIGBFilterVideoFormatSupport -> "FILTER_VIDEO_FORMAT_SUPPORT"
709+ PIGBFilterVideoInventoryType -> "FILTER_VIDEO_INVENTORY_TYPE"
710+ PIGBFilterVideoPlayerSize -> "FILTER_VIDEO_PLAYER_SIZE"
711+ PIGBFilterVideoRatingTier -> "FILTER_VIDEO_RATING_TIER"
712+ PIGBFilterVideoSkippableSupport -> "FILTER_VIDEO_SKIPPABLE_SUPPORT"
713+ PIGBFilterVideoVpaidSupport -> "FILTER_VIDEO_VPAID_SUPPORT"
714+ PIGBFilterWeek -> "FILTER_WEEK"
715+ PIGBFilterYear -> "FILTER_YEAR"
716+ PIGBFilterYoutubeVertical -> "FILTER_YOUTUBE_VERTICAL"
717+ PIGBFilterZipCode -> "FILTER_ZIP_CODE"
718+
364719data ParametersItemMetrics
365720 = PIMMetricBidRequests
366721 -- ^ @METRIC_BID_REQUESTS@
@@ -844,6 +1199,491 @@ data ParametersItemMetrics
8441199
8451200instance Hashable ParametersItemMetrics
8461201
1202+instance FromText ParametersItemMetrics where
1203+ fromText = \case
1204+ "METRIC_BID_REQUESTS" -> Just PIMMetricBidRequests
1205+ "METRIC_BILLABLE_COST_ADVERTISER" -> Just PIMMetricBillableCostAdvertiser
1206+ "METRIC_BILLABLE_COST_PARTNER" -> Just PIMMetricBillableCostPartner
1207+ "METRIC_BILLABLE_COST_USD" -> Just PIMMetricBillableCostUsd
1208+ "METRIC_CLICKS" -> Just PIMMetricClicks
1209+ "METRIC_CLICK_TO_POST_CLICK_CONVERSION_RATE" -> Just PIMMetricClickToPostClickConversionRate
1210+ "METRIC_COMSCORE_VCE_AUDIENCE_AVG_FREQUENCY" -> Just PIMMetricComscoreVceAudienceAvgFrequency
1211+ "METRIC_COMSCORE_VCE_AUDIENCE_IMPRESSIONS" -> Just PIMMetricComscoreVceAudienceImpressions
1212+ "METRIC_COMSCORE_VCE_AUDIENCE_IMPRESSIONS_SHARE" -> Just PIMMetricComscoreVceAudienceImpressionsShare
1213+ "METRIC_COMSCORE_VCE_AUDIENCE_REACH_PCT" -> Just PIMMetricComscoreVceAudienceReachPct
1214+ "METRIC_COMSCORE_VCE_AUDIENCE_SHARE_PCT" -> Just PIMMetricComscoreVceAudienceSharePct
1215+ "METRIC_COMSCORE_VCE_GROSS_RATING_POINTS" -> Just PIMMetricComscoreVceGrossRatingPoints
1216+ "METRIC_COMSCORE_VCE_POPULATION" -> Just PIMMetricComscoreVcePopulation
1217+ "METRIC_COMSCORE_VCE_UNIQUE_AUDIENCE" -> Just PIMMetricComscoreVceUniqueAudience
1218+ "METRIC_CONVERSIONS_PER_MILLE" -> Just PIMMetricConversionsPerMille
1219+ "METRIC_CPM_FEE1_ADVERTISER" -> Just PIMMetricCpmFEE1Advertiser
1220+ "METRIC_CPM_FEE1_PARTNER" -> Just PIMMetricCpmFEE1Partner
1221+ "METRIC_CPM_FEE1_USD" -> Just PIMMetricCpmFEE1Usd
1222+ "METRIC_CPM_FEE2_ADVERTISER" -> Just PIMMetricCpmFEE2Advertiser
1223+ "METRIC_CPM_FEE2_PARTNER" -> Just PIMMetricCpmFEE2Partner
1224+ "METRIC_CPM_FEE2_USD" -> Just PIMMetricCpmFEE2Usd
1225+ "METRIC_CPM_FEE3_ADVERTISER" -> Just PIMMetricCpmFEE3Advertiser
1226+ "METRIC_CPM_FEE3_PARTNER" -> Just PIMMetricCpmFEE3Partner
1227+ "METRIC_CPM_FEE3_USD" -> Just PIMMetricCpmFEE3Usd
1228+ "METRIC_CPM_FEE4_ADVERTISER" -> Just PIMMetricCpmFEE4Advertiser
1229+ "METRIC_CPM_FEE4_PARTNER" -> Just PIMMetricCpmFEE4Partner
1230+ "METRIC_CPM_FEE4_USD" -> Just PIMMetricCpmFEE4Usd
1231+ "METRIC_CPM_FEE5_ADVERTISER" -> Just PIMMetricCpmFEE5Advertiser
1232+ "METRIC_CPM_FEE5_PARTNER" -> Just PIMMetricCpmFEE5Partner
1233+ "METRIC_CPM_FEE5_USD" -> Just PIMMetricCpmFEE5Usd
1234+ "METRIC_CTR" -> Just PIMMetricCtr
1235+ "METRIC_DATA_COST_ADVERTISER" -> Just PIMMetricDataCostAdvertiser
1236+ "METRIC_DATA_COST_PARTNER" -> Just PIMMetricDataCostPartner
1237+ "METRIC_DATA_COST_USD" -> Just PIMMetricDataCostUsd
1238+ "METRIC_FEE10_ADVERTISER" -> Just PIMMetricFEE10Advertiser
1239+ "METRIC_FEE10_PARTNER" -> Just PIMMetricFEE10Partner
1240+ "METRIC_FEE10_USD" -> Just PIMMetricFEE10Usd
1241+ "METRIC_FEE11_ADVERTISER" -> Just PIMMetricFEE11Advertiser
1242+ "METRIC_FEE11_PARTNER" -> Just PIMMetricFEE11Partner
1243+ "METRIC_FEE11_USD" -> Just PIMMetricFEE11Usd
1244+ "METRIC_FEE12_ADVERTISER" -> Just PIMMetricFEE12Advertiser
1245+ "METRIC_FEE12_PARTNER" -> Just PIMMetricFEE12Partner
1246+ "METRIC_FEE12_USD" -> Just PIMMetricFEE12Usd
1247+ "METRIC_FEE13_ADVERTISER" -> Just PIMMetricFEE13Advertiser
1248+ "METRIC_FEE13_PARTNER" -> Just PIMMetricFEE13Partner
1249+ "METRIC_FEE13_USD" -> Just PIMMetricFEE13Usd
1250+ "METRIC_FEE14_ADVERTISER" -> Just PIMMetricFEE14Advertiser
1251+ "METRIC_FEE14_PARTNER" -> Just PIMMetricFEE14Partner
1252+ "METRIC_FEE14_USD" -> Just PIMMetricFEE14Usd
1253+ "METRIC_FEE15_ADVERTISER" -> Just PIMMetricFEE15Advertiser
1254+ "METRIC_FEE15_PARTNER" -> Just PIMMetricFEE15Partner
1255+ "METRIC_FEE15_USD" -> Just PIMMetricFEE15Usd
1256+ "METRIC_FEE16_ADVERTISER" -> Just PIMMetricFEE16Advertiser
1257+ "METRIC_FEE16_PARTNER" -> Just PIMMetricFEE16Partner
1258+ "METRIC_FEE16_USD" -> Just PIMMetricFEE16Usd
1259+ "METRIC_FEE17_ADVERTISER" -> Just PIMMetricFEE17Advertiser
1260+ "METRIC_FEE17_PARTNER" -> Just PIMMetricFEE17Partner
1261+ "METRIC_FEE17_USD" -> Just PIMMetricFEE17Usd
1262+ "METRIC_FEE18_ADVERTISER" -> Just PIMMetricFEE18Advertiser
1263+ "METRIC_FEE18_PARTNER" -> Just PIMMetricFEE18Partner
1264+ "METRIC_FEE18_USD" -> Just PIMMetricFEE18Usd
1265+ "METRIC_FEE19_ADVERTISER" -> Just PIMMetricFEE19Advertiser
1266+ "METRIC_FEE19_PARTNER" -> Just PIMMetricFEE19Partner
1267+ "METRIC_FEE19_USD" -> Just PIMMetricFEE19Usd
1268+ "METRIC_FEE20_ADVERTISER" -> Just PIMMetricFEE20Advertiser
1269+ "METRIC_FEE20_PARTNER" -> Just PIMMetricFEE20Partner
1270+ "METRIC_FEE20_USD" -> Just PIMMetricFEE20Usd
1271+ "METRIC_FEE2_ADVERTISER" -> Just PIMMetricFEE2Advertiser
1272+ "METRIC_FEE2_PARTNER" -> Just PIMMetricFEE2Partner
1273+ "METRIC_FEE2_USD" -> Just PIMMetricFEE2Usd
1274+ "METRIC_FEE3_ADVERTISER" -> Just PIMMetricFEE3Advertiser
1275+ "METRIC_FEE3_PARTNER" -> Just PIMMetricFEE3Partner
1276+ "METRIC_FEE3_USD" -> Just PIMMetricFEE3Usd
1277+ "METRIC_FEE4_ADVERTISER" -> Just PIMMetricFEE4Advertiser
1278+ "METRIC_FEE4_PARTNER" -> Just PIMMetricFEE4Partner
1279+ "METRIC_FEE4_USD" -> Just PIMMetricFEE4Usd
1280+ "METRIC_FEE5_ADVERTISER" -> Just PIMMetricFEE5Advertiser
1281+ "METRIC_FEE5_PARTNER" -> Just PIMMetricFEE5Partner
1282+ "METRIC_FEE5_USD" -> Just PIMMetricFEE5Usd
1283+ "METRIC_FEE6_ADVERTISER" -> Just PIMMetricFEE6Advertiser
1284+ "METRIC_FEE6_PARTNER" -> Just PIMMetricFEE6Partner
1285+ "METRIC_FEE6_USD" -> Just PIMMetricFEE6Usd
1286+ "METRIC_FEE7_ADVERTISER" -> Just PIMMetricFEE7Advertiser
1287+ "METRIC_FEE7_PARTNER" -> Just PIMMetricFEE7Partner
1288+ "METRIC_FEE7_USD" -> Just PIMMetricFEE7Usd
1289+ "METRIC_FEE8_ADVERTISER" -> Just PIMMetricFEE8Advertiser
1290+ "METRIC_FEE8_PARTNER" -> Just PIMMetricFEE8Partner
1291+ "METRIC_FEE8_USD" -> Just PIMMetricFEE8Usd
1292+ "METRIC_FEE9_ADVERTISER" -> Just PIMMetricFEE9Advertiser
1293+ "METRIC_FEE9_PARTNER" -> Just PIMMetricFEE9Partner
1294+ "METRIC_FEE9_USD" -> Just PIMMetricFEE9Usd
1295+ "METRIC_IMPRESSIONS" -> Just PIMMetricImpressions
1296+ "METRIC_IMPRESSIONS_TO_CONVERSION_RATE" -> Just PIMMetricImpressionsToConversionRate
1297+ "METRIC_LAST_CLICKS" -> Just PIMMetricLastClicks
1298+ "METRIC_LAST_IMPRESSIONS" -> Just PIMMetricLastImpressions
1299+ "METRIC_MEDIA_COST_ADVERTISER" -> Just PIMMetricMediaCostAdvertiser
1300+ "METRIC_MEDIA_COST_ECPAPC_ADVERTISER" -> Just PIMMetricMediaCostEcpapcAdvertiser
1301+ "METRIC_MEDIA_COST_ECPAPC_PARTNER" -> Just PIMMetricMediaCostEcpapcPartner
1302+ "METRIC_MEDIA_COST_ECPAPC_USD" -> Just PIMMetricMediaCostEcpapcUsd
1303+ "METRIC_MEDIA_COST_ECPAPV_ADVERTISER" -> Just PIMMetricMediaCostEcpapvAdvertiser
1304+ "METRIC_MEDIA_COST_ECPAPV_PARTNER" -> Just PIMMetricMediaCostEcpapvPartner
1305+ "METRIC_MEDIA_COST_ECPAPV_USD" -> Just PIMMetricMediaCostEcpapvUsd
1306+ "METRIC_MEDIA_COST_ECPA_ADVERTISER" -> Just PIMMetricMediaCostEcpaAdvertiser
1307+ "METRIC_MEDIA_COST_ECPA_PARTNER" -> Just PIMMetricMediaCostEcpaPartner
1308+ "METRIC_MEDIA_COST_ECPA_USD" -> Just PIMMetricMediaCostEcpaUsd
1309+ "METRIC_MEDIA_COST_ECPCV_ADVERTISER" -> Just PIMMetricMediaCostEcpcvAdvertiser
1310+ "METRIC_MEDIA_COST_ECPCV_PARTNER" -> Just PIMMetricMediaCostEcpcvPartner
1311+ "METRIC_MEDIA_COST_ECPCV_USD" -> Just PIMMetricMediaCostEcpcvUsd
1312+ "METRIC_MEDIA_COST_ECPC_ADVERTISER" -> Just PIMMetricMediaCostEcpcAdvertiser
1313+ "METRIC_MEDIA_COST_ECPC_PARTNER" -> Just PIMMetricMediaCostEcpcPartner
1314+ "METRIC_MEDIA_COST_ECPC_USD" -> Just PIMMetricMediaCostEcpcUsd
1315+ "METRIC_MEDIA_COST_ECPM_ADVERTISER" -> Just PIMMetricMediaCostEcpmAdvertiser
1316+ "METRIC_MEDIA_COST_ECPM_PARTNER" -> Just PIMMetricMediaCostEcpmPartner
1317+ "METRIC_MEDIA_COST_ECPM_USD" -> Just PIMMetricMediaCostEcpmUsd
1318+ "METRIC_MEDIA_COST_PARTNER" -> Just PIMMetricMediaCostPartner
1319+ "METRIC_MEDIA_COST_USD" -> Just PIMMetricMediaCostUsd
1320+ "METRIC_MEDIA_FEE1_ADVERTISER" -> Just PIMMetricMediaFEE1Advertiser
1321+ "METRIC_MEDIA_FEE1_PARTNER" -> Just PIMMetricMediaFEE1Partner
1322+ "METRIC_MEDIA_FEE1_USD" -> Just PIMMetricMediaFEE1Usd
1323+ "METRIC_MEDIA_FEE2_ADVERTISER" -> Just PIMMetricMediaFEE2Advertiser
1324+ "METRIC_MEDIA_FEE2_PARTNER" -> Just PIMMetricMediaFEE2Partner
1325+ "METRIC_MEDIA_FEE2_USD" -> Just PIMMetricMediaFEE2Usd
1326+ "METRIC_MEDIA_FEE3_ADVERTISER" -> Just PIMMetricMediaFEE3Advertiser
1327+ "METRIC_MEDIA_FEE3_PARTNER" -> Just PIMMetricMediaFEE3Partner
1328+ "METRIC_MEDIA_FEE3_USD" -> Just PIMMetricMediaFEE3Usd
1329+ "METRIC_MEDIA_FEE4_ADVERTISER" -> Just PIMMetricMediaFEE4Advertiser
1330+ "METRIC_MEDIA_FEE4_PARTNER" -> Just PIMMetricMediaFEE4Partner
1331+ "METRIC_MEDIA_FEE4_USD" -> Just PIMMetricMediaFEE4Usd
1332+ "METRIC_MEDIA_FEE5_ADVERTISER" -> Just PIMMetricMediaFEE5Advertiser
1333+ "METRIC_MEDIA_FEE5_PARTNER" -> Just PIMMetricMediaFEE5Partner
1334+ "METRIC_MEDIA_FEE5_USD" -> Just PIMMetricMediaFEE5Usd
1335+ "METRIC_PIXEL_LOADS" -> Just PIMMetricPixelLoads
1336+ "METRIC_PLATFORM_FEE_ADVERTISER" -> Just PIMMetricPlatformFeeAdvertiser
1337+ "METRIC_PLATFORM_FEE_PARTNER" -> Just PIMMetricPlatformFeePartner
1338+ "METRIC_PLATFORM_FEE_USD" -> Just PIMMetricPlatformFeeUsd
1339+ "METRIC_POST_CLICK_DFA_REVENUE" -> Just PIMMetricPostClickDfaRevenue
1340+ "METRIC_POST_VIEW_DFA_REVENUE" -> Just PIMMetricPostViewDfaRevenue
1341+ "METRIC_PROFIT_ADVERTISER" -> Just PIMMetricProfitAdvertiser
1342+ "METRIC_PROFIT_ECPAPC_ADVERTISER" -> Just PIMMetricProfitEcpapcAdvertiser
1343+ "METRIC_PROFIT_ECPAPC_PARTNER" -> Just PIMMetricProfitEcpapcPartner
1344+ "METRIC_PROFIT_ECPAPC_USD" -> Just PIMMetricProfitEcpapcUsd
1345+ "METRIC_PROFIT_ECPAPV_ADVERTISER" -> Just PIMMetricProfitEcpapvAdvertiser
1346+ "METRIC_PROFIT_ECPAPV_PARTNER" -> Just PIMMetricProfitEcpapvPartner
1347+ "METRIC_PROFIT_ECPAPV_USD" -> Just PIMMetricProfitEcpapvUsd
1348+ "METRIC_PROFIT_ECPA_ADVERTISER" -> Just PIMMetricProfitEcpaAdvertiser
1349+ "METRIC_PROFIT_ECPA_PARTNER" -> Just PIMMetricProfitEcpaPartner
1350+ "METRIC_PROFIT_ECPA_USD" -> Just PIMMetricProfitEcpaUsd
1351+ "METRIC_PROFIT_ECPC_ADVERTISER" -> Just PIMMetricProfitEcpcAdvertiser
1352+ "METRIC_PROFIT_ECPC_PARTNER" -> Just PIMMetricProfitEcpcPartner
1353+ "METRIC_PROFIT_ECPC_USD" -> Just PIMMetricProfitEcpcUsd
1354+ "METRIC_PROFIT_ECPM_ADVERTISER" -> Just PIMMetricProfitEcpmAdvertiser
1355+ "METRIC_PROFIT_ECPM_PARTNER" -> Just PIMMetricProfitEcpmPartner
1356+ "METRIC_PROFIT_ECPM_USD" -> Just PIMMetricProfitEcpmUsd
1357+ "METRIC_PROFIT_MARGIN" -> Just PIMMetricProfitMargin
1358+ "METRIC_PROFIT_PARTNER" -> Just PIMMetricProfitPartner
1359+ "METRIC_PROFIT_USD" -> Just PIMMetricProfitUsd
1360+ "METRIC_REVENUE_ADVERTISER" -> Just PIMMetricRevenueAdvertiser
1361+ "METRIC_REVENUE_ECPAPC_ADVERTISER" -> Just PIMMetricRevenueEcpapcAdvertiser
1362+ "METRIC_REVENUE_ECPAPC_PARTNER" -> Just PIMMetricRevenueEcpapcPartner
1363+ "METRIC_REVENUE_ECPAPC_USD" -> Just PIMMetricRevenueEcpapcUsd
1364+ "METRIC_REVENUE_ECPAPV_ADVERTISER" -> Just PIMMetricRevenueEcpapvAdvertiser
1365+ "METRIC_REVENUE_ECPAPV_PARTNER" -> Just PIMMetricRevenueEcpapvPartner
1366+ "METRIC_REVENUE_ECPAPV_USD" -> Just PIMMetricRevenueEcpapvUsd
1367+ "METRIC_REVENUE_ECPA_ADVERTISER" -> Just PIMMetricRevenueEcpaAdvertiser
1368+ "METRIC_REVENUE_ECPA_PARTNER" -> Just PIMMetricRevenueEcpaPartner
1369+ "METRIC_REVENUE_ECPA_USD" -> Just PIMMetricRevenueEcpaUsd
1370+ "METRIC_REVENUE_ECPCV_ADVERTISER" -> Just PIMMetricRevenueEcpcvAdvertiser
1371+ "METRIC_REVENUE_ECPCV_PARTNER" -> Just PIMMetricRevenueEcpcvPartner
1372+ "METRIC_REVENUE_ECPCV_USD" -> Just PIMMetricRevenueEcpcvUsd
1373+ "METRIC_REVENUE_ECPC_ADVERTISER" -> Just PIMMetricRevenueEcpcAdvertiser
1374+ "METRIC_REVENUE_ECPC_PARTNER" -> Just PIMMetricRevenueEcpcPartner
1375+ "METRIC_REVENUE_ECPC_USD" -> Just PIMMetricRevenueEcpcUsd
1376+ "METRIC_REVENUE_ECPM_ADVERTISER" -> Just PIMMetricRevenueEcpmAdvertiser
1377+ "METRIC_REVENUE_ECPM_PARTNER" -> Just PIMMetricRevenueEcpmPartner
1378+ "METRIC_REVENUE_ECPM_USD" -> Just PIMMetricRevenueEcpmUsd
1379+ "METRIC_REVENUE_PARTNER" -> Just PIMMetricRevenuePartner
1380+ "METRIC_REVENUE_USD" -> Just PIMMetricRevenueUsd
1381+ "METRIC_RICH_MEDIA_VIDEO_COMPLETIONS" -> Just PIMMetricRichMediaVideoCompletions
1382+ "METRIC_RICH_MEDIA_VIDEO_FIRST_QUARTILE_COMPLETES" -> Just PIMMetricRichMediaVideoFirstQuartileCompletes
1383+ "METRIC_RICH_MEDIA_VIDEO_FULL_SCREENS" -> Just PIMMetricRichMediaVideoFullScreens
1384+ "METRIC_RICH_MEDIA_VIDEO_MIDPOINTS" -> Just PIMMetricRichMediaVideoMidpoints
1385+ "METRIC_RICH_MEDIA_VIDEO_MUTES" -> Just PIMMetricRichMediaVideoMutes
1386+ "METRIC_RICH_MEDIA_VIDEO_PAUSES" -> Just PIMMetricRichMediaVideoPauses
1387+ "METRIC_RICH_MEDIA_VIDEO_PLAYS" -> Just PIMMetricRichMediaVideoPlays
1388+ "METRIC_RICH_MEDIA_VIDEO_SKIPS" -> Just PIMMetricRichMediaVideoSkips
1389+ "METRIC_RICH_MEDIA_VIDEO_THIRD_QUARTILE_COMPLETES" -> Just PIMMetricRichMediaVideoThirdQuartileCompletes
1390+ "METRIC_TEA_TRUEVIEW_IMPRESSIONS" -> Just PIMMetricTeaTrueviewImpressions
1391+ "METRIC_TEA_TRUEVIEW_UNIQUE_COOKIES" -> Just PIMMetricTeaTrueviewUniqueCookies
1392+ "METRIC_TEA_TRUEVIEW_UNIQUE_PEOPLE" -> Just PIMMetricTeaTrueviewUniquePeople
1393+ "METRIC_TOTAL_CONVERSIONS" -> Just PIMMetricTotalConversions
1394+ "METRIC_TOTAL_MEDIA_COST_ADVERTISER" -> Just PIMMetricTotalMediaCostAdvertiser
1395+ "METRIC_TOTAL_MEDIA_COST_ECPAPC_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpapcAdvertiser
1396+ "METRIC_TOTAL_MEDIA_COST_ECPAPC_PARTNER" -> Just PIMMetricTotalMediaCostEcpapcPartner
1397+ "METRIC_TOTAL_MEDIA_COST_ECPAPC_USD" -> Just PIMMetricTotalMediaCostEcpapcUsd
1398+ "METRIC_TOTAL_MEDIA_COST_ECPAPV_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpapvAdvertiser
1399+ "METRIC_TOTAL_MEDIA_COST_ECPAPV_PARTNER" -> Just PIMMetricTotalMediaCostEcpapvPartner
1400+ "METRIC_TOTAL_MEDIA_COST_ECPAPV_USD" -> Just PIMMetricTotalMediaCostEcpapvUsd
1401+ "METRIC_TOTAL_MEDIA_COST_ECPA_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpaAdvertiser
1402+ "METRIC_TOTAL_MEDIA_COST_ECPA_PARTNER" -> Just PIMMetricTotalMediaCostEcpaPartner
1403+ "METRIC_TOTAL_MEDIA_COST_ECPA_USD" -> Just PIMMetricTotalMediaCostEcpaUsd
1404+ "METRIC_TOTAL_MEDIA_COST_ECPCV_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpcvAdvertiser
1405+ "METRIC_TOTAL_MEDIA_COST_ECPCV_PARTNER" -> Just PIMMetricTotalMediaCostEcpcvPartner
1406+ "METRIC_TOTAL_MEDIA_COST_ECPCV_USD" -> Just PIMMetricTotalMediaCostEcpcvUsd
1407+ "METRIC_TOTAL_MEDIA_COST_ECPC_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpcAdvertiser
1408+ "METRIC_TOTAL_MEDIA_COST_ECPC_PARTNER" -> Just PIMMetricTotalMediaCostEcpcPartner
1409+ "METRIC_TOTAL_MEDIA_COST_ECPC_USD" -> Just PIMMetricTotalMediaCostEcpcUsd
1410+ "METRIC_TOTAL_MEDIA_COST_ECPM_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpmAdvertiser
1411+ "METRIC_TOTAL_MEDIA_COST_ECPM_PARTNER" -> Just PIMMetricTotalMediaCostEcpmPartner
1412+ "METRIC_TOTAL_MEDIA_COST_ECPM_USD" -> Just PIMMetricTotalMediaCostEcpmUsd
1413+ "METRIC_TOTAL_MEDIA_COST_PARTNER" -> Just PIMMetricTotalMediaCostPartner
1414+ "METRIC_TOTAL_MEDIA_COST_USD" -> Just PIMMetricTotalMediaCostUsd
1415+ "METRIC_TRUEVIEW_CONVERSION_MANY_PER_VIEW" -> Just PIMMetricTrueviewConversionManyPerView
1416+ "METRIC_TRUEVIEW_CONVERSION_ONE_PER_VIEW" -> Just PIMMetricTrueviewConversionOnePerView
1417+ "METRIC_TRUEVIEW_CONVERSION_RATE_ONE_PER_VIEW" -> Just PIMMetricTrueviewConversionRateOnePerView
1418+ "METRIC_TRUEVIEW_COST_CONVERSION_MANY_PER_VIEW_RATIO" -> Just PIMMetricTrueviewCostConversionManyPerViewRatio
1419+ "METRIC_TRUEVIEW_COST_CONVERSION_ONE_PER_VIEW_RATIO" -> Just PIMMetricTrueviewCostConversionOnePerViewRatio
1420+ "METRIC_TRUEVIEW_CPV_ADVERTISER" -> Just PIMMetricTrueviewCpvAdvertiser
1421+ "METRIC_TRUEVIEW_CPV_PARTNER" -> Just PIMMetricTrueviewCpvPartner
1422+ "METRIC_TRUEVIEW_CPV_USD" -> Just PIMMetricTrueviewCpvUsd
1423+ "METRIC_TRUEVIEW_EARNED_LIKES" -> Just PIMMetricTrueviewEarnedLikes
1424+ "METRIC_TRUEVIEW_EARNED_PLAYLIST_ADDITIONS" -> Just PIMMetricTrueviewEarnedPlaylistAdditions
1425+ "METRIC_TRUEVIEW_EARNED_SHARES" -> Just PIMMetricTrueviewEarnedShares
1426+ "METRIC_TRUEVIEW_EARNED_SUBSCRIBERS" -> Just PIMMetricTrueviewEarnedSubscribers
1427+ "METRIC_TRUEVIEW_EARNED_VIEWS" -> Just PIMMetricTrueviewEarnedViews
1428+ "METRIC_TRUEVIEW_IMPRESSION_SHARE" -> Just PIMMetricTrueviewImpressionShare
1429+ "METRIC_TRUEVIEW_LOST_IS_BUDGET" -> Just PIMMetricTrueviewLostIsBudget
1430+ "METRIC_TRUEVIEW_LOST_IS_RANK" -> Just PIMMetricTrueviewLostIsRank
1431+ "METRIC_TRUEVIEW_TOTAL_CONVERSION_VALUE" -> Just PIMMetricTrueviewTotalConversionValue
1432+ "METRIC_TRUEVIEW_UNIQUE_VIEWERS" -> Just PIMMetricTrueviewUniqueViewers
1433+ "METRIC_TRUEVIEW_VALUE_CONVERSION_MANY_PER_VIEW_RATIO" -> Just PIMMetricTrueviewValueConversionManyPerViewRatio
1434+ "METRIC_TRUEVIEW_VALUE_CONVERSION_ONE_PER_VIEW_RATIO" -> Just PIMMetricTrueviewValueConversionOnePerViewRatio
1435+ "METRIC_TRUEVIEW_VIEWS" -> Just PIMMetricTrueviewViews
1436+ "METRIC_TRUEVIEW_VIEW_RATE" -> Just PIMMetricTrueviewViewRate
1437+ "METRIC_TRUEVIEW_VIEW_THROUGH_CONVERSION" -> Just PIMMetricTrueviewViewThroughConversion
1438+ "METRIC_UNIQUE_VISITORS_COOKIES" -> Just PIMMetricUniqueVisitorsCookies
1439+ "METRIC_UNKNOWN" -> Just PIMMetricUnknown
1440+ "METRIC_VIDEO_COMPANION_CLICKS" -> Just PIMMetricVideoCompanionClicks
1441+ "METRIC_VIDEO_COMPANION_IMPRESSIONS" -> Just PIMMetricVideoCompanionImpressions
1442+ "METRIC_VIDEO_COMPLETION_RATE" -> Just PIMMetricVideoCompletionRate
1443+ _ -> Nothing
1444+
1445+instance ToText ParametersItemMetrics where
1446+ toText = \case
1447+ PIMMetricBidRequests -> "METRIC_BID_REQUESTS"
1448+ PIMMetricBillableCostAdvertiser -> "METRIC_BILLABLE_COST_ADVERTISER"
1449+ PIMMetricBillableCostPartner -> "METRIC_BILLABLE_COST_PARTNER"
1450+ PIMMetricBillableCostUsd -> "METRIC_BILLABLE_COST_USD"
1451+ PIMMetricClicks -> "METRIC_CLICKS"
1452+ PIMMetricClickToPostClickConversionRate -> "METRIC_CLICK_TO_POST_CLICK_CONVERSION_RATE"
1453+ PIMMetricComscoreVceAudienceAvgFrequency -> "METRIC_COMSCORE_VCE_AUDIENCE_AVG_FREQUENCY"
1454+ PIMMetricComscoreVceAudienceImpressions -> "METRIC_COMSCORE_VCE_AUDIENCE_IMPRESSIONS"
1455+ PIMMetricComscoreVceAudienceImpressionsShare -> "METRIC_COMSCORE_VCE_AUDIENCE_IMPRESSIONS_SHARE"
1456+ PIMMetricComscoreVceAudienceReachPct -> "METRIC_COMSCORE_VCE_AUDIENCE_REACH_PCT"
1457+ PIMMetricComscoreVceAudienceSharePct -> "METRIC_COMSCORE_VCE_AUDIENCE_SHARE_PCT"
1458+ PIMMetricComscoreVceGrossRatingPoints -> "METRIC_COMSCORE_VCE_GROSS_RATING_POINTS"
1459+ PIMMetricComscoreVcePopulation -> "METRIC_COMSCORE_VCE_POPULATION"
1460+ PIMMetricComscoreVceUniqueAudience -> "METRIC_COMSCORE_VCE_UNIQUE_AUDIENCE"
1461+ PIMMetricConversionsPerMille -> "METRIC_CONVERSIONS_PER_MILLE"
1462+ PIMMetricCpmFEE1Advertiser -> "METRIC_CPM_FEE1_ADVERTISER"
1463+ PIMMetricCpmFEE1Partner -> "METRIC_CPM_FEE1_PARTNER"
1464+ PIMMetricCpmFEE1Usd -> "METRIC_CPM_FEE1_USD"
1465+ PIMMetricCpmFEE2Advertiser -> "METRIC_CPM_FEE2_ADVERTISER"
1466+ PIMMetricCpmFEE2Partner -> "METRIC_CPM_FEE2_PARTNER"
1467+ PIMMetricCpmFEE2Usd -> "METRIC_CPM_FEE2_USD"
1468+ PIMMetricCpmFEE3Advertiser -> "METRIC_CPM_FEE3_ADVERTISER"
1469+ PIMMetricCpmFEE3Partner -> "METRIC_CPM_FEE3_PARTNER"
1470+ PIMMetricCpmFEE3Usd -> "METRIC_CPM_FEE3_USD"
1471+ PIMMetricCpmFEE4Advertiser -> "METRIC_CPM_FEE4_ADVERTISER"
1472+ PIMMetricCpmFEE4Partner -> "METRIC_CPM_FEE4_PARTNER"
1473+ PIMMetricCpmFEE4Usd -> "METRIC_CPM_FEE4_USD"
1474+ PIMMetricCpmFEE5Advertiser -> "METRIC_CPM_FEE5_ADVERTISER"
1475+ PIMMetricCpmFEE5Partner -> "METRIC_CPM_FEE5_PARTNER"
1476+ PIMMetricCpmFEE5Usd -> "METRIC_CPM_FEE5_USD"
1477+ PIMMetricCtr -> "METRIC_CTR"
1478+ PIMMetricDataCostAdvertiser -> "METRIC_DATA_COST_ADVERTISER"
1479+ PIMMetricDataCostPartner -> "METRIC_DATA_COST_PARTNER"
1480+ PIMMetricDataCostUsd -> "METRIC_DATA_COST_USD"
1481+ PIMMetricFEE10Advertiser -> "METRIC_FEE10_ADVERTISER"
1482+ PIMMetricFEE10Partner -> "METRIC_FEE10_PARTNER"
1483+ PIMMetricFEE10Usd -> "METRIC_FEE10_USD"
1484+ PIMMetricFEE11Advertiser -> "METRIC_FEE11_ADVERTISER"
1485+ PIMMetricFEE11Partner -> "METRIC_FEE11_PARTNER"
1486+ PIMMetricFEE11Usd -> "METRIC_FEE11_USD"
1487+ PIMMetricFEE12Advertiser -> "METRIC_FEE12_ADVERTISER"
1488+ PIMMetricFEE12Partner -> "METRIC_FEE12_PARTNER"
1489+ PIMMetricFEE12Usd -> "METRIC_FEE12_USD"
1490+ PIMMetricFEE13Advertiser -> "METRIC_FEE13_ADVERTISER"
1491+ PIMMetricFEE13Partner -> "METRIC_FEE13_PARTNER"
1492+ PIMMetricFEE13Usd -> "METRIC_FEE13_USD"
1493+ PIMMetricFEE14Advertiser -> "METRIC_FEE14_ADVERTISER"
1494+ PIMMetricFEE14Partner -> "METRIC_FEE14_PARTNER"
1495+ PIMMetricFEE14Usd -> "METRIC_FEE14_USD"
1496+ PIMMetricFEE15Advertiser -> "METRIC_FEE15_ADVERTISER"
1497+ PIMMetricFEE15Partner -> "METRIC_FEE15_PARTNER"
1498+ PIMMetricFEE15Usd -> "METRIC_FEE15_USD"
1499+ PIMMetricFEE16Advertiser -> "METRIC_FEE16_ADVERTISER"
1500+ PIMMetricFEE16Partner -> "METRIC_FEE16_PARTNER"
1501+ PIMMetricFEE16Usd -> "METRIC_FEE16_USD"
1502+ PIMMetricFEE17Advertiser -> "METRIC_FEE17_ADVERTISER"
1503+ PIMMetricFEE17Partner -> "METRIC_FEE17_PARTNER"
1504+ PIMMetricFEE17Usd -> "METRIC_FEE17_USD"
1505+ PIMMetricFEE18Advertiser -> "METRIC_FEE18_ADVERTISER"
1506+ PIMMetricFEE18Partner -> "METRIC_FEE18_PARTNER"
1507+ PIMMetricFEE18Usd -> "METRIC_FEE18_USD"
1508+ PIMMetricFEE19Advertiser -> "METRIC_FEE19_ADVERTISER"
1509+ PIMMetricFEE19Partner -> "METRIC_FEE19_PARTNER"
1510+ PIMMetricFEE19Usd -> "METRIC_FEE19_USD"
1511+ PIMMetricFEE20Advertiser -> "METRIC_FEE20_ADVERTISER"
1512+ PIMMetricFEE20Partner -> "METRIC_FEE20_PARTNER"
1513+ PIMMetricFEE20Usd -> "METRIC_FEE20_USD"
1514+ PIMMetricFEE2Advertiser -> "METRIC_FEE2_ADVERTISER"
1515+ PIMMetricFEE2Partner -> "METRIC_FEE2_PARTNER"
1516+ PIMMetricFEE2Usd -> "METRIC_FEE2_USD"
1517+ PIMMetricFEE3Advertiser -> "METRIC_FEE3_ADVERTISER"
1518+ PIMMetricFEE3Partner -> "METRIC_FEE3_PARTNER"
1519+ PIMMetricFEE3Usd -> "METRIC_FEE3_USD"
1520+ PIMMetricFEE4Advertiser -> "METRIC_FEE4_ADVERTISER"
1521+ PIMMetricFEE4Partner -> "METRIC_FEE4_PARTNER"
1522+ PIMMetricFEE4Usd -> "METRIC_FEE4_USD"
1523+ PIMMetricFEE5Advertiser -> "METRIC_FEE5_ADVERTISER"
1524+ PIMMetricFEE5Partner -> "METRIC_FEE5_PARTNER"
1525+ PIMMetricFEE5Usd -> "METRIC_FEE5_USD"
1526+ PIMMetricFEE6Advertiser -> "METRIC_FEE6_ADVERTISER"
1527+ PIMMetricFEE6Partner -> "METRIC_FEE6_PARTNER"
1528+ PIMMetricFEE6Usd -> "METRIC_FEE6_USD"
1529+ PIMMetricFEE7Advertiser -> "METRIC_FEE7_ADVERTISER"
1530+ PIMMetricFEE7Partner -> "METRIC_FEE7_PARTNER"
1531+ PIMMetricFEE7Usd -> "METRIC_FEE7_USD"
1532+ PIMMetricFEE8Advertiser -> "METRIC_FEE8_ADVERTISER"
1533+ PIMMetricFEE8Partner -> "METRIC_FEE8_PARTNER"
1534+ PIMMetricFEE8Usd -> "METRIC_FEE8_USD"
1535+ PIMMetricFEE9Advertiser -> "METRIC_FEE9_ADVERTISER"
1536+ PIMMetricFEE9Partner -> "METRIC_FEE9_PARTNER"
1537+ PIMMetricFEE9Usd -> "METRIC_FEE9_USD"
1538+ PIMMetricImpressions -> "METRIC_IMPRESSIONS"
1539+ PIMMetricImpressionsToConversionRate -> "METRIC_IMPRESSIONS_TO_CONVERSION_RATE"
1540+ PIMMetricLastClicks -> "METRIC_LAST_CLICKS"
1541+ PIMMetricLastImpressions -> "METRIC_LAST_IMPRESSIONS"
1542+ PIMMetricMediaCostAdvertiser -> "METRIC_MEDIA_COST_ADVERTISER"
1543+ PIMMetricMediaCostEcpapcAdvertiser -> "METRIC_MEDIA_COST_ECPAPC_ADVERTISER"
1544+ PIMMetricMediaCostEcpapcPartner -> "METRIC_MEDIA_COST_ECPAPC_PARTNER"
1545+ PIMMetricMediaCostEcpapcUsd -> "METRIC_MEDIA_COST_ECPAPC_USD"
1546+ PIMMetricMediaCostEcpapvAdvertiser -> "METRIC_MEDIA_COST_ECPAPV_ADVERTISER"
1547+ PIMMetricMediaCostEcpapvPartner -> "METRIC_MEDIA_COST_ECPAPV_PARTNER"
1548+ PIMMetricMediaCostEcpapvUsd -> "METRIC_MEDIA_COST_ECPAPV_USD"
1549+ PIMMetricMediaCostEcpaAdvertiser -> "METRIC_MEDIA_COST_ECPA_ADVERTISER"
1550+ PIMMetricMediaCostEcpaPartner -> "METRIC_MEDIA_COST_ECPA_PARTNER"
1551+ PIMMetricMediaCostEcpaUsd -> "METRIC_MEDIA_COST_ECPA_USD"
1552+ PIMMetricMediaCostEcpcvAdvertiser -> "METRIC_MEDIA_COST_ECPCV_ADVERTISER"
1553+ PIMMetricMediaCostEcpcvPartner -> "METRIC_MEDIA_COST_ECPCV_PARTNER"
1554+ PIMMetricMediaCostEcpcvUsd -> "METRIC_MEDIA_COST_ECPCV_USD"
1555+ PIMMetricMediaCostEcpcAdvertiser -> "METRIC_MEDIA_COST_ECPC_ADVERTISER"
1556+ PIMMetricMediaCostEcpcPartner -> "METRIC_MEDIA_COST_ECPC_PARTNER"
1557+ PIMMetricMediaCostEcpcUsd -> "METRIC_MEDIA_COST_ECPC_USD"
1558+ PIMMetricMediaCostEcpmAdvertiser -> "METRIC_MEDIA_COST_ECPM_ADVERTISER"
1559+ PIMMetricMediaCostEcpmPartner -> "METRIC_MEDIA_COST_ECPM_PARTNER"
1560+ PIMMetricMediaCostEcpmUsd -> "METRIC_MEDIA_COST_ECPM_USD"
1561+ PIMMetricMediaCostPartner -> "METRIC_MEDIA_COST_PARTNER"
1562+ PIMMetricMediaCostUsd -> "METRIC_MEDIA_COST_USD"
1563+ PIMMetricMediaFEE1Advertiser -> "METRIC_MEDIA_FEE1_ADVERTISER"
1564+ PIMMetricMediaFEE1Partner -> "METRIC_MEDIA_FEE1_PARTNER"
1565+ PIMMetricMediaFEE1Usd -> "METRIC_MEDIA_FEE1_USD"
1566+ PIMMetricMediaFEE2Advertiser -> "METRIC_MEDIA_FEE2_ADVERTISER"
1567+ PIMMetricMediaFEE2Partner -> "METRIC_MEDIA_FEE2_PARTNER"
1568+ PIMMetricMediaFEE2Usd -> "METRIC_MEDIA_FEE2_USD"
1569+ PIMMetricMediaFEE3Advertiser -> "METRIC_MEDIA_FEE3_ADVERTISER"
1570+ PIMMetricMediaFEE3Partner -> "METRIC_MEDIA_FEE3_PARTNER"
1571+ PIMMetricMediaFEE3Usd -> "METRIC_MEDIA_FEE3_USD"
1572+ PIMMetricMediaFEE4Advertiser -> "METRIC_MEDIA_FEE4_ADVERTISER"
1573+ PIMMetricMediaFEE4Partner -> "METRIC_MEDIA_FEE4_PARTNER"
1574+ PIMMetricMediaFEE4Usd -> "METRIC_MEDIA_FEE4_USD"
1575+ PIMMetricMediaFEE5Advertiser -> "METRIC_MEDIA_FEE5_ADVERTISER"
1576+ PIMMetricMediaFEE5Partner -> "METRIC_MEDIA_FEE5_PARTNER"
1577+ PIMMetricMediaFEE5Usd -> "METRIC_MEDIA_FEE5_USD"
1578+ PIMMetricPixelLoads -> "METRIC_PIXEL_LOADS"
1579+ PIMMetricPlatformFeeAdvertiser -> "METRIC_PLATFORM_FEE_ADVERTISER"
1580+ PIMMetricPlatformFeePartner -> "METRIC_PLATFORM_FEE_PARTNER"
1581+ PIMMetricPlatformFeeUsd -> "METRIC_PLATFORM_FEE_USD"
1582+ PIMMetricPostClickDfaRevenue -> "METRIC_POST_CLICK_DFA_REVENUE"
1583+ PIMMetricPostViewDfaRevenue -> "METRIC_POST_VIEW_DFA_REVENUE"
1584+ PIMMetricProfitAdvertiser -> "METRIC_PROFIT_ADVERTISER"
1585+ PIMMetricProfitEcpapcAdvertiser -> "METRIC_PROFIT_ECPAPC_ADVERTISER"
1586+ PIMMetricProfitEcpapcPartner -> "METRIC_PROFIT_ECPAPC_PARTNER"
1587+ PIMMetricProfitEcpapcUsd -> "METRIC_PROFIT_ECPAPC_USD"
1588+ PIMMetricProfitEcpapvAdvertiser -> "METRIC_PROFIT_ECPAPV_ADVERTISER"
1589+ PIMMetricProfitEcpapvPartner -> "METRIC_PROFIT_ECPAPV_PARTNER"
1590+ PIMMetricProfitEcpapvUsd -> "METRIC_PROFIT_ECPAPV_USD"
1591+ PIMMetricProfitEcpaAdvertiser -> "METRIC_PROFIT_ECPA_ADVERTISER"
1592+ PIMMetricProfitEcpaPartner -> "METRIC_PROFIT_ECPA_PARTNER"
1593+ PIMMetricProfitEcpaUsd -> "METRIC_PROFIT_ECPA_USD"
1594+ PIMMetricProfitEcpcAdvertiser -> "METRIC_PROFIT_ECPC_ADVERTISER"
1595+ PIMMetricProfitEcpcPartner -> "METRIC_PROFIT_ECPC_PARTNER"
1596+ PIMMetricProfitEcpcUsd -> "METRIC_PROFIT_ECPC_USD"
1597+ PIMMetricProfitEcpmAdvertiser -> "METRIC_PROFIT_ECPM_ADVERTISER"
1598+ PIMMetricProfitEcpmPartner -> "METRIC_PROFIT_ECPM_PARTNER"
1599+ PIMMetricProfitEcpmUsd -> "METRIC_PROFIT_ECPM_USD"
1600+ PIMMetricProfitMargin -> "METRIC_PROFIT_MARGIN"
1601+ PIMMetricProfitPartner -> "METRIC_PROFIT_PARTNER"
1602+ PIMMetricProfitUsd -> "METRIC_PROFIT_USD"
1603+ PIMMetricRevenueAdvertiser -> "METRIC_REVENUE_ADVERTISER"
1604+ PIMMetricRevenueEcpapcAdvertiser -> "METRIC_REVENUE_ECPAPC_ADVERTISER"
1605+ PIMMetricRevenueEcpapcPartner -> "METRIC_REVENUE_ECPAPC_PARTNER"
1606+ PIMMetricRevenueEcpapcUsd -> "METRIC_REVENUE_ECPAPC_USD"
1607+ PIMMetricRevenueEcpapvAdvertiser -> "METRIC_REVENUE_ECPAPV_ADVERTISER"
1608+ PIMMetricRevenueEcpapvPartner -> "METRIC_REVENUE_ECPAPV_PARTNER"
1609+ PIMMetricRevenueEcpapvUsd -> "METRIC_REVENUE_ECPAPV_USD"
1610+ PIMMetricRevenueEcpaAdvertiser -> "METRIC_REVENUE_ECPA_ADVERTISER"
1611+ PIMMetricRevenueEcpaPartner -> "METRIC_REVENUE_ECPA_PARTNER"
1612+ PIMMetricRevenueEcpaUsd -> "METRIC_REVENUE_ECPA_USD"
1613+ PIMMetricRevenueEcpcvAdvertiser -> "METRIC_REVENUE_ECPCV_ADVERTISER"
1614+ PIMMetricRevenueEcpcvPartner -> "METRIC_REVENUE_ECPCV_PARTNER"
1615+ PIMMetricRevenueEcpcvUsd -> "METRIC_REVENUE_ECPCV_USD"
1616+ PIMMetricRevenueEcpcAdvertiser -> "METRIC_REVENUE_ECPC_ADVERTISER"
1617+ PIMMetricRevenueEcpcPartner -> "METRIC_REVENUE_ECPC_PARTNER"
1618+ PIMMetricRevenueEcpcUsd -> "METRIC_REVENUE_ECPC_USD"
1619+ PIMMetricRevenueEcpmAdvertiser -> "METRIC_REVENUE_ECPM_ADVERTISER"
1620+ PIMMetricRevenueEcpmPartner -> "METRIC_REVENUE_ECPM_PARTNER"
1621+ PIMMetricRevenueEcpmUsd -> "METRIC_REVENUE_ECPM_USD"
1622+ PIMMetricRevenuePartner -> "METRIC_REVENUE_PARTNER"
1623+ PIMMetricRevenueUsd -> "METRIC_REVENUE_USD"
1624+ PIMMetricRichMediaVideoCompletions -> "METRIC_RICH_MEDIA_VIDEO_COMPLETIONS"
1625+ PIMMetricRichMediaVideoFirstQuartileCompletes -> "METRIC_RICH_MEDIA_VIDEO_FIRST_QUARTILE_COMPLETES"
1626+ PIMMetricRichMediaVideoFullScreens -> "METRIC_RICH_MEDIA_VIDEO_FULL_SCREENS"
1627+ PIMMetricRichMediaVideoMidpoints -> "METRIC_RICH_MEDIA_VIDEO_MIDPOINTS"
1628+ PIMMetricRichMediaVideoMutes -> "METRIC_RICH_MEDIA_VIDEO_MUTES"
1629+ PIMMetricRichMediaVideoPauses -> "METRIC_RICH_MEDIA_VIDEO_PAUSES"
1630+ PIMMetricRichMediaVideoPlays -> "METRIC_RICH_MEDIA_VIDEO_PLAYS"
1631+ PIMMetricRichMediaVideoSkips -> "METRIC_RICH_MEDIA_VIDEO_SKIPS"
1632+ PIMMetricRichMediaVideoThirdQuartileCompletes -> "METRIC_RICH_MEDIA_VIDEO_THIRD_QUARTILE_COMPLETES"
1633+ PIMMetricTeaTrueviewImpressions -> "METRIC_TEA_TRUEVIEW_IMPRESSIONS"
1634+ PIMMetricTeaTrueviewUniqueCookies -> "METRIC_TEA_TRUEVIEW_UNIQUE_COOKIES"
1635+ PIMMetricTeaTrueviewUniquePeople -> "METRIC_TEA_TRUEVIEW_UNIQUE_PEOPLE"
1636+ PIMMetricTotalConversions -> "METRIC_TOTAL_CONVERSIONS"
1637+ PIMMetricTotalMediaCostAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ADVERTISER"
1638+ PIMMetricTotalMediaCostEcpapcAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPAPC_ADVERTISER"
1639+ PIMMetricTotalMediaCostEcpapcPartner -> "METRIC_TOTAL_MEDIA_COST_ECPAPC_PARTNER"
1640+ PIMMetricTotalMediaCostEcpapcUsd -> "METRIC_TOTAL_MEDIA_COST_ECPAPC_USD"
1641+ PIMMetricTotalMediaCostEcpapvAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPAPV_ADVERTISER"
1642+ PIMMetricTotalMediaCostEcpapvPartner -> "METRIC_TOTAL_MEDIA_COST_ECPAPV_PARTNER"
1643+ PIMMetricTotalMediaCostEcpapvUsd -> "METRIC_TOTAL_MEDIA_COST_ECPAPV_USD"
1644+ PIMMetricTotalMediaCostEcpaAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPA_ADVERTISER"
1645+ PIMMetricTotalMediaCostEcpaPartner -> "METRIC_TOTAL_MEDIA_COST_ECPA_PARTNER"
1646+ PIMMetricTotalMediaCostEcpaUsd -> "METRIC_TOTAL_MEDIA_COST_ECPA_USD"
1647+ PIMMetricTotalMediaCostEcpcvAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPCV_ADVERTISER"
1648+ PIMMetricTotalMediaCostEcpcvPartner -> "METRIC_TOTAL_MEDIA_COST_ECPCV_PARTNER"
1649+ PIMMetricTotalMediaCostEcpcvUsd -> "METRIC_TOTAL_MEDIA_COST_ECPCV_USD"
1650+ PIMMetricTotalMediaCostEcpcAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPC_ADVERTISER"
1651+ PIMMetricTotalMediaCostEcpcPartner -> "METRIC_TOTAL_MEDIA_COST_ECPC_PARTNER"
1652+ PIMMetricTotalMediaCostEcpcUsd -> "METRIC_TOTAL_MEDIA_COST_ECPC_USD"
1653+ PIMMetricTotalMediaCostEcpmAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPM_ADVERTISER"
1654+ PIMMetricTotalMediaCostEcpmPartner -> "METRIC_TOTAL_MEDIA_COST_ECPM_PARTNER"
1655+ PIMMetricTotalMediaCostEcpmUsd -> "METRIC_TOTAL_MEDIA_COST_ECPM_USD"
1656+ PIMMetricTotalMediaCostPartner -> "METRIC_TOTAL_MEDIA_COST_PARTNER"
1657+ PIMMetricTotalMediaCostUsd -> "METRIC_TOTAL_MEDIA_COST_USD"
1658+ PIMMetricTrueviewConversionManyPerView -> "METRIC_TRUEVIEW_CONVERSION_MANY_PER_VIEW"
1659+ PIMMetricTrueviewConversionOnePerView -> "METRIC_TRUEVIEW_CONVERSION_ONE_PER_VIEW"
1660+ PIMMetricTrueviewConversionRateOnePerView -> "METRIC_TRUEVIEW_CONVERSION_RATE_ONE_PER_VIEW"
1661+ PIMMetricTrueviewCostConversionManyPerViewRatio -> "METRIC_TRUEVIEW_COST_CONVERSION_MANY_PER_VIEW_RATIO"
1662+ PIMMetricTrueviewCostConversionOnePerViewRatio -> "METRIC_TRUEVIEW_COST_CONVERSION_ONE_PER_VIEW_RATIO"
1663+ PIMMetricTrueviewCpvAdvertiser -> "METRIC_TRUEVIEW_CPV_ADVERTISER"
1664+ PIMMetricTrueviewCpvPartner -> "METRIC_TRUEVIEW_CPV_PARTNER"
1665+ PIMMetricTrueviewCpvUsd -> "METRIC_TRUEVIEW_CPV_USD"
1666+ PIMMetricTrueviewEarnedLikes -> "METRIC_TRUEVIEW_EARNED_LIKES"
1667+ PIMMetricTrueviewEarnedPlaylistAdditions -> "METRIC_TRUEVIEW_EARNED_PLAYLIST_ADDITIONS"
1668+ PIMMetricTrueviewEarnedShares -> "METRIC_TRUEVIEW_EARNED_SHARES"
1669+ PIMMetricTrueviewEarnedSubscribers -> "METRIC_TRUEVIEW_EARNED_SUBSCRIBERS"
1670+ PIMMetricTrueviewEarnedViews -> "METRIC_TRUEVIEW_EARNED_VIEWS"
1671+ PIMMetricTrueviewImpressionShare -> "METRIC_TRUEVIEW_IMPRESSION_SHARE"
1672+ PIMMetricTrueviewLostIsBudget -> "METRIC_TRUEVIEW_LOST_IS_BUDGET"
1673+ PIMMetricTrueviewLostIsRank -> "METRIC_TRUEVIEW_LOST_IS_RANK"
1674+ PIMMetricTrueviewTotalConversionValue -> "METRIC_TRUEVIEW_TOTAL_CONVERSION_VALUE"
1675+ PIMMetricTrueviewUniqueViewers -> "METRIC_TRUEVIEW_UNIQUE_VIEWERS"
1676+ PIMMetricTrueviewValueConversionManyPerViewRatio -> "METRIC_TRUEVIEW_VALUE_CONVERSION_MANY_PER_VIEW_RATIO"
1677+ PIMMetricTrueviewValueConversionOnePerViewRatio -> "METRIC_TRUEVIEW_VALUE_CONVERSION_ONE_PER_VIEW_RATIO"
1678+ PIMMetricTrueviewViews -> "METRIC_TRUEVIEW_VIEWS"
1679+ PIMMetricTrueviewViewRate -> "METRIC_TRUEVIEW_VIEW_RATE"
1680+ PIMMetricTrueviewViewThroughConversion -> "METRIC_TRUEVIEW_VIEW_THROUGH_CONVERSION"
1681+ PIMMetricUniqueVisitorsCookies -> "METRIC_UNIQUE_VISITORS_COOKIES"
1682+ PIMMetricUnknown -> "METRIC_UNKNOWN"
1683+ PIMMetricVideoCompanionClicks -> "METRIC_VIDEO_COMPANION_CLICKS"
1684+ PIMMetricVideoCompanionImpressions -> "METRIC_VIDEO_COMPANION_IMPRESSIONS"
1685+ PIMMetricVideoCompletionRate -> "METRIC_VIDEO_COMPLETION_RATE"
1686+
8471687-- | Report type.
8481688data ParametersType
8491689 = PTTypeActiveGrp
@@ -900,6 +1740,63 @@ data ParametersType
9001740
9011741instance Hashable ParametersType
9021742
1743+instance FromText ParametersType where
1744+ fromText = \case
1745+ "TYPE_ACTIVE_GRP" -> Just PTTypeActiveGrp
1746+ "TYPE_AUDIENCE_COMPOSITION" -> Just PTTypeAudienceComposition
1747+ "TYPE_AUDIENCE_PERFORMANCE" -> Just PTTypeAudiencePerformance
1748+ "TYPE_CLIENT_SAFE" -> Just PTTypeClientSafe
1749+ "TYPE_COMSCORE_VCE" -> Just PTTypeComscoreVce
1750+ "TYPE_CROSS_FEE" -> Just PTTypeCrossFee
1751+ "TYPE_CROSS_PARTNER" -> Just PTTypeCrossPartner
1752+ "TYPE_CROSS_PARTNER_THIRD_PARTY_DATA_PROVIDER" -> Just PTTypeCrossPartnerThirdPartyDataProvider
1753+ "TYPE_ESTIMATED_CONVERSION" -> Just PTTypeEstimatedConversion
1754+ "TYPE_FEE" -> Just PTTypeFee
1755+ "TYPE_GENERAL" -> Just PTTypeGeneral
1756+ "TYPE_INVENTORY_AVAILABILITY" -> Just PTTypeInventoryAvailability
1757+ "TYPE_KEYWORD" -> Just PTTypeKeyword
1758+ "TYPE_NIELSEN_AUDIENCE_PROFILE" -> Just PTTypeNielsenAudienceProfile
1759+ "TYPE_NIELSEN_DAILY_REACH_BUILD" -> Just PTTypeNielsenDailyReachBuild
1760+ "TYPE_NIELSEN_SITE" -> Just PTTypeNielsenSite
1761+ "TYPE_ORDER_ID" -> Just PTTypeOrderId
1762+ "TYPE_PAGE_CATEGORY" -> Just PTTypePageCategory
1763+ "TYPE_PIXEL_LOAD" -> Just PTTypePixelLoad
1764+ "TYPE_REACH_AND_FREQUENCY" -> Just PTTypeReachAndFrequency
1765+ "TYPE_THIRD_PARTY_DATA_PROVIDER" -> Just PTTypeThirdPartyDataProvider
1766+ "TYPE_TRUEVIEW" -> Just PTTypeTrueview
1767+ "TYPE_TRUEVIEW_IAR" -> Just PTTypeTrueviewIar
1768+ "TYPE_VERIFICATION" -> Just PTTypeVerification
1769+ "TYPE_YOUTUBE_VERTICAL" -> Just PTTypeYoutubeVertical
1770+ _ -> Nothing
1771+
1772+instance ToText ParametersType where
1773+ toText = \case
1774+ PTTypeActiveGrp -> "TYPE_ACTIVE_GRP"
1775+ PTTypeAudienceComposition -> "TYPE_AUDIENCE_COMPOSITION"
1776+ PTTypeAudiencePerformance -> "TYPE_AUDIENCE_PERFORMANCE"
1777+ PTTypeClientSafe -> "TYPE_CLIENT_SAFE"
1778+ PTTypeComscoreVce -> "TYPE_COMSCORE_VCE"
1779+ PTTypeCrossFee -> "TYPE_CROSS_FEE"
1780+ PTTypeCrossPartner -> "TYPE_CROSS_PARTNER"
1781+ PTTypeCrossPartnerThirdPartyDataProvider -> "TYPE_CROSS_PARTNER_THIRD_PARTY_DATA_PROVIDER"
1782+ PTTypeEstimatedConversion -> "TYPE_ESTIMATED_CONVERSION"
1783+ PTTypeFee -> "TYPE_FEE"
1784+ PTTypeGeneral -> "TYPE_GENERAL"
1785+ PTTypeInventoryAvailability -> "TYPE_INVENTORY_AVAILABILITY"
1786+ PTTypeKeyword -> "TYPE_KEYWORD"
1787+ PTTypeNielsenAudienceProfile -> "TYPE_NIELSEN_AUDIENCE_PROFILE"
1788+ PTTypeNielsenDailyReachBuild -> "TYPE_NIELSEN_DAILY_REACH_BUILD"
1789+ PTTypeNielsenSite -> "TYPE_NIELSEN_SITE"
1790+ PTTypeOrderId -> "TYPE_ORDER_ID"
1791+ PTTypePageCategory -> "TYPE_PAGE_CATEGORY"
1792+ PTTypePixelLoad -> "TYPE_PIXEL_LOAD"
1793+ PTTypeReachAndFrequency -> "TYPE_REACH_AND_FREQUENCY"
1794+ PTTypeThirdPartyDataProvider -> "TYPE_THIRD_PARTY_DATA_PROVIDER"
1795+ PTTypeTrueview -> "TYPE_TRUEVIEW"
1796+ PTTypeTrueviewIar -> "TYPE_TRUEVIEW_IAR"
1797+ PTTypeVerification -> "TYPE_VERIFICATION"
1798+ PTTypeYoutubeVertical -> "TYPE_YOUTUBE_VERTICAL"
1799+
9031800-- | Range of report data.
9041801data QueryMetadataDataRange
9051802 = QMDRAllTime
@@ -942,6 +1839,49 @@ data QueryMetadataDataRange
9421839
9431840instance Hashable QueryMetadataDataRange
9441841
1842+instance FromText QueryMetadataDataRange where
1843+ fromText = \case
1844+ "ALL_TIME" -> Just QMDRAllTime
1845+ "CURRENT_DAY" -> Just QMDRCurrentDay
1846+ "CUSTOM_DATES" -> Just QMDRCustomDates
1847+ "LAST_14_DAYS" -> Just QMDRLast14Days
1848+ "LAST_30_DAYS" -> Just QMDRLast30Days
1849+ "LAST_365_DAYS" -> Just QMDRLast365Days
1850+ "LAST_7_DAYS" -> Just QMDRLast7Days
1851+ "LAST_90_DAYS" -> Just QMDRLast90Days
1852+ "MONTH_TO_DATE" -> Just QMDRMonthToDate
1853+ "PREVIOUS_DAY" -> Just QMDRPreviousDay
1854+ "PREVIOUS_HALF_MONTH" -> Just QMDRPreviousHalfMonth
1855+ "PREVIOUS_MONTH" -> Just QMDRPreviousMonth
1856+ "PREVIOUS_QUARTER" -> Just QMDRPreviousQuarter
1857+ "PREVIOUS_WEEK" -> Just QMDRPreviousWeek
1858+ "PREVIOUS_YEAR" -> Just QMDRPreviousYear
1859+ "QUARTER_TO_DATE" -> Just QMDRQuarterToDate
1860+ "WEEK_TO_DATE" -> Just QMDRWeekToDate
1861+ "YEAR_TO_DATE" -> Just QMDRYearToDate
1862+ _ -> Nothing
1863+
1864+instance ToText QueryMetadataDataRange where
1865+ toText = \case
1866+ QMDRAllTime -> "ALL_TIME"
1867+ QMDRCurrentDay -> "CURRENT_DAY"
1868+ QMDRCustomDates -> "CUSTOM_DATES"
1869+ QMDRLast14Days -> "LAST_14_DAYS"
1870+ QMDRLast30Days -> "LAST_30_DAYS"
1871+ QMDRLast365Days -> "LAST_365_DAYS"
1872+ QMDRLast7Days -> "LAST_7_DAYS"
1873+ QMDRLast90Days -> "LAST_90_DAYS"
1874+ QMDRMonthToDate -> "MONTH_TO_DATE"
1875+ QMDRPreviousDay -> "PREVIOUS_DAY"
1876+ QMDRPreviousHalfMonth -> "PREVIOUS_HALF_MONTH"
1877+ QMDRPreviousMonth -> "PREVIOUS_MONTH"
1878+ QMDRPreviousQuarter -> "PREVIOUS_QUARTER"
1879+ QMDRPreviousWeek -> "PREVIOUS_WEEK"
1880+ QMDRPreviousYear -> "PREVIOUS_YEAR"
1881+ QMDRQuarterToDate -> "QUARTER_TO_DATE"
1882+ QMDRWeekToDate -> "WEEK_TO_DATE"
1883+ QMDRYearToDate -> "YEAR_TO_DATE"
1884+
9451885-- | Format of the generated report.
9461886data QueryMetadataFormat
9471887 = QMFCSV
@@ -954,6 +1894,19 @@ data QueryMetadataFormat
9541894
9551895instance Hashable QueryMetadataFormat
9561896
1897+instance FromText QueryMetadataFormat where
1898+ fromText = \case
1899+ "CSV" -> Just QMFCSV
1900+ "EXCEL_CSV" -> Just QMFExcelCSV
1901+ "XLSX" -> Just QMFXlsx
1902+ _ -> Nothing
1903+
1904+instance ToText QueryMetadataFormat where
1905+ toText = \case
1906+ QMFCSV -> "CSV"
1907+ QMFExcelCSV -> "EXCEL_CSV"
1908+ QMFXlsx -> "XLSX"
1909+
9571910-- | How often the query is run.
9581911data QueryScheduleFrequency
9591912 = QSFDaily
@@ -972,6 +1925,25 @@ data QueryScheduleFrequency
9721925
9731926instance Hashable QueryScheduleFrequency
9741927
1928+instance FromText QueryScheduleFrequency where
1929+ fromText = \case
1930+ "DAILY" -> Just QSFDaily
1931+ "MONTHLY" -> Just QSFMonthly
1932+ "ONE_TIME" -> Just QSFOneTime
1933+ "QUARTERLY" -> Just QSFQuarterly
1934+ "SEMI_MONTHLY" -> Just QSFSemiMonthly
1935+ "WEEKLY" -> Just QSFWeekly
1936+ _ -> Nothing
1937+
1938+instance ToText QueryScheduleFrequency where
1939+ toText = \case
1940+ QSFDaily -> "DAILY"
1941+ QSFMonthly -> "MONTHLY"
1942+ QSFOneTime -> "ONE_TIME"
1943+ QSFQuarterly -> "QUARTERLY"
1944+ QSFSemiMonthly -> "SEMI_MONTHLY"
1945+ QSFWeekly -> "WEEKLY"
1946+
9751947-- | Error code that shows why the report was not created.
9761948data ReportFailureErrorCode
9771949 = RFECAuthenticationError
@@ -1014,6 +1986,49 @@ data ReportFailureErrorCode
10141986
10151987instance Hashable ReportFailureErrorCode
10161988
1989+instance FromText ReportFailureErrorCode where
1990+ fromText = \case
1991+ "AUTHENTICATION_ERROR" -> Just RFECAuthenticationError
1992+ "DEPRECATED_REPORTING_INVALID_QUERY" -> Just RFECDeprecatedReportingInvalidQuery
1993+ "REPORTING_BUCKET_NOT_FOUND" -> Just RFECReportingBucketNotFound
1994+ "REPORTING_CREATE_BUCKET_FAILED" -> Just RFECReportingCreateBucketFailed
1995+ "REPORTING_DELETE_BUCKET_FAILED" -> Just RFECReportingDeleteBucketFailed
1996+ "REPORTING_FATAL_ERROR" -> Just RFECReportingFatalError
1997+ "REPORTING_ILLEGAL_FILENAME" -> Just RFECReportingIllegalFilename
1998+ "REPORTING_IMCOMPATIBLE_METRICS" -> Just RFECReportingImcompatibleMetrics
1999+ "REPORTING_INVALID_QUERY_MISSING_PARTNER_AND_ADVERTISER_FILTERS" -> Just RFECReportingInvalidQueryMissingPartnerAndAdvertiserFilters
2000+ "REPORTING_INVALID_QUERY_TITLE_MISSING" -> Just RFECReportingInvalidQueryTitleMissing
2001+ "REPORTING_INVALID_QUERY_TOO_MANY_UNFILTERED_LARGE_GROUP_BYS" -> Just RFECReportingInvalidQueryTooManyUnfilteredLargeGroupBys
2002+ "REPORTING_QUERY_NOT_FOUND" -> Just RFECReportingQueryNotFound
2003+ "REPORTING_TRANSIENT_ERROR" -> Just RFECReportingTransientError
2004+ "REPORTING_UPDATE_BUCKET_PERMISSION_FAILED" -> Just RFECReportingUpdateBucketPermissionFailed
2005+ "REPORTING_WRITE_BUCKET_OBJECT_FAILED" -> Just RFECReportingWriteBucketObjectFailed
2006+ "SERVER_ERROR" -> Just RFECServerError
2007+ "UNAUTHORIZED_API_ACCESS" -> Just RFECUnauthorizedAPIAccess
2008+ "VALIDATION_ERROR" -> Just RFECValidationError
2009+ _ -> Nothing
2010+
2011+instance ToText ReportFailureErrorCode where
2012+ toText = \case
2013+ RFECAuthenticationError -> "AUTHENTICATION_ERROR"
2014+ RFECDeprecatedReportingInvalidQuery -> "DEPRECATED_REPORTING_INVALID_QUERY"
2015+ RFECReportingBucketNotFound -> "REPORTING_BUCKET_NOT_FOUND"
2016+ RFECReportingCreateBucketFailed -> "REPORTING_CREATE_BUCKET_FAILED"
2017+ RFECReportingDeleteBucketFailed -> "REPORTING_DELETE_BUCKET_FAILED"
2018+ RFECReportingFatalError -> "REPORTING_FATAL_ERROR"
2019+ RFECReportingIllegalFilename -> "REPORTING_ILLEGAL_FILENAME"
2020+ RFECReportingImcompatibleMetrics -> "REPORTING_IMCOMPATIBLE_METRICS"
2021+ RFECReportingInvalidQueryMissingPartnerAndAdvertiserFilters -> "REPORTING_INVALID_QUERY_MISSING_PARTNER_AND_ADVERTISER_FILTERS"
2022+ RFECReportingInvalidQueryTitleMissing -> "REPORTING_INVALID_QUERY_TITLE_MISSING"
2023+ RFECReportingInvalidQueryTooManyUnfilteredLargeGroupBys -> "REPORTING_INVALID_QUERY_TOO_MANY_UNFILTERED_LARGE_GROUP_BYS"
2024+ RFECReportingQueryNotFound -> "REPORTING_QUERY_NOT_FOUND"
2025+ RFECReportingTransientError -> "REPORTING_TRANSIENT_ERROR"
2026+ RFECReportingUpdateBucketPermissionFailed -> "REPORTING_UPDATE_BUCKET_PERMISSION_FAILED"
2027+ RFECReportingWriteBucketObjectFailed -> "REPORTING_WRITE_BUCKET_OBJECT_FAILED"
2028+ RFECServerError -> "SERVER_ERROR"
2029+ RFECUnauthorizedAPIAccess -> "UNAUTHORIZED_API_ACCESS"
2030+ RFECValidationError -> "VALIDATION_ERROR"
2031+
10172032-- | The file type of the report.
10182033data ReportStatusFormat
10192034 = RSFCSV
@@ -1026,6 +2041,19 @@ data ReportStatusFormat
10262041
10272042instance Hashable ReportStatusFormat
10282043
2044+instance FromText ReportStatusFormat where
2045+ fromText = \case
2046+ "CSV" -> Just RSFCSV
2047+ "EXCEL_CSV" -> Just RSFExcelCSV
2048+ "XLSX" -> Just RSFXlsx
2049+ _ -> Nothing
2050+
2051+instance ToText ReportStatusFormat where
2052+ toText = \case
2053+ RSFCSV -> "CSV"
2054+ RSFExcelCSV -> "EXCEL_CSV"
2055+ RSFXlsx -> "XLSX"
2056+
10292057-- | The state of the report.
10302058data ReportStatusState
10312059 = RSSDone
@@ -1038,6 +2066,19 @@ data ReportStatusState
10382066
10392067instance Hashable ReportStatusState
10402068
2069+instance FromText ReportStatusState where
2070+ fromText = \case
2071+ "DONE" -> Just RSSDone
2072+ "FAILED" -> Just RSSFailed
2073+ "RUNNING" -> Just RSSRunning
2074+ _ -> Nothing
2075+
2076+instance ToText ReportStatusState where
2077+ toText = \case
2078+ RSSDone -> "DONE"
2079+ RSSFailed -> "FAILED"
2080+ RSSRunning -> "RUNNING"
2081+
10412082-- | Report data range used to generate the report.
10422083data RunQueryRequestDataRange
10432084 = RQRDRAllTime
@@ -1080,6 +2121,49 @@ data RunQueryRequestDataRange
10802121
10812122instance Hashable RunQueryRequestDataRange
10822123
2124+instance FromText RunQueryRequestDataRange where
2125+ fromText = \case
2126+ "ALL_TIME" -> Just RQRDRAllTime
2127+ "CURRENT_DAY" -> Just RQRDRCurrentDay
2128+ "CUSTOM_DATES" -> Just RQRDRCustomDates
2129+ "LAST_14_DAYS" -> Just RQRDRLast14Days
2130+ "LAST_30_DAYS" -> Just RQRDRLast30Days
2131+ "LAST_365_DAYS" -> Just RQRDRLast365Days
2132+ "LAST_7_DAYS" -> Just RQRDRLast7Days
2133+ "LAST_90_DAYS" -> Just RQRDRLast90Days
2134+ "MONTH_TO_DATE" -> Just RQRDRMonthToDate
2135+ "PREVIOUS_DAY" -> Just RQRDRPreviousDay
2136+ "PREVIOUS_HALF_MONTH" -> Just RQRDRPreviousHalfMonth
2137+ "PREVIOUS_MONTH" -> Just RQRDRPreviousMonth
2138+ "PREVIOUS_QUARTER" -> Just RQRDRPreviousQuarter
2139+ "PREVIOUS_WEEK" -> Just RQRDRPreviousWeek
2140+ "PREVIOUS_YEAR" -> Just RQRDRPreviousYear
2141+ "QUARTER_TO_DATE" -> Just RQRDRQuarterToDate
2142+ "WEEK_TO_DATE" -> Just RQRDRWeekToDate
2143+ "YEAR_TO_DATE" -> Just RQRDRYearToDate
2144+ _ -> Nothing
2145+
2146+instance ToText RunQueryRequestDataRange where
2147+ toText = \case
2148+ RQRDRAllTime -> "ALL_TIME"
2149+ RQRDRCurrentDay -> "CURRENT_DAY"
2150+ RQRDRCustomDates -> "CUSTOM_DATES"
2151+ RQRDRLast14Days -> "LAST_14_DAYS"
2152+ RQRDRLast30Days -> "LAST_30_DAYS"
2153+ RQRDRLast365Days -> "LAST_365_DAYS"
2154+ RQRDRLast7Days -> "LAST_7_DAYS"
2155+ RQRDRLast90Days -> "LAST_90_DAYS"
2156+ RQRDRMonthToDate -> "MONTH_TO_DATE"
2157+ RQRDRPreviousDay -> "PREVIOUS_DAY"
2158+ RQRDRPreviousHalfMonth -> "PREVIOUS_HALF_MONTH"
2159+ RQRDRPreviousMonth -> "PREVIOUS_MONTH"
2160+ RQRDRPreviousQuarter -> "PREVIOUS_QUARTER"
2161+ RQRDRPreviousWeek -> "PREVIOUS_WEEK"
2162+ RQRDRPreviousYear -> "PREVIOUS_YEAR"
2163+ RQRDRQuarterToDate -> "QUARTER_TO_DATE"
2164+ RQRDRWeekToDate -> "WEEK_TO_DATE"
2165+ RQRDRYearToDate -> "YEAR_TO_DATE"
2166+
10832167-- | Format the line items are in. Default to CSV.
10842168data UploadLineItemsRequestFormat
10852169 = ULIRFCSV
@@ -1087,3 +2171,12 @@ data UploadLineItemsRequestFormat
10872171 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
10882172
10892173instance Hashable UploadLineItemsRequestFormat
2174+
2175+instance FromText UploadLineItemsRequestFormat where
2176+ fromText = \case
2177+ "CSV" -> Just ULIRFCSV
2178+ _ -> Nothing
2179+
2180+instance ToText UploadLineItemsRequestFormat where
2181+ toText = \case
2182+ ULIRFCSV -> "CSV"
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DoubleClickSearch.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.DoubleClickSearch.Types
1416 (
15− -- * API Definition
16− doubleclicksearch
17−
1817
1918 -- * Availability
20− , Availability
19+ Availability
2120 , availability
2221 , aAgencyId
2322 , aAdvertiserId
@@ -194,6 +193,3 @@ module Network.Google.DoubleClickSearch.Types
194193import Network.Google.DoubleClickSearch.Types.Product
195194import Network.Google.DoubleClickSearch.Types.Sum
196195import Network.Google.Prelude
197−
198−doubleclicksearch :: a
199−doubleclicksearch = error "doubleclicksearch"
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.DoubleClickSearch.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.DoubleClickSearch.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-drive/gen/Network/Google/Drive/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Drive.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Drive.Types
1416 (
15− -- * API Definition
16− drive
17−
1817
1918 -- * About
20− , About
19+ About
2120 , about
2221 , aExportFormats
2322 , aRemainingChangeIds
@@ -508,6 +507,3 @@ module Network.Google.Drive.Types
508507import Network.Google.Drive.Types.Product
509508import Network.Google.Drive.Types.Sum
510509import Network.Google.Prelude
511−
512−drive :: a
513−drive = error "drive"
gogol-drive/gen/Network/Google/Drive/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Drive.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-drive/gen/Network/Google/Drive/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Drive.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-fitness/gen/Network/Google/Fitness/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Fitness.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Fitness.Types
1416 (
15− -- * API Definition
16− fitness
17−
1817
1918 -- * AggregateBucket
20− , AggregateBucket
19+ AggregateBucket
2120 , aggregateBucket
2221 , abEndTimeMillis
2322 , abDataset
@@ -186,6 +185,3 @@ module Network.Google.Fitness.Types
186185import Network.Google.Fitness.Types.Product
187186import Network.Google.Fitness.Types.Sum
188187import Network.Google.Prelude
189−
190−fitness :: a
191−fitness = error "fitness"
gogol-fitness/gen/Network/Google/Fitness/Types/Product.hs+6−4
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Fitness.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -24,7 +26,7 @@ data AggregateBucket = AggregateBucket
2426 , _abType :: !(Maybe AggregateBucketType)
2527 , _abStartTimeMillis :: !(Maybe Int64)
2628 , _abSession :: !(Maybe (Maybe Session))
27− }
29+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
2830
2931-- | Creates a value of 'AggregateBucket' with the minimum fields required to make a request.
3032--
@@ -542,7 +544,7 @@ data DataSource = DataSource
542544 , _dsType :: !(Maybe DataSourceType)
543545 , _dsDataStreamName :: !(Maybe Text)
544546 , _dsDataStreamId :: !(Maybe Text)
545− }
547+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
546548
547549-- | Creates a value of 'DataSource' with the minimum fields required to make a request.
548550--
@@ -686,7 +688,7 @@ data DataTypeField = DataTypeField
686688 { _dtfFormat :: !(Maybe DataTypeFieldFormat)
687689 , _dtfName :: !(Maybe Text)
688690 , _dtfOptional :: !(Maybe Bool)
689− }
691+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
690692
691693-- | Creates a value of 'DataTypeField' with the minimum fields required to make a request.
692694--
@@ -817,7 +819,7 @@ data Device = Device
817819 , _dModel :: !(Maybe Text)
818820 , _dVersion :: !(Maybe Text)
819821 , _dType :: !(Maybe DeviceType)
820− }
822+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
821823
822824-- | Creates a value of 'Device' with the minimum fields required to make a request.
823825--
gogol-fitness/gen/Network/Google/Fitness/Types/Sum.hs+69
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Fitness.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -31,6 +34,23 @@ data AggregateBucketType
3134
3235instance Hashable AggregateBucketType
3336
37+instance FromText AggregateBucketType where
38+ fromText = \case
39+ "activitySegment" -> Just ABTActivitySegment
40+ "activityType" -> Just ABTActivityType
41+ "session" -> Just ABTSession
42+ "time" -> Just ABTTime
43+ "unknown" -> Just ABTUnknown
44+ _ -> Nothing
45+
46+instance ToText AggregateBucketType where
47+ toText = \case
48+ ABTActivitySegment -> "activitySegment"
49+ ABTActivityType -> "activityType"
50+ ABTSession -> "session"
51+ ABTTime -> "time"
52+ ABTUnknown -> "unknown"
53+
3454-- | A constant describing the type of this data source. Indicates whether
3555-- this data source produces raw or derived data.
3656data DataSourceType
@@ -42,6 +62,17 @@ data DataSourceType
4262
4363instance Hashable DataSourceType
4464
65+instance FromText DataSourceType where
66+ fromText = \case
67+ "derived" -> Just DSTDerived
68+ "raw" -> Just DSTRaw
69+ _ -> Nothing
70+
71+instance ToText DataSourceType where
72+ toText = \case
73+ DSTDerived -> "derived"
74+ DSTRaw -> "raw"
75+
4576-- | The different supported formats for each field in a data type.
4677data DataTypeFieldFormat
4778 = DTFFFloatList
@@ -60,6 +91,25 @@ data DataTypeFieldFormat
6091
6192instance Hashable DataTypeFieldFormat
6293
94+instance FromText DataTypeFieldFormat where
95+ fromText = \case
96+ "floatList" -> Just DTFFFloatList
97+ "floatPoint" -> Just DTFFFloatPoint
98+ "integer" -> Just DTFFInteger
99+ "integerList" -> Just DTFFIntegerList
100+ "map" -> Just DTFFMap
101+ "string" -> Just DTFFString
102+ _ -> Nothing
103+
104+instance ToText DataTypeFieldFormat where
105+ toText = \case
106+ DTFFFloatList -> "floatList"
107+ DTFFFloatPoint -> "floatPoint"
108+ DTFFInteger -> "integer"
109+ DTFFIntegerList -> "integerList"
110+ DTFFMap -> "map"
111+ DTFFString -> "string"
112+
63113-- | A constant representing the type of the device.
64114data DeviceType
65115 = DTChestStrap
@@ -77,3 +127,22 @@ data DeviceType
77127 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
78128
79129instance Hashable DeviceType
130+
131+instance FromText DeviceType where
132+ fromText = \case
133+ "chestStrap" -> Just DTChestStrap
134+ "phone" -> Just DTPhone
135+ "scale" -> Just DTScale
136+ "tablet" -> Just DTTablet
137+ "unknown" -> Just DTUnknown
138+ "watch" -> Just DTWatch
139+ _ -> Nothing
140+
141+instance ToText DeviceType where
142+ toText = \case
143+ DTChestStrap -> "chestStrap"
144+ DTPhone -> "phone"
145+ DTScale -> "scale"
146+ DTTablet -> "tablet"
147+ DTUnknown -> "unknown"
148+ DTWatch -> "watch"
gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.FreebaseSearch.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.FreebaseSearch.Types
1416 (
15− -- * API Definition
16− freebase
17−
1817
1918 -- * ReconcileCandidate
20− , ReconcileCandidate
19+ ReconcileCandidate
2120 , reconcileCandidate
2221 , rcLang
2322 , rcConfidence
@@ -56,6 +55,3 @@ module Network.Google.FreebaseSearch.Types
5655import Network.Google.FreebaseSearch.Types.Product
5756import Network.Google.FreebaseSearch.Types.Sum
5857import Network.Google.Prelude
59−
60−freebase :: a
61−freebase = error "freebase"
gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.FreebaseSearch.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.FreebaseSearch.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-fusiontables/gen/Network/Google/FusionTables/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.FusionTables.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.FusionTables.Types
1416 (
15− -- * API Definition
16− fusiontables
17−
1817
1918 -- * Bucket
20− , Bucket
19+ Bucket
2120 , bucket
2221 , bMax
2322 , bColor
@@ -224,6 +223,3 @@ module Network.Google.FusionTables.Types
224223import Network.Google.FusionTables.Types.Product
225224import Network.Google.FusionTables.Types.Sum
226225import Network.Google.Prelude
227−
228−fusiontables :: a
229−fusiontables = error "fusiontables"
gogol-fusiontables/gen/Network/Google/FusionTables/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.FusionTables.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-fusiontables/gen/Network/Google/FusionTables/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.FusionTables.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.GamesConfiguration.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.GamesConfiguration.Types
1416 (
15− -- * API Definition
16− gamesConfiguration
17−
1817
1918 -- * AchievementConfiguration
20− , AchievementConfiguration
19+ AchievementConfiguration
2120 , achievementConfiguration
2221 , acAchievementType
2322 , acStepsToUnlock
@@ -116,6 +115,3 @@ module Network.Google.GamesConfiguration.Types
116115import Network.Google.GamesConfiguration.Types.Product
117116import Network.Google.GamesConfiguration.Types.Sum
118117import Network.Google.Prelude
119−
120−gamesConfiguration :: a
121−gamesConfiguration = error "gamesConfiguration"
gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.GamesConfiguration.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.GamesConfiguration.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-games-management/gen/Network/Google/GamesManagement/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.GamesManagement.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.GamesManagement.Types
1416 (
15− -- * API Definition
16− gamesManagement
17−
1817
1918 -- * AchievementResetAllResponse
20− , AchievementResetAllResponse
19+ AchievementResetAllResponse
2120 , achievementResetAllResponse
2221 , ararResults
2322 , ararKind
@@ -124,6 +123,3 @@ module Network.Google.GamesManagement.Types
124123import Network.Google.GamesManagement.Types.Product
125124import Network.Google.GamesManagement.Types.Sum
126125import Network.Google.Prelude
127−
128−gamesManagement :: a
129−gamesManagement = error "gamesManagement"
gogol-games-management/gen/Network/Google/GamesManagement/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.GamesManagement.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-games-management/gen/Network/Google/GamesManagement/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.GamesManagement.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-games/gen/Network/Google/Games/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Games.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Games.Types
1416 (
15− -- * API Definition
16− games
17−
1817
1918 -- * AchievementDefinition
20− , AchievementDefinition
19+ AchievementDefinition
2120 , achievementDefinition
2221 , adAchievementType
2322 , adFormattedTotalSteps
@@ -883,6 +882,3 @@ module Network.Google.Games.Types
883882import Network.Google.Games.Types.Product
884883import Network.Google.Games.Types.Sum
885884import Network.Google.Prelude
886−
887−games :: a
888−games = error "games"
gogol-games/gen/Network/Google/Games/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Games.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-games/gen/Network/Google/Games/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Games.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-genomics/gen/Network/Google/Genomics/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Genomics.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Genomics.Types
1416 (
15− -- * API Definition
16− genomics
17−
1817
1918 -- * AlignReadGroupSetsRequest
20− , AlignReadGroupSetsRequest
19+ AlignReadGroupSetsRequest
2120 , alignReadGroupSetsRequest
2221 , argsrInterleavedFastqSource
2322 , argsrReadGroupSetId
@@ -720,6 +719,3 @@ module Network.Google.Genomics.Types
720719import Network.Google.Genomics.Types.Product
721720import Network.Google.Genomics.Types.Sum
722721import Network.Google.Prelude
723−
724−genomics :: a
725−genomics = error "genomics"
gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+14−12
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Genomics.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -137,7 +139,7 @@ data Annotation = Annotation
137139 , _aTranscript :: !(Maybe (Maybe Transcript))
138140 , _aInfo :: !(Maybe AnnotationInfo)
139141 , _aPosition :: !(Maybe (Maybe RangePosition))
140− }
142+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
141143
142144-- | Creates a value of 'Annotation' with the minimum fields required to make a request.
143145--
@@ -242,7 +244,7 @@ data AnnotationSet = AnnotationSet
242244 , _asType :: !(Maybe AnnotationSetType)
243245 , _asSourceUri :: !(Maybe Text)
244246 , _asInfo :: !(Maybe AnnotationSetInfo)
245− }
247+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
246248
247249-- | Creates a value of 'AnnotationSet' with the minimum fields required to make a request.
248250--
@@ -714,7 +716,7 @@ data CigarUnit = CigarUnit
714716 { _cuOperation :: !(Maybe CigarUnitOperation)
715717 , _cuOperationLength :: !(Maybe Int64)
716718 , _cuReferenceSequence :: !(Maybe Text)
717− }
719+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
718720
719721-- | Creates a value of 'CigarUnit' with the minimum fields required to make a request.
720722--
@@ -1057,7 +1059,7 @@ data ExportVariantSetRequest = ExportVariantSetRequest
10571059 , _evsrFormat :: !(Maybe ExportVariantSetRequestFormat)
10581060 , _evsrProjectNumber :: !(Maybe Int64)
10591061 , _evsrCallSetIds :: !(Maybe [Text])
1060− }
1062+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
10611063
10621064-- | Creates a value of 'ExportVariantSetRequest' with the minimum fields required to make a request.
10631065--
@@ -1249,7 +1251,7 @@ data ImportReadGroupSetsRequest = ImportReadGroupSetsRequest
12491251 , _irgsrDatasetId :: !(Maybe Text)
12501252 , _irgsrSourceUris :: !(Maybe [Text])
12511253 , _irgsrPartitionStrategy :: !(Maybe ImportReadGroupSetsRequestPartitionStrategy)
1252− }
1254+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
12531255
12541256-- | Creates a value of 'ImportReadGroupSetsRequest' with the minimum fields required to make a request.
12551257--
@@ -1335,7 +1337,7 @@ data ImportVariantsRequest = ImportVariantsRequest
13351337 { _ivrFormat :: !(Maybe ImportVariantsRequestFormat)
13361338 , _ivrNormalizeReferenceNames :: !(Maybe Bool)
13371339 , _ivrSourceUris :: !(Maybe [Text])
1338− }
1340+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
13391341
13401342-- | Creates a value of 'ImportVariantsRequest' with the minimum fields required to make a request.
13411343--
@@ -1483,7 +1485,7 @@ data Job = Job
14831485 , _jobId :: !(Maybe Text)
14841486 , _jobErrors :: !(Maybe [Text])
14851487 , _jobRequest :: !(Maybe (Maybe JobRequest))
1486− }
1488+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
14871489
14881490-- | Creates a value of 'Job' with the minimum fields required to make a request.
14891491--
@@ -1582,7 +1584,7 @@ data JobRequest = JobRequest
15821584 { _jrDestination :: !(Maybe [Text])
15831585 , _jrSource :: !(Maybe [Text])
15841586 , _jrType :: !(Maybe JobRequestType)
1585− }
1587+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
15861588
15871589-- | Creates a value of 'JobRequest' with the minimum fields required to make a request.
15881590--
@@ -1882,7 +1884,7 @@ data Metadata = Metadata
18821884 , _mNumber :: !(Maybe Text)
18831885 , _mDescription :: !(Maybe Text)
18841886 , _mInfo :: !(Maybe MetadataInfo)
1885− }
1887+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
18861888
18871889-- | Creates a value of 'Metadata' with the minimum fields required to make a request.
18881890--
@@ -3076,7 +3078,7 @@ data SearchAnnotationSetsRequest = SearchAnnotationSetsRequest
30763078 , _sasrName :: !(Maybe Text)
30773079 , _sasrPageToken :: !(Maybe Text)
30783080 , _sasrPageSize :: !(Maybe Int32)
3079− }
3081+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
30803082
30813083-- | Creates a value of 'SearchAnnotationSetsRequest' with the minimum fields required to make a request.
30823084--
@@ -3392,7 +3394,7 @@ data SearchJobsRequest = SearchJobsRequest
33923394 , _sjrPageToken :: !(Maybe Text)
33933395 , _sjrPageSize :: !(Maybe Int32)
33943396 , _sjrCreatedBefore :: !(Maybe Int64)
3395− }
3397+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
33963398
33973399-- | Creates a value of 'SearchJobsRequest' with the minimum fields required to make a request.
33983400--
@@ -4511,7 +4513,7 @@ data VariantAnnotation = VariantAnnotation
45114513 , _vaConditions :: !(Maybe [Maybe VariantAnnotationCondition])
45124514 , _vaType :: !(Maybe VariantAnnotationType)
45134515 , _vaTranscriptIds :: !(Maybe [Text])
4514− }
4516+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
45154517
45164518-- | Creates a value of 'VariantAnnotation' with the minimum fields required to make a request.
45174519--
gogol-genomics/gen/Network/Google/Genomics/Types/Sum.hs+273
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Genomics.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -28,6 +31,21 @@ data AnnotationSetType
2831
2932instance Hashable AnnotationSetType
3033
34+instance FromText AnnotationSetType where
35+ fromText = \case
36+ "GENE" -> Just ASTGene
37+ "GENERIC" -> Just ASTGeneric
38+ "TRANSCRIPT" -> Just ASTTranscript
39+ "VARIANT" -> Just ASTVariant
40+ _ -> Nothing
41+
42+instance ToText AnnotationSetType where
43+ toText = \case
44+ ASTGene -> "GENE"
45+ ASTGeneric -> "GENERIC"
46+ ASTTranscript -> "TRANSCRIPT"
47+ ASTVariant -> "VARIANT"
48+
3149-- | The data type for this annotation. Must match the containing annotation
3250-- set\'s type.
3351data AnnotationType
@@ -43,6 +61,21 @@ data AnnotationType
4361
4462instance Hashable AnnotationType
4563
64+instance FromText AnnotationType where
65+ fromText = \case
66+ "GENE" -> Just ATGene
67+ "GENERIC" -> Just ATGeneric
68+ "TRANSCRIPT" -> Just ATTranscript
69+ "VARIANT" -> Just ATVariant
70+ _ -> Nothing
71+
72+instance ToText AnnotationType where
73+ toText = \case
74+ ATGene -> "GENE"
75+ ATGeneric -> "GENERIC"
76+ ATTranscript -> "TRANSCRIPT"
77+ ATVariant -> "VARIANT"
78+
4679data CigarUnitOperation
4780 = CUOAlignmentMatch
4881 -- ^ @ALIGNMENT_MATCH@
@@ -68,6 +101,33 @@ data CigarUnitOperation
68101
69102instance Hashable CigarUnitOperation
70103
104+instance FromText CigarUnitOperation where
105+ fromText = \case
106+ "ALIGNMENT_MATCH" -> Just CUOAlignmentMatch
107+ "CLIP_HARD" -> Just CUOClipHard
108+ "CLIP_SOFT" -> Just CUOClipSoft
109+ "DELETE" -> Just CUODelete
110+ "INSERT" -> Just CUOInsert
111+ "OPERATION_UNSPECIFIED" -> Just CUOOperationUnspecified
112+ "PAD" -> Just CUOPad
113+ "SEQUENCE_MATCH" -> Just CUOSequenceMatch
114+ "SEQUENCE_MISMATCH" -> Just CUOSequenceMismatch
115+ "SKIP" -> Just CUOSkip
116+ _ -> Nothing
117+
118+instance ToText CigarUnitOperation where
119+ toText = \case
120+ CUOAlignmentMatch -> "ALIGNMENT_MATCH"
121+ CUOClipHard -> "CLIP_HARD"
122+ CUOClipSoft -> "CLIP_SOFT"
123+ CUODelete -> "DELETE"
124+ CUOInsert -> "INSERT"
125+ CUOOperationUnspecified -> "OPERATION_UNSPECIFIED"
126+ CUOPad -> "PAD"
127+ CUOSequenceMatch -> "SEQUENCE_MATCH"
128+ CUOSequenceMismatch -> "SEQUENCE_MISMATCH"
129+ CUOSkip -> "SKIP"
130+
71131-- | The format for the exported data.
72132data ExportVariantSetRequestFormat
73133 = EVSRFBigquery
@@ -76,6 +136,15 @@ data ExportVariantSetRequestFormat
76136
77137instance Hashable ExportVariantSetRequestFormat
78138
139+instance FromText ExportVariantSetRequestFormat where
140+ fromText = \case
141+ "BIGQUERY" -> Just EVSRFBigquery
142+ _ -> Nothing
143+
144+instance ToText ExportVariantSetRequestFormat where
145+ toText = \case
146+ EVSRFBigquery -> "BIGQUERY"
147+
79148-- | The partition strategy describes how read groups are partitioned into
80149-- read group sets.
81150data ImportReadGroupSetsRequestPartitionStrategy
@@ -87,6 +156,17 @@ data ImportReadGroupSetsRequestPartitionStrategy
87156
88157instance Hashable ImportReadGroupSetsRequestPartitionStrategy
89158
159+instance FromText ImportReadGroupSetsRequestPartitionStrategy where
160+ fromText = \case
161+ "MERGE_ALL" -> Just IRGSRPSMergeAll
162+ "PER_FILE_PER_SAMPLE" -> Just IRGSRPSPerFilePerSample
163+ _ -> Nothing
164+
165+instance ToText ImportReadGroupSetsRequestPartitionStrategy where
166+ toText = \case
167+ IRGSRPSMergeAll -> "MERGE_ALL"
168+ IRGSRPSPerFilePerSample -> "PER_FILE_PER_SAMPLE"
169+
90170-- | The format of the variant data being imported. If unspecified, defaults
91171-- to to \"VCF\".
92172data ImportVariantsRequestFormat
@@ -98,6 +178,17 @@ data ImportVariantsRequestFormat
98178
99179instance Hashable ImportVariantsRequestFormat
100180
181+instance FromText ImportVariantsRequestFormat where
182+ fromText = \case
183+ "COMPLETE_GENOMICS" -> Just IVRFCompleteGenomics
184+ "VCF" -> Just IVRFVcf
185+ _ -> Nothing
186+
187+instance ToText ImportVariantsRequestFormat where
188+ toText = \case
189+ IVRFCompleteGenomics -> "COMPLETE_GENOMICS"
190+ IVRFVcf -> "VCF"
191+
101192-- | The original request type.
102193data JobRequestType
103194 = JRTAlignReadsets
@@ -120,6 +211,29 @@ data JobRequestType
120211
121212instance Hashable JobRequestType
122213
214+instance FromText JobRequestType where
215+ fromText = \case
216+ "ALIGN_READSETS" -> Just JRTAlignReadsets
217+ "CALL_READSETS" -> Just JRTCallReadsets
218+ "EXPERIMENTAL_CREATE_JOB" -> Just JRTExperimentalCreateJob
219+ "EXPORT_READSETS" -> Just JRTExportReadsets
220+ "EXPORT_VARIANTS" -> Just JRTExportVariants
221+ "IMPORT_READSETS" -> Just JRTImportReadsets
222+ "IMPORT_VARIANTS" -> Just JRTImportVariants
223+ "UNKNOWN_TYPE" -> Just JRTUnknownType
224+ _ -> Nothing
225+
226+instance ToText JobRequestType where
227+ toText = \case
228+ JRTAlignReadsets -> "ALIGN_READSETS"
229+ JRTCallReadsets -> "CALL_READSETS"
230+ JRTExperimentalCreateJob -> "EXPERIMENTAL_CREATE_JOB"
231+ JRTExportReadsets -> "EXPORT_READSETS"
232+ JRTExportVariants -> "EXPORT_VARIANTS"
233+ JRTImportReadsets -> "IMPORT_READSETS"
234+ JRTImportVariants -> "IMPORT_VARIANTS"
235+ JRTUnknownType -> "UNKNOWN_TYPE"
236+
123237-- | The status of this job.
124238data JobStatus
125239 = JSCanceled
@@ -140,6 +254,27 @@ data JobStatus
140254
141255instance Hashable JobStatus
142256
257+instance FromText JobStatus where
258+ fromText = \case
259+ "CANCELED" -> Just JSCanceled
260+ "FAILURE" -> Just JSFailure
261+ "NEW" -> Just JSNew
262+ "PENDING" -> Just JSPending
263+ "RUNNING" -> Just JSRunning
264+ "SUCCESS" -> Just JSSuccess
265+ "UNKNOWN_STATUS" -> Just JSUnknownStatus
266+ _ -> Nothing
267+
268+instance ToText JobStatus where
269+ toText = \case
270+ JSCanceled -> "CANCELED"
271+ JSFailure -> "FAILURE"
272+ JSNew -> "NEW"
273+ JSPending -> "PENDING"
274+ JSRunning -> "RUNNING"
275+ JSSuccess -> "SUCCESS"
276+ JSUnknownStatus -> "UNKNOWN_STATUS"
277+
143278-- | The type of data. Possible types include: Integer, Float, Flag,
144279-- Character, and String.
145280data MetadataType
@@ -159,6 +294,25 @@ data MetadataType
159294
160295instance Hashable MetadataType
161296
297+instance FromText MetadataType where
298+ fromText = \case
299+ "CHARACTER" -> Just MTCharacter
300+ "FLAG" -> Just MTFlag
301+ "FLOAT" -> Just MTFloat
302+ "INTEGER" -> Just MTInteger
303+ "STRING" -> Just MTString
304+ "UNKNOWN_TYPE" -> Just MTUnknownType
305+ _ -> Nothing
306+
307+instance ToText MetadataType where
308+ toText = \case
309+ MTCharacter -> "CHARACTER"
310+ MTFlag -> "FLAG"
311+ MTFloat -> "FLOAT"
312+ MTInteger -> "INTEGER"
313+ MTString -> "STRING"
314+ MTUnknownType -> "UNKNOWN_TYPE"
315+
162316data SearchAnnotationSetsRequestItemTypes
163317 = SASRITGene
164318 -- ^ @GENE@
@@ -172,6 +326,21 @@ data SearchAnnotationSetsRequestItemTypes
172326
173327instance Hashable SearchAnnotationSetsRequestItemTypes
174328
329+instance FromText SearchAnnotationSetsRequestItemTypes where
330+ fromText = \case
331+ "GENE" -> Just SASRITGene
332+ "GENERIC" -> Just SASRITGeneric
333+ "TRANSCRIPT" -> Just SASRITTranscript
334+ "VARIANT" -> Just SASRITVariant
335+ _ -> Nothing
336+
337+instance ToText SearchAnnotationSetsRequestItemTypes where
338+ toText = \case
339+ SASRITGene -> "GENE"
340+ SASRITGeneric -> "GENERIC"
341+ SASRITTranscript -> "TRANSCRIPT"
342+ SASRITVariant -> "VARIANT"
343+
175344data SearchJobsRequestItemStatus
176345 = SJRISCanceled
177346 -- ^ @CANCELED@
@@ -191,6 +360,27 @@ data SearchJobsRequestItemStatus
191360
192361instance Hashable SearchJobsRequestItemStatus
193362
363+instance FromText SearchJobsRequestItemStatus where
364+ fromText = \case
365+ "CANCELED" -> Just SJRISCanceled
366+ "FAILURE" -> Just SJRISFailure
367+ "NEW" -> Just SJRISNew
368+ "PENDING" -> Just SJRISPending
369+ "RUNNING" -> Just SJRISRunning
370+ "SUCCESS" -> Just SJRISSuccess
371+ "UNKNOWN_STATUS" -> Just SJRISUnknownStatus
372+ _ -> Nothing
373+
374+instance ToText SearchJobsRequestItemStatus where
375+ toText = \case
376+ SJRISCanceled -> "CANCELED"
377+ SJRISFailure -> "FAILURE"
378+ SJRISNew -> "NEW"
379+ SJRISPending -> "PENDING"
380+ SJRISRunning -> "RUNNING"
381+ SJRISSuccess -> "SUCCESS"
382+ SJRISUnknownStatus -> "UNKNOWN_STATUS"
383+
194384-- | Describes the clinical significance of a variant. It is adapted from the
195385-- ClinVar controlled vocabulary for clinical significance described at:
196386-- http:\/\/www.ncbi.nlm.nih.gov\/clinvar\/docs\/clinsig\/
@@ -227,6 +417,41 @@ data VariantAnnotationClinicalSignificance
227417
228418instance Hashable VariantAnnotationClinicalSignificance
229419
420+instance FromText VariantAnnotationClinicalSignificance where
421+ fromText = \case
422+ "ASSOCIATION" -> Just VACSAssociation
423+ "BENIGN" -> Just VACSBenign
424+ "CLINICAL_SIGNIFICANCE_UNSPECIFIED" -> Just VACSClinicalSignificanceUnspecified
425+ "CONFERS_SENSITIVITY" -> Just VACSConfersSensitivity
426+ "DRUG_RESPONSE" -> Just VACSDrugResponse
427+ "HISTOCOMPATIBILITY" -> Just VACSHistocompatibility
428+ "LIKELY_BENIGN" -> Just VACSLikelyBenign
429+ "LIKELY_PATHOGENIC" -> Just VACSLikelyPathogenic
430+ "MULTIPLE_REPORTED" -> Just VACSMultipleReported
431+ "OTHER" -> Just VACSOther
432+ "PATHOGENIC" -> Just VACSPathogenic
433+ "PROTECTIVE" -> Just VACSProtective
434+ "RISK_FACTOR" -> Just VACSRiskFactor
435+ "UNCERTAIN" -> Just VACSUncertain
436+ _ -> Nothing
437+
438+instance ToText VariantAnnotationClinicalSignificance where
439+ toText = \case
440+ VACSAssociation -> "ASSOCIATION"
441+ VACSBenign -> "BENIGN"
442+ VACSClinicalSignificanceUnspecified -> "CLINICAL_SIGNIFICANCE_UNSPECIFIED"
443+ VACSConfersSensitivity -> "CONFERS_SENSITIVITY"
444+ VACSDrugResponse -> "DRUG_RESPONSE"
445+ VACSHistocompatibility -> "HISTOCOMPATIBILITY"
446+ VACSLikelyBenign -> "LIKELY_BENIGN"
447+ VACSLikelyPathogenic -> "LIKELY_PATHOGENIC"
448+ VACSMultipleReported -> "MULTIPLE_REPORTED"
449+ VACSOther -> "OTHER"
450+ VACSPathogenic -> "PATHOGENIC"
451+ VACSProtective -> "PROTECTIVE"
452+ VACSRiskFactor -> "RISK_FACTOR"
453+ VACSUncertain -> "UNCERTAIN"
454+
230455-- | Effect of the variant on the coding sequence.
231456data VariantAnnotationEffect
232457 = VAEEffectUnspecified
@@ -251,6 +476,31 @@ data VariantAnnotationEffect
251476
252477instance Hashable VariantAnnotationEffect
253478
479+instance FromText VariantAnnotationEffect where
480+ fromText = \case
481+ "EFFECT_UNSPECIFIED" -> Just VAEEffectUnspecified
482+ "FRAMESHIFT" -> Just VAEFrameshift
483+ "FRAME_PRESERVING_INDEL" -> Just VAEFramePreservingIndel
484+ "NONSYNONYMOUS_SNP" -> Just VAENonsynonymousSnp
485+ "OTHER" -> Just VAEOther
486+ "SPLICE_SITE_DISRUPTION" -> Just VAESpliceSiteDisruption
487+ "STOP_GAIN" -> Just VAEStopGain
488+ "STOP_LOSS" -> Just VAEStopLoss
489+ "SYNONYMOUS_SNP" -> Just VAESynonymousSnp
490+ _ -> Nothing
491+
492+instance ToText VariantAnnotationEffect where
493+ toText = \case
494+ VAEEffectUnspecified -> "EFFECT_UNSPECIFIED"
495+ VAEFrameshift -> "FRAMESHIFT"
496+ VAEFramePreservingIndel -> "FRAME_PRESERVING_INDEL"
497+ VAENonsynonymousSnp -> "NONSYNONYMOUS_SNP"
498+ VAEOther -> "OTHER"
499+ VAESpliceSiteDisruption -> "SPLICE_SITE_DISRUPTION"
500+ VAEStopGain -> "STOP_GAIN"
501+ VAEStopLoss -> "STOP_LOSS"
502+ VAESynonymousSnp -> "SYNONYMOUS_SNP"
503+
254504-- | Type has been adapted from ClinVar\'s list of variant types.
255505data VariantAnnotationType
256506 = VATCnv
@@ -272,3 +522,26 @@ data VariantAnnotationType
272522 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
273523
274524instance Hashable VariantAnnotationType
525+
526+instance FromText VariantAnnotationType where
527+ fromText = \case
528+ "CNV" -> Just VATCnv
529+ "DELETION" -> Just VATDeletion
530+ "INSERTION" -> Just VATInsertion
531+ "OTHER" -> Just VATOther
532+ "SNP" -> Just VATSnp
533+ "STRUCTURAL" -> Just VATStructural
534+ "SUBSTITUTION" -> Just VATSubstitution
535+ "TYPE_UNSPECIFIED" -> Just VATTypeUnspecified
536+ _ -> Nothing
537+
538+instance ToText VariantAnnotationType where
539+ toText = \case
540+ VATCnv -> "CNV"
541+ VATDeletion -> "DELETION"
542+ VATInsertion -> "INSERTION"
543+ VATOther -> "OTHER"
544+ VATSnp -> "SNP"
545+ VATStructural -> "STRUCTURAL"
546+ VATSubstitution -> "SUBSTITUTION"
547+ VATTypeUnspecified -> "TYPE_UNSPECIFIED"
gogol-gmail/gen/Network/Google/Gmail/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Gmail.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Gmail.Types
1416 (
15− -- * API Definition
16− gmail
17−
1817
1918 -- * Draft
20− , Draft
19+ Draft
2120 , draft
2221 , dId
2322 , dMessage
@@ -193,6 +192,3 @@ module Network.Google.Gmail.Types
193192import Network.Google.Gmail.Types.Product
194193import Network.Google.Gmail.Types.Sum
195194import Network.Google.Prelude
196−
197−gmail :: a
198−gmail = error "gmail"
gogol-gmail/gen/Network/Google/Gmail/Types/Product.hs+4−2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Gmail.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -255,7 +257,7 @@ data Label = Label
255257 , _lLabelListVisibility :: !(Maybe LabelLabelListVisibility)
256258 , _lId :: !(Maybe Text)
257259 , _lType :: !(Maybe LabelType)
258− }
260+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
259261
260262-- | Creates a value of 'Label' with the minimum fields required to make a request.
261263--
@@ -1005,7 +1007,7 @@ data WatchRequest = WatchRequest
10051007 { _wrLabelFilterAction :: !(Maybe WatchRequestLabelFilterAction)
10061008 , _wrTopicName :: !(Maybe Text)
10071009 , _wrLabelIds :: !(Maybe [Text])
1008− }
1010+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
10091011
10101012-- | Creates a value of 'WatchRequest' with the minimum fields required to make a request.
10111013--
gogol-gmail/gen/Network/Google/Gmail/Types/Sum.hs+49
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Gmail.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -27,6 +30,19 @@ data LabelLabelListVisibility
2730
2831instance Hashable LabelLabelListVisibility
2932
33+instance FromText LabelLabelListVisibility where
34+ fromText = \case
35+ "labelHide" -> Just LLLVLabelHide
36+ "labelShow" -> Just LLLVLabelShow
37+ "labelShowIfUnread" -> Just LLLVLabelShowIfUnread
38+ _ -> Nothing
39+
40+instance ToText LabelLabelListVisibility where
41+ toText = \case
42+ LLLVLabelHide -> "labelHide"
43+ LLLVLabelShow -> "labelShow"
44+ LLLVLabelShowIfUnread -> "labelShowIfUnread"
45+
3046-- | The visibility of the label in the message list in the Gmail web
3147-- interface.
3248data LabelMessageListVisibility
@@ -38,6 +54,17 @@ data LabelMessageListVisibility
3854
3955instance Hashable LabelMessageListVisibility
4056
57+instance FromText LabelMessageListVisibility where
58+ fromText = \case
59+ "hide" -> Just LMLVHide
60+ "show" -> Just LMLVShow
61+ _ -> Nothing
62+
63+instance ToText LabelMessageListVisibility where
64+ toText = \case
65+ LMLVHide -> "hide"
66+ LMLVShow -> "show"
67+
4168-- | The owner type for the label. User labels are created by the user and
4269-- can be modified and deleted by the user and can be applied to any
4370-- message or thread. System labels are internally created and cannot be
@@ -55,6 +82,17 @@ data LabelType
5582
5683instance Hashable LabelType
5784
85+instance FromText LabelType where
86+ fromText = \case
87+ "system" -> Just LTSystem
88+ "user" -> Just LTUser
89+ _ -> Nothing
90+
91+instance ToText LabelType where
92+ toText = \case
93+ LTSystem -> "system"
94+ LTUser -> "user"
95+
5896-- | Filtering behavior of labelIds list specified.
5997data WatchRequestLabelFilterAction
6098 = WRLFAExclude
@@ -64,3 +102,14 @@ data WatchRequestLabelFilterAction
64102 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
65103
66104instance Hashable WatchRequestLabelFilterAction
105+
106+instance FromText WatchRequestLabelFilterAction where
107+ fromText = \case
108+ "exclude" -> Just WRLFAExclude
109+ "include" -> Just WRLFAInclude
110+ _ -> Nothing
111+
112+instance ToText WatchRequestLabelFilterAction where
113+ toText = \case
114+ WRLFAExclude -> "exclude"
115+ WRLFAInclude -> "include"
gogol-groups/gen/Network/Google/GroupsMigration/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.GroupsMigration.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.GroupsMigration.Types
1416 (
15− -- * API Definition
16− groupsmigration
17−
1817
1918 -- * Groups
20− , Groups
19+ Groups
2120 , groups
2221 , gKind
2322 , gResponseCode
@@ -26,6 +25,3 @@ module Network.Google.GroupsMigration.Types
2625import Network.Google.GroupsMigration.Types.Product
2726import Network.Google.GroupsMigration.Types.Sum
2827import Network.Google.Prelude
29−
30−groupsmigration :: a
31−groupsmigration = error "groupsmigration"
gogol-groups/gen/Network/Google/GroupsMigration/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.GroupsMigration.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-groups/gen/Network/Google/GroupsMigration/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.GroupsMigration.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-groups/gen/Network/Google/GroupsSettings/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.GroupsSettings.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.GroupsSettings.Types
1416 (
15− -- * API Definition
16− groupssettings
17−
1817
1918 -- * Groups
20− , Groups
19+ Groups
2120 , groups
2221 , gEmail
2322 , gSendMessageDenyNotification
@@ -52,6 +51,3 @@ module Network.Google.GroupsSettings.Types
5251import Network.Google.GroupsSettings.Types.Product
5352import Network.Google.GroupsSettings.Types.Sum
5453import Network.Google.Prelude
55−
56−groupssettings :: a
57−groupssettings = error "groupssettings"
gogol-groups/gen/Network/Google/GroupsSettings/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.GroupsSettings.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-groups/gen/Network/Google/GroupsSettings/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.GroupsSettings.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.IdentityToolkit.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.IdentityToolkit.Types
1416 (
15− -- * API Definition
16− identitytoolkit
17−
1817
1918 -- * CreateAuthUriResponse
20− , CreateAuthUriResponse
19+ CreateAuthUriResponse
2120 , createAuthUriResponse
2221 , caurProviderId
2322 , caurKind
@@ -268,6 +267,3 @@ module Network.Google.IdentityToolkit.Types
268267import Network.Google.IdentityToolkit.Types.Product
269268import Network.Google.IdentityToolkit.Types.Sum
270269import Network.Google.Prelude
271−
272−identitytoolkit :: a
273−identitytoolkit = error "identitytoolkit"
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.IdentityToolkit.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.IdentityToolkit.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-licensing/gen/Network/Google/EnterpriseLicenseManager/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.EnterpriseLicenseManager.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.EnterpriseLicenseManager.Types
1416 (
15− -- * API Definition
16− licensing
17−
1817
1918 -- * LicenseAssignment
20− , LicenseAssignment
19+ LicenseAssignment
2120 , licenseAssignment
2221 , laEtags
2322 , laKind
@@ -43,6 +42,3 @@ module Network.Google.EnterpriseLicenseManager.Types
4342import Network.Google.EnterpriseLicenseManager.Types.Product
4443import Network.Google.EnterpriseLicenseManager.Types.Sum
4544import Network.Google.Prelude
46−
47−licensing :: a
48−licensing = error "licensing"
gogol-licensing/gen/Network/Google/EnterpriseLicenseManager/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.EnterpriseLicenseManager.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-licensing/gen/Network/Google/EnterpriseLicenseManager/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.EnterpriseLicenseManager.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.MapsCoordinate.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.MapsCoordinate.Types
1416 (
15− -- * API Definition
16− coordinate
17−
1817
1918 -- * CustomField
20− , CustomField
19+ CustomField
2120 , customField
2221 , cfCustomFieldId
2322 , cfKind
@@ -158,6 +157,3 @@ module Network.Google.MapsCoordinate.Types
158157import Network.Google.MapsCoordinate.Types.Product
159158import Network.Google.MapsCoordinate.Types.Sum
160159import Network.Google.Prelude
161−
162−coordinate :: a
163−coordinate = error "coordinate"
gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.MapsCoordinate.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.MapsCoordinate.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-maps-engine/gen/Network/Google/MapsEngine/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.MapsEngine.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.MapsEngine.Types
1416 (
15− -- * API Definition
16− mapsengine
17−
1817
1918 -- * AcquisitionTime
20− , AcquisitionTime
19+ AcquisitionTime
2120 , acquisitionTime
2221 , atStart
2322 , atPrecision
@@ -703,6 +702,3 @@ module Network.Google.MapsEngine.Types
703702import Network.Google.MapsEngine.Types.Product
704703import Network.Google.MapsEngine.Types.Sum
705704import Network.Google.Prelude
706−
707−mapsengine :: a
708−mapsengine = error "mapsengine"
gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+28−26
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.MapsEngine.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -22,7 +24,7 @@ data AcquisitionTime = AcquisitionTime
2224 { _atStart :: !(Maybe UTCTime)
2325 , _atPrecision :: !(Maybe AcquisitionTimePrecision)
2426 , _atEnd :: !(Maybe UTCTime)
25− }
27+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
2628
2729-- | Creates a value of 'AcquisitionTime' with the minimum fields required to make a request.
2830--
@@ -79,7 +81,7 @@ data Asset = Asset
7981 , _aType :: !(Maybe AssetType)
8082 , _aDescription :: !(Maybe Text)
8183 , _aTags :: !(Maybe [Text])
82− }
84+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
8385
8486-- | Creates a value of 'Asset' with the minimum fields required to make a request.
8587--
@@ -669,7 +671,7 @@ data File = File
669671 { _fSize :: !(Maybe Int64)
670672 , _fUploadStatus :: !(Maybe FileUploadStatus)
671673 , _fFilename :: !(Maybe Text)
672− }
674+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
673675
674676-- | Creates a value of 'File' with the minimum fields required to make a request.
675677--
@@ -711,7 +713,7 @@ data Filter = Filter
711713 { _fOperator :: !(Maybe FilterOperator)
712714 , _fValue :: !(Maybe (Either Text Int64))
713715 , _fColumn :: !(Maybe Text)
714− }
716+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
715717
716718-- | Creates a value of 'Filter' with the minimum fields required to make a request.
717719--
@@ -762,7 +764,7 @@ geoJsonGeometry = GeoJsonGeometry
762764data GeoJsonGeometryCollection = GeoJsonGeometryCollection
763765 { _gjgcGeometries :: !(Maybe [Maybe GeoJsonGeometry])
764766 , _gjgcType :: !(Maybe GeoJsonGeometryCollectionType)
765− }
767+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
766768
767769-- | Creates a value of 'GeoJsonGeometryCollection' with the minimum fields required to make a request.
768770--
@@ -797,7 +799,7 @@ gjgcType = lens _gjgcType (\ s a -> s{_gjgcType = a})
797799data GeoJsonLineString = GeoJsonLineString
798800 { _gjlsCoordinates :: !(Maybe [Maybe [Double]])
799801 , _gjlsType :: !(Maybe GeoJsonLineStringType)
800− }
802+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
801803
802804-- | Creates a value of 'GeoJsonLineString' with the minimum fields required to make a request.
803805--
@@ -832,7 +834,7 @@ gjlsType = lens _gjlsType (\ s a -> s{_gjlsType = a})
832834data GeoJsonMultiLineString = GeoJsonMultiLineString
833835 { _gjmlsCoordinates :: !(Maybe [[Maybe [Double]]])
834836 , _gjmlsType :: !(Maybe GeoJsonMultiLineStringType)
835− }
837+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
836838
837839-- | Creates a value of 'GeoJsonMultiLineString' with the minimum fields required to make a request.
838840--
@@ -867,7 +869,7 @@ gjmlsType
867869data GeoJsonMultiPoint = GeoJsonMultiPoint
868870 { _gjsonmpCoordinates :: !(Maybe [Maybe [Double]])
869871 , _gjsonmpType :: !(Maybe GeoJsonMultiPointType)
870− }
872+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
871873
872874-- | Creates a value of 'GeoJsonMultiPoint' with the minimum fields required to make a request.
873875--
@@ -902,7 +904,7 @@ gjsonmpType
902904data GeoJsonMultiPolygon = GeoJsonMultiPolygon
903905 { _gjmpCoordinates :: !(Maybe [[[Maybe [Double]]]])
904906 , _gjmpType :: !(Maybe GeoJsonMultiPolygonType)
905− }
907+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
906908
907909-- | Creates a value of 'GeoJsonMultiPolygon' with the minimum fields required to make a request.
908910--
@@ -936,7 +938,7 @@ gjmpType = lens _gjmpType (\ s a -> s{_gjmpType = a})
936938data GeoJsonPoint = GeoJsonPoint
937939 { _gjpCoordinates :: !(Maybe (Maybe [Double]))
938940 , _gjpType :: !(Maybe GeoJsonPointType)
939− }
941+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
940942
941943-- | Creates a value of 'GeoJsonPoint' with the minimum fields required to make a request.
942944--
@@ -969,7 +971,7 @@ gjpType = lens _gjpType (\ s a -> s{_gjpType = a})
969971data GeoJsonPolygon = GeoJsonPolygon
970972 { _gjsonpCoordinates :: !(Maybe [[Maybe [Double]]])
971973 , _gjsonpType :: !(Maybe GeoJsonPolygonType)
972− }
974+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
973975
974976-- | Creates a value of 'GeoJsonPolygon' with the minimum fields required to make a request.
975977--
@@ -1158,7 +1160,7 @@ data LabelStyle = LabelStyle
11581160 , _lsOutline :: !(Maybe (Maybe Color))
11591161 , _lsFontWeight :: !(Maybe LabelStyleFontWeight)
11601162 , _lsColumn :: !(Maybe Text)
1161− }
1163+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
11621164
11631165-- | Creates a value of 'LabelStyle' with the minimum fields required to make a request.
11641166--
@@ -1248,7 +1250,7 @@ data Layer = Layer
12481250 , _lPublishedAccessList :: !(Maybe Text)
12491251 , _lDescription :: !(Maybe Text)
12501252 , _lTags :: !(Maybe (Maybe [Text]))
1251− }
1253+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
12521254
12531255-- | Creates a value of 'Layer' with the minimum fields required to make a request.
12541256--
@@ -1618,7 +1620,7 @@ data Map = Map
16181620 , _mapPublishedAccessList :: !(Maybe Text)
16191621 , _mapDescription :: !(Maybe Text)
16201622 , _mapTags :: !(Maybe (Maybe [Text]))
1621− }
1623+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
16221624
16231625-- | Creates a value of 'Map' with the minimum fields required to make a request.
16241626--
@@ -1832,7 +1834,7 @@ data MapFolder = MapFolder
18321834 , _mfKey :: !(Maybe Text)
18331835 , _mfName :: !(Maybe Text)
18341836 , _mfType :: !(Maybe MapFolderType)
1835− }
1837+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
18361838
18371839-- | Creates a value of 'MapFolder' with the minimum fields required to make a request.
18381840--
@@ -1924,7 +1926,7 @@ data MapKmlLink = MapKmlLink
19241926 , _mklName :: !(Maybe Text)
19251927 , _mklType :: !(Maybe MapKmlLinkType)
19261928 , _mklKmlUrl :: !(Maybe Text)
1927− }
1929+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
19281930
19291931-- | Creates a value of 'MapKmlLink' with the minimum fields required to make a request.
19301932--
@@ -1989,7 +1991,7 @@ data MapLayer = MapLayer
19891991 , _mlName :: !(Maybe Text)
19901992 , _mlId :: !(Maybe Text)
19911993 , _mlType :: !(Maybe MapLayerType)
1992− }
1994+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
19931995
19941996-- | Creates a value of 'MapLayer' with the minimum fields required to make a request.
19951997--
@@ -2154,7 +2156,7 @@ data Permission = Permission
21542156 , _pId :: !(Maybe Text)
21552157 , _pType :: !(Maybe PermissionType)
21562158 , _pDiscoverable :: !(Maybe Bool)
2157− }
2159+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
21582160
21592161-- | Creates a value of 'Permission' with the minimum fields required to make a request.
21602162--
@@ -2469,7 +2471,7 @@ data PublishedLayer = PublishedLayer
24692471 , _plId :: !(Maybe Text)
24702472 , _plProjectId :: !(Maybe Text)
24712473 , _plDescription :: !(Maybe Text)
2472− }
2474+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
24732475
24742476-- | Creates a value of 'PublishedLayer' with the minimum fields required to make a request.
24752477--
@@ -2689,7 +2691,7 @@ data Raster = Raster
26892691 , _rDescription :: !(Maybe Text)
26902692 , _rAttribution :: !(Maybe Text)
26912693 , _rTags :: !(Maybe (Maybe [Text]))
2692− }
2694+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
26932695
26942696-- | Creates a value of 'Raster' with the minimum fields required to make a request.
26952697--
@@ -2896,7 +2898,7 @@ data RasterCollection = RasterCollection
28962898 , _rcDescription :: !(Maybe Text)
28972899 , _rcAttribution :: !(Maybe Text)
28982900 , _rcTags :: !(Maybe (Maybe [Text]))
2899− }
2901+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
29002902
29012903-- | Creates a value of 'RasterCollection' with the minimum fields required to make a request.
29022904--
@@ -3375,7 +3377,7 @@ data ScaledShape = ScaledShape
33753377 { _ssBorder :: !(Maybe (Maybe Border))
33763378 , _ssFill :: !(Maybe (Maybe Color))
33773379 , _ssShape :: !(Maybe ScaledShapeShape)
3378− }
3380+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
33793381
33803382-- | Creates a value of 'ScaledShape' with the minimum fields required to make a request.
33813383--
@@ -3417,7 +3419,7 @@ data ScalingFunction = ScalingFunction
34173419 , _sfSizeRange :: !(Maybe (Maybe SizeRange))
34183420 , _sfScalingType :: !(Maybe ScalingFunctionScalingType)
34193421 , _sfColumn :: !(Maybe Text)
3420− }
3422+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
34213423
34223424-- | Creates a value of 'ScalingFunction' with the minimum fields required to make a request.
34233425--
@@ -3567,7 +3569,7 @@ data Table = Table
35673569 , _tSourceEncoding :: !Text
35683570 , _tDescription :: !(Maybe Text)
35693571 , _tTags :: !(Maybe (Maybe [Text]))
3570− }
3572+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
35713573
35723574-- | Creates a value of 'Table' with the minimum fields required to make a request.
35733575--
@@ -3763,7 +3765,7 @@ tTags
37633765data TableColumn = TableColumn
37643766 { _tcName :: !(Maybe Text)
37653767 , _tcType :: !(Maybe TableColumnType)
3766− }
3768+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
37673769
37683770-- | Creates a value of 'TableColumn' with the minimum fields required to make a request.
37693771--
@@ -3867,7 +3869,7 @@ data VectorStyle = VectorStyle
38673869 { _vsDisplayRules :: !(Maybe [Maybe DisplayRule])
38683870 , _vsFeatureInfo :: !(Maybe (Maybe FeatureInfo))
38693871 , _vsType :: !(Maybe VectorStyleType)
3870− }
3872+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
38713873
38723874-- | Creates a value of 'VectorStyle' with the minimum fields required to make a request.
38733875--
gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Sum.hs+429
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.MapsEngine.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -32,6 +35,25 @@ data AcquisitionTimePrecision
3235
3336instance Hashable AcquisitionTimePrecision
3437
38+instance FromText AcquisitionTimePrecision where
39+ fromText = \case
40+ "day" -> Just ATPDay
41+ "hour" -> Just ATPHour
42+ "minute" -> Just ATPMinute
43+ "month" -> Just ATPMonth
44+ "second" -> Just ATPSecond
45+ "year" -> Just ATPYear
46+ _ -> Nothing
47+
48+instance ToText AcquisitionTimePrecision where
49+ toText = \case
50+ ATPDay -> "day"
51+ ATPHour -> "hour"
52+ ATPMinute -> "minute"
53+ ATPMonth -> "month"
54+ ATPSecond -> "second"
55+ ATPYear -> "year"
56+
3557-- | The type of asset. One of raster, rasterCollection, table, map, or
3658-- layer.
3759data AssetType
@@ -49,6 +71,23 @@ data AssetType
4971
5072instance Hashable AssetType
5173
74+instance FromText AssetType where
75+ fromText = \case
76+ "layer" -> Just ATLayer
77+ "map" -> Just ATMap
78+ "raster" -> Just ATRaster
79+ "rasterCollection" -> Just ATRasterCollection
80+ "table" -> Just ATTable
81+ _ -> Nothing
82+
83+instance ToText AssetType where
84+ toText = \case
85+ ATLayer -> "layer"
86+ ATMap -> "map"
87+ ATRaster -> "raster"
88+ ATRasterCollection -> "rasterCollection"
89+ ATTable -> "table"
90+
5291-- | The upload status of the file.
5392data FileUploadStatus
5493 = FUSCanceled
@@ -63,6 +102,21 @@ data FileUploadStatus
63102
64103instance Hashable FileUploadStatus
65104
105+instance FromText FileUploadStatus where
106+ fromText = \case
107+ "canceled" -> Just FUSCanceled
108+ "complete" -> Just FUSComplete
109+ "failed" -> Just FUSFailed
110+ "inProgress" -> Just FUSInProgress
111+ _ -> Nothing
112+
113+instance ToText FileUploadStatus where
114+ toText = \case
115+ FUSCanceled -> "canceled"
116+ FUSComplete -> "complete"
117+ FUSFailed -> "failed"
118+ FUSInProgress -> "inProgress"
119+
66120-- | Operation used to evaluate the filter.
67121data FilterOperator
68122 = FONotEqual
@@ -87,6 +141,31 @@ data FilterOperator
87141
88142instance Hashable FilterOperator
89143
144+instance FromText FilterOperator where
145+ fromText = \case
146+ "!=" -> Just FONotEqual
147+ "<" -> Just FOLess
148+ "<=" -> Just FOLessOrEqual
149+ "==" -> Just FOEqual
150+ ">" -> Just FOGreater
151+ ">=" -> Just FOGreaterEqual
152+ "contains" -> Just FOContains
153+ "endsWith" -> Just FOEndsWith
154+ "startsWith" -> Just FOStartsWith
155+ _ -> Nothing
156+
157+instance ToText FilterOperator where
158+ toText = \case
159+ FONotEqual -> "!="
160+ FOLess -> "<"
161+ FOLessOrEqual -> "<="
162+ FOEqual -> "=="
163+ FOGreater -> ">"
164+ FOGreaterEqual -> ">="
165+ FOContains -> "contains"
166+ FOEndsWith -> "endsWith"
167+ FOStartsWith -> "startsWith"
168+
90169-- | Identifies this object as a GeoJsonGeometryCollection.
91170data GeoJsonGeometryCollectionType
92171 = GJGCTGeometryCollection
@@ -95,6 +174,15 @@ data GeoJsonGeometryCollectionType
95174
96175instance Hashable GeoJsonGeometryCollectionType
97176
177+instance FromText GeoJsonGeometryCollectionType where
178+ fromText = \case
179+ "GeometryCollection" -> Just GJGCTGeometryCollection
180+ _ -> Nothing
181+
182+instance ToText GeoJsonGeometryCollectionType where
183+ toText = \case
184+ GJGCTGeometryCollection -> "GeometryCollection"
185+
98186-- | Identifies this object as a GeoJsonLineString.
99187data GeoJsonLineStringType
100188 = GJLSTLineString
@@ -103,6 +191,15 @@ data GeoJsonLineStringType
103191
104192instance Hashable GeoJsonLineStringType
105193
194+instance FromText GeoJsonLineStringType where
195+ fromText = \case
196+ "LineString" -> Just GJLSTLineString
197+ _ -> Nothing
198+
199+instance ToText GeoJsonLineStringType where
200+ toText = \case
201+ GJLSTLineString -> "LineString"
202+
106203-- | Identifies this object as a GeoJsonMultiLineString.
107204data GeoJsonMultiLineStringType
108205 = GJMLSTMultiLineString
@@ -111,6 +208,15 @@ data GeoJsonMultiLineStringType
111208
112209instance Hashable GeoJsonMultiLineStringType
113210
211+instance FromText GeoJsonMultiLineStringType where
212+ fromText = \case
213+ "MultiLineString" -> Just GJMLSTMultiLineString
214+ _ -> Nothing
215+
216+instance ToText GeoJsonMultiLineStringType where
217+ toText = \case
218+ GJMLSTMultiLineString -> "MultiLineString"
219+
114220-- | Identifies this object as a GeoJsonMultiPoint.
115221data GeoJsonMultiPointType
116222 = GJMPTMultiPoint
@@ -119,6 +225,15 @@ data GeoJsonMultiPointType
119225
120226instance Hashable GeoJsonMultiPointType
121227
228+instance FromText GeoJsonMultiPointType where
229+ fromText = \case
230+ "MultiPoint" -> Just GJMPTMultiPoint
231+ _ -> Nothing
232+
233+instance ToText GeoJsonMultiPointType where
234+ toText = \case
235+ GJMPTMultiPoint -> "MultiPoint"
236+
122237-- | Identifies this object as a GeoJsonMultiPolygon.
123238data GeoJsonMultiPolygonType
124239 = GJMPTMultiPolygon
@@ -127,6 +242,15 @@ data GeoJsonMultiPolygonType
127242
128243instance Hashable GeoJsonMultiPolygonType
129244
245+instance FromText GeoJsonMultiPolygonType where
246+ fromText = \case
247+ "MultiPolygon" -> Just GJMPTMultiPolygon
248+ _ -> Nothing
249+
250+instance ToText GeoJsonMultiPolygonType where
251+ toText = \case
252+ GJMPTMultiPolygon -> "MultiPolygon"
253+
130254-- | Identifies this object as a GeoJsonPoint.
131255data GeoJsonPointType
132256 = GJPTPoint
@@ -135,6 +259,15 @@ data GeoJsonPointType
135259
136260instance Hashable GeoJsonPointType
137261
262+instance FromText GeoJsonPointType where
263+ fromText = \case
264+ "Point" -> Just GJPTPoint
265+ _ -> Nothing
266+
267+instance ToText GeoJsonPointType where
268+ toText = \case
269+ GJPTPoint -> "Point"
270+
138271-- | Identifies this object as a GeoJsonPolygon.
139272data GeoJsonPolygonType
140273 = GJPTPolygon
@@ -143,6 +276,15 @@ data GeoJsonPolygonType
143276
144277instance Hashable GeoJsonPolygonType
145278
279+instance FromText GeoJsonPolygonType where
280+ fromText = \case
281+ "Polygon" -> Just GJPTPolygon
282+ _ -> Nothing
283+
284+instance ToText GeoJsonPolygonType where
285+ toText = \case
286+ GJPTPolygon -> "Polygon"
287+
146288-- | Font style of the label, defaults to \'normal\'.
147289data LabelStyleFontStyle
148290 = LSFSItalic
@@ -153,6 +295,17 @@ data LabelStyleFontStyle
153295
154296instance Hashable LabelStyleFontStyle
155297
298+instance FromText LabelStyleFontStyle where
299+ fromText = \case
300+ "italic" -> Just LSFSItalic
301+ "normal" -> Just LSFSNormal
302+ _ -> Nothing
303+
304+instance ToText LabelStyleFontStyle where
305+ toText = \case
306+ LSFSItalic -> "italic"
307+ LSFSNormal -> "normal"
308+
156309-- | Font weight of the label, defaults to \'normal\'.
157310data LabelStyleFontWeight
158311 = LSFWBold
@@ -163,6 +316,17 @@ data LabelStyleFontWeight
163316
164317instance Hashable LabelStyleFontWeight
165318
319+instance FromText LabelStyleFontWeight where
320+ fromText = \case
321+ "bold" -> Just LSFWBold
322+ "normal" -> Just LSFWNormal
323+ _ -> Nothing
324+
325+instance ToText LabelStyleFontWeight where
326+ toText = \case
327+ LSFWBold -> "bold"
328+ LSFWNormal -> "normal"
329+
166330-- | Deprecated: The type of the datasources used to build this Layer. Note:
167331-- This has been replaced by layerType, but is still available for now to
168332-- maintain backward compatibility.
@@ -175,6 +339,17 @@ data LayerDatasourceType
175339
176340instance Hashable LayerDatasourceType
177341
342+instance FromText LayerDatasourceType where
343+ fromText = \case
344+ "image" -> Just LDTImage
345+ "table" -> Just LDTTable
346+ _ -> Nothing
347+
348+instance ToText LayerDatasourceType where
349+ toText = \case
350+ LDTImage -> "image"
351+ LDTTable -> "table"
352+
178353-- | The type of the datasources used to build this Layer. This should be
179354-- used instead of datasourceType. At least one of layerType and
180355-- datasourceType and must be specified, but layerType takes precedence.
@@ -187,6 +362,17 @@ data LayerLayerType
187362
188363instance Hashable LayerLayerType
189364
365+instance FromText LayerLayerType where
366+ fromText = \case
367+ "image" -> Just LLTImage
368+ "vector" -> Just LLTVector
369+ _ -> Nothing
370+
371+instance ToText LayerLayerType where
372+ toText = \case
373+ LLTImage -> "image"
374+ LLTVector -> "vector"
375+
190376-- | The processing status of this layer.
191377data LayerProcessingStatus
192378 = LPSComplete
@@ -203,6 +389,23 @@ data LayerProcessingStatus
203389
204390instance Hashable LayerProcessingStatus
205391
392+instance FromText LayerProcessingStatus where
393+ fromText = \case
394+ "complete" -> Just LPSComplete
395+ "failed" -> Just LPSFailed
396+ "notReady" -> Just LPSNotReady
397+ "processing" -> Just LPSProcessing
398+ "ready" -> Just LPSReady
399+ _ -> Nothing
400+
401+instance ToText LayerProcessingStatus where
402+ toText = \case
403+ LPSComplete -> "complete"
404+ LPSFailed -> "failed"
405+ LPSNotReady -> "notReady"
406+ LPSProcessing -> "processing"
407+ LPSReady -> "ready"
408+
206409-- | The publishing status of this layer.
207410data LayerPublishingStatus
208411 = LPSNotPublished
@@ -213,6 +416,17 @@ data LayerPublishingStatus
213416
214417instance Hashable LayerPublishingStatus
215418
419+instance FromText LayerPublishingStatus where
420+ fromText = \case
421+ "notPublished" -> Just LPSNotPublished
422+ "published" -> Just LPSPublished
423+ _ -> Nothing
424+
425+instance ToText LayerPublishingStatus where
426+ toText = \case
427+ LPSNotPublished -> "notPublished"
428+ LPSPublished -> "published"
429+
216430-- | Identifies this object as a MapFolder.
217431data MapFolderType
218432 = MFTFolder
@@ -221,6 +435,15 @@ data MapFolderType
221435
222436instance Hashable MapFolderType
223437
438+instance FromText MapFolderType where
439+ fromText = \case
440+ "folder" -> Just MFTFolder
441+ _ -> Nothing
442+
443+instance ToText MapFolderType where
444+ toText = \case
445+ MFTFolder -> "folder"
446+
224447-- | Identifies this object as a MapKmlLink.
225448data MapKmlLinkType
226449 = MKLTKmlLink
@@ -229,6 +452,15 @@ data MapKmlLinkType
229452
230453instance Hashable MapKmlLinkType
231454
455+instance FromText MapKmlLinkType where
456+ fromText = \case
457+ "kmlLink" -> Just MKLTKmlLink
458+ _ -> Nothing
459+
460+instance ToText MapKmlLinkType where
461+ toText = \case
462+ MKLTKmlLink -> "kmlLink"
463+
232464-- | Identifies this object as a MapLayer.
233465data MapLayerType
234466 = MLTLayer
@@ -237,6 +469,15 @@ data MapLayerType
237469
238470instance Hashable MapLayerType
239471
472+instance FromText MapLayerType where
473+ fromText = \case
474+ "layer" -> Just MLTLayer
475+ _ -> Nothing
476+
477+instance ToText MapLayerType where
478+ toText = \case
479+ MLTLayer -> "layer"
480+
240481-- | The processing status of this map. Map processing is automatically
241482-- started once a map becomes ready for processing.
242483data MapProcessingStatus
@@ -254,6 +495,23 @@ data MapProcessingStatus
254495
255496instance Hashable MapProcessingStatus
256497
498+instance FromText MapProcessingStatus where
499+ fromText = \case
500+ "complete" -> Just MPSComplete
501+ "failed" -> Just MPSFailed
502+ "notReady" -> Just MPSNotReady
503+ "processing" -> Just MPSProcessing
504+ "ready" -> Just MPSReady
505+ _ -> Nothing
506+
507+instance ToText MapProcessingStatus where
508+ toText = \case
509+ MPSComplete -> "complete"
510+ MPSFailed -> "failed"
511+ MPSNotReady -> "notReady"
512+ MPSProcessing -> "processing"
513+ MPSReady -> "ready"
514+
257515-- | The publishing status of this map.
258516data MapPublishingStatus
259517 = MPSNotPublished
@@ -264,6 +522,17 @@ data MapPublishingStatus
264522
265523instance Hashable MapPublishingStatus
266524
525+instance FromText MapPublishingStatus where
526+ fromText = \case
527+ "notPublished" -> Just MPSNotPublished
528+ "published" -> Just MPSPublished
529+ _ -> Nothing
530+
531+instance ToText MapPublishingStatus where
532+ toText = \case
533+ MPSNotPublished -> "notPublished"
534+ MPSPublished -> "published"
535+
267536-- | The type of access granted to this user or group.
268537data PermissionRole
269538 = PROwner
@@ -278,6 +547,21 @@ data PermissionRole
278547
279548instance Hashable PermissionRole
280549
550+instance FromText PermissionRole where
551+ fromText = \case
552+ "owner" -> Just PROwner
553+ "reader" -> Just PRReader
554+ "viewer" -> Just PRViewer
555+ "writer" -> Just PRWriter
556+ _ -> Nothing
557+
558+instance ToText PermissionRole where
559+ toText = \case
560+ PROwner -> "owner"
561+ PRReader -> "reader"
562+ PRViewer -> "viewer"
563+ PRWriter -> "writer"
564+
281565-- | The account type.
282566data PermissionType
283567 = PTAnyone
@@ -290,6 +574,19 @@ data PermissionType
290574
291575instance Hashable PermissionType
292576
577+instance FromText PermissionType where
578+ fromText = \case
579+ "anyone" -> Just PTAnyone
580+ "group" -> Just PTGroup
581+ "user" -> Just PTUser
582+ _ -> Nothing
583+
584+instance ToText PermissionType where
585+ toText = \case
586+ PTAnyone -> "anyone"
587+ PTGroup -> "group"
588+ PTUser -> "user"
589+
293590-- | The type of the datasources used to build this Layer. This should be
294591-- used instead of datasourceType. At least one of layerType and
295592-- datasourceType and must be specified, but layerType takes precedence.
@@ -302,6 +599,17 @@ data PublishedLayerLayerType
302599
303600instance Hashable PublishedLayerLayerType
304601
602+instance FromText PublishedLayerLayerType where
603+ fromText = \case
604+ "image" -> Just PLLTImage
605+ "vector" -> Just PLLTVector
606+ _ -> Nothing
607+
608+instance ToText PublishedLayerLayerType where
609+ toText = \case
610+ PLLTImage -> "image"
611+ PLLTVector -> "vector"
612+
305613-- | The processing status of this RasterCollection.
306614data RasterCollectionProcessingStatus
307615 = RCPSComplete
@@ -318,6 +626,23 @@ data RasterCollectionProcessingStatus
318626
319627instance Hashable RasterCollectionProcessingStatus
320628
629+instance FromText RasterCollectionProcessingStatus where
630+ fromText = \case
631+ "complete" -> Just RCPSComplete
632+ "failed" -> Just RCPSFailed
633+ "notReady" -> Just RCPSNotReady
634+ "processing" -> Just RCPSProcessing
635+ "ready" -> Just RCPSReady
636+ _ -> Nothing
637+
638+instance ToText RasterCollectionProcessingStatus where
639+ toText = \case
640+ RCPSComplete -> "complete"
641+ RCPSFailed -> "failed"
642+ RCPSNotReady -> "notReady"
643+ RCPSProcessing -> "processing"
644+ RCPSReady -> "ready"
645+
321646-- | The type of rasters contained within this RasterCollection.
322647data RasterCollectionRasterType
323648 = RCRTImage
@@ -326,6 +651,15 @@ data RasterCollectionRasterType
326651
327652instance Hashable RasterCollectionRasterType
328653
654+instance FromText RasterCollectionRasterType where
655+ fromText = \case
656+ "image" -> Just RCRTImage
657+ _ -> Nothing
658+
659+instance ToText RasterCollectionRasterType where
660+ toText = \case
661+ RCRTImage -> "image"
662+
329663-- | The processing status of this Raster.
330664data RasterProcessingStatus
331665 = RPSComplete
@@ -342,6 +676,23 @@ data RasterProcessingStatus
342676
343677instance Hashable RasterProcessingStatus
344678
679+instance FromText RasterProcessingStatus where
680+ fromText = \case
681+ "complete" -> Just RPSComplete
682+ "failed" -> Just RPSFailed
683+ "notReady" -> Just RPSNotReady
684+ "processing" -> Just RPSProcessing
685+ "ready" -> Just RPSReady
686+ _ -> Nothing
687+
688+instance ToText RasterProcessingStatus where
689+ toText = \case
690+ RPSComplete -> "complete"
691+ RPSFailed -> "failed"
692+ RPSNotReady -> "notReady"
693+ RPSProcessing -> "processing"
694+ RPSReady -> "ready"
695+
345696-- | The type of this Raster. Always \"image\" today.
346697data RasterRasterType
347698 = RRTImage
@@ -350,6 +701,15 @@ data RasterRasterType
350701
351702instance Hashable RasterRasterType
352703
704+instance FromText RasterRasterType where
705+ fromText = \case
706+ "image" -> Just RRTImage
707+ _ -> Nothing
708+
709+instance ToText RasterRasterType where
710+ toText = \case
711+ RRTImage -> "image"
712+
353713-- | Name of the shape.
354714data ScaledShapeShape
355715 = SSSCircle
@@ -358,6 +718,15 @@ data ScaledShapeShape
358718
359719instance Hashable ScaledShapeShape
360720
721+instance FromText ScaledShapeShape where
722+ fromText = \case
723+ "circle" -> Just SSSCircle
724+ _ -> Nothing
725+
726+instance ToText ScaledShapeShape where
727+ toText = \case
728+ SSSCircle -> "circle"
729+
361730-- | The type of scaling function to use. Defaults to SQRT. Currently only
362731-- linear and square root scaling are supported.
363732data ScalingFunctionScalingType
@@ -369,6 +738,17 @@ data ScalingFunctionScalingType
369738
370739instance Hashable ScalingFunctionScalingType
371740
741+instance FromText ScalingFunctionScalingType where
742+ fromText = \case
743+ "linear" -> Just SFSTLinear
744+ "sqrt" -> Just SFSTSqrt
745+ _ -> Nothing
746+
747+instance ToText ScalingFunctionScalingType where
748+ toText = \case
749+ SFSTLinear -> "linear"
750+ SFSTSqrt -> "sqrt"
751+
372752-- | The type of data stored in this column.
373753data TableColumnType
374754 = TCTDatetime
@@ -391,6 +771,29 @@ data TableColumnType
391771
392772instance Hashable TableColumnType
393773
774+instance FromText TableColumnType where
775+ fromText = \case
776+ "datetime" -> Just TCTDatetime
777+ "double" -> Just TCTDouble
778+ "integer" -> Just TCTInteger
779+ "lineStrings" -> Just TCTLineStrings
780+ "mixedGeometry" -> Just TCTMixedGeometry
781+ "points" -> Just TCTPoints
782+ "polygons" -> Just TCTPolygons
783+ "string" -> Just TCTString
784+ _ -> Nothing
785+
786+instance ToText TableColumnType where
787+ toText = \case
788+ TCTDatetime -> "datetime"
789+ TCTDouble -> "double"
790+ TCTInteger -> "integer"
791+ TCTLineStrings -> "lineStrings"
792+ TCTMixedGeometry -> "mixedGeometry"
793+ TCTPoints -> "points"
794+ TCTPolygons -> "polygons"
795+ TCTString -> "string"
796+
394797-- | The processing status of this table.
395798data TableProcessingStatus
396799 = TPSComplete
@@ -407,6 +810,23 @@ data TableProcessingStatus
407810
408811instance Hashable TableProcessingStatus
409812
813+instance FromText TableProcessingStatus where
814+ fromText = \case
815+ "complete" -> Just TPSComplete
816+ "failed" -> Just TPSFailed
817+ "notReady" -> Just TPSNotReady
818+ "processing" -> Just TPSProcessing
819+ "ready" -> Just TPSReady
820+ _ -> Nothing
821+
822+instance ToText TableProcessingStatus where
823+ toText = \case
824+ TPSComplete -> "complete"
825+ TPSFailed -> "failed"
826+ TPSNotReady -> "notReady"
827+ TPSProcessing -> "processing"
828+ TPSReady -> "ready"
829+
410830-- | The type of the vector style. Currently, only displayRule is supported.
411831data VectorStyleType
412832 = VSTDisplayRule
@@ -414,3 +834,12 @@ data VectorStyleType
414834 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
415835
416836instance Hashable VectorStyleType
837+
838+instance FromText VectorStyleType where
839+ fromText = \case
840+ "displayRule" -> Just VSTDisplayRule
841+ _ -> Nothing
842+
843+instance ToText VectorStyleType where
844+ toText = \case
845+ VSTDisplayRule -> "displayRule"
gogol-mirror/gen/Network/Google/Mirror/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Mirror.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Mirror.Types
1416 (
15− -- * API Definition
16− mirror
17−
1817
1918 -- * Account
20− , Account
19+ Account
2120 , account
2221 , aAuthTokens
2322 , aUserData
@@ -201,6 +200,3 @@ module Network.Google.Mirror.Types
201200import Network.Google.Mirror.Types.Product
202201import Network.Google.Mirror.Types.Sum
203202import Network.Google.Prelude
204−
205−mirror :: a
206−mirror = error "mirror"
gogol-mirror/gen/Network/Google/Mirror/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Mirror.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-mirror/gen/Network/Google/Mirror/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Mirror.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-oauth2/gen/Network/Google/OAuth2/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.OAuth2.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.OAuth2.Types
1416 (
15− -- * API Definition
16− oauth2
17−
1817
1918 -- * Jwk
20− , Jwk
19+ Jwk
2120 , jwk
2221 , jwkKeys
2322
@@ -63,6 +62,3 @@ module Network.Google.OAuth2.Types
6362import Network.Google.OAuth2.Types.Product
6463import Network.Google.OAuth2.Types.Sum
6564import Network.Google.Prelude
66−
67−oauth2 :: a
68−oauth2 = error "oauth2"
gogol-oauth2/gen/Network/Google/OAuth2/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.OAuth2.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-oauth2/gen/Network/Google/OAuth2/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.OAuth2.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-pagespeed/gen/Network/Google/PageSpeedInsights/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.PageSpeedInsights.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.PageSpeedInsights.Types
1416 (
15− -- * API Definition
16− pagespeedonline
17−
1817
1918 -- * PagespeedApiFormatStringV2
20− , PagespeedApiFormatStringV2
19+ PagespeedApiFormatStringV2
2120 , pagespeedApiFormatStringV2
2221 , pafsvArgs
2322 , pafsvFormat
@@ -120,6 +119,3 @@ module Network.Google.PageSpeedInsights.Types
120119import Network.Google.PageSpeedInsights.Types.Product
121120import Network.Google.PageSpeedInsights.Types.Sum
122121import Network.Google.Prelude
123−
124−pagespeedonline :: a
125−pagespeedonline = error "pagespeedonline"
gogol-pagespeed/gen/Network/Google/PageSpeedInsights/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.PageSpeedInsights.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-pagespeed/gen/Network/Google/PageSpeedInsights/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.PageSpeedInsights.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-partners/gen/Network/Google/Partners/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Partners.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Partners.Types
1416 (
15− -- * API Definition
16− partners
17−
1817
1918 -- * CertificationExamStatus
20− , CertificationExamStatus
19+ CertificationExamStatus
2120 , certificationExamStatus
2221 , cesNumberUsersPass
2322 , cesType
@@ -215,6 +214,3 @@ module Network.Google.Partners.Types
215214import Network.Google.Partners.Types.Product
216215import Network.Google.Partners.Types.Sum
217216import Network.Google.Prelude
218−
219−partners :: a
220−partners = error "partners"
gogol-partners/gen/Network/Google/Partners/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Partners.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-partners/gen/Network/Google/Partners/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Partners.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.PlayMoviesPartner.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.PlayMoviesPartner.Types
1416 (
15− -- * API Definition
16− playmoviespartner
17−
1817
1918 -- * Avail
20− , Avail
19+ Avail
2120 , avail
2221 , aAltId
2322 , aPphNames
@@ -163,6 +162,3 @@ module Network.Google.PlayMoviesPartner.Types
163162import Network.Google.PlayMoviesPartner.Types.Product
164163import Network.Google.PlayMoviesPartner.Types.Sum
165164import Network.Google.Prelude
166−
167−playmoviespartner :: a
168−playmoviespartner = error "playmoviespartner"
gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.PlayMoviesPartner.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.PlayMoviesPartner.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-plus-domains/gen/Network/Google/PlusDomains/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.PlusDomains.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.PlusDomains.Types
1416 (
15− -- * API Definition
16− plusDomains
17−
1817
1918 -- * Acl
20− , Acl
19+ Acl
2120 , acl
2221 , aclKind
2322 , aclItems
@@ -509,6 +508,3 @@ module Network.Google.PlusDomains.Types
509508import Network.Google.PlusDomains.Types.Product
510509import Network.Google.PlusDomains.Types.Sum
511510import Network.Google.Prelude
512−
513−plusDomains :: a
514−plusDomains = error "plusDomains"
gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.PlusDomains.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.PlusDomains.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-plus/gen/Network/Google/Plus/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Plus.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Plus.Types
1416 (
15− -- * API Definition
16− plus
17−
1817
1918 -- * Acl
20− , Acl
19+ Acl
2120 , acl
2221 , aclKind
2322 , aclItems
@@ -488,6 +487,3 @@ module Network.Google.Plus.Types
488487import Network.Google.Plus.Types.Product
489488import Network.Google.Plus.Types.Sum
490489import Network.Google.Prelude
491−
492−plus :: a
493−plus = error "plus"
gogol-plus/gen/Network/Google/Plus/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Plus.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-plus/gen/Network/Google/Plus/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Plus.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-prediction/gen/Network/Google/Prediction/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Prediction.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Prediction.Types
1416 (
15− -- * API Definition
16− prediction
17−
1817
1918 -- * Analyze
20− , Analyze
19+ Analyze
2120 , analyze
2221 , aKind
2322 , aModelDescription
@@ -193,6 +192,3 @@ module Network.Google.Prediction.Types
193192import Network.Google.Prediction.Types.Product
194193import Network.Google.Prediction.Types.Sum
195194import Network.Google.Prelude
196−
197−prediction :: a
198−prediction = error "prediction"
gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Prediction.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-prediction/gen/Network/Google/Prediction/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Prediction.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ProximityBeacon.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.ProximityBeacon.Types
1416 (
15− -- * API Definition
16− proximitybeacon
17−
1817
1918 -- * AdvertisedId
20− , AdvertisedId
19+ AdvertisedId
2120 , advertisedId
2221 , aiId
2322 , aiType
@@ -145,6 +144,3 @@ module Network.Google.ProximityBeacon.Types
145144import Network.Google.Prelude
146145import Network.Google.ProximityBeacon.Types.Product
147146import Network.Google.ProximityBeacon.Types.Sum
148−
149−proximitybeacon :: a
150−proximitybeacon = error "proximitybeacon"
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ProximityBeacon.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.ProximityBeacon.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-qpxexpress/gen/Network/Google/QPXExpress/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.QPXExpress.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.QPXExpress.Types
1416 (
15− -- * API Definition
16− qpxExpress
17−
1817
1918 -- * AircraftData
20− , AircraftData
19+ AircraftData
2120 , aircraftData
2221 , adKind
2322 , adName
@@ -251,6 +250,3 @@ module Network.Google.QPXExpress.Types
251250import Network.Google.Prelude
252251import Network.Google.QPXExpress.Types.Product
253252import Network.Google.QPXExpress.Types.Sum
254−
255−qpxExpress :: a
256−qpxExpress = error "qpxExpress"
gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.QPXExpress.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.QPXExpress.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-replicapool-updater/gen/Network/Google/ComputeEngineInstanceGroupUpdater/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ComputeEngineInstanceGroupUpdater.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.ComputeEngineInstanceGroupUpdater.Types
1416 (
15− -- * API Definition
16− replicapoolupdater
17−
1817
1918 -- * InstanceUpdate
20− , InstanceUpdate
19+ InstanceUpdate
2120 , instanceUpdate
2221 , iuStatus
2322 , iuError
@@ -156,6 +155,3 @@ module Network.Google.ComputeEngineInstanceGroupUpdater.Types
156155import Network.Google.ComputeEngineInstanceGroupUpdater.Types.Product
157156import Network.Google.ComputeEngineInstanceGroupUpdater.Types.Sum
158157import Network.Google.Prelude
159−
160−replicapoolupdater :: a
161−replicapoolupdater = error "replicapoolupdater"
gogol-replicapool-updater/gen/Network/Google/ComputeEngineInstanceGroupUpdater/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ComputeEngineInstanceGroupUpdater.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-replicapool-updater/gen/Network/Google/ComputeEngineInstanceGroupUpdater/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.ComputeEngineInstanceGroupUpdater.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-replicapool/gen/Network/Google/ComputeEngineInstanceGroupManager/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ComputeEngineInstanceGroupManager.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.ComputeEngineInstanceGroupManager.Types
1416 (
15− -- * API Definition
16− replicapool
17−
1817
1918 -- * InstanceGroupManager
20− , InstanceGroupManager
19+ InstanceGroupManager
2120 , instanceGroupManager
2221 , igmCurrentSize
2322 , igmGroup
@@ -148,6 +147,3 @@ module Network.Google.ComputeEngineInstanceGroupManager.Types
148147import Network.Google.ComputeEngineInstanceGroupManager.Types.Product
149148import Network.Google.ComputeEngineInstanceGroupManager.Types.Sum
150149import Network.Google.Prelude
151−
152−replicapool :: a
153−replicapool = error "replicapool"
gogol-replicapool/gen/Network/Google/ComputeEngineInstanceGroupManager/Types/Product.hs+5−3
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ComputeEngineInstanceGroupManager.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -417,7 +419,7 @@ data Operation = Operation
417419 , _oRegion :: !(Maybe Text)
418420 , _oTargetLink :: !(Maybe Text)
419421 , _oClientOperationId :: !(Maybe Text)
420− }
422+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
421423
422424-- | Creates a value of 'Operation' with the minimum fields required to make a request.
423425--
@@ -728,7 +730,7 @@ data OperationItemWarnings = OperationItemWarnings
728730 { _oiwData :: !(Maybe [OperationItemDataItemWarnings])
729731 , _oiwCode :: !(Maybe OperationCodeItemWarnings)
730732 , _oiwMessage :: !(Maybe Text)
731− }
733+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
732734
733735-- | Creates a value of 'OperationItemWarnings' with the minimum fields required to make a request.
734736--
@@ -827,7 +829,7 @@ olId = lens _olId (\ s a -> s{_olId = a})
827829data ReplicaPoolAutoHealingPolicy = ReplicaPoolAutoHealingPolicy
828830 { _rpahpHealthCheck :: !(Maybe Text)
829831 , _rpahpActionType :: !(Maybe ReplicaPoolAutoHealingPolicyActionType)
830− }
832+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
831833
832834-- | Creates a value of 'ReplicaPoolAutoHealingPolicy' with the minimum fields required to make a request.
833835--
gogol-replicapool/gen/Network/Google/ComputeEngineInstanceGroupManager/Types/Sum.hs+60
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.ComputeEngineInstanceGroupManager.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -46,6 +49,39 @@ data OperationCodeItemWarnings
4649
4750instance Hashable OperationCodeItemWarnings
4851
52+instance FromText OperationCodeItemWarnings where
53+ fromText = \case
54+ "DEPRECATED_RESOURCE_USED" -> Just OCIWDeprecatedResourceUsed
55+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just OCIWDiskSizeLargerThanImageSize
56+ "INJECTED_KERNELS_DEPRECATED" -> Just OCIWInjectedKernelsDeprecated
57+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just OCIWNextHopAddressNotAssigned
58+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just OCIWNextHopCannotIPForward
59+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just OCIWNextHopInstanceNotFound
60+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just OCIWNextHopInstanceNotOnNetwork
61+ "NEXT_HOP_NOT_RUNNING" -> Just OCIWNextHopNotRunning
62+ "NO_RESULTS_ON_PAGE" -> Just OCIWNoResultsOnPage
63+ "REQUIRED_TOS_AGREEMENT" -> Just OCIWRequiredTosAgreement
64+ "RESOURCE_NOT_DELETED" -> Just OCIWResourceNotDeleted
65+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just OCIWSingleInstancePropertyTemplate
66+ "UNREACHABLE" -> Just OCIWUnreachable
67+ _ -> Nothing
68+
69+instance ToText OperationCodeItemWarnings where
70+ toText = \case
71+ OCIWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"
72+ OCIWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"
73+ OCIWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"
74+ OCIWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"
75+ OCIWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"
76+ OCIWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"
77+ OCIWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"
78+ OCIWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"
79+ OCIWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"
80+ OCIWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"
81+ OCIWResourceNotDeleted -> "RESOURCE_NOT_DELETED"
82+ OCIWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"
83+ OCIWUnreachable -> "UNREACHABLE"
84+
4985-- | [Output Only] Status of the operation.
5086data OperationStatus
5187 = OSDone
@@ -58,6 +94,19 @@ data OperationStatus
5894
5995instance Hashable OperationStatus
6096
97+instance FromText OperationStatus where
98+ fromText = \case
99+ "DONE" -> Just OSDone
100+ "PENDING" -> Just OSPending
101+ "RUNNING" -> Just OSRunning
102+ _ -> Nothing
103+
104+instance ToText OperationStatus where
105+ toText = \case
106+ OSDone -> "DONE"
107+ OSPending -> "PENDING"
108+ OSRunning -> "RUNNING"
109+
61110-- | The action to perform when an instance becomes unhealthy. Possible
62111-- values are RECREATE or REBOOT. RECREATE replaces an unhealthy instance
63112-- with a new instance that is based on the instance template for this
@@ -71,3 +120,14 @@ data ReplicaPoolAutoHealingPolicyActionType
71120 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
72121
73122instance Hashable ReplicaPoolAutoHealingPolicyActionType
123+
124+instance FromText ReplicaPoolAutoHealingPolicyActionType where
125+ fromText = \case
126+ "REBOOT" -> Just RPAHPATReboot
127+ "RECREATE" -> Just RPAHPATRecreate
128+ _ -> Nothing
129+
130+instance ToText ReplicaPoolAutoHealingPolicyActionType where
131+ toText = \case
132+ RPAHPATReboot -> "REBOOT"
133+ RPAHPATRecreate -> "RECREATE"
gogol-reseller/gen/Network/Google/EnterpriseAppsReseller/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.EnterpriseAppsReseller.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.EnterpriseAppsReseller.Types
1416 (
15− -- * API Definition
16− reseller
17−
1817
1918 -- * Address
20− , Address
19+ Address
2120 , address
2221 , aOrganizationName
2322 , aKind
@@ -118,6 +117,3 @@ module Network.Google.EnterpriseAppsReseller.Types
118117import Network.Google.EnterpriseAppsReseller.Types.Product
119118import Network.Google.EnterpriseAppsReseller.Types.Sum
120119import Network.Google.Prelude
121−
122−reseller :: a
123−reseller = error "reseller"
gogol-reseller/gen/Network/Google/EnterpriseAppsReseller/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.EnterpriseAppsReseller.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-reseller/gen/Network/Google/EnterpriseAppsReseller/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.EnterpriseAppsReseller.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-resourceviews/gen/Network/Google/ComputeEngineInstanceGroups/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ComputeEngineInstanceGroups.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.ComputeEngineInstanceGroups.Types
1416 (
15− -- * API Definition
16− resourceviews
17−
1817
1918 -- * Label
20− , Label
19+ Label
2120 , label
2221 , lValue
2322 , lKey
@@ -156,6 +155,3 @@ module Network.Google.ComputeEngineInstanceGroups.Types
156155import Network.Google.ComputeEngineInstanceGroups.Types.Product
157156import Network.Google.ComputeEngineInstanceGroups.Types.Sum
158157import Network.Google.Prelude
159−
160−resourceviews :: a
161−resourceviews = error "resourceviews"
gogol-resourceviews/gen/Network/Google/ComputeEngineInstanceGroups/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.ComputeEngineInstanceGroups.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-resourceviews/gen/Network/Google/ComputeEngineInstanceGroups/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.ComputeEngineInstanceGroups.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-siteverification/gen/Network/Google/SiteVerification/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.SiteVerification.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.SiteVerification.Types
1416 (
15− -- * API Definition
16− siteVerification
17−
1817
1918 -- * SiteVerificationWebResourceGettokenRequest
20− , SiteVerificationWebResourceGettokenRequest
19+ SiteVerificationWebResourceGettokenRequest
2120 , siteVerificationWebResourceGettokenRequest
2221 , svwrgrSite
2322 , svwrgrVerificationMethod
@@ -56,6 +55,3 @@ module Network.Google.SiteVerification.Types
5655import Network.Google.Prelude
5756import Network.Google.SiteVerification.Types.Product
5857import Network.Google.SiteVerification.Types.Sum
59−
60−siteVerification :: a
61−siteVerification = error "siteVerification"
gogol-siteverification/gen/Network/Google/SiteVerification/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.SiteVerification.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-siteverification/gen/Network/Google/SiteVerification/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.SiteVerification.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-spectrum/gen/Network/Google/Spectrum/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Spectrum.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Spectrum.Types
1416 (
15− -- * API Definition
16− spectrum
17−
1817
1918 -- * AntennaCharacteristics
20− , AntennaCharacteristics
19+ AntennaCharacteristics
2120 , antennaCharacteristics
2221 , acHeight
2322 , acHeightType
@@ -288,6 +287,3 @@ module Network.Google.Spectrum.Types
288287import Network.Google.Prelude
289288import Network.Google.Spectrum.Types.Product
290289import Network.Google.Spectrum.Types.Sum
291−
292−spectrum :: a
293−spectrum = error "spectrum"
gogol-spectrum/gen/Network/Google/Spectrum/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Spectrum.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-spectrum/gen/Network/Google/Spectrum/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Spectrum.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.StorageTransfer.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.StorageTransfer.Types
1416 (
15− -- * API Definition
16− storagetransfer
17−
1817
1918 -- * AwsAccessKey
20− , AwsAccessKey
19+ AwsAccessKey
2120 , awsAccessKey
2221 , aakSecretAccessKey
2322 , aakAccessKeyId
@@ -212,6 +211,3 @@ module Network.Google.StorageTransfer.Types
212211import Network.Google.Prelude
213212import Network.Google.StorageTransfer.Types.Product
214213import Network.Google.StorageTransfer.Types.Sum
215−
216−storagetransfer :: a
217−storagetransfer = error "storagetransfer"
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.StorageTransfer.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.StorageTransfer.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-storage/gen/Network/Google/CloudStorage/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudStorage.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.CloudStorage.Types
1416 (
15− -- * API Definition
16− storage
17−
1817
1918 -- * Bucket
20− , Bucket
19+ Bucket
2120 , bucket
2221 , bucEtag
2322 , bucLocation
@@ -228,6 +227,3 @@ module Network.Google.CloudStorage.Types
228227import Network.Google.CloudStorage.Types.Product
229228import Network.Google.CloudStorage.Types.Sum
230229import Network.Google.Prelude
231−
232−storage :: a
233−storage = error "storage"
gogol-storage/gen/Network/Google/CloudStorage/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.CloudStorage.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-storage/gen/Network/Google/CloudStorage/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.CloudStorage.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-tagmanager/gen/Network/Google/TagManager/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.TagManager.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.TagManager.Types
1416 (
15− -- * API Definition
16− tagmanager
17−
1817
1918 -- * Account
20− , Account
19+ Account
2120 , account
2221 , aShareData
2322 , aFingerprint
@@ -324,6 +323,3 @@ module Network.Google.TagManager.Types
324323import Network.Google.Prelude
325324import Network.Google.TagManager.Types.Product
326325import Network.Google.TagManager.Types.Sum
327−
328−tagmanager :: a
329−tagmanager = error "tagmanager"
gogol-tagmanager/gen/Network/Google/TagManager/Types/Product.hs+9−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.TagManager.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -71,7 +73,7 @@ aName = lens _aName (\ s a -> s{_aName = a})
7173-- /See:/ 'accountAccess' smart constructor.
7274newtype AccountAccess = AccountAccess
7375 { _aaPermission :: Maybe [AccountAccessItemPermission]
74− }
76+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
7577
7678-- | Creates a value of 'AccountAccess' with the minimum fields required to make a request.
7779--
@@ -99,7 +101,7 @@ aaPermission
99101data Condition = Condition
100102 { _cType :: !(Maybe ConditionType)
101103 , _cParameter :: !(Maybe [Maybe Parameter])
102− }
104+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
103105
104106-- | Creates a value of 'Condition' with the minimum fields required to make a request.
105107--
@@ -150,7 +152,7 @@ data Container = Container
150152 , _cName :: !(Maybe Text)
151153 , _cNotes :: !(Maybe Text)
152154 , _cTimeZoneId :: !(Maybe Text)
153− }
155+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
154156
155157-- | Creates a value of 'Container' with the minimum fields required to make a request.
156158--
@@ -270,7 +272,7 @@ cTimeZoneId
270272data ContainerAccess = ContainerAccess
271273 { _caContainerId :: !(Maybe Text)
272274 , _caPermission :: !(Maybe [ContainerAccessItemPermission])
273− }
275+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
274276
275277-- | Creates a value of 'ContainerAccess' with the minimum fields required to make a request.
276278--
@@ -1178,7 +1180,7 @@ data Parameter = Parameter
11781180 , _pMap :: !(Maybe [Maybe Parameter])
11791181 , _pKey :: !(Maybe Text)
11801182 , _pType :: !(Maybe ParameterType)
1181− }
1183+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
11821184
11831185-- | Creates a value of 'Parameter' with the minimum fields required to make a request.
11841186--
@@ -1409,7 +1411,7 @@ data Tag = Tag
14091411 , _tagNotes :: !(Maybe Text)
14101412 , _tagFiringRuleId :: !(Maybe [Text])
14111413 , _tagParameter :: !(Maybe [Maybe Parameter])
1412− }
1414+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
14131415
14141416-- | Creates a value of 'Tag' with the minimum fields required to make a request.
14151417--
@@ -1668,7 +1670,7 @@ data Trigger = Trigger
16681670 , _tVideoPercentageList :: !(Maybe (Maybe Parameter))
16691671 , _tEventName :: !(Maybe (Maybe Parameter))
16701672 , _tWaitForTags :: !(Maybe (Maybe Parameter))
1671− }
1673+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
16721674
16731675-- | Creates a value of 'Trigger' with the minimum fields required to make a request.
16741676--
gogol-tagmanager/gen/Network/Google/TagManager/Types/Sum.hs+233
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.TagManager.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -29,6 +32,23 @@ data AccountAccessItemPermission
2932
3033instance Hashable AccountAccessItemPermission
3134
35+instance FromText AccountAccessItemPermission where
36+ fromText = \case
37+ "delete" -> Just AAIPDelete
38+ "edit" -> Just AAIPEdit
39+ "manage" -> Just AAIPManage
40+ "publish" -> Just AAIPPublish
41+ "read" -> Just AAIPRead
42+ _ -> Nothing
43+
44+instance ToText AccountAccessItemPermission where
45+ toText = \case
46+ AAIPDelete -> "delete"
47+ AAIPEdit -> "edit"
48+ AAIPManage -> "manage"
49+ AAIPPublish -> "publish"
50+ AAIPRead -> "read"
51+
3252-- | The type of operator for this condition.
3353data ConditionType
3454 = CTContains
@@ -57,6 +77,35 @@ data ConditionType
5777
5878instance Hashable ConditionType
5979
80+instance FromText ConditionType where
81+ fromText = \case
82+ "contains" -> Just CTContains
83+ "cssSelector" -> Just CTCssSelector
84+ "endsWith" -> Just CTEndsWith
85+ "equals" -> Just CTEquals
86+ "greater" -> Just CTGreater
87+ "greaterOrEquals" -> Just CTGreaterOrEquals
88+ "less" -> Just CTLess
89+ "lessOrEquals" -> Just CTLessOrEquals
90+ "matchRegex" -> Just CTMatchRegex
91+ "startsWith" -> Just CTStartsWith
92+ "urlMatches" -> Just CTURLMatches
93+ _ -> Nothing
94+
95+instance ToText ConditionType where
96+ toText = \case
97+ CTContains -> "contains"
98+ CTCssSelector -> "cssSelector"
99+ CTEndsWith -> "endsWith"
100+ CTEquals -> "equals"
101+ CTGreater -> "greater"
102+ CTGreaterOrEquals -> "greaterOrEquals"
103+ CTLess -> "less"
104+ CTLessOrEquals -> "lessOrEquals"
105+ CTMatchRegex -> "matchRegex"
106+ CTStartsWith -> "startsWith"
107+ CTURLMatches -> "urlMatches"
108+
60109data ContainerAccessItemPermission
61110 = CAIPDelete
62111 -- ^ @delete@
@@ -72,6 +121,23 @@ data ContainerAccessItemPermission
72121
73122instance Hashable ContainerAccessItemPermission
74123
124+instance FromText ContainerAccessItemPermission where
125+ fromText = \case
126+ "delete" -> Just CAIPDelete
127+ "edit" -> Just CAIPEdit
128+ "manage" -> Just CAIPManage
129+ "publish" -> Just CAIPPublish
130+ "read" -> Just CAIPRead
131+ _ -> Nothing
132+
133+instance ToText ContainerAccessItemPermission where
134+ toText = \case
135+ CAIPDelete -> "delete"
136+ CAIPEdit -> "edit"
137+ CAIPManage -> "manage"
138+ CAIPPublish -> "publish"
139+ CAIPRead -> "read"
140+
75141data ContainerItemEnabledBuiltInVariable
76142 = CIEBIVAdvertiserId
77143 -- ^ @advertiserId@
@@ -161,6 +227,97 @@ data ContainerItemEnabledBuiltInVariable
161227
162228instance Hashable ContainerItemEnabledBuiltInVariable
163229
230+instance FromText ContainerItemEnabledBuiltInVariable where
231+ fromText = \case
232+ "advertiserId" -> Just CIEBIVAdvertiserId
233+ "advertisingTrackingEnabled" -> Just CIEBIVAdvertisingTrackingEnabled
234+ "appId" -> Just CIEBIVAppId
235+ "appName" -> Just CIEBIVAppName
236+ "appVersionCode" -> Just CIEBIVAppVersionCode
237+ "appVersionName" -> Just CIEBIVAppVersionName
238+ "clickClasses" -> Just CIEBIVClickClasses
239+ "clickElement" -> Just CIEBIVClickElement
240+ "clickId" -> Just CIEBIVClickId
241+ "clickTarget" -> Just CIEBIVClickTarget
242+ "clickText" -> Just CIEBIVClickText
243+ "clickUrl" -> Just CIEBIVClickURL
244+ "containerId" -> Just CIEBIVContainerId
245+ "containerVersion" -> Just CIEBIVContainerVersion
246+ "debugMode" -> Just CIEBIVDebugMode
247+ "deviceName" -> Just CIEBIVDeviceName
248+ "errorLine" -> Just CIEBIVErrorLine
249+ "errorMessage" -> Just CIEBIVErrorMessage
250+ "errorUrl" -> Just CIEBIVErrorURL
251+ "event" -> Just CIEBIVEvent
252+ "formClasses" -> Just CIEBIVFormClasses
253+ "formElement" -> Just CIEBIVFormElement
254+ "formId" -> Just CIEBIVFormId
255+ "formTarget" -> Just CIEBIVFormTarget
256+ "formText" -> Just CIEBIVFormText
257+ "formUrl" -> Just CIEBIVFormURL
258+ "historySource" -> Just CIEBIVHistorySource
259+ "htmlId" -> Just CIEBIVHTMLId
260+ "language" -> Just CIEBIVLanguage
261+ "newHistoryFragment" -> Just CIEBIVNewHistoryFragment
262+ "newHistoryState" -> Just CIEBIVNewHistoryState
263+ "oldHistoryFragment" -> Just CIEBIVOldHistoryFragment
264+ "oldHistoryState" -> Just CIEBIVOldHistoryState
265+ "osVersion" -> Just CIEBIVOsVersion
266+ "pageHostname" -> Just CIEBIVPageHostname
267+ "pagePath" -> Just CIEBIVPagePath
268+ "pageUrl" -> Just CIEBIVPageURL
269+ "platform" -> Just CIEBIVPlatform
270+ "randomNumber" -> Just CIEBIVRandomNumber
271+ "referrer" -> Just CIEBIVReferrer
272+ "resolution" -> Just CIEBIVResolution
273+ "sdkVersion" -> Just CIEBIVSdkVersion
274+ _ -> Nothing
275+
276+instance ToText ContainerItemEnabledBuiltInVariable where
277+ toText = \case
278+ CIEBIVAdvertiserId -> "advertiserId"
279+ CIEBIVAdvertisingTrackingEnabled -> "advertisingTrackingEnabled"
280+ CIEBIVAppId -> "appId"
281+ CIEBIVAppName -> "appName"
282+ CIEBIVAppVersionCode -> "appVersionCode"
283+ CIEBIVAppVersionName -> "appVersionName"
284+ CIEBIVClickClasses -> "clickClasses"
285+ CIEBIVClickElement -> "clickElement"
286+ CIEBIVClickId -> "clickId"
287+ CIEBIVClickTarget -> "clickTarget"
288+ CIEBIVClickText -> "clickText"
289+ CIEBIVClickURL -> "clickUrl"
290+ CIEBIVContainerId -> "containerId"
291+ CIEBIVContainerVersion -> "containerVersion"
292+ CIEBIVDebugMode -> "debugMode"
293+ CIEBIVDeviceName -> "deviceName"
294+ CIEBIVErrorLine -> "errorLine"
295+ CIEBIVErrorMessage -> "errorMessage"
296+ CIEBIVErrorURL -> "errorUrl"
297+ CIEBIVEvent -> "event"
298+ CIEBIVFormClasses -> "formClasses"
299+ CIEBIVFormElement -> "formElement"
300+ CIEBIVFormId -> "formId"
301+ CIEBIVFormTarget -> "formTarget"
302+ CIEBIVFormText -> "formText"
303+ CIEBIVFormURL -> "formUrl"
304+ CIEBIVHistorySource -> "historySource"
305+ CIEBIVHTMLId -> "htmlId"
306+ CIEBIVLanguage -> "language"
307+ CIEBIVNewHistoryFragment -> "newHistoryFragment"
308+ CIEBIVNewHistoryState -> "newHistoryState"
309+ CIEBIVOldHistoryFragment -> "oldHistoryFragment"
310+ CIEBIVOldHistoryState -> "oldHistoryState"
311+ CIEBIVOsVersion -> "osVersion"
312+ CIEBIVPageHostname -> "pageHostname"
313+ CIEBIVPagePath -> "pagePath"
314+ CIEBIVPageURL -> "pageUrl"
315+ CIEBIVPlatform -> "platform"
316+ CIEBIVRandomNumber -> "randomNumber"
317+ CIEBIVReferrer -> "referrer"
318+ CIEBIVResolution -> "resolution"
319+ CIEBIVSdkVersion -> "sdkVersion"
320+
164321data ContainerItemUsageContext
165322 = CIUCAndroid
166323 -- ^ @android@
@@ -172,6 +329,19 @@ data ContainerItemUsageContext
172329
173330instance Hashable ContainerItemUsageContext
174331
332+instance FromText ContainerItemUsageContext where
333+ fromText = \case
334+ "android" -> Just CIUCAndroid
335+ "ios" -> Just CIUCIos
336+ "web" -> Just CIUCWeb
337+ _ -> Nothing
338+
339+instance ToText ContainerItemUsageContext where
340+ toText = \case
341+ CIUCAndroid -> "android"
342+ CIUCIos -> "ios"
343+ CIUCWeb -> "web"
344+
175345-- | The parameter type. Valid values are: - boolean: The value represents a
176346-- boolean, represented as \'true\' or \'false\' - integer: The value
177347-- represents a 64-bit signed integer value, in base 10 - list: A list of
@@ -194,6 +364,23 @@ data ParameterType
194364
195365instance Hashable ParameterType
196366
367+instance FromText ParameterType where
368+ fromText = \case
369+ "boolean" -> Just PTBoolean
370+ "integer" -> Just PTInteger
371+ "list" -> Just PTList
372+ "map" -> Just PTMap
373+ "template" -> Just PTTemplate
374+ _ -> Nothing
375+
376+instance ToText ParameterType where
377+ toText = \case
378+ PTBoolean -> "boolean"
379+ PTInteger -> "integer"
380+ PTList -> "list"
381+ PTMap -> "map"
382+ PTTemplate -> "template"
383+
197384-- | Option to fire this tag.
198385data TagTagFiringOption
199386 = TTFOOncePerEvent
@@ -206,6 +393,19 @@ data TagTagFiringOption
206393
207394instance Hashable TagTagFiringOption
208395
396+instance FromText TagTagFiringOption where
397+ fromText = \case
398+ "oncePerEvent" -> Just TTFOOncePerEvent
399+ "oncePerLoad" -> Just TTFOOncePerLoad
400+ "unlimited" -> Just TTFOUnlimited
401+ _ -> Nothing
402+
403+instance ToText TagTagFiringOption where
404+ toText = \case
405+ TTFOOncePerEvent -> "oncePerEvent"
406+ TTFOOncePerLoad -> "oncePerLoad"
407+ TTFOUnlimited -> "unlimited"
408+
209409-- | Defines the data layer event that causes this trigger.
210410data TriggerType
211411 = TTAjaxSubmission
@@ -237,3 +437,36 @@ data TriggerType
237437 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
238438
239439instance Hashable TriggerType
440+
441+instance FromText TriggerType where
442+ fromText = \case
443+ "ajaxSubmission" -> Just TTAjaxSubmission
444+ "always" -> Just TTAlways
445+ "click" -> Just TTClick
446+ "customEvent" -> Just TTCustomEvent
447+ "domReady" -> Just TTDomReady
448+ "formSubmission" -> Just TTFormSubmission
449+ "historyChange" -> Just TTHistoryChange
450+ "jsError" -> Just TTJsError
451+ "linkClick" -> Just TTLinkClick
452+ "pageview" -> Just TTPageview
453+ "timer" -> Just TTTimer
454+ "windowLoaded" -> Just TTWindowLoaded
455+ "youTube" -> Just TTYouTube
456+ _ -> Nothing
457+
458+instance ToText TriggerType where
459+ toText = \case
460+ TTAjaxSubmission -> "ajaxSubmission"
461+ TTAlways -> "always"
462+ TTClick -> "click"
463+ TTCustomEvent -> "customEvent"
464+ TTDomReady -> "domReady"
465+ TTFormSubmission -> "formSubmission"
466+ TTHistoryChange -> "historyChange"
467+ TTJsError -> "jsError"
468+ TTLinkClick -> "linkClick"
469+ TTPageview -> "pageview"
470+ TTTimer -> "timer"
471+ TTWindowLoaded -> "windowLoaded"
472+ TTYouTube -> "youTube"
gogol-taskqueue/gen/Network/Google/TaskQueue/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.TaskQueue.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.TaskQueue.Types
1416 (
15− -- * API Definition
16− taskqueue
17−
1817
1918 -- * Task
20− , Task
19+ Task
2120 , task
2221 , tRetryCount
2322 , tEnqueueTimestamp
@@ -68,6 +67,3 @@ module Network.Google.TaskQueue.Types
6867import Network.Google.Prelude
6968import Network.Google.TaskQueue.Types.Product
7069import Network.Google.TaskQueue.Types.Sum
71−
72−taskqueue :: a
73−taskqueue = error "taskqueue"
gogol-taskqueue/gen/Network/Google/TaskQueue/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.TaskQueue.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-taskqueue/gen/Network/Google/TaskQueue/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.TaskQueue.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-tasks/gen/Network/Google/Tasks/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Tasks.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Tasks.Types
1416 (
15− -- * API Definition
16− tasks
17−
1817
1918 -- * Task
20− , Task
19+ Task
2120 , task
2221 , tasParent
2322 , tasStatus
@@ -72,6 +71,3 @@ module Network.Google.Tasks.Types
7271import Network.Google.Prelude
7372import Network.Google.Tasks.Types.Product
7473import Network.Google.Tasks.Types.Sum
75−
76−tasks :: a
77−tasks = error "tasks"
gogol-tasks/gen/Network/Google/Tasks/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Tasks.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-tasks/gen/Network/Google/Tasks/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Tasks.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-translate/gen/Network/Google/Translate/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Translate.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.Translate.Types
1416 (
15− -- * API Definition
16− translate
17−
1817
1918 -- * DetectionsListResponse
20− , DetectionsListResponse
19+ DetectionsListResponse
2120 , detectionsListResponse
2221 , dlrDetections
2322
@@ -54,6 +53,3 @@ module Network.Google.Translate.Types
5453import Network.Google.Prelude
5554import Network.Google.Translate.Types.Product
5655import Network.Google.Translate.Types.Sum
57−
58−translate :: a
59−translate = error "translate"
gogol-translate/gen/Network/Google/Translate/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.Translate.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-translate/gen/Network/Google/Translate/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.Translate.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-urlshortener/gen/Network/Google/URLShortener/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.URLShortener.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.URLShortener.Types
1416 (
15− -- * API Definition
16− urlshortener
17−
1817
1918 -- * AnalyticsSnapshot
20− , AnalyticsSnapshot
19+ AnalyticsSnapshot
2120 , analyticsSnapshot
2221 , asPlatforms
2322 , asShortUrlClicks
@@ -64,6 +63,3 @@ module Network.Google.URLShortener.Types
6463import Network.Google.Prelude
6564import Network.Google.URLShortener.Types.Product
6665import Network.Google.URLShortener.Types.Sum
67−
68−urlshortener :: a
69−urlshortener = error "urlshortener"
gogol-urlshortener/gen/Network/Google/URLShortener/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.URLShortener.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-urlshortener/gen/Network/Google/URLShortener/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.URLShortener.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-webfonts/gen/Network/Google/WebFonts/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.WebFonts.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.WebFonts.Types
1416 (
15− -- * API Definition
16− webfonts
17−
1817
1918 -- * Webfont
20− , Webfont
19+ Webfont
2120 , webfont
2221 , wVariants
2322 , wKind
@@ -42,6 +41,3 @@ module Network.Google.WebFonts.Types
4241import Network.Google.Prelude
4342import Network.Google.WebFonts.Types.Product
4443import Network.Google.WebFonts.Types.Sum
45−
46−webfonts :: a
47−webfonts = error "webfonts"
gogol-webfonts/gen/Network/Google/WebFonts/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.WebFonts.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-webfonts/gen/Network/Google/WebFonts/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.WebFonts.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.WebmasterTools.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.WebmasterTools.Types
1416 (
15− -- * API Definition
16− webmasters
17−
1817
1918 -- * ApiDataRow
20− , ApiDataRow
19+ ApiDataRow
2120 , apiDataRow
2221 , adrImpressions
2322 , adrKeys
@@ -133,6 +132,3 @@ module Network.Google.WebmasterTools.Types
133132import Network.Google.Prelude
134133import Network.Google.WebmasterTools.Types.Product
135134import Network.Google.WebmasterTools.Types.Sum
136−
137−webmasters :: a
138−webmasters = error "webmasters"
gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.WebmasterTools.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.WebmasterTools.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.YouTubeAnalytics.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.YouTubeAnalytics.Types
1416 (
15− -- * API Definition
16− youtubeAnalytics
17−
1817
1918 -- * BatchReport
20− , BatchReport
19+ BatchReport
2120 , batchReport
2221 , brTimeUpdated
2322 , brKind
@@ -128,6 +127,3 @@ module Network.Google.YouTubeAnalytics.Types
128127import Network.Google.Prelude
129128import Network.Google.YouTubeAnalytics.Types.Product
130129import Network.Google.YouTubeAnalytics.Types.Sum
131−
132−youtubeAnalytics :: a
133−youtubeAnalytics = error "youtubeAnalytics"
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types/Product.hs+2
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.YouTubeAnalytics.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types/Sum.hs+3
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.YouTubeAnalytics.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
gogol-youtube/gen/Network/Google/YouTube/Types.hs+3−7
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.YouTube.Types
79-- Copyright : (c) 2015 Brendan Hay
@@ -12,12 +14,9 @@
1214--
1315module Network.Google.YouTube.Types
1416 (
15− -- * API Definition
16− youtube
17−
1817
1918 -- * AccessPolicy
20− , AccessPolicy
19+ AccessPolicy
2120 , accessPolicy
2221 , apException
2322 , apAllowed
@@ -1771,6 +1770,3 @@ module Network.Google.YouTube.Types
17711770import Network.Google.Prelude
17721771import Network.Google.YouTube.Types.Product
17731772import Network.Google.YouTube.Types.Sum
1774−
1775−youtube :: a
1776−youtube = error "youtube"
gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+35−33
@@ -2,6 +2,8 @@
22{-# LANGUAGE DeriveGeneric #-}
33{-# LANGUAGE OverloadedStrings #-}
44
5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
6+
57-- |
68-- Module : Network.Google.YouTube.Types.Product
79-- Copyright : (c) 2015 Brendan Hay
@@ -446,7 +448,7 @@ data ActivityContentDetailsPromotedItem = ActivityContentDetailsPromotedItem
446448 , _acdpiCreativeViewUrl :: !(Maybe Text)
447449 , _acdpiImpressionUrl :: !(Maybe [Text])
448450 , _acdpiCustomCtaButtonText :: !(Maybe Text)
449− }
451+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
450452
451453-- | Creates a value of 'ActivityContentDetailsPromotedItem' with the minimum fields required to make a request.
452454--
@@ -563,7 +565,7 @@ data ActivityContentDetailsRecommendation = ActivityContentDetailsRecommendation
563565 { _acdrResourceId :: !(Maybe (Maybe ResourceId))
564566 , _acdrSeedResourceId :: !(Maybe (Maybe ResourceId))
565567 , _acdrReason :: !(Maybe ActivityContentDetailsRecommendationReason)
566− }
568+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
567569
568570-- | Creates a value of 'ActivityContentDetailsRecommendation' with the minimum fields required to make a request.
569571--
@@ -611,7 +613,7 @@ data ActivityContentDetailsSocial = ActivityContentDetailsSocial
611613 , _acdsAuthor :: !(Maybe Text)
612614 , _acdsReferenceUrl :: !(Maybe Text)
613615 , _acdsType :: !(Maybe ActivityContentDetailsSocialType)
614− }
616+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
615617
616618-- | Creates a value of 'ActivityContentDetailsSocial' with the minimum fields required to make a request.
617619--
@@ -825,7 +827,7 @@ data ActivitySnippet = ActivitySnippet
825827 , _asTitle :: !(Maybe Text)
826828 , _asType :: !(Maybe ActivitySnippetType)
827829 , _asDescription :: !(Maybe Text)
828− }
830+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
829831
830832-- | Creates a value of 'ActivitySnippet' with the minimum fields required to make a request.
831833--
@@ -1038,7 +1040,7 @@ data CaptionSnippet = CaptionSnippet
10381040 , _csIsAutoSynced :: !(Maybe Bool)
10391041 , _csIsEasyReader :: !(Maybe Bool)
10401042 , _csAudioTrackType :: !(Maybe CaptionSnippetAudioTrackType)
1041− }
1043+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
10421044
10431045-- | Creates a value of 'CaptionSnippet' with the minimum fields required to make a request.
10441046--
@@ -1178,7 +1180,7 @@ data CdnSettings = CdnSettings
11781180 { _csIngestionInfo :: !(Maybe (Maybe IngestionInfo))
11791181 , _csFormat :: !(Maybe Text)
11801182 , _csIngestionType :: !(Maybe CdnSettingsIngestionType)
1181− }
1183+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
11821184
11831185-- | Creates a value of 'CdnSettings' with the minimum fields required to make a request.
11841186--
@@ -1677,7 +1679,7 @@ ccodContentOwner
16771679data ChannelConversionPing = ChannelConversionPing
16781680 { _ccpContext :: !(Maybe ChannelConversionPingContext)
16791681 , _ccpConversionUrl :: !(Maybe Text)
1680− }
1682+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
16811683
16821684-- | Creates a value of 'ChannelConversionPing' with the minimum fields required to make a request.
16831685--
@@ -2134,7 +2136,7 @@ data ChannelSectionSnippet = ChannelSectionSnippet
21342136 , _cssType :: !(Maybe ChannelSectionSnippetType)
21352137 , _cssPosition :: !(Maybe Word32)
21362138 , _cssDefaultLanguage :: !(Maybe Text)
2137− }
2139+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
21382140
21392141-- | Creates a value of 'ChannelSectionSnippet' with the minimum fields required to make a request.
21402142--
@@ -2555,7 +2557,7 @@ data ChannelStatus = ChannelStatus
25552557 { _csIsLinked :: !(Maybe Bool)
25562558 , _csLongUploadsStatus :: !(Maybe ChannelStatusLongUploadsStatus)
25572559 , _csPrivacyStatus :: !(Maybe ChannelStatusPrivacyStatus)
2558− }
2560+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
25592561
25602562-- | Creates a value of 'ChannelStatus' with the minimum fields required to make a request.
25612563--
@@ -2778,7 +2780,7 @@ data CommentSnippet = CommentSnippet
27782780 , _csniCanRate :: !(Maybe Bool)
27792781 , _csniAuthorGoogleplusProfileUrl :: !(Maybe Text)
27802782 , _csniParentId :: !(Maybe Text)
2781− }
2783+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
27822784
27832785-- | Creates a value of 'CommentSnippet' with the minimum fields required to make a request.
27842786--
@@ -3267,7 +3269,7 @@ data ContentRating = ContentRating
32673269 , _crSkfilmRating :: !(Maybe ContentRatingSkfilmRating)
32683270 , _crOflcRating :: !(Maybe ContentRatingOflcRating)
32693271 , _crKmrbRating :: !(Maybe ContentRatingKmrbRating)
3270− }
3272+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
32713273
32723274-- | Creates a value of 'ContentRating' with the minimum fields required to make a request.
32733275--
@@ -4741,7 +4743,7 @@ ibPosition
47414743data InvideoPosition = InvideoPosition
47424744 { _ipCornerPosition :: !(Maybe InvideoPositionCornerPosition)
47434745 , _ipType :: !(Maybe InvideoPositionType)
4744− }
4746+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
47454747
47464748-- | Creates a value of 'InvideoPosition' with the minimum fields required to make a request.
47474749--
@@ -4836,7 +4838,7 @@ data InvideoTiming = InvideoTiming
48364838 { _itDurationMs :: !(Maybe Word64)
48374839 , _itOffsetMs :: !(Maybe Word64)
48384840 , _itType :: !(Maybe InvideoTimingType)
4839− }
4841+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
48404842
48414843-- | Creates a value of 'InvideoTiming' with the minimum fields required to make a request.
48424844--
@@ -5411,7 +5413,7 @@ data LiveBroadcastStatus = LiveBroadcastStatus
54115413 , _lbsRecordingStatus :: !(Maybe LiveBroadcastStatusRecordingStatus)
54125414 , _lbsLifeCycleStatus :: !(Maybe LiveBroadcastStatusLifeCycleStatus)
54135415 , _lbsPrivacyStatus :: !(Maybe LiveBroadcastStatusPrivacyStatus)
5414− }
5416+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
54155417
54165418-- | Creates a value of 'LiveBroadcastStatus' with the minimum fields required to make a request.
54175419--
@@ -5469,7 +5471,7 @@ data LiveBroadcastTopic = LiveBroadcastTopic
54695471 { _lbtSnippet :: !(Maybe (Maybe LiveBroadcastTopicSnippet))
54705472 , _lbtUnmatched :: !(Maybe Bool)
54715473 , _lbtType :: !(Maybe LiveBroadcastTopicType)
5472− }
5474+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
54735475
54745476-- | Creates a value of 'LiveBroadcastTopic' with the minimum fields required to make a request.
54755477--
@@ -5646,7 +5648,7 @@ data LiveStreamConfigurationIssue = LiveStreamConfigurationIssue
56465648 , _lsciReason :: !(Maybe Text)
56475649 , _lsciType :: !(Maybe LiveStreamConfigurationIssueType)
56485650 , _lsciDescription :: !(Maybe Text)
5649− }
5651+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
56505652
56515653-- | Creates a value of 'LiveStreamConfigurationIssue' with the minimum fields required to make a request.
56525654--
@@ -5741,7 +5743,7 @@ data LiveStreamHealthStatus = LiveStreamHealthStatus
57415743 { _lshsStatus :: !(Maybe LiveStreamHealthStatusStatus)
57425744 , _lshsConfigurationIssues :: !(Maybe [Maybe LiveStreamConfigurationIssue])
57435745 , _lshsLastUpdateTimeSeconds :: !(Maybe Word64)
5744− }
5746+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
57455747
57465748-- | Creates a value of 'LiveStreamHealthStatus' with the minimum fields required to make a request.
57475749--
@@ -5950,7 +5952,7 @@ lssDescription
59505952data LiveStreamStatus = LiveStreamStatus
59515953 { _lssStreamStatus :: !(Maybe LiveStreamStatusStreamStatus)
59525954 , _lssHealthStatus :: !(Maybe (Maybe LiveStreamHealthStatus))
5953− }
5955+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
59545956
59555957-- | Creates a value of 'LiveStreamStatus' with the minimum fields required to make a request.
59565958--
@@ -6622,7 +6624,7 @@ pisPosition
66226624-- /See:/ 'playlistItemStatus' smart constructor.
66236625newtype PlaylistItemStatus = PlaylistItemStatus
66246626 { _pisPrivacyStatus :: Maybe PlaylistItemStatusPrivacyStatus
6625− }
6627+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
66266628
66276629-- | Creates a value of 'PlaylistItemStatus' with the minimum fields required to make a request.
66286630--
@@ -6920,7 +6922,7 @@ psDefaultLanguage
69206922-- /See:/ 'playlistStatus' smart constructor.
69216923newtype PlaylistStatus = PlaylistStatus
69226924 { _psPrivacyStatus :: Maybe PlaylistStatusPrivacyStatus
6923− }
6925+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
69246926
69256927-- | Creates a value of 'PlaylistStatus' with the minimum fields required to make a request.
69266928--
@@ -7004,7 +7006,7 @@ data PromotedItemId = PromotedItemId
70047006 , _piiVideoId :: !(Maybe Text)
70057007 , _piiWebsiteUrl :: !(Maybe Text)
70067008 , _piiType :: !(Maybe PromotedItemIdType)
7007− }
7009+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
70087010
70097011-- | Creates a value of 'PromotedItemId' with the minimum fields required to make a request.
70107012--
@@ -7310,7 +7312,7 @@ data SearchResultSnippet = SearchResultSnippet
73107312 , _srsTitle :: !(Maybe Text)
73117313 , _srsLiveBroadcastContent :: !(Maybe SearchResultSnippetLiveBroadcastContent)
73127314 , _srsDescription :: !(Maybe Text)
7313− }
7315+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
73147316
73157317-- | Creates a value of 'SearchResultSnippet' with the minimum fields required to make a request.
73167318--
@@ -7471,7 +7473,7 @@ data SubscriptionContentDetails = SubscriptionContentDetails
74717473 { _scdActivityType :: !(Maybe SubscriptionContentDetailsActivityType)
74727474 , _scdTotalItemCount :: !(Maybe Word32)
74737475 , _scdNewItemCount :: !(Maybe Word32)
7474− }
7476+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
74757477
74767478-- | Creates a value of 'SubscriptionContentDetails' with the minimum fields required to make a request.
74777479--
@@ -8383,7 +8385,7 @@ data VideoAgeGating = VideoAgeGating
83838385 { _vagAlcoholContent :: !(Maybe Bool)
83848386 , _vagRestricted :: !(Maybe Bool)
83858387 , _vagVideoGameRating :: !(Maybe VideoAgeGatingVideoGameRating)
8386− }
8388+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
83878389
83888390-- | Creates a value of 'VideoAgeGating' with the minimum fields required to make a request.
83898391--
@@ -8632,7 +8634,7 @@ data VideoContentDetails = VideoContentDetails
86328634 , _vcdDuration :: !(Maybe Text)
86338635 , _vcdContentRating :: !(Maybe (Maybe ContentRating))
86348636 , _vcdLicensedContent :: !(Maybe Bool)
8635− }
8637+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
86368638
86378639-- | Creates a value of 'VideoContentDetails' with the minimum fields required to make a request.
86388640--
@@ -8776,7 +8778,7 @@ vcdrrBlocked
87768778data VideoConversionPing = VideoConversionPing
87778779 { _vcpContext :: !(Maybe VideoConversionPingContext)
87788780 , _vcpConversionUrl :: !(Maybe Text)
8779− }
8781+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
87808782
87818783-- | Creates a value of 'VideoConversionPing' with the minimum fields required to make a request.
87828784--
@@ -8853,7 +8855,7 @@ data VideoFileDetails = VideoFileDetails
88538855 , _vfdVideoStreams :: !(Maybe [Maybe VideoFileDetailsVideoStream])
88548856 , _vfdAudioStreams :: !(Maybe [Maybe VideoFileDetailsAudioStream])
88558857 , _vfdFileName :: !(Maybe Text)
8856− }
8858+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
88578859
88588860-- | Creates a value of 'VideoFileDetails' with the minimum fields required to make a request.
88598861--
@@ -9031,7 +9033,7 @@ data VideoFileDetailsVideoStream = VideoFileDetailsVideoStream
90319033 , _vfdvsCodec :: !(Maybe Text)
90329034 , _vfdvsAspectRatio :: !(Maybe Double)
90339035 , _vfdvsWidthPixels :: !(Maybe Word32)
9034− }
9036+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
90359037
90369038-- | Creates a value of 'VideoFileDetailsVideoStream' with the minimum fields required to make a request.
90379039--
@@ -9463,7 +9465,7 @@ data VideoProcessingDetails = VideoProcessingDetails
94639465 , _vpdProcessingStatus :: !(Maybe VideoProcessingDetailsProcessingStatus)
94649466 , _vpdEditorSuggestionsAvailability :: !(Maybe Text)
94659467 , _vpdFileDetailsAvailability :: !(Maybe Text)
9466− }
9468+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
94679469
94689470-- | Creates a value of 'VideoProcessingDetails' with the minimum fields required to make a request.
94699471--
@@ -9647,7 +9649,7 @@ vpdTags
96479649data VideoRating = VideoRating
96489650 { _vrRating :: !(Maybe VideoRatingRating)
96499651 , _vrVideoId :: !(Maybe Text)
9650− }
9652+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
96519653
96529654-- | Creates a value of 'VideoRating' with the minimum fields required to make a request.
96539655--
@@ -9733,7 +9735,7 @@ data VideoSnippet = VideoSnippet
97339735 , _vsDescription :: !(Maybe Text)
97349736 , _vsTags :: !(Maybe [Text])
97359737 , _vsDefaultLanguage :: !(Maybe Text)
9736− }
9738+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
97379739
97389740-- | Creates a value of 'VideoSnippet' with the minimum fields required to make a request.
97399741--
@@ -9934,7 +9936,7 @@ data VideoStatus = VideoStatus
99349936 , _vsPrivacyStatus :: !(Maybe VideoStatusPrivacyStatus)
99359937 , _vsEmbeddable :: !(Maybe Bool)
99369938 , _vsLicense :: !(Maybe VideoStatusLicense)
9937− }
9939+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
99389940
99399941-- | Creates a value of 'VideoStatus' with the minimum fields required to make a request.
99409942--
@@ -10031,7 +10033,7 @@ data VideoSuggestions = VideoSuggestions
1003110033 , _vsEditorSuggestions :: !(Maybe [VideoSuggestionsItemEditorSuggestions])
1003210034 , _vsProcessingWarnings :: !(Maybe [VideoSuggestionsItemProcessingWarnings])
1003310035 , _vsTagSuggestions :: !(Maybe [Maybe VideoSuggestionsTagSuggestion])
10034− }
10036+ } deriving (Eq,Read,Show,Data,Typeable,Generic)
1003510037
1003610038-- | Creates a value of 'VideoSuggestions' with the minimum fields required to make a request.
1003710039--
gogol-youtube/gen/Network/Google/YouTube/Types/Sum.hs+2182
@@ -1,7 +1,10 @@
11{-# LANGUAGE DeriveDataTypeable #-}
22{-# LANGUAGE DeriveGeneric #-}
3+{-# LANGUAGE LambdaCase #-}
34{-# LANGUAGE OverloadedStrings #-}
45
6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}
7+
58-- |
69-- Module : Network.Google.YouTube.Types.Sum
710-- Copyright : (c) 2015 Brendan Hay
@@ -25,6 +28,17 @@ data ActivityContentDetailsPromotedItemCtaType
2528
2629instance Hashable ActivityContentDetailsPromotedItemCtaType
2730
31+instance FromText ActivityContentDetailsPromotedItemCtaType where
32+ fromText = \case
33+ "unspecified" -> Just ACDPICTUnspecified
34+ "visitAdvertiserSite" -> Just ACDPICTVisitAdvertiserSite
35+ _ -> Nothing
36+
37+instance ToText ActivityContentDetailsPromotedItemCtaType where
38+ toText = \case
39+ ACDPICTUnspecified -> "unspecified"
40+ ACDPICTVisitAdvertiserSite -> "visitAdvertiserSite"
41+
2842-- | The reason that the resource is recommended to the user.
2943data ActivityContentDetailsRecommendationReason
3044 = ACDRRUnspecified
@@ -39,6 +53,21 @@ data ActivityContentDetailsRecommendationReason
3953
4054instance Hashable ActivityContentDetailsRecommendationReason
4155
56+instance FromText ActivityContentDetailsRecommendationReason where
57+ fromText = \case
58+ "unspecified" -> Just ACDRRUnspecified
59+ "videoFavorited" -> Just ACDRRVideoFavorited
60+ "videoLiked" -> Just ACDRRVideoLiked
61+ "videoWatched" -> Just ACDRRVideoWatched
62+ _ -> Nothing
63+
64+instance ToText ActivityContentDetailsRecommendationReason where
65+ toText = \case
66+ ACDRRUnspecified -> "unspecified"
67+ ACDRRVideoFavorited -> "videoFavorited"
68+ ACDRRVideoLiked -> "videoLiked"
69+ ACDRRVideoWatched -> "videoWatched"
70+
4271-- | The name of the social network.
4372data ActivityContentDetailsSocialType
4473 = ACDSTFacebook
@@ -53,6 +82,21 @@ data ActivityContentDetailsSocialType
5382
5483instance Hashable ActivityContentDetailsSocialType
5584
85+instance FromText ActivityContentDetailsSocialType where
86+ fromText = \case
87+ "facebook" -> Just ACDSTFacebook
88+ "googlePlus" -> Just ACDSTGooglePlus
89+ "twitter" -> Just ACDSTTwitter
90+ "unspecified" -> Just ACDSTUnspecified
91+ _ -> Nothing
92+
93+instance ToText ActivityContentDetailsSocialType where
94+ toText = \case
95+ ACDSTFacebook -> "facebook"
96+ ACDSTGooglePlus -> "googlePlus"
97+ ACDSTTwitter -> "twitter"
98+ ACDSTUnspecified -> "unspecified"
99+
56100-- | The type of activity that the resource describes.
57101data ActivitySnippetType
58102 = ASTBulletin
@@ -81,6 +125,35 @@ data ActivitySnippetType
81125
82126instance Hashable ActivitySnippetType
83127
128+instance FromText ActivitySnippetType where
129+ fromText = \case
130+ "bulletin" -> Just ASTBulletin
131+ "channelItem" -> Just ASTChannelItem
132+ "comment" -> Just ASTComment
133+ "favorite" -> Just ASTFavorite
134+ "like" -> Just ASTLike
135+ "playlistItem" -> Just ASTPlaylistItem
136+ "promotedItem" -> Just ASTPromotedItem
137+ "recommendation" -> Just ASTRecommendation
138+ "social" -> Just ASTSocial
139+ "subscription" -> Just ASTSubscription
140+ "upload" -> Just ASTUpload
141+ _ -> Nothing
142+
143+instance ToText ActivitySnippetType where
144+ toText = \case
145+ ASTBulletin -> "bulletin"
146+ ASTChannelItem -> "channelItem"
147+ ASTComment -> "comment"
148+ ASTFavorite -> "favorite"
149+ ASTLike -> "like"
150+ ASTPlaylistItem -> "playlistItem"
151+ ASTPromotedItem -> "promotedItem"
152+ ASTRecommendation -> "recommendation"
153+ ASTSocial -> "social"
154+ ASTSubscription -> "subscription"
155+ ASTUpload -> "upload"
156+
84157-- | The type of audio track associated with the caption track.
85158data CaptionSnippetAudioTrackType
86159 = CSATTCommentary
@@ -95,6 +168,21 @@ data CaptionSnippetAudioTrackType
95168
96169instance Hashable CaptionSnippetAudioTrackType
97170
171+instance FromText CaptionSnippetAudioTrackType where
172+ fromText = \case
173+ "commentary" -> Just CSATTCommentary
174+ "descriptive" -> Just CSATTDescriptive
175+ "primary" -> Just CSATTPrimary
176+ "unknown" -> Just CSATTUnknown
177+ _ -> Nothing
178+
179+instance ToText CaptionSnippetAudioTrackType where
180+ toText = \case
181+ CSATTCommentary -> "commentary"
182+ CSATTDescriptive -> "descriptive"
183+ CSATTPrimary -> "primary"
184+ CSATTUnknown -> "unknown"
185+
98186-- | The reason that YouTube failed to process the caption track. This
99187-- property is only present if the state property\'s value is failed.
100188data CaptionSnippetFailureReason
@@ -108,6 +196,19 @@ data CaptionSnippetFailureReason
108196
109197instance Hashable CaptionSnippetFailureReason
110198
199+instance FromText CaptionSnippetFailureReason where
200+ fromText = \case
201+ "processingFailed" -> Just CSFRProcessingFailed
202+ "unknownFormat" -> Just CSFRUnknownFormat
203+ "unsupportedFormat" -> Just CSFRUnsupportedFormat
204+ _ -> Nothing
205+
206+instance ToText CaptionSnippetFailureReason where
207+ toText = \case
208+ CSFRProcessingFailed -> "processingFailed"
209+ CSFRUnknownFormat -> "unknownFormat"
210+ CSFRUnsupportedFormat -> "unsupportedFormat"
211+
111212-- | The caption track\'s status.
112213data CaptionSnippetStatus
113214 = CSSFailed
@@ -120,6 +221,19 @@ data CaptionSnippetStatus
120221
121222instance Hashable CaptionSnippetStatus
122223
224+instance FromText CaptionSnippetStatus where
225+ fromText = \case
226+ "failed" -> Just CSSFailed
227+ "serving" -> Just CSSServing
228+ "syncing" -> Just CSSSyncing
229+ _ -> Nothing
230+
231+instance ToText CaptionSnippetStatus where
232+ toText = \case
233+ CSSFailed -> "failed"
234+ CSSServing -> "serving"
235+ CSSSyncing -> "syncing"
236+
123237-- | The caption track\'s type.
124238data CaptionSnippetTrackKind
125239 = CSTKAsr
@@ -132,6 +246,19 @@ data CaptionSnippetTrackKind
132246
133247instance Hashable CaptionSnippetTrackKind
134248
249+instance FromText CaptionSnippetTrackKind where
250+ fromText = \case
251+ "ASR" -> Just CSTKAsr
252+ "forced" -> Just CSTKForced
253+ "standard" -> Just CSTKStandard
254+ _ -> Nothing
255+
256+instance ToText CaptionSnippetTrackKind where
257+ toText = \case
258+ CSTKAsr -> "ASR"
259+ CSTKForced -> "forced"
260+ CSTKStandard -> "standard"
261+
135262-- | The method or protocol used to transmit the video stream.
136263data CdnSettingsIngestionType
137264 = CSITDash
@@ -142,6 +269,17 @@ data CdnSettingsIngestionType
142269
143270instance Hashable CdnSettingsIngestionType
144271
272+instance FromText CdnSettingsIngestionType where
273+ fromText = \case
274+ "dash" -> Just CSITDash
275+ "rtmp" -> Just CSITRtmp
276+ _ -> Nothing
277+
278+instance ToText CdnSettingsIngestionType where
279+ toText = \case
280+ CSITDash -> "dash"
281+ CSITRtmp -> "rtmp"
282+
145283-- | Defines the context of the ping.
146284data ChannelConversionPingContext
147285 = CCPCCview
@@ -154,6 +292,19 @@ data ChannelConversionPingContext
154292
155293instance Hashable ChannelConversionPingContext
156294
295+instance FromText ChannelConversionPingContext where
296+ fromText = \case
297+ "cview" -> Just CCPCCview
298+ "subscribe" -> Just CCPCSubscribe
299+ "unsubscribe" -> Just CCPCUnsubscribe
300+ _ -> Nothing
301+
302+instance ToText ChannelConversionPingContext where
303+ toText = \case
304+ CCPCCview -> "cview"
305+ CCPCSubscribe -> "subscribe"
306+ CCPCUnsubscribe -> "unsubscribe"
307+
157308-- | The style of the channel section.
158309data ChannelSectionSnippetStyle
159310 = CSSSChannelsectionStyleUndefined
@@ -166,6 +317,19 @@ data ChannelSectionSnippetStyle
166317
167318instance Hashable ChannelSectionSnippetStyle
168319
320+instance FromText ChannelSectionSnippetStyle where
321+ fromText = \case
322+ "channelsectionStyleUndefined" -> Just CSSSChannelsectionStyleUndefined
323+ "horizontalRow" -> Just CSSSHorizontalRow
324+ "verticalList" -> Just CSSSVerticalList
325+ _ -> Nothing
326+
327+instance ToText ChannelSectionSnippetStyle where
328+ toText = \case
329+ CSSSChannelsectionStyleUndefined -> "channelsectionStyleUndefined"
330+ CSSSHorizontalRow -> "horizontalRow"
331+ CSSSVerticalList -> "verticalList"
332+
169333-- | The type of the channel section.
170334data ChannelSectionSnippetType
171335 = CSSTAllPlaylists
@@ -206,6 +370,47 @@ data ChannelSectionSnippetType
206370
207371instance Hashable ChannelSectionSnippetType
208372
373+instance FromText ChannelSectionSnippetType where
374+ fromText = \case
375+ "allPlaylists" -> Just CSSTAllPlaylists
376+ "channelsectionTypeUndefined" -> Just CSSTChannelsectionTypeUndefined
377+ "completedEvents" -> Just CSSTCompletedEvents
378+ "likedPlaylists" -> Just CSSTLikedPlaylists
379+ "likes" -> Just CSSTLikes
380+ "liveEvents" -> Just CSSTLiveEvents
381+ "multipleChannels" -> Just CSSTMultipleChannels
382+ "multiplePlaylists" -> Just CSSTMultiplePlaylists
383+ "popularUploads" -> Just CSSTPopularUploads
384+ "postedPlaylists" -> Just CSSTPostedPlaylists
385+ "postedVideos" -> Just CSSTPostedVideos
386+ "recentActivity" -> Just CSSTRecentActivity
387+ "recentPosts" -> Just CSSTRecentPosts
388+ "recentUploads" -> Just CSSTRecentUploads
389+ "singlePlaylist" -> Just CSSTSinglePlaylist
390+ "subscriptions" -> Just CSSTSubscriptions
391+ "upcomingEvents" -> Just CSSTUpcomingEvents
392+ _ -> Nothing
393+
394+instance ToText ChannelSectionSnippetType where
395+ toText = \case
396+ CSSTAllPlaylists -> "allPlaylists"
397+ CSSTChannelsectionTypeUndefined -> "channelsectionTypeUndefined"
398+ CSSTCompletedEvents -> "completedEvents"
399+ CSSTLikedPlaylists -> "likedPlaylists"
400+ CSSTLikes -> "likes"
401+ CSSTLiveEvents -> "liveEvents"
402+ CSSTMultipleChannels -> "multipleChannels"
403+ CSSTMultiplePlaylists -> "multiplePlaylists"
404+ CSSTPopularUploads -> "popularUploads"
405+ CSSTPostedPlaylists -> "postedPlaylists"
406+ CSSTPostedVideos -> "postedVideos"
407+ CSSTRecentActivity -> "recentActivity"
408+ CSSTRecentPosts -> "recentPosts"
409+ CSSTRecentUploads -> "recentUploads"
410+ CSSTSinglePlaylist -> "singlePlaylist"
411+ CSSTSubscriptions -> "subscriptions"
412+ CSSTUpcomingEvents -> "upcomingEvents"
413+
209414-- | The long uploads status of this channel. See
210415data ChannelStatusLongUploadsStatus
211416 = CSLUSAllowed
@@ -220,6 +425,21 @@ data ChannelStatusLongUploadsStatus
220425
221426instance Hashable ChannelStatusLongUploadsStatus
222427
428+instance FromText ChannelStatusLongUploadsStatus where
429+ fromText = \case
430+ "allowed" -> Just CSLUSAllowed
431+ "disallowed" -> Just CSLUSDisallowed
432+ "eligible" -> Just CSLUSEligible
433+ "longUploadsUnspecified" -> Just CSLUSLongUploadsUnspecified
434+ _ -> Nothing
435+
436+instance ToText ChannelStatusLongUploadsStatus where
437+ toText = \case
438+ CSLUSAllowed -> "allowed"
439+ CSLUSDisallowed -> "disallowed"
440+ CSLUSEligible -> "eligible"
441+ CSLUSLongUploadsUnspecified -> "longUploadsUnspecified"
442+
223443-- | Privacy status of the channel.
224444data ChannelStatusPrivacyStatus
225445 = CSPSPrivate
@@ -232,6 +452,19 @@ data ChannelStatusPrivacyStatus
232452
233453instance Hashable ChannelStatusPrivacyStatus
234454
455+instance FromText ChannelStatusPrivacyStatus where
456+ fromText = \case
457+ "private" -> Just CSPSPrivate
458+ "public" -> Just CSPSPublic
459+ "unlisted" -> Just CSPSUnlisted
460+ _ -> Nothing
461+
462+instance ToText ChannelStatusPrivacyStatus where
463+ toText = \case
464+ CSPSPrivate -> "private"
465+ CSPSPublic -> "public"
466+ CSPSUnlisted -> "unlisted"
467+
235468-- | The comment\'s moderation status. Will not be set if the comments were
236469-- requested through the id filter.
237470data CommentSnippetModerationStatus
@@ -247,6 +480,21 @@ data CommentSnippetModerationStatus
247480
248481instance Hashable CommentSnippetModerationStatus
249482
483+instance FromText CommentSnippetModerationStatus where
484+ fromText = \case
485+ "heldForReview" -> Just CSMSHeldForReview
486+ "likelySpam" -> Just CSMSLikelySpam
487+ "published" -> Just CSMSPublished
488+ "rejected" -> Just CSMSRejected
489+ _ -> Nothing
490+
491+instance ToText CommentSnippetModerationStatus where
492+ toText = \case
493+ CSMSHeldForReview -> "heldForReview"
494+ CSMSLikelySpam -> "likelySpam"
495+ CSMSPublished -> "published"
496+ CSMSRejected -> "rejected"
497+
250498-- | The rating the viewer has given to this comment. For the time being this
251499-- will never return RATE_TYPE_DISLIKE and instead return RATE_TYPE_NONE.
252500-- This may change in the future.
@@ -263,6 +511,21 @@ data CommentSnippetViewerRating
263511
264512instance Hashable CommentSnippetViewerRating
265513
514+instance FromText CommentSnippetViewerRating where
515+ fromText = \case
516+ "dislike" -> Just CSVRDislike
517+ "like" -> Just CSVRLike
518+ "none" -> Just CSVRNone
519+ "unspecified" -> Just CSVRUnspecified
520+ _ -> Nothing
521+
522+instance ToText CommentSnippetViewerRating where
523+ toText = \case
524+ CSVRDislike -> "dislike"
525+ CSVRLike -> "like"
526+ CSVRNone -> "none"
527+ CSVRUnspecified -> "unspecified"
528+
266529-- | The video\'s Australian Classification Board (ACB) or Australian
267530-- Communications and Media Authority (ACMA) rating. ACMA ratings are used
268531-- to classify children\'s television programming.
@@ -289,6 +552,31 @@ data ContentRatingAcbRating
289552
290553instance Hashable ContentRatingAcbRating
291554
555+instance FromText ContentRatingAcbRating where
556+ fromText = \case
557+ "acbC" -> Just CRARAcbC
558+ "acbE" -> Just CRARAcbE
559+ "acbG" -> Just CRARAcbG
560+ "acbM" -> Just CRARAcbM
561+ "acbMa15plus" -> Just CRARAcbMa15plus
562+ "acbP" -> Just CRARAcbP
563+ "acbPg" -> Just CRARAcbPg
564+ "acbR18plus" -> Just CRARAcbR18plus
565+ "acbUnrated" -> Just CRARAcbUnrated
566+ _ -> Nothing
567+
568+instance ToText ContentRatingAcbRating where
569+ toText = \case
570+ CRARAcbC -> "acbC"
571+ CRARAcbE -> "acbE"
572+ CRARAcbG -> "acbG"
573+ CRARAcbM -> "acbM"
574+ CRARAcbMa15plus -> "acbMa15plus"
575+ CRARAcbP -> "acbP"
576+ CRARAcbPg -> "acbPg"
577+ CRARAcbR18plus -> "acbR18plus"
578+ CRARAcbUnrated -> "acbUnrated"
579+
292580-- | The video\'s rating from Italy\'s Autorità per le Garanzie nelle
293581-- Comunicazioni (AGCOM).
294582data ContentRatingAgcomRating
@@ -304,6 +592,21 @@ data ContentRatingAgcomRating
304592
305593instance Hashable ContentRatingAgcomRating
306594
595+instance FromText ContentRatingAgcomRating where
596+ fromText = \case
597+ "agcomT" -> Just CRARAgcomT
598+ "agcomUnrated" -> Just CRARAgcomUnrated
599+ "agcomVm14" -> Just CRARAGCOMVM14
600+ "agcomVm18" -> Just CRARAGCOMVM18
601+ _ -> Nothing
602+
603+instance ToText ContentRatingAgcomRating where
604+ toText = \case
605+ CRARAgcomT -> "agcomT"
606+ CRARAgcomUnrated -> "agcomUnrated"
607+ CRARAGCOMVM14 -> "agcomVm14"
608+ CRARAGCOMVM18 -> "agcomVm18"
609+
307610-- | The video\'s Anatel (Asociación Nacional de Televisión) rating for
308611-- Chilean television.
309612data ContentRatingAnatelRating
@@ -327,6 +630,29 @@ data ContentRatingAnatelRating
327630
328631instance Hashable ContentRatingAnatelRating
329632
633+instance FromText ContentRatingAnatelRating where
634+ fromText = \case
635+ "anatelA" -> Just CRARAnatelA
636+ "anatelF" -> Just CRARAnatelF
637+ "anatelI" -> Just CRARAnatelI
638+ "anatelI10" -> Just CRARANATELI10
639+ "anatelI12" -> Just CRARANATELI12
640+ "anatelI7" -> Just CRARANATELI7
641+ "anatelR" -> Just CRARAnatelR
642+ "anatelUnrated" -> Just CRARAnatelUnrated
643+ _ -> Nothing
644+
645+instance ToText ContentRatingAnatelRating where
646+ toText = \case
647+ CRARAnatelA -> "anatelA"
648+ CRARAnatelF -> "anatelF"
649+ CRARAnatelI -> "anatelI"
650+ CRARANATELI10 -> "anatelI10"
651+ CRARANATELI12 -> "anatelI12"
652+ CRARANATELI7 -> "anatelI7"
653+ CRARAnatelR -> "anatelR"
654+ CRARAnatelUnrated -> "anatelUnrated"
655+
330656-- | The video\'s British Board of Film Classification (BBFC) rating.
331657data ContentRatingBbfcRating
332658 = CRBRBBFC12
@@ -349,6 +675,29 @@ data ContentRatingBbfcRating
349675
350676instance Hashable ContentRatingBbfcRating
351677
678+instance FromText ContentRatingBbfcRating where
679+ fromText = \case
680+ "bbfc12" -> Just CRBRBBFC12
681+ "bbfc12a" -> Just CRBRBbfc12a
682+ "bbfc15" -> Just CRBRBBFC15
683+ "bbfc18" -> Just CRBRBBFC18
684+ "bbfcPg" -> Just CRBRBbfcPg
685+ "bbfcR18" -> Just CRBRBBFCR18
686+ "bbfcU" -> Just CRBRBbfcU
687+ "bbfcUnrated" -> Just CRBRBbfcUnrated
688+ _ -> Nothing
689+
690+instance ToText ContentRatingBbfcRating where
691+ toText = \case
692+ CRBRBBFC12 -> "bbfc12"
693+ CRBRBbfc12a -> "bbfc12a"
694+ CRBRBBFC15 -> "bbfc15"
695+ CRBRBBFC18 -> "bbfc18"
696+ CRBRBbfcPg -> "bbfcPg"
697+ CRBRBBFCR18 -> "bbfcR18"
698+ CRBRBbfcU -> "bbfcU"
699+ CRBRBbfcUnrated -> "bbfcUnrated"
700+
352701-- | The video\'s rating from Thailand\'s Board of Film and Video Censors.
353702data ContentRatingBfvcRating
354703 = CRBRBFVC13
@@ -371,6 +720,29 @@ data ContentRatingBfvcRating
371720
372721instance Hashable ContentRatingBfvcRating
373722
723+instance FromText ContentRatingBfvcRating where
724+ fromText = \case
725+ "bfvc13" -> Just CRBRBFVC13
726+ "bfvc15" -> Just CRBRBFVC15
727+ "bfvc18" -> Just CRBRBFVC18
728+ "bfvc20" -> Just CRBRBFVC20
729+ "bfvcB" -> Just CRBRBfvcB
730+ "bfvcE" -> Just CRBRBfvcE
731+ "bfvcG" -> Just CRBRBfvcG
732+ "bfvcUnrated" -> Just CRBRBfvcUnrated
733+ _ -> Nothing
734+
735+instance ToText ContentRatingBfvcRating where
736+ toText = \case
737+ CRBRBFVC13 -> "bfvc13"
738+ CRBRBFVC15 -> "bfvc15"
739+ CRBRBFVC18 -> "bfvc18"
740+ CRBRBFVC20 -> "bfvc20"
741+ CRBRBfvcB -> "bfvcB"
742+ CRBRBfvcE -> "bfvcE"
743+ CRBRBfvcG -> "bfvcG"
744+ CRBRBfvcUnrated -> "bfvcUnrated"
745+
374746-- | The video\'s rating from the Austrian Board of Media Classification
375747-- (Bundesministerium für Unterricht, Kunst und Kultur).
376748data ContentRatingBmukkRating
@@ -394,6 +766,29 @@ data ContentRatingBmukkRating
394766
395767instance Hashable ContentRatingBmukkRating
396768
769+instance FromText ContentRatingBmukkRating where
770+ fromText = \case
771+ "bmukk10" -> Just CRBRBMUKK10
772+ "bmukk12" -> Just CRBRBMUKK12
773+ "bmukk14" -> Just CRBRBMUKK14
774+ "bmukk16" -> Just CRBRBMUKK16
775+ "bmukk6" -> Just CRBRBMUKK6
776+ "bmukk8" -> Just CRBRBMUKK8
777+ "bmukkAa" -> Just CRBRBmukkAa
778+ "bmukkUnrated" -> Just CRBRBmukkUnrated
779+ _ -> Nothing
780+
781+instance ToText ContentRatingBmukkRating where
782+ toText = \case
783+ CRBRBMUKK10 -> "bmukk10"
784+ CRBRBMUKK12 -> "bmukk12"
785+ CRBRBMUKK14 -> "bmukk14"
786+ CRBRBMUKK16 -> "bmukk16"
787+ CRBRBMUKK6 -> "bmukk6"
788+ CRBRBMUKK8 -> "bmukk8"
789+ CRBRBmukkAa -> "bmukkAa"
790+ CRBRBmukkUnrated -> "bmukkUnrated"
791+
397792-- | Rating system for Canadian TV - Canadian TV Classification System The
398793-- video\'s rating from the Canadian Radio-Television and
399794-- Telecommunications Commission (CRTC) for Canadian English-language
@@ -418,6 +813,27 @@ data ContentRatingCatvRating
418813
419814instance Hashable ContentRatingCatvRating
420815
816+instance FromText ContentRatingCatvRating where
817+ fromText = \case
818+ "catv14plus" -> Just CRCRCatv14plus
819+ "catv18plus" -> Just CRCRCatv18plus
820+ "catvC" -> Just CRCRCatvC
821+ "catvC8" -> Just CRCRCATVC8
822+ "catvG" -> Just CRCRCatvG
823+ "catvPg" -> Just CRCRCatvPg
824+ "catvUnrated" -> Just CRCRCatvUnrated
825+ _ -> Nothing
826+
827+instance ToText ContentRatingCatvRating where
828+ toText = \case
829+ CRCRCatv14plus -> "catv14plus"
830+ CRCRCatv18plus -> "catv18plus"
831+ CRCRCatvC -> "catvC"
832+ CRCRCATVC8 -> "catvC8"
833+ CRCRCatvG -> "catvG"
834+ CRCRCatvPg -> "catvPg"
835+ CRCRCatvUnrated -> "catvUnrated"
836+
421837-- | The video\'s rating from the Canadian Radio-Television and
422838-- Telecommunications Commission (CRTC) for Canadian French-language
423839-- broadcasts. For more information, see the Canadian Broadcast Standards
@@ -439,6 +855,25 @@ data ContentRatingCatvfrRating
439855
440856instance Hashable ContentRatingCatvfrRating
441857
858+instance FromText ContentRatingCatvfrRating where
859+ fromText = \case
860+ "catvfr13plus" -> Just CRCRCatvfr13plus
861+ "catvfr16plus" -> Just CRCRCatvfr16plus
862+ "catvfr18plus" -> Just CRCRCatvfr18plus
863+ "catvfr8plus" -> Just CRCRCatvfr8plus
864+ "catvfrG" -> Just CRCRCatvfrG
865+ "catvfrUnrated" -> Just CRCRCatvfrUnrated
866+ _ -> Nothing
867+
868+instance ToText ContentRatingCatvfrRating where
869+ toText = \case
870+ CRCRCatvfr13plus -> "catvfr13plus"
871+ CRCRCatvfr16plus -> "catvfr16plus"
872+ CRCRCatvfr18plus -> "catvfr18plus"
873+ CRCRCatvfr8plus -> "catvfr8plus"
874+ CRCRCatvfrG -> "catvfrG"
875+ CRCRCatvfrUnrated -> "catvfrUnrated"
876+
442877-- | The video\'s Central Board of Film Certification (CBFC - India) rating.
443878data ContentRatingCbfcRating
444879 = CRCRCbfcA
@@ -455,6 +890,23 @@ data ContentRatingCbfcRating
455890
456891instance Hashable ContentRatingCbfcRating
457892
893+instance FromText ContentRatingCbfcRating where
894+ fromText = \case
895+ "cbfcA" -> Just CRCRCbfcA
896+ "cbfcS" -> Just CRCRCbfcS
897+ "cbfcU" -> Just CRCRCbfcU
898+ "cbfcUA" -> Just CRCRCbfcUA
899+ "cbfcUnrated" -> Just CRCRCbfcUnrated
900+ _ -> Nothing
901+
902+instance ToText ContentRatingCbfcRating where
903+ toText = \case
904+ CRCRCbfcA -> "cbfcA"
905+ CRCRCbfcS -> "cbfcS"
906+ CRCRCbfcU -> "cbfcU"
907+ CRCRCbfcUA -> "cbfcUA"
908+ CRCRCbfcUnrated -> "cbfcUnrated"
909+
458910-- | The video\'s Consejo de Calificación Cinematográfica (Chile) rating.
459911data ContentRatingCccRating
460912 = CRCRCCC14
@@ -475,6 +927,27 @@ data ContentRatingCccRating
475927
476928instance Hashable ContentRatingCccRating
477929
930+instance FromText ContentRatingCccRating where
931+ fromText = \case
932+ "ccc14" -> Just CRCRCCC14
933+ "ccc18" -> Just CRCRCCC18
934+ "ccc18s" -> Just CRCRCcc18s
935+ "ccc18v" -> Just CRCRCcc18v
936+ "ccc6" -> Just CRCRCCC6
937+ "cccTe" -> Just CRCRCccTe
938+ "cccUnrated" -> Just CRCRCccUnrated
939+ _ -> Nothing
940+
941+instance ToText ContentRatingCccRating where
942+ toText = \case
943+ CRCRCCC14 -> "ccc14"
944+ CRCRCCC18 -> "ccc18"
945+ CRCRCcc18s -> "ccc18s"
946+ CRCRCcc18v -> "ccc18v"
947+ CRCRCCC6 -> "ccc6"
948+ CRCRCccTe -> "cccTe"
949+ CRCRCccUnrated -> "cccUnrated"
950+
478951-- | The video\'s rating from Portugal\'s Comissão de Classificação de
479952-- Espect´culos.
480953data ContentRatingCceRating
@@ -494,6 +967,25 @@ data ContentRatingCceRating
494967
495968instance Hashable ContentRatingCceRating
496969
970+instance FromText ContentRatingCceRating where
971+ fromText = \case
972+ "cceM12" -> Just CRCRCCEM12
973+ "cceM16" -> Just CRCRCCEM16
974+ "cceM18" -> Just CRCRCCEM18
975+ "cceM4" -> Just CRCRCCEM4
976+ "cceM6" -> Just CRCRCCEM6
977+ "cceUnrated" -> Just CRCRCceUnrated
978+ _ -> Nothing
979+
980+instance ToText ContentRatingCceRating where
981+ toText = \case
982+ CRCRCCEM12 -> "cceM12"
983+ CRCRCCEM16 -> "cceM16"
984+ CRCRCCEM18 -> "cceM18"
985+ CRCRCCEM4 -> "cceM4"
986+ CRCRCCEM6 -> "cceM6"
987+ CRCRCceUnrated -> "cceUnrated"
988+
497989-- | The video\'s rating in Switzerland.
498990data ContentRatingChfilmRating
499991 = CRCRCHFILM0
@@ -512,6 +1004,25 @@ data ContentRatingChfilmRating
5121004
5131005instance Hashable ContentRatingChfilmRating
5141006
1007+instance FromText ContentRatingChfilmRating where
1008+ fromText = \case
1009+ "chfilm0" -> Just CRCRCHFILM0
1010+ "chfilm12" -> Just CRCRCHFILM12
1011+ "chfilm16" -> Just CRCRCHFILM16
1012+ "chfilm18" -> Just CRCRCHFILM18
1013+ "chfilm6" -> Just CRCRCHFILM6
1014+ "chfilmUnrated" -> Just CRCRChfilmUnrated
1015+ _ -> Nothing
1016+
1017+instance ToText ContentRatingChfilmRating where
1018+ toText = \case
1019+ CRCRCHFILM0 -> "chfilm0"
1020+ CRCRCHFILM12 -> "chfilm12"
1021+ CRCRCHFILM16 -> "chfilm16"
1022+ CRCRCHFILM18 -> "chfilm18"
1023+ CRCRCHFILM6 -> "chfilm6"
1024+ CRCRChfilmUnrated -> "chfilmUnrated"
1025+
5151026-- | The video\'s Canadian Home Video Rating System (CHVRS) rating.
5161027data ContentRatingChvrsRating
5171028 = CRCRChvrs14a
@@ -532,6 +1043,27 @@ data ContentRatingChvrsRating
5321043
5331044instance Hashable ContentRatingChvrsRating
5341045
1046+instance FromText ContentRatingChvrsRating where
1047+ fromText = \case
1048+ "chvrs14a" -> Just CRCRChvrs14a
1049+ "chvrs18a" -> Just CRCRChvrs18a
1050+ "chvrsE" -> Just CRCRChvrsE
1051+ "chvrsG" -> Just CRCRChvrsG
1052+ "chvrsPg" -> Just CRCRChvrsPg
1053+ "chvrsR" -> Just CRCRChvrsR
1054+ "chvrsUnrated" -> Just CRCRChvrsUnrated
1055+ _ -> Nothing
1056+
1057+instance ToText ContentRatingChvrsRating where
1058+ toText = \case
1059+ CRCRChvrs14a -> "chvrs14a"
1060+ CRCRChvrs18a -> "chvrs18a"
1061+ CRCRChvrsE -> "chvrsE"
1062+ CRCRChvrsG -> "chvrsG"
1063+ CRCRChvrsPg -> "chvrsPg"
1064+ CRCRChvrsR -> "chvrsR"
1065+ CRCRChvrsUnrated -> "chvrsUnrated"
1066+
5351067-- | The video\'s rating from the Commission de Contrôle des Films (Belgium).
5361068data ContentRatingCicfRating
5371069 = CRCRCicfE
@@ -546,6 +1078,21 @@ data ContentRatingCicfRating
5461078
5471079instance Hashable ContentRatingCicfRating
5481080
1081+instance FromText ContentRatingCicfRating where
1082+ fromText = \case
1083+ "cicfE" -> Just CRCRCicfE
1084+ "cicfKntEna" -> Just CRCRCicfKntEna
1085+ "cicfKtEa" -> Just CRCRCicfKtEa
1086+ "cicfUnrated" -> Just CRCRCicfUnrated
1087+ _ -> Nothing
1088+
1089+instance ToText ContentRatingCicfRating where
1090+ toText = \case
1091+ CRCRCicfE -> "cicfE"
1092+ CRCRCicfKntEna -> "cicfKntEna"
1093+ CRCRCicfKtEa -> "cicfKtEa"
1094+ CRCRCicfUnrated -> "cicfUnrated"
1095+
5491096-- | The video\'s rating from Romania\'s CONSILIUL NATIONAL AL
5501097-- AUDIOVIZUALULUI (CNA).
5511098data ContentRatingCnaRating
@@ -565,6 +1112,25 @@ data ContentRatingCnaRating
5651112
5661113instance Hashable ContentRatingCnaRating
5671114
1115+instance FromText ContentRatingCnaRating where
1116+ fromText = \case
1117+ "cna12" -> Just CRCRCNA12
1118+ "cna15" -> Just CRCRCNA15
1119+ "cna18" -> Just CRCRCNA18
1120+ "cna18plus" -> Just CRCRCna18plus
1121+ "cnaAp" -> Just CRCRCnaAp
1122+ "cnaUnrated" -> Just CRCRCnaUnrated
1123+ _ -> Nothing
1124+
1125+instance ToText ContentRatingCnaRating where
1126+ toText = \case
1127+ CRCRCNA12 -> "cna12"
1128+ CRCRCNA15 -> "cna15"
1129+ CRCRCNA18 -> "cna18"
1130+ CRCRCna18plus -> "cna18plus"
1131+ CRCRCnaAp -> "cnaAp"
1132+ CRCRCnaUnrated -> "cnaUnrated"
1133+
5681134-- | Rating system in France - Commission de classification cinematographique
5691135data ContentRatingCncRating
5701136 = CRCRCNC10
@@ -585,6 +1151,27 @@ data ContentRatingCncRating
5851151
5861152instance Hashable ContentRatingCncRating
5871153
1154+instance FromText ContentRatingCncRating where
1155+ fromText = \case
1156+ "cnc10" -> Just CRCRCNC10
1157+ "cnc12" -> Just CRCRCNC12
1158+ "cnc16" -> Just CRCRCNC16
1159+ "cnc18" -> Just CRCRCNC18
1160+ "cncE" -> Just CRCRCncE
1161+ "cncT" -> Just CRCRCncT
1162+ "cncUnrated" -> Just CRCRCncUnrated
1163+ _ -> Nothing
1164+
1165+instance ToText ContentRatingCncRating where
1166+ toText = \case
1167+ CRCRCNC10 -> "cnc10"
1168+ CRCRCNC12 -> "cnc12"
1169+ CRCRCNC16 -> "cnc16"
1170+ CRCRCNC18 -> "cnc18"
1171+ CRCRCncE -> "cncE"
1172+ CRCRCncT -> "cncT"
1173+ CRCRCncUnrated -> "cncUnrated"
1174+
5881175-- | The video\'s rating from France\'s Conseil supérieur de l?audiovisuel,
5891176-- which rates broadcast content.
5901177data ContentRatingCsaRating
@@ -606,6 +1193,27 @@ data ContentRatingCsaRating
6061193
6071194instance Hashable ContentRatingCsaRating
6081195
1196+instance FromText ContentRatingCsaRating where
1197+ fromText = \case
1198+ "csa10" -> Just CRCRCSA10
1199+ "csa12" -> Just CRCRCSA12
1200+ "csa16" -> Just CRCRCSA16
1201+ "csa18" -> Just CRCRCSA18
1202+ "csaInterdiction" -> Just CRCRCsaInterdiction
1203+ "csaT" -> Just CRCRCsaT
1204+ "csaUnrated" -> Just CRCRCsaUnrated
1205+ _ -> Nothing
1206+
1207+instance ToText ContentRatingCsaRating where
1208+ toText = \case
1209+ CRCRCSA10 -> "csa10"
1210+ CRCRCSA12 -> "csa12"
1211+ CRCRCSA16 -> "csa16"
1212+ CRCRCSA18 -> "csa18"
1213+ CRCRCsaInterdiction -> "csaInterdiction"
1214+ CRCRCsaT -> "csaT"
1215+ CRCRCsaUnrated -> "csaUnrated"
1216+
6091217-- | The video\'s rating from Luxembourg\'s Commission de surveillance de la
6101218-- classification des films (CSCF).
6111219data ContentRatingCscfRating
@@ -629,6 +1237,29 @@ data ContentRatingCscfRating
6291237
6301238instance Hashable ContentRatingCscfRating
6311239
1240+instance FromText ContentRatingCscfRating where
1241+ fromText = \case
1242+ "cscf12" -> Just CRCRCSCF12
1243+ "cscf16" -> Just CRCRCSCF16
1244+ "cscf18" -> Just CRCRCSCF18
1245+ "cscf6" -> Just CRCRCSCF6
1246+ "cscf9" -> Just CRCRCSCF9
1247+ "cscfA" -> Just CRCRCscfA
1248+ "cscfAl" -> Just CRCRCscfAl
1249+ "cscfUnrated" -> Just CRCRCscfUnrated
1250+ _ -> Nothing
1251+
1252+instance ToText ContentRatingCscfRating where
1253+ toText = \case
1254+ CRCRCSCF12 -> "cscf12"
1255+ CRCRCSCF16 -> "cscf16"
1256+ CRCRCSCF18 -> "cscf18"
1257+ CRCRCSCF6 -> "cscf6"
1258+ CRCRCSCF9 -> "cscf9"
1259+ CRCRCscfA -> "cscfA"
1260+ CRCRCscfAl -> "cscfAl"
1261+ CRCRCscfUnrated -> "cscfUnrated"
1262+
6321263-- | The video\'s rating in the Czech Republic.
6331264data ContentRatingCzfilmRating
6341265 = CRCRCZFILM12
@@ -645,6 +1276,23 @@ data ContentRatingCzfilmRating
6451276
6461277instance Hashable ContentRatingCzfilmRating
6471278
1279+instance FromText ContentRatingCzfilmRating where
1280+ fromText = \case
1281+ "czfilm12" -> Just CRCRCZFILM12
1282+ "czfilm14" -> Just CRCRCZFILM14
1283+ "czfilm18" -> Just CRCRCZFILM18
1284+ "czfilmU" -> Just CRCRCzfilmU
1285+ "czfilmUnrated" -> Just CRCRCzfilmUnrated
1286+ _ -> Nothing
1287+
1288+instance ToText ContentRatingCzfilmRating where
1289+ toText = \case
1290+ CRCRCZFILM12 -> "czfilm12"
1291+ CRCRCZFILM14 -> "czfilm14"
1292+ CRCRCZFILM18 -> "czfilm18"
1293+ CRCRCzfilmU -> "czfilmU"
1294+ CRCRCzfilmUnrated -> "czfilmUnrated"
1295+
6481296-- | The video\'s Departamento de Justiça, Classificação, Qualificação e
6491297-- Títulos (DJCQT - Brazil) rating.
6501298data ContentRatingDjctqRating
@@ -666,6 +1314,27 @@ data ContentRatingDjctqRating
6661314
6671315instance Hashable ContentRatingDjctqRating
6681316
1317+instance FromText ContentRatingDjctqRating where
1318+ fromText = \case
1319+ "djctq10" -> Just CRDRDJCTQ10
1320+ "djctq12" -> Just CRDRDJCTQ12
1321+ "djctq14" -> Just CRDRDJCTQ14
1322+ "djctq16" -> Just CRDRDJCTQ16
1323+ "djctq18" -> Just CRDRDJCTQ18
1324+ "djctqL" -> Just CRDRDjctqL
1325+ "djctqUnrated" -> Just CRDRDjctqUnrated
1326+ _ -> Nothing
1327+
1328+instance ToText ContentRatingDjctqRating where
1329+ toText = \case
1330+ CRDRDJCTQ10 -> "djctq10"
1331+ CRDRDJCTQ12 -> "djctq12"
1332+ CRDRDJCTQ14 -> "djctq14"
1333+ CRDRDJCTQ16 -> "djctq16"
1334+ CRDRDJCTQ18 -> "djctq18"
1335+ CRDRDjctqL -> "djctqL"
1336+ CRDRDjctqUnrated -> "djctqUnrated"
1337+
6691338-- | The video\'s rating in Estonia.
6701339data ContentRatingEefilmRating
6711340 = CREREEFILMK12
@@ -690,6 +1359,31 @@ data ContentRatingEefilmRating
6901359
6911360instance Hashable ContentRatingEefilmRating
6921361
1362+instance FromText ContentRatingEefilmRating where
1363+ fromText = \case
1364+ "eefilmK12" -> Just CREREEFILMK12
1365+ "eefilmK14" -> Just CREREEFILMK14
1366+ "eefilmK16" -> Just CREREEFILMK16
1367+ "eefilmK6" -> Just CREREEFILMK6
1368+ "eefilmL" -> Just CREREefilmL
1369+ "eefilmMs12" -> Just CREREEFILMMS12
1370+ "eefilmMs6" -> Just CREREEFILMMS6
1371+ "eefilmPere" -> Just CREREefilmPere
1372+ "eefilmUnrated" -> Just CREREefilmUnrated
1373+ _ -> Nothing
1374+
1375+instance ToText ContentRatingEefilmRating where
1376+ toText = \case
1377+ CREREEFILMK12 -> "eefilmK12"
1378+ CREREEFILMK14 -> "eefilmK14"
1379+ CREREEFILMK16 -> "eefilmK16"
1380+ CREREEFILMK6 -> "eefilmK6"
1381+ CREREefilmL -> "eefilmL"
1382+ CREREEFILMMS12 -> "eefilmMs12"
1383+ CREREEFILMMS6 -> "eefilmMs6"
1384+ CREREefilmPere -> "eefilmPere"
1385+ CREREefilmUnrated -> "eefilmUnrated"
1386+
6931387-- | The video\'s rating in Egypt.
6941388data ContentRatingEgfilmRating
6951389 = CREREGFILM18
@@ -704,6 +1398,21 @@ data ContentRatingEgfilmRating
7041398
7051399instance Hashable ContentRatingEgfilmRating
7061400
1401+instance FromText ContentRatingEgfilmRating where
1402+ fromText = \case
1403+ "egfilm18" -> Just CREREGFILM18
1404+ "egfilmBn" -> Just CREREgfilmBn
1405+ "egfilmGn" -> Just CREREgfilmGn
1406+ "egfilmUnrated" -> Just CREREgfilmUnrated
1407+ _ -> Nothing
1408+
1409+instance ToText ContentRatingEgfilmRating where
1410+ toText = \case
1411+ CREREGFILM18 -> "egfilm18"
1412+ CREREgfilmBn -> "egfilmBn"
1413+ CREREgfilmGn -> "egfilmGn"
1414+ CREREgfilmUnrated -> "egfilmUnrated"
1415+
7071416-- | The video\'s Eirin (映倫) rating. Eirin is the Japanese rating system.
7081417data ContentRatingEirinRating
7091418 = CREREirinG
@@ -720,6 +1429,23 @@ data ContentRatingEirinRating
7201429
7211430instance Hashable ContentRatingEirinRating
7221431
1432+instance FromText ContentRatingEirinRating where
1433+ fromText = \case
1434+ "eirinG" -> Just CREREirinG
1435+ "eirinPg12" -> Just CREREIRINPG12
1436+ "eirinR15plus" -> Just CREREirinR15plus
1437+ "eirinR18plus" -> Just CREREirinR18plus
1438+ "eirinUnrated" -> Just CREREirinUnrated
1439+ _ -> Nothing
1440+
1441+instance ToText ContentRatingEirinRating where
1442+ toText = \case
1443+ CREREirinG -> "eirinG"
1444+ CREREIRINPG12 -> "eirinPg12"
1445+ CREREirinR15plus -> "eirinR15plus"
1446+ CREREirinR18plus -> "eirinR18plus"
1447+ CREREirinUnrated -> "eirinUnrated"
1448+
7231449-- | The video\'s rating from Malaysia\'s Film Censorship Board.
7241450data ContentRatingFcbmRating
7251451 = CRFRFCBM18
@@ -744,6 +1470,31 @@ data ContentRatingFcbmRating
7441470
7451471instance Hashable ContentRatingFcbmRating
7461472
1473+instance FromText ContentRatingFcbmRating where
1474+ fromText = \case
1475+ "fcbm18" -> Just CRFRFCBM18
1476+ "fcbm18pa" -> Just CRFRFcbm18pa
1477+ "fcbm18pl" -> Just CRFRFcbm18pl
1478+ "fcbm18sg" -> Just CRFRFcbm18sg
1479+ "fcbm18sx" -> Just CRFRFcbm18sx
1480+ "fcbmP13" -> Just CRFRFCBMP13
1481+ "fcbmPg13" -> Just CRFRFCBMPG13
1482+ "fcbmU" -> Just CRFRFcbmU
1483+ "fcbmUnrated" -> Just CRFRFcbmUnrated
1484+ _ -> Nothing
1485+
1486+instance ToText ContentRatingFcbmRating where
1487+ toText = \case
1488+ CRFRFCBM18 -> "fcbm18"
1489+ CRFRFcbm18pa -> "fcbm18pa"
1490+ CRFRFcbm18pl -> "fcbm18pl"
1491+ CRFRFcbm18sg -> "fcbm18sg"
1492+ CRFRFcbm18sx -> "fcbm18sx"
1493+ CRFRFCBMP13 -> "fcbmP13"
1494+ CRFRFCBMPG13 -> "fcbmPg13"
1495+ CRFRFcbmU -> "fcbmU"
1496+ CRFRFcbmUnrated -> "fcbmUnrated"
1497+
7471498-- | The video\'s rating from Hong Kong\'s Office for Film, Newspaper and
7481499-- Article Administration.
7491500data ContentRatingFcoRating
@@ -763,6 +1514,25 @@ data ContentRatingFcoRating
7631514
7641515instance Hashable ContentRatingFcoRating
7651516
1517+instance FromText ContentRatingFcoRating where
1518+ fromText = \case
1519+ "fcoI" -> Just CRFRFcoI
1520+ "fcoIi" -> Just CRFRFcoIi
1521+ "fcoIia" -> Just CRFRFcoIia
1522+ "fcoIib" -> Just CRFRFcoIib
1523+ "fcoIii" -> Just CRFRFcoIii
1524+ "fcoUnrated" -> Just CRFRFcoUnrated
1525+ _ -> Nothing
1526+
1527+instance ToText ContentRatingFcoRating where
1528+ toText = \case
1529+ CRFRFcoI -> "fcoI"
1530+ CRFRFcoIi -> "fcoIi"
1531+ CRFRFcoIia -> "fcoIia"
1532+ CRFRFcoIib -> "fcoIib"
1533+ CRFRFcoIii -> "fcoIii"
1534+ CRFRFcoUnrated -> "fcoUnrated"
1535+
7661536-- | This property has been deprecated. Use the
7671537-- contentDetails.contentRating.cncRating instead.
7681538data ContentRatingFmocRating
@@ -784,6 +1554,27 @@ data ContentRatingFmocRating
7841554
7851555instance Hashable ContentRatingFmocRating
7861556
1557+instance FromText ContentRatingFmocRating where
1558+ fromText = \case
1559+ "fmoc10" -> Just CRFRFMOC10
1560+ "fmoc12" -> Just CRFRFMOC12
1561+ "fmoc16" -> Just CRFRFMOC16
1562+ "fmoc18" -> Just CRFRFMOC18
1563+ "fmocE" -> Just CRFRFmocE
1564+ "fmocU" -> Just CRFRFmocU
1565+ "fmocUnrated" -> Just CRFRFmocUnrated
1566+ _ -> Nothing
1567+
1568+instance ToText ContentRatingFmocRating where
1569+ toText = \case
1570+ CRFRFMOC10 -> "fmoc10"
1571+ CRFRFMOC12 -> "fmoc12"
1572+ CRFRFMOC16 -> "fmoc16"
1573+ CRFRFMOC18 -> "fmoc18"
1574+ CRFRFmocE -> "fmocE"
1575+ CRFRFmocU -> "fmocU"
1576+ CRFRFmocUnrated -> "fmocUnrated"
1577+
7871578-- | The video\'s rating from South Africa\'s Film and Publication Board.
7881579data ContentRatingFpbRating
7891580 = CRFRFpb1012Pg
@@ -810,6 +1601,33 @@ data ContentRatingFpbRating
8101601
8111602instance Hashable ContentRatingFpbRating
8121603
1604+instance FromText ContentRatingFpbRating where
1605+ fromText = \case
1606+ "fpb1012Pg" -> Just CRFRFpb1012Pg
1607+ "fpb13" -> Just CRFRFPB13
1608+ "fpb16" -> Just CRFRFPB16
1609+ "fpb18" -> Just CRFRFPB18
1610+ "fpb79Pg" -> Just CRFRFpb79Pg
1611+ "fpbA" -> Just CRFRFpbA
1612+ "fpbPg" -> Just CRFRFpbPg
1613+ "fpbUnrated" -> Just CRFRFpbUnrated
1614+ "fpbX18" -> Just CRFRFPBX18
1615+ "fpbXx" -> Just CRFRFpbXx
1616+ _ -> Nothing
1617+
1618+instance ToText ContentRatingFpbRating where
1619+ toText = \case
1620+ CRFRFpb1012Pg -> "fpb1012Pg"
1621+ CRFRFPB13 -> "fpb13"
1622+ CRFRFPB16 -> "fpb16"
1623+ CRFRFPB18 -> "fpb18"
1624+ CRFRFpb79Pg -> "fpb79Pg"
1625+ CRFRFpbA -> "fpbA"
1626+ CRFRFpbPg -> "fpbPg"
1627+ CRFRFpbUnrated -> "fpbUnrated"
1628+ CRFRFPBX18 -> "fpbX18"
1629+ CRFRFpbXx -> "fpbXx"
1630+
8131631-- | The video\'s Freiwillige Selbstkontrolle der Filmwirtschaft (FSK -
8141632-- Germany) rating.
8151633data ContentRatingFskRating
@@ -829,6 +1647,25 @@ data ContentRatingFskRating
8291647
8301648instance Hashable ContentRatingFskRating
8311649
1650+instance FromText ContentRatingFskRating where
1651+ fromText = \case
1652+ "fsk0" -> Just CRFRFSK0
1653+ "fsk12" -> Just CRFRFSK12
1654+ "fsk16" -> Just CRFRFSK16
1655+ "fsk18" -> Just CRFRFSK18
1656+ "fsk6" -> Just CRFRFSK6
1657+ "fskUnrated" -> Just CRFRFskUnrated
1658+ _ -> Nothing
1659+
1660+instance ToText ContentRatingFskRating where
1661+ toText = \case
1662+ CRFRFSK0 -> "fsk0"
1663+ CRFRFSK12 -> "fsk12"
1664+ CRFRFSK16 -> "fsk16"
1665+ CRFRFSK18 -> "fsk18"
1666+ CRFRFSK6 -> "fsk6"
1667+ CRFRFskUnrated -> "fskUnrated"
1668+
8321669-- | The video\'s rating in Greece.
8331670data ContentRatingGrfilmRating
8341671 = CRGRGrfilmE
@@ -845,6 +1682,23 @@ data ContentRatingGrfilmRating
8451682
8461683instance Hashable ContentRatingGrfilmRating
8471684
1685+instance FromText ContentRatingGrfilmRating where
1686+ fromText = \case
1687+ "grfilmE" -> Just CRGRGrfilmE
1688+ "grfilmK" -> Just CRGRGrfilmK
1689+ "grfilmK13" -> Just CRGRGRFILMK13
1690+ "grfilmK17" -> Just CRGRGRFILMK17
1691+ "grfilmUnrated" -> Just CRGRGrfilmUnrated
1692+ _ -> Nothing
1693+
1694+instance ToText ContentRatingGrfilmRating where
1695+ toText = \case
1696+ CRGRGrfilmE -> "grfilmE"
1697+ CRGRGrfilmK -> "grfilmK"
1698+ CRGRGRFILMK13 -> "grfilmK13"
1699+ CRGRGRFILMK17 -> "grfilmK17"
1700+ CRGRGrfilmUnrated -> "grfilmUnrated"
1701+
8481702-- | The video\'s Instituto de la Cinematografía y de las Artes Audiovisuales
8491703-- (ICAA - Spain) rating.
8501704data ContentRatingIcaaRating
@@ -868,6 +1722,29 @@ data ContentRatingIcaaRating
8681722
8691723instance Hashable ContentRatingIcaaRating
8701724
1725+instance FromText ContentRatingIcaaRating where
1726+ fromText = \case
1727+ "icaa12" -> Just CRIRICAA12
1728+ "icaa13" -> Just CRIRICAA13
1729+ "icaa16" -> Just CRIRICAA16
1730+ "icaa18" -> Just CRIRICAA18
1731+ "icaa7" -> Just CRIRICAA7
1732+ "icaaApta" -> Just CRIRIcaaApta
1733+ "icaaUnrated" -> Just CRIRIcaaUnrated
1734+ "icaaX" -> Just CRIRIcaaX
1735+ _ -> Nothing
1736+
1737+instance ToText ContentRatingIcaaRating where
1738+ toText = \case
1739+ CRIRICAA12 -> "icaa12"
1740+ CRIRICAA13 -> "icaa13"
1741+ CRIRICAA16 -> "icaa16"
1742+ CRIRICAA18 -> "icaa18"
1743+ CRIRICAA7 -> "icaa7"
1744+ CRIRIcaaApta -> "icaaApta"
1745+ CRIRIcaaUnrated -> "icaaUnrated"
1746+ CRIRIcaaX -> "icaaX"
1747+
8711748-- | The video\'s Irish Film Classification Office (IFCO - Ireland) rating.
8721749-- See the IFCO website for more information.
8731750data ContentRatingIfcoRating
@@ -893,6 +1770,31 @@ data ContentRatingIfcoRating
8931770
8941771instance Hashable ContentRatingIfcoRating
8951772
1773+instance FromText ContentRatingIfcoRating where
1774+ fromText = \case
1775+ "ifco12" -> Just CRIRIFCO12
1776+ "ifco12a" -> Just CRIRIfco12a
1777+ "ifco15" -> Just CRIRIFCO15
1778+ "ifco15a" -> Just CRIRIfco15a
1779+ "ifco16" -> Just CRIRIFCO16
1780+ "ifco18" -> Just CRIRIFCO18
1781+ "ifcoG" -> Just CRIRIfcoG
1782+ "ifcoPg" -> Just CRIRIfcoPg
1783+ "ifcoUnrated" -> Just CRIRIfcoUnrated
1784+ _ -> Nothing
1785+
1786+instance ToText ContentRatingIfcoRating where
1787+ toText = \case
1788+ CRIRIFCO12 -> "ifco12"
1789+ CRIRIfco12a -> "ifco12a"
1790+ CRIRIFCO15 -> "ifco15"
1791+ CRIRIfco15a -> "ifco15a"
1792+ CRIRIFCO16 -> "ifco16"
1793+ CRIRIFCO18 -> "ifco18"
1794+ CRIRIfcoG -> "ifcoG"
1795+ CRIRIfcoPg -> "ifcoPg"
1796+ CRIRIfcoUnrated -> "ifcoUnrated"
1797+
8961798-- | The video\'s rating in Israel.
8971799data ContentRatingIlfilmRating
8981800 = CRIRILFILM12
@@ -909,6 +1811,23 @@ data ContentRatingIlfilmRating
9091811
9101812instance Hashable ContentRatingIlfilmRating
9111813
1814+instance FromText ContentRatingIlfilmRating where
1815+ fromText = \case
1816+ "ilfilm12" -> Just CRIRILFILM12
1817+ "ilfilm16" -> Just CRIRILFILM16
1818+ "ilfilm18" -> Just CRIRILFILM18
1819+ "ilfilmAa" -> Just CRIRIlfilmAa
1820+ "ilfilmUnrated" -> Just CRIRIlfilmUnrated
1821+ _ -> Nothing
1822+
1823+instance ToText ContentRatingIlfilmRating where
1824+ toText = \case
1825+ CRIRILFILM12 -> "ilfilm12"
1826+ CRIRILFILM16 -> "ilfilm16"
1827+ CRIRILFILM18 -> "ilfilm18"
1828+ CRIRIlfilmAa -> "ilfilmAa"
1829+ CRIRIlfilmUnrated -> "ilfilmUnrated"
1830+
9121831-- | The video\'s INCAA (Instituto Nacional de Cine y Artes Audiovisuales -
9131832-- Argentina) rating.
9141833data ContentRatingIncaaRating
@@ -928,6 +1847,25 @@ data ContentRatingIncaaRating
9281847
9291848instance Hashable ContentRatingIncaaRating
9301849
1850+instance FromText ContentRatingIncaaRating where
1851+ fromText = \case
1852+ "incaaAtp" -> Just CRIRIncaaAtp
1853+ "incaaC" -> Just CRIRIncaaC
1854+ "incaaSam13" -> Just CRIRINCAASAM13
1855+ "incaaSam16" -> Just CRIRINCAASAM16
1856+ "incaaSam18" -> Just CRIRINCAASAM18
1857+ "incaaUnrated" -> Just CRIRIncaaUnrated
1858+ _ -> Nothing
1859+
1860+instance ToText ContentRatingIncaaRating where
1861+ toText = \case
1862+ CRIRIncaaAtp -> "incaaAtp"
1863+ CRIRIncaaC -> "incaaC"
1864+ CRIRINCAASAM13 -> "incaaSam13"
1865+ CRIRINCAASAM16 -> "incaaSam16"
1866+ CRIRINCAASAM18 -> "incaaSam18"
1867+ CRIRIncaaUnrated -> "incaaUnrated"
1868+
9311869data ContentRatingItemDjctqRatingReasons
9321870 = CRIDRRDjctqCriminalActs
9331871 -- ^ @djctqCriminalActs@
@@ -957,6 +1895,37 @@ data ContentRatingItemDjctqRatingReasons
9571895
9581896instance Hashable ContentRatingItemDjctqRatingReasons
9591897
1898+instance FromText ContentRatingItemDjctqRatingReasons where
1899+ fromText = \case
1900+ "djctqCriminalActs" -> Just CRIDRRDjctqCriminalActs
1901+ "djctqDrugs" -> Just CRIDRRDjctqDrugs
1902+ "djctqExplicitSex" -> Just CRIDRRDjctqExplicitSex
1903+ "djctqExtremeViolence" -> Just CRIDRRDjctqExtremeViolence
1904+ "djctqIllegalDrugs" -> Just CRIDRRDjctqIllegalDrugs
1905+ "djctqImpactingContent" -> Just CRIDRRDjctqImpactingContent
1906+ "djctqInappropriateLanguage" -> Just CRIDRRDjctqInappropriateLanguage
1907+ "djctqLegalDrugs" -> Just CRIDRRDjctqLegalDrugs
1908+ "djctqNudity" -> Just CRIDRRDjctqNudity
1909+ "djctqSex" -> Just CRIDRRDjctqSex
1910+ "djctqSexualContent" -> Just CRIDRRDjctqSexualContent
1911+ "djctqViolence" -> Just CRIDRRDjctqViolence
1912+ _ -> Nothing
1913+
1914+instance ToText ContentRatingItemDjctqRatingReasons where
1915+ toText = \case
1916+ CRIDRRDjctqCriminalActs -> "djctqCriminalActs"
1917+ CRIDRRDjctqDrugs -> "djctqDrugs"
1918+ CRIDRRDjctqExplicitSex -> "djctqExplicitSex"
1919+ CRIDRRDjctqExtremeViolence -> "djctqExtremeViolence"
1920+ CRIDRRDjctqIllegalDrugs -> "djctqIllegalDrugs"
1921+ CRIDRRDjctqImpactingContent -> "djctqImpactingContent"
1922+ CRIDRRDjctqInappropriateLanguage -> "djctqInappropriateLanguage"
1923+ CRIDRRDjctqLegalDrugs -> "djctqLegalDrugs"
1924+ CRIDRRDjctqNudity -> "djctqNudity"
1925+ CRIDRRDjctqSex -> "djctqSex"
1926+ CRIDRRDjctqSexualContent -> "djctqSexualContent"
1927+ CRIDRRDjctqViolence -> "djctqViolence"
1928+
9601929-- | The video\'s rating from the Kenya Film Classification Board.
9611930data ContentRatingKfcbRating
9621931 = CRKRKfcb16plus
@@ -973,6 +1942,23 @@ data ContentRatingKfcbRating
9731942
9741943instance Hashable ContentRatingKfcbRating
9751944
1945+instance FromText ContentRatingKfcbRating where
1946+ fromText = \case
1947+ "kfcb16plus" -> Just CRKRKfcb16plus
1948+ "kfcbG" -> Just CRKRKfcbG
1949+ "kfcbPg" -> Just CRKRKfcbPg
1950+ "kfcbR" -> Just CRKRKfcbR
1951+ "kfcbUnrated" -> Just CRKRKfcbUnrated
1952+ _ -> Nothing
1953+
1954+instance ToText ContentRatingKfcbRating where
1955+ toText = \case
1956+ CRKRKfcb16plus -> "kfcb16plus"
1957+ CRKRKfcbG -> "kfcbG"
1958+ CRKRKfcbPg -> "kfcbPg"
1959+ CRKRKfcbR -> "kfcbR"
1960+ CRKRKfcbUnrated -> "kfcbUnrated"
1961+
9761962-- | voor de Classificatie van Audiovisuele Media (Netherlands).
9771963data ContentRatingKijkwijzerRating
9781964 = CRKRKIJKWIJZER12
@@ -993,6 +1979,27 @@ data ContentRatingKijkwijzerRating
9931979
9941980instance Hashable ContentRatingKijkwijzerRating
9951981
1982+instance FromText ContentRatingKijkwijzerRating where
1983+ fromText = \case
1984+ "kijkwijzer12" -> Just CRKRKIJKWIJZER12
1985+ "kijkwijzer16" -> Just CRKRKIJKWIJZER16
1986+ "kijkwijzer18" -> Just CRKRKIJKWIJZER18
1987+ "kijkwijzer6" -> Just CRKRKIJKWIJZER6
1988+ "kijkwijzer9" -> Just CRKRKIJKWIJZER9
1989+ "kijkwijzerAl" -> Just CRKRKijkwijzerAl
1990+ "kijkwijzerUnrated" -> Just CRKRKijkwijzerUnrated
1991+ _ -> Nothing
1992+
1993+instance ToText ContentRatingKijkwijzerRating where
1994+ toText = \case
1995+ CRKRKIJKWIJZER12 -> "kijkwijzer12"
1996+ CRKRKIJKWIJZER16 -> "kijkwijzer16"
1997+ CRKRKIJKWIJZER18 -> "kijkwijzer18"
1998+ CRKRKIJKWIJZER6 -> "kijkwijzer6"
1999+ CRKRKIJKWIJZER9 -> "kijkwijzer9"
2000+ CRKRKijkwijzerAl -> "kijkwijzerAl"
2001+ CRKRKijkwijzerUnrated -> "kijkwijzerUnrated"
2002+
9962003-- | The video\'s Korea Media Rating Board (영상물등급위원회) rating. The
9972004-- KMRB rates videos in South Korea.
9982005data ContentRatingKmrbRating
@@ -1012,6 +2019,25 @@ data ContentRatingKmrbRating
10122019
10132020instance Hashable ContentRatingKmrbRating
10142021
2022+instance FromText ContentRatingKmrbRating where
2023+ fromText = \case
2024+ "kmrb12plus" -> Just CRKRKmrb12plus
2025+ "kmrb15plus" -> Just CRKRKmrb15plus
2026+ "kmrbAll" -> Just CRKRKmrbAll
2027+ "kmrbR" -> Just CRKRKmrbR
2028+ "kmrbTeenr" -> Just CRKRKmrbTeenr
2029+ "kmrbUnrated" -> Just CRKRKmrbUnrated
2030+ _ -> Nothing
2031+
2032+instance ToText ContentRatingKmrbRating where
2033+ toText = \case
2034+ CRKRKmrb12plus -> "kmrb12plus"
2035+ CRKRKmrb15plus -> "kmrb15plus"
2036+ CRKRKmrbAll -> "kmrbAll"
2037+ CRKRKmrbR -> "kmrbR"
2038+ CRKRKmrbTeenr -> "kmrbTeenr"
2039+ CRKRKmrbUnrated -> "kmrbUnrated"
2040+
10152041-- | The video\'s rating from Indonesia\'s Lembaga Sensor Film.
10162042data ContentRatingLsfRating
10172043 = CRLRLSF13
@@ -1036,6 +2062,31 @@ data ContentRatingLsfRating
10362062
10372063instance Hashable ContentRatingLsfRating
10382064
2065+instance FromText ContentRatingLsfRating where
2066+ fromText = \case
2067+ "lsf13" -> Just CRLRLSF13
2068+ "lsf17" -> Just CRLRLSF17
2069+ "lsf21" -> Just CRLRLSF21
2070+ "lsfA" -> Just CRLRLsfA
2071+ "lsfBo" -> Just CRLRLsfBo
2072+ "lsfD" -> Just CRLRLsfD
2073+ "lsfR" -> Just CRLRLsfR
2074+ "lsfSu" -> Just CRLRLsfSu
2075+ "lsfUnrated" -> Just CRLRLsfUnrated
2076+ _ -> Nothing
2077+
2078+instance ToText ContentRatingLsfRating where
2079+ toText = \case
2080+ CRLRLSF13 -> "lsf13"
2081+ CRLRLSF17 -> "lsf17"
2082+ CRLRLSF21 -> "lsf21"
2083+ CRLRLsfA -> "lsfA"
2084+ CRLRLsfBo -> "lsfBo"
2085+ CRLRLsfD -> "lsfD"
2086+ CRLRLsfR -> "lsfR"
2087+ CRLRLsfSu -> "lsfSu"
2088+ CRLRLsfUnrated -> "lsfUnrated"
2089+
10392090-- | The video\'s rating from Malta\'s Film Age-Classification Board.
10402091data ContentRatingMccaaRating
10412092 = CRMRMCCAA12
@@ -1060,6 +2111,31 @@ data ContentRatingMccaaRating
10602111
10612112instance Hashable ContentRatingMccaaRating
10622113
2114+instance FromText ContentRatingMccaaRating where
2115+ fromText = \case
2116+ "mccaa12" -> Just CRMRMCCAA12
2117+ "mccaa12a" -> Just CRMRMccaa12a
2118+ "mccaa14" -> Just CRMRMCCAA14
2119+ "mccaa15" -> Just CRMRMCCAA15
2120+ "mccaa16" -> Just CRMRMCCAA16
2121+ "mccaa18" -> Just CRMRMCCAA18
2122+ "mccaaPg" -> Just CRMRMccaaPg
2123+ "mccaaU" -> Just CRMRMccaaU
2124+ "mccaaUnrated" -> Just CRMRMccaaUnrated
2125+ _ -> Nothing
2126+
2127+instance ToText ContentRatingMccaaRating where
2128+ toText = \case
2129+ CRMRMCCAA12 -> "mccaa12"
2130+ CRMRMccaa12a -> "mccaa12a"
2131+ CRMRMCCAA14 -> "mccaa14"
2132+ CRMRMCCAA15 -> "mccaa15"
2133+ CRMRMCCAA16 -> "mccaa16"
2134+ CRMRMCCAA18 -> "mccaa18"
2135+ CRMRMccaaPg -> "mccaaPg"
2136+ CRMRMccaaU -> "mccaaU"
2137+ CRMRMccaaUnrated -> "mccaaUnrated"
2138+
10632139-- | The video\'s rating from the Danish Film Institute\'s (Det Danske
10642140-- Filminstitut) Media Council for Children and Young People.
10652141data ContentRatingMccypRating
@@ -1077,6 +2153,23 @@ data ContentRatingMccypRating
10772153
10782154instance Hashable ContentRatingMccypRating
10792155
2156+instance FromText ContentRatingMccypRating where
2157+ fromText = \case
2158+ "mccyp11" -> Just CRMRMCCYP11
2159+ "mccyp15" -> Just CRMRMCCYP15
2160+ "mccyp7" -> Just CRMRMCCYP7
2161+ "mccypA" -> Just CRMRMccypA
2162+ "mccypUnrated" -> Just CRMRMccypUnrated
2163+ _ -> Nothing
2164+
2165+instance ToText ContentRatingMccypRating where
2166+ toText = \case
2167+ CRMRMCCYP11 -> "mccyp11"
2168+ CRMRMCCYP15 -> "mccyp15"
2169+ CRMRMCCYP7 -> "mccyp7"
2170+ CRMRMccypA -> "mccypA"
2171+ CRMRMccypUnrated -> "mccypUnrated"
2172+
10802173-- | The video\'s rating from Singapore\'s Media Development Authority (MDA)
10812174-- and, specifically, it\'s Board of Film Censors (BFC).
10822175data ContentRatingMdaRating
@@ -1098,6 +2191,27 @@ data ContentRatingMdaRating
10982191
10992192instance Hashable ContentRatingMdaRating
11002193
2194+instance FromText ContentRatingMdaRating where
2195+ fromText = \case
2196+ "mdaG" -> Just CRMRMdaG
2197+ "mdaM18" -> Just CRMRMDAM18
2198+ "mdaNc16" -> Just CRMRMDANC16
2199+ "mdaPg" -> Just CRMRMdaPg
2200+ "mdaPg13" -> Just CRMRMDAPG13
2201+ "mdaR21" -> Just CRMRMDAR21
2202+ "mdaUnrated" -> Just CRMRMdaUnrated
2203+ _ -> Nothing
2204+
2205+instance ToText ContentRatingMdaRating where
2206+ toText = \case
2207+ CRMRMdaG -> "mdaG"
2208+ CRMRMDAM18 -> "mdaM18"
2209+ CRMRMDANC16 -> "mdaNc16"
2210+ CRMRMdaPg -> "mdaPg"
2211+ CRMRMDAPG13 -> "mdaPg13"
2212+ CRMRMDAR21 -> "mdaR21"
2213+ CRMRMdaUnrated -> "mdaUnrated"
2214+
11012215-- | The video\'s rating from Medietilsynet, the Norwegian Media Authority.
11022216data ContentRatingMedietilsynetRating
11032217 = CRMRMEDIETILSYNET11
@@ -1122,6 +2236,31 @@ data ContentRatingMedietilsynetRating
11222236
11232237instance Hashable ContentRatingMedietilsynetRating
11242238
2239+instance FromText ContentRatingMedietilsynetRating where
2240+ fromText = \case
2241+ "medietilsynet11" -> Just CRMRMEDIETILSYNET11
2242+ "medietilsynet12" -> Just CRMRMEDIETILSYNET12
2243+ "medietilsynet15" -> Just CRMRMEDIETILSYNET15
2244+ "medietilsynet18" -> Just CRMRMEDIETILSYNET18
2245+ "medietilsynet6" -> Just CRMRMEDIETILSYNET6
2246+ "medietilsynet7" -> Just CRMRMEDIETILSYNET7
2247+ "medietilsynet9" -> Just CRMRMEDIETILSYNET9
2248+ "medietilsynetA" -> Just CRMRMedietilsynetA
2249+ "medietilsynetUnrated" -> Just CRMRMedietilsynetUnrated
2250+ _ -> Nothing
2251+
2252+instance ToText ContentRatingMedietilsynetRating where
2253+ toText = \case
2254+ CRMRMEDIETILSYNET11 -> "medietilsynet11"
2255+ CRMRMEDIETILSYNET12 -> "medietilsynet12"
2256+ CRMRMEDIETILSYNET15 -> "medietilsynet15"
2257+ CRMRMEDIETILSYNET18 -> "medietilsynet18"
2258+ CRMRMEDIETILSYNET6 -> "medietilsynet6"
2259+ CRMRMEDIETILSYNET7 -> "medietilsynet7"
2260+ CRMRMEDIETILSYNET9 -> "medietilsynet9"
2261+ CRMRMedietilsynetA -> "medietilsynetA"
2262+ CRMRMedietilsynetUnrated -> "medietilsynetUnrated"
2263+
11252264-- | The video\'s rating from Finland\'s Kansallinen Audiovisuaalinen
11262265-- Instituutti (National Audiovisual Institute).
11272266data ContentRatingMekuRating
@@ -1141,6 +2280,25 @@ data ContentRatingMekuRating
11412280
11422281instance Hashable ContentRatingMekuRating
11432282
2283+instance FromText ContentRatingMekuRating where
2284+ fromText = \case
2285+ "meku12" -> Just CRMRMEKU12
2286+ "meku16" -> Just CRMRMEKU16
2287+ "meku18" -> Just CRMRMEKU18
2288+ "meku7" -> Just CRMRMEKU7
2289+ "mekuS" -> Just CRMRMekuS
2290+ "mekuUnrated" -> Just CRMRMekuUnrated
2291+ _ -> Nothing
2292+
2293+instance ToText ContentRatingMekuRating where
2294+ toText = \case
2295+ CRMRMEKU12 -> "meku12"
2296+ CRMRMEKU16 -> "meku16"
2297+ CRMRMEKU18 -> "meku18"
2298+ CRMRMEKU7 -> "meku7"
2299+ CRMRMekuS -> "mekuS"
2300+ CRMRMekuUnrated -> "mekuUnrated"
2301+
11442302-- | The video\'s rating from the Ministero dei Beni e delle Attività
11452303-- Culturali e del Turismo (Italy).
11462304data ContentRatingMibacRating
@@ -1160,6 +2318,25 @@ data ContentRatingMibacRating
11602318
11612319instance Hashable ContentRatingMibacRating
11622320
2321+instance FromText ContentRatingMibacRating where
2322+ fromText = \case
2323+ "mibacT" -> Just CRMRMibacT
2324+ "mibacUnrated" -> Just CRMRMibacUnrated
2325+ "mibacVap" -> Just CRMRMibacVap
2326+ "mibacVm12" -> Just CRMRMIBACVM12
2327+ "mibacVm14" -> Just CRMRMIBACVM14
2328+ "mibacVm18" -> Just CRMRMIBACVM18
2329+ _ -> Nothing
2330+
2331+instance ToText ContentRatingMibacRating where
2332+ toText = \case
2333+ CRMRMibacT -> "mibacT"
2334+ CRMRMibacUnrated -> "mibacUnrated"
2335+ CRMRMibacVap -> "mibacVap"
2336+ CRMRMIBACVM12 -> "mibacVm12"
2337+ CRMRMIBACVM14 -> "mibacVm14"
2338+ CRMRMIBACVM18 -> "mibacVm18"
2339+
11632340-- | The video\'s Ministerio de Cultura (Colombia) rating.
11642341data ContentRatingMocRating
11652342 = CRMRMOC12
@@ -1184,6 +2361,31 @@ data ContentRatingMocRating
11842361
11852362instance Hashable ContentRatingMocRating
11862363
2364+instance FromText ContentRatingMocRating where
2365+ fromText = \case
2366+ "moc12" -> Just CRMRMOC12
2367+ "moc15" -> Just CRMRMOC15
2368+ "moc18" -> Just CRMRMOC18
2369+ "moc7" -> Just CRMRMOC7
2370+ "mocBanned" -> Just CRMRMocBanned
2371+ "mocE" -> Just CRMRMocE
2372+ "mocT" -> Just CRMRMocT
2373+ "mocUnrated" -> Just CRMRMocUnrated
2374+ "mocX" -> Just CRMRMocX
2375+ _ -> Nothing
2376+
2377+instance ToText ContentRatingMocRating where
2378+ toText = \case
2379+ CRMRMOC12 -> "moc12"
2380+ CRMRMOC15 -> "moc15"
2381+ CRMRMOC18 -> "moc18"
2382+ CRMRMOC7 -> "moc7"
2383+ CRMRMocBanned -> "mocBanned"
2384+ CRMRMocE -> "mocE"
2385+ CRMRMocT -> "mocT"
2386+ CRMRMocUnrated -> "mocUnrated"
2387+ CRMRMocX -> "mocX"
2388+
11872389-- | The video\'s rating from Taiwan\'s Ministry of Culture (文化部).
11882390data ContentRatingMoctwRating
11892391 = CRMRMoctwG
@@ -1200,6 +2402,23 @@ data ContentRatingMoctwRating
12002402
12012403instance Hashable ContentRatingMoctwRating
12022404
2405+instance FromText ContentRatingMoctwRating where
2406+ fromText = \case
2407+ "moctwG" -> Just CRMRMoctwG
2408+ "moctwP" -> Just CRMRMoctwP
2409+ "moctwPg" -> Just CRMRMoctwPg
2410+ "moctwR" -> Just CRMRMoctwR
2411+ "moctwUnrated" -> Just CRMRMoctwUnrated
2412+ _ -> Nothing
2413+
2414+instance ToText ContentRatingMoctwRating where
2415+ toText = \case
2416+ CRMRMoctwG -> "moctwG"
2417+ CRMRMoctwP -> "moctwP"
2418+ CRMRMoctwPg -> "moctwPg"
2419+ CRMRMoctwR -> "moctwR"
2420+ CRMRMoctwUnrated -> "moctwUnrated"
2421+
12032422-- | The video\'s Motion Picture Association of America (MPAA) rating.
12042423data ContentRatingMpaaRating
12052424 = CRMRMpaaG
@@ -1218,6 +2437,25 @@ data ContentRatingMpaaRating
12182437
12192438instance Hashable ContentRatingMpaaRating
12202439
2440+instance FromText ContentRatingMpaaRating where
2441+ fromText = \case
2442+ "mpaaG" -> Just CRMRMpaaG
2443+ "mpaaNc17" -> Just CRMRMPAANC17
2444+ "mpaaPg" -> Just CRMRMpaaPg
2445+ "mpaaPg13" -> Just CRMRMPAAPG13
2446+ "mpaaR" -> Just CRMRMpaaR
2447+ "mpaaUnrated" -> Just CRMRMpaaUnrated
2448+ _ -> Nothing
2449+
2450+instance ToText ContentRatingMpaaRating where
2451+ toText = \case
2452+ CRMRMpaaG -> "mpaaG"
2453+ CRMRMPAANC17 -> "mpaaNc17"
2454+ CRMRMpaaPg -> "mpaaPg"
2455+ CRMRMPAAPG13 -> "mpaaPg13"
2456+ CRMRMpaaR -> "mpaaR"
2457+ CRMRMpaaUnrated -> "mpaaUnrated"
2458+
12212459-- | The video\'s rating from the Movie and Television Review and
12222460-- Classification Board (Philippines).
12232461data ContentRatingMtrcbRating
@@ -1239,6 +2477,27 @@ data ContentRatingMtrcbRating
12392477
12402478instance Hashable ContentRatingMtrcbRating
12412479
2480+instance FromText ContentRatingMtrcbRating where
2481+ fromText = \case
2482+ "mtrcbG" -> Just CRMRMtrcbG
2483+ "mtrcbPg" -> Just CRMRMtrcbPg
2484+ "mtrcbR13" -> Just CRMRMTRCBR13
2485+ "mtrcbR16" -> Just CRMRMTRCBR16
2486+ "mtrcbR18" -> Just CRMRMTRCBR18
2487+ "mtrcbUnrated" -> Just CRMRMtrcbUnrated
2488+ "mtrcbX" -> Just CRMRMtrcbX
2489+ _ -> Nothing
2490+
2491+instance ToText ContentRatingMtrcbRating where
2492+ toText = \case
2493+ CRMRMtrcbG -> "mtrcbG"
2494+ CRMRMtrcbPg -> "mtrcbPg"
2495+ CRMRMTRCBR13 -> "mtrcbR13"
2496+ CRMRMTRCBR16 -> "mtrcbR16"
2497+ CRMRMTRCBR18 -> "mtrcbR18"
2498+ CRMRMtrcbUnrated -> "mtrcbUnrated"
2499+ CRMRMtrcbX -> "mtrcbX"
2500+
12422501-- | The video\'s rating from the Maldives National Bureau of Classification.
12432502data ContentRatingNbcRating
12442503 = CRNRNbc12plus
@@ -1261,6 +2520,29 @@ data ContentRatingNbcRating
12612520
12622521instance Hashable ContentRatingNbcRating
12632522
2523+instance FromText ContentRatingNbcRating where
2524+ fromText = \case
2525+ "nbc12plus" -> Just CRNRNbc12plus
2526+ "nbc15plus" -> Just CRNRNbc15plus
2527+ "nbc18plus" -> Just CRNRNbc18plus
2528+ "nbc18plusr" -> Just CRNRNbc18plusr
2529+ "nbcG" -> Just CRNRNbcG
2530+ "nbcPg" -> Just CRNRNbcPg
2531+ "nbcPu" -> Just CRNRNbcPu
2532+ "nbcUnrated" -> Just CRNRNbcUnrated
2533+ _ -> Nothing
2534+
2535+instance ToText ContentRatingNbcRating where
2536+ toText = \case
2537+ CRNRNbc12plus -> "nbc12plus"
2538+ CRNRNbc15plus -> "nbc15plus"
2539+ CRNRNbc18plus -> "nbc18plus"
2540+ CRNRNbc18plusr -> "nbc18plusr"
2541+ CRNRNbcG -> "nbcG"
2542+ CRNRNbcPg -> "nbcPg"
2543+ CRNRNbcPu -> "nbcPu"
2544+ CRNRNbcUnrated -> "nbcUnrated"
2545+
12642546-- | The video\'s rating in Poland.
12652547data ContentRatingNbcplRating
12662548 = CRNRNbcpl18plus
@@ -1279,6 +2561,25 @@ data ContentRatingNbcplRating
12792561
12802562instance Hashable ContentRatingNbcplRating
12812563
2564+instance FromText ContentRatingNbcplRating where
2565+ fromText = \case
2566+ "nbcpl18plus" -> Just CRNRNbcpl18plus
2567+ "nbcplI" -> Just CRNRNbcplI
2568+ "nbcplIi" -> Just CRNRNbcplIi
2569+ "nbcplIii" -> Just CRNRNbcplIii
2570+ "nbcplIv" -> Just CRNRNbcplIv
2571+ "nbcplUnrated" -> Just CRNRNbcplUnrated
2572+ _ -> Nothing
2573+
2574+instance ToText ContentRatingNbcplRating where
2575+ toText = \case
2576+ CRNRNbcpl18plus -> "nbcpl18plus"
2577+ CRNRNbcplI -> "nbcplI"
2578+ CRNRNbcplIi -> "nbcplIi"
2579+ CRNRNbcplIii -> "nbcplIii"
2580+ CRNRNbcplIv -> "nbcplIv"
2581+ CRNRNbcplUnrated -> "nbcplUnrated"
2582+
12822583-- | The video\'s rating from the Bulgarian National Film Center.
12832584data ContentRatingNfrcRating
12842585 = CRNRNfrcA
@@ -1297,6 +2598,25 @@ data ContentRatingNfrcRating
12972598
12982599instance Hashable ContentRatingNfrcRating
12992600
2601+instance FromText ContentRatingNfrcRating where
2602+ fromText = \case
2603+ "nfrcA" -> Just CRNRNfrcA
2604+ "nfrcB" -> Just CRNRNfrcB
2605+ "nfrcC" -> Just CRNRNfrcC
2606+ "nfrcD" -> Just CRNRNfrcD
2607+ "nfrcUnrated" -> Just CRNRNfrcUnrated
2608+ "nfrcX" -> Just CRNRNfrcX
2609+ _ -> Nothing
2610+
2611+instance ToText ContentRatingNfrcRating where
2612+ toText = \case
2613+ CRNRNfrcA -> "nfrcA"
2614+ CRNRNfrcB -> "nfrcB"
2615+ CRNRNfrcC -> "nfrcC"
2616+ CRNRNfrcD -> "nfrcD"
2617+ CRNRNfrcUnrated -> "nfrcUnrated"
2618+ CRNRNfrcX -> "nfrcX"
2619+
13002620-- | The video\'s rating from Nigeria\'s National Film and Video Censors
13012621-- Board.
13022622data ContentRatingNfvcbRating
@@ -1320,6 +2640,29 @@ data ContentRatingNfvcbRating
13202640
13212641instance Hashable ContentRatingNfvcbRating
13222642
2643+instance FromText ContentRatingNfvcbRating where
2644+ fromText = \case
2645+ "nfvcb12" -> Just CRNRNFVCB12
2646+ "nfvcb12a" -> Just CRNRNfvcb12a
2647+ "nfvcb15" -> Just CRNRNFVCB15
2648+ "nfvcb18" -> Just CRNRNFVCB18
2649+ "nfvcbG" -> Just CRNRNfvcbG
2650+ "nfvcbPg" -> Just CRNRNfvcbPg
2651+ "nfvcbRe" -> Just CRNRNfvcbRe
2652+ "nfvcbUnrated" -> Just CRNRNfvcbUnrated
2653+ _ -> Nothing
2654+
2655+instance ToText ContentRatingNfvcbRating where
2656+ toText = \case
2657+ CRNRNFVCB12 -> "nfvcb12"
2658+ CRNRNfvcb12a -> "nfvcb12a"
2659+ CRNRNFVCB15 -> "nfvcb15"
2660+ CRNRNFVCB18 -> "nfvcb18"
2661+ CRNRNfvcbG -> "nfvcbG"
2662+ CRNRNfvcbPg -> "nfvcbPg"
2663+ CRNRNfvcbRe -> "nfvcbRe"
2664+ CRNRNfvcbUnrated -> "nfvcbUnrated"
2665+
13232666-- | The video\'s rating from the Nacionãlais Kino centrs (National Film
13242667-- Centre of Latvia).
13252668data ContentRatingNkclvRating
@@ -1337,6 +2680,23 @@ data ContentRatingNkclvRating
13372680
13382681instance Hashable ContentRatingNkclvRating
13392682
2683+instance FromText ContentRatingNkclvRating where
2684+ fromText = \case
2685+ "nkclv12plus" -> Just CRNRNkclv12plus
2686+ "nkclv18plus" -> Just CRNRNkclv18plus
2687+ "nkclv7plus" -> Just CRNRNkclv7plus
2688+ "nkclvU" -> Just CRNRNkclvU
2689+ "nkclvUnrated" -> Just CRNRNkclvUnrated
2690+ _ -> Nothing
2691+
2692+instance ToText ContentRatingNkclvRating where
2693+ toText = \case
2694+ CRNRNkclv12plus -> "nkclv12plus"
2695+ CRNRNkclv18plus -> "nkclv18plus"
2696+ CRNRNkclv7plus -> "nkclv7plus"
2697+ CRNRNkclvU -> "nkclvU"
2698+ CRNRNkclvUnrated -> "nkclvUnrated"
2699+
13402700-- | The video\'s Office of Film and Literature Classification (OFLC - New
13412701-- Zealand) rating.
13422702data ContentRatingOflcRating
@@ -1364,6 +2724,33 @@ data ContentRatingOflcRating
13642724
13652725instance Hashable ContentRatingOflcRating
13662726
2727+instance FromText ContentRatingOflcRating where
2728+ fromText = \case
2729+ "oflcG" -> Just CROROflcG
2730+ "oflcM" -> Just CROROflcM
2731+ "oflcPg" -> Just CROROflcPg
2732+ "oflcR13" -> Just CROROFLCR13
2733+ "oflcR15" -> Just CROROFLCR15
2734+ "oflcR16" -> Just CROROFLCR16
2735+ "oflcR18" -> Just CROROFLCR18
2736+ "oflcRp13" -> Just CROROFLCRP13
2737+ "oflcRp16" -> Just CROROFLCRP16
2738+ "oflcUnrated" -> Just CROROflcUnrated
2739+ _ -> Nothing
2740+
2741+instance ToText ContentRatingOflcRating where
2742+ toText = \case
2743+ CROROflcG -> "oflcG"
2744+ CROROflcM -> "oflcM"
2745+ CROROflcPg -> "oflcPg"
2746+ CROROFLCR13 -> "oflcR13"
2747+ CROROFLCR15 -> "oflcR15"
2748+ CROROFLCR16 -> "oflcR16"
2749+ CROROFLCR18 -> "oflcR18"
2750+ CROROFLCRP13 -> "oflcRp13"
2751+ CROROFLCRP16 -> "oflcRp16"
2752+ CROROflcUnrated -> "oflcUnrated"
2753+
13672754-- | The video\'s rating in Peru.
13682755data ContentRatingPefilmRating
13692756 = CRPRPEFILM14
@@ -1380,6 +2767,23 @@ data ContentRatingPefilmRating
13802767
13812768instance Hashable ContentRatingPefilmRating
13822769
2770+instance FromText ContentRatingPefilmRating where
2771+ fromText = \case
2772+ "pefilm14" -> Just CRPRPEFILM14
2773+ "pefilm18" -> Just CRPRPEFILM18
2774+ "pefilmPg" -> Just CRPRPefilmPg
2775+ "pefilmPt" -> Just CRPRPefilmPt
2776+ "pefilmUnrated" -> Just CRPRPefilmUnrated
2777+ _ -> Nothing
2778+
2779+instance ToText ContentRatingPefilmRating where
2780+ toText = \case
2781+ CRPRPEFILM14 -> "pefilm14"
2782+ CRPRPEFILM18 -> "pefilm18"
2783+ CRPRPefilmPg -> "pefilmPg"
2784+ CRPRPefilmPt -> "pefilmPt"
2785+ CRPRPefilmUnrated -> "pefilmUnrated"
2786+
13832787-- | The video\'s rating from the Hungarian Nemzeti Filmiroda, the Rating
13842788-- Committee of the National Office of Film.
13852789data ContentRatingRcnofRating
@@ -1401,6 +2805,27 @@ data ContentRatingRcnofRating
14012805
14022806instance Hashable ContentRatingRcnofRating
14032807
2808+instance FromText ContentRatingRcnofRating where
2809+ fromText = \case
2810+ "rcnofI" -> Just CRRRRcnofI
2811+ "rcnofIi" -> Just CRRRRcnofIi
2812+ "rcnofIii" -> Just CRRRRcnofIii
2813+ "rcnofIv" -> Just CRRRRcnofIv
2814+ "rcnofUnrated" -> Just CRRRRcnofUnrated
2815+ "rcnofV" -> Just CRRRRcnofV
2816+ "rcnofVi" -> Just CRRRRcnofVi
2817+ _ -> Nothing
2818+
2819+instance ToText ContentRatingRcnofRating where
2820+ toText = \case
2821+ CRRRRcnofI -> "rcnofI"
2822+ CRRRRcnofIi -> "rcnofIi"
2823+ CRRRRcnofIii -> "rcnofIii"
2824+ CRRRRcnofIv -> "rcnofIv"
2825+ CRRRRcnofUnrated -> "rcnofUnrated"
2826+ CRRRRcnofV -> "rcnofV"
2827+ CRRRRcnofVi -> "rcnofVi"
2828+
14042829-- | The video\'s rating in Venezuela.
14052830data ContentRatingResorteviolenciaRating
14062831 = CRRRResorteviolenciaA
@@ -1419,6 +2844,25 @@ data ContentRatingResorteviolenciaRating
14192844
14202845instance Hashable ContentRatingResorteviolenciaRating
14212846
2847+instance FromText ContentRatingResorteviolenciaRating where
2848+ fromText = \case
2849+ "resorteviolenciaA" -> Just CRRRResorteviolenciaA
2850+ "resorteviolenciaB" -> Just CRRRResorteviolenciaB
2851+ "resorteviolenciaC" -> Just CRRRResorteviolenciaC
2852+ "resorteviolenciaD" -> Just CRRRResorteviolenciaD
2853+ "resorteviolenciaE" -> Just CRRRResorteviolenciaE
2854+ "resorteviolenciaUnrated" -> Just CRRRResorteviolenciaUnrated
2855+ _ -> Nothing
2856+
2857+instance ToText ContentRatingResorteviolenciaRating where
2858+ toText = \case
2859+ CRRRResorteviolenciaA -> "resorteviolenciaA"
2860+ CRRRResorteviolenciaB -> "resorteviolenciaB"
2861+ CRRRResorteviolenciaC -> "resorteviolenciaC"
2862+ CRRRResorteviolenciaD -> "resorteviolenciaD"
2863+ CRRRResorteviolenciaE -> "resorteviolenciaE"
2864+ CRRRResorteviolenciaUnrated -> "resorteviolenciaUnrated"
2865+
14222866-- | The video\'s General Directorate of Radio, Television and Cinematography
14232867-- (Mexico) rating.
14242868data ContentRatingRtcRating
@@ -1440,6 +2884,27 @@ data ContentRatingRtcRating
14402884
14412885instance Hashable ContentRatingRtcRating
14422886
2887+instance FromText ContentRatingRtcRating where
2888+ fromText = \case
2889+ "rtcA" -> Just CRRRRtcA
2890+ "rtcAa" -> Just CRRRRtcAa
2891+ "rtcB" -> Just CRRRRtcB
2892+ "rtcB15" -> Just CRRRRTCB15
2893+ "rtcC" -> Just CRRRRtcC
2894+ "rtcD" -> Just CRRRRtcD
2895+ "rtcUnrated" -> Just CRRRRtcUnrated
2896+ _ -> Nothing
2897+
2898+instance ToText ContentRatingRtcRating where
2899+ toText = \case
2900+ CRRRRtcA -> "rtcA"
2901+ CRRRRtcAa -> "rtcAa"
2902+ CRRRRtcB -> "rtcB"
2903+ CRRRRTCB15 -> "rtcB15"
2904+ CRRRRtcC -> "rtcC"
2905+ CRRRRtcD -> "rtcD"
2906+ CRRRRtcUnrated -> "rtcUnrated"
2907+
14432908-- | The video\'s rating from Ireland\'s Raidió Teilifís Éireann.
14442909data ContentRatingRteRating
14452910 = CRRRRteCh
@@ -1456,6 +2921,23 @@ data ContentRatingRteRating
14562921
14572922instance Hashable ContentRatingRteRating
14582923
2924+instance FromText ContentRatingRteRating where
2925+ fromText = \case
2926+ "rteCh" -> Just CRRRRteCh
2927+ "rteGa" -> Just CRRRRteGa
2928+ "rteMa" -> Just CRRRRteMa
2929+ "rtePs" -> Just CRRRRtePs
2930+ "rteUnrated" -> Just CRRRRteUnrated
2931+ _ -> Nothing
2932+
2933+instance ToText ContentRatingRteRating where
2934+ toText = \case
2935+ CRRRRteCh -> "rteCh"
2936+ CRRRRteGa -> "rteGa"
2937+ CRRRRteMa -> "rteMa"
2938+ CRRRRtePs -> "rtePs"
2939+ CRRRRteUnrated -> "rteUnrated"
2940+
14592941-- | The video\'s National Film Registry of the Russian Federation (MKRF -
14602942-- Russia) rating.
14612943data ContentRatingRussiaRating
@@ -1475,6 +2957,25 @@ data ContentRatingRussiaRating
14752957
14762958instance Hashable ContentRatingRussiaRating
14772959
2960+instance FromText ContentRatingRussiaRating where
2961+ fromText = \case
2962+ "russia0" -> Just CRRRRUSSIA0
2963+ "russia12" -> Just CRRRRUSSIA12
2964+ "russia16" -> Just CRRRRUSSIA16
2965+ "russia18" -> Just CRRRRUSSIA18
2966+ "russia6" -> Just CRRRRUSSIA6
2967+ "russiaUnrated" -> Just CRRRRussiaUnrated
2968+ _ -> Nothing
2969+
2970+instance ToText ContentRatingRussiaRating where
2971+ toText = \case
2972+ CRRRRUSSIA0 -> "russia0"
2973+ CRRRRUSSIA12 -> "russia12"
2974+ CRRRRUSSIA16 -> "russia16"
2975+ CRRRRUSSIA18 -> "russia18"
2976+ CRRRRUSSIA6 -> "russia6"
2977+ CRRRRussiaUnrated -> "russiaUnrated"
2978+
14782979-- | The video\'s rating in Slovakia.
14792980data ContentRatingSkfilmRating
14802981 = CRSRSkfilmG
@@ -1491,6 +2992,23 @@ data ContentRatingSkfilmRating
14912992
14922993instance Hashable ContentRatingSkfilmRating
14932994
2995+instance FromText ContentRatingSkfilmRating where
2996+ fromText = \case
2997+ "skfilmG" -> Just CRSRSkfilmG
2998+ "skfilmP2" -> Just CRSRSKFILMP2
2999+ "skfilmP5" -> Just CRSRSKFILMP5
3000+ "skfilmP8" -> Just CRSRSKFILMP8
3001+ "skfilmUnrated" -> Just CRSRSkfilmUnrated
3002+ _ -> Nothing
3003+
3004+instance ToText ContentRatingSkfilmRating where
3005+ toText = \case
3006+ CRSRSkfilmG -> "skfilmG"
3007+ CRSRSKFILMP2 -> "skfilmP2"
3008+ CRSRSKFILMP5 -> "skfilmP5"
3009+ CRSRSKFILMP8 -> "skfilmP8"
3010+ CRSRSkfilmUnrated -> "skfilmUnrated"
3011+
14943012-- | The video\'s rating in Iceland.
14953013data ContentRatingSmaisRating
14963014 = CRSRSMAIS12
@@ -1511,6 +3029,27 @@ data ContentRatingSmaisRating
15113029
15123030instance Hashable ContentRatingSmaisRating
15133031
3032+instance FromText ContentRatingSmaisRating where
3033+ fromText = \case
3034+ "smais12" -> Just CRSRSMAIS12
3035+ "smais14" -> Just CRSRSMAIS14
3036+ "smais16" -> Just CRSRSMAIS16
3037+ "smais18" -> Just CRSRSMAIS18
3038+ "smais7" -> Just CRSRSMAIS7
3039+ "smaisL" -> Just CRSRSmaisL
3040+ "smaisUnrated" -> Just CRSRSmaisUnrated
3041+ _ -> Nothing
3042+
3043+instance ToText ContentRatingSmaisRating where
3044+ toText = \case
3045+ CRSRSMAIS12 -> "smais12"
3046+ CRSRSMAIS14 -> "smais14"
3047+ CRSRSMAIS16 -> "smais16"
3048+ CRSRSMAIS18 -> "smais18"
3049+ CRSRSMAIS7 -> "smais7"
3050+ CRSRSmaisL -> "smaisL"
3051+ CRSRSmaisUnrated -> "smaisUnrated"
3052+
15143053-- | The video\'s rating from Statens medieråd (Sweden\'s National Media
15153054-- Council).
15163055data ContentRatingSmsaRating
@@ -1528,6 +3067,23 @@ data ContentRatingSmsaRating
15283067
15293068instance Hashable ContentRatingSmsaRating
15303069
3070+instance FromText ContentRatingSmsaRating where
3071+ fromText = \case
3072+ "smsa11" -> Just CRSRSMSA11
3073+ "smsa15" -> Just CRSRSMSA15
3074+ "smsa7" -> Just CRSRSMSA7
3075+ "smsaA" -> Just CRSRSmsaA
3076+ "smsaUnrated" -> Just CRSRSmsaUnrated
3077+ _ -> Nothing
3078+
3079+instance ToText ContentRatingSmsaRating where
3080+ toText = \case
3081+ CRSRSMSA11 -> "smsa11"
3082+ CRSRSMSA15 -> "smsa15"
3083+ CRSRSMSA7 -> "smsa7"
3084+ CRSRSmsaA -> "smsaA"
3085+ CRSRSmsaUnrated -> "smsaUnrated"
3086+
15313087-- | The video\'s TV Parental Guidelines (TVPG) rating.
15323088data ContentRatingTvpgRating
15333089 = CRTRPG14
@@ -1550,6 +3106,29 @@ data ContentRatingTvpgRating
15503106
15513107instance Hashable ContentRatingTvpgRating
15523108
3109+instance FromText ContentRatingTvpgRating where
3110+ fromText = \case
3111+ "pg14" -> Just CRTRPG14
3112+ "tvpgG" -> Just CRTRTvpgG
3113+ "tvpgMa" -> Just CRTRTvpgMa
3114+ "tvpgPg" -> Just CRTRTvpgPg
3115+ "tvpgUnrated" -> Just CRTRTvpgUnrated
3116+ "tvpgY" -> Just CRTRTvpgY
3117+ "tvpgY7" -> Just CRTRTVPGY7
3118+ "tvpgY7Fv" -> Just CRTRTvpgY7Fv
3119+ _ -> Nothing
3120+
3121+instance ToText ContentRatingTvpgRating where
3122+ toText = \case
3123+ CRTRPG14 -> "pg14"
3124+ CRTRTvpgG -> "tvpgG"
3125+ CRTRTvpgMa -> "tvpgMa"
3126+ CRTRTvpgPg -> "tvpgPg"
3127+ CRTRTvpgUnrated -> "tvpgUnrated"
3128+ CRTRTvpgY -> "tvpgY"
3129+ CRTRTVPGY7 -> "tvpgY7"
3130+ CRTRTvpgY7Fv -> "tvpgY7Fv"
3131+
15533132-- | A rating that YouTube uses to identify age-restricted content.
15543133data ContentRatingYtRating
15553134 = CRYRYtAgeRestricted
@@ -1558,6 +3137,15 @@ data ContentRatingYtRating
15583137
15593138instance Hashable ContentRatingYtRating
15603139
3140+instance FromText ContentRatingYtRating where
3141+ fromText = \case
3142+ "ytAgeRestricted" -> Just CRYRYtAgeRestricted
3143+ _ -> Nothing
3144+
3145+instance ToText ContentRatingYtRating where
3146+ toText = \case
3147+ CRYRYtAgeRestricted -> "ytAgeRestricted"
3148+
15613149-- | Describes in which corner of the video the visual widget will appear.
15623150data InvideoPositionCornerPosition
15633151 = IPCPBottomLeft
@@ -1572,6 +3160,21 @@ data InvideoPositionCornerPosition
15723160
15733161instance Hashable InvideoPositionCornerPosition
15743162
3163+instance FromText InvideoPositionCornerPosition where
3164+ fromText = \case
3165+ "bottomLeft" -> Just IPCPBottomLeft
3166+ "bottomRight" -> Just IPCPBottomRight
3167+ "topLeft" -> Just IPCPTopLeft
3168+ "topRight" -> Just IPCPTopRight
3169+ _ -> Nothing
3170+
3171+instance ToText InvideoPositionCornerPosition where
3172+ toText = \case
3173+ IPCPBottomLeft -> "bottomLeft"
3174+ IPCPBottomRight -> "bottomRight"
3175+ IPCPTopLeft -> "topLeft"
3176+ IPCPTopRight -> "topRight"
3177+
15753178-- | Defines the position type.
15763179data InvideoPositionType
15773180 = IPTCorner
@@ -1580,6 +3183,15 @@ data InvideoPositionType
15803183
15813184instance Hashable InvideoPositionType
15823185
3186+instance FromText InvideoPositionType where
3187+ fromText = \case
3188+ "corner" -> Just IPTCorner
3189+ _ -> Nothing
3190+
3191+instance ToText InvideoPositionType where
3192+ toText = \case
3193+ IPTCorner -> "corner"
3194+
15833195-- | Describes a timing type. If the value is offsetFromStart, then the
15843196-- offsetMs field represents an offset from the start of the video. If the
15853197-- value is offsetFromEnd, then the offsetMs field represents an offset
@@ -1593,6 +3205,17 @@ data InvideoTimingType
15933205
15943206instance Hashable InvideoTimingType
15953207
3208+instance FromText InvideoTimingType where
3209+ fromText = \case
3210+ "offsetFromEnd" -> Just ITTOffsetFromEnd
3211+ "offsetFromStart" -> Just ITTOffsetFromStart
3212+ _ -> Nothing
3213+
3214+instance ToText InvideoTimingType where
3215+ toText = \case
3216+ ITTOffsetFromEnd -> "offsetFromEnd"
3217+ ITTOffsetFromStart -> "offsetFromStart"
3218+
15963219-- | The broadcast\'s status. The status can be updated using the API\'s
15973220-- liveBroadcasts.transition method.
15983221data LiveBroadcastStatusLifeCycleStatus
@@ -1622,6 +3245,35 @@ data LiveBroadcastStatusLifeCycleStatus
16223245
16233246instance Hashable LiveBroadcastStatusLifeCycleStatus
16243247
3248+instance FromText LiveBroadcastStatusLifeCycleStatus where
3249+ fromText = \case
3250+ "abandoned" -> Just LBSLCSAbandoned
3251+ "complete" -> Just LBSLCSComplete
3252+ "completeStarting" -> Just LBSLCSCompleteStarting
3253+ "created" -> Just LBSLCSCreated
3254+ "live" -> Just LBSLCSLive
3255+ "liveStarting" -> Just LBSLCSLiveStarting
3256+ "ready" -> Just LBSLCSReady
3257+ "reclaimed" -> Just LBSLCSReclaimed
3258+ "revoked" -> Just LBSLCSRevoked
3259+ "testStarting" -> Just LBSLCSTestStarting
3260+ "testing" -> Just LBSLCSTesting
3261+ _ -> Nothing
3262+
3263+instance ToText LiveBroadcastStatusLifeCycleStatus where
3264+ toText = \case
3265+ LBSLCSAbandoned -> "abandoned"
3266+ LBSLCSComplete -> "complete"
3267+ LBSLCSCompleteStarting -> "completeStarting"
3268+ LBSLCSCreated -> "created"
3269+ LBSLCSLive -> "live"
3270+ LBSLCSLiveStarting -> "liveStarting"
3271+ LBSLCSReady -> "ready"
3272+ LBSLCSReclaimed -> "reclaimed"
3273+ LBSLCSRevoked -> "revoked"
3274+ LBSLCSTestStarting -> "testStarting"
3275+ LBSLCSTesting -> "testing"
3276+
16253277-- | Priority of the live broadcast event (internal state).
16263278data LiveBroadcastStatusLiveBroadcastPriority
16273279 = LBSLBPHigh
@@ -1634,6 +3286,19 @@ data LiveBroadcastStatusLiveBroadcastPriority
16343286
16353287instance Hashable LiveBroadcastStatusLiveBroadcastPriority
16363288
3289+instance FromText LiveBroadcastStatusLiveBroadcastPriority where
3290+ fromText = \case
3291+ "high" -> Just LBSLBPHigh
3292+ "low" -> Just LBSLBPLow
3293+ "normal" -> Just LBSLBPNormal
3294+ _ -> Nothing
3295+
3296+instance ToText LiveBroadcastStatusLiveBroadcastPriority where
3297+ toText = \case
3298+ LBSLBPHigh -> "high"
3299+ LBSLBPLow -> "low"
3300+ LBSLBPNormal -> "normal"
3301+
16373302-- | The broadcast\'s privacy status. Note that the broadcast represents
16383303-- exactly one YouTube video, so the privacy settings are identical to
16393304-- those supported for videos. In addition, you can set this field by
@@ -1650,6 +3315,19 @@ data LiveBroadcastStatusPrivacyStatus
16503315
16513316instance Hashable LiveBroadcastStatusPrivacyStatus
16523317
3318+instance FromText LiveBroadcastStatusPrivacyStatus where
3319+ fromText = \case
3320+ "private" -> Just LBSPSPrivate
3321+ "public" -> Just LBSPSPublic
3322+ "unlisted" -> Just LBSPSUnlisted
3323+ _ -> Nothing
3324+
3325+instance ToText LiveBroadcastStatusPrivacyStatus where
3326+ toText = \case
3327+ LBSPSPrivate -> "private"
3328+ LBSPSPublic -> "public"
3329+ LBSPSUnlisted -> "unlisted"
3330+
16533331-- | The broadcast\'s recording status.
16543332data LiveBroadcastStatusRecordingStatus
16553333 = LBSRSNotRecording
@@ -1662,6 +3340,19 @@ data LiveBroadcastStatusRecordingStatus
16623340
16633341instance Hashable LiveBroadcastStatusRecordingStatus
16643342
3343+instance FromText LiveBroadcastStatusRecordingStatus where
3344+ fromText = \case
3345+ "notRecording" -> Just LBSRSNotRecording
3346+ "recorded" -> Just LBSRSRecorded
3347+ "recording" -> Just LBSRSRecording
3348+ _ -> Nothing
3349+
3350+instance ToText LiveBroadcastStatusRecordingStatus where
3351+ toText = \case
3352+ LBSRSNotRecording -> "notRecording"
3353+ LBSRSRecorded -> "recorded"
3354+ LBSRSRecording -> "recording"
3355+
16653356-- | The type of the topic.
16663357data LiveBroadcastTopicType
16673358 = LBTTVideoGame
@@ -1670,6 +3361,15 @@ data LiveBroadcastTopicType
16703361
16713362instance Hashable LiveBroadcastTopicType
16723363
3364+instance FromText LiveBroadcastTopicType where
3365+ fromText = \case
3366+ "videoGame" -> Just LBTTVideoGame
3367+ _ -> Nothing
3368+
3369+instance ToText LiveBroadcastTopicType where
3370+ toText = \case
3371+ LBTTVideoGame -> "videoGame"
3372+
16733373-- | How severe this issue is to the stream.
16743374data LiveStreamConfigurationIssueSeverity
16753375 = LSCISError
@@ -1682,6 +3382,19 @@ data LiveStreamConfigurationIssueSeverity
16823382
16833383instance Hashable LiveStreamConfigurationIssueSeverity
16843384
3385+instance FromText LiveStreamConfigurationIssueSeverity where
3386+ fromText = \case
3387+ "error" -> Just LSCISError
3388+ "info" -> Just LSCISInfo
3389+ "warning" -> Just LSCISWarning
3390+ _ -> Nothing
3391+
3392+instance ToText LiveStreamConfigurationIssueSeverity where
3393+ toText = \case
3394+ LSCISError -> "error"
3395+ LSCISInfo -> "info"
3396+ LSCISWarning -> "warning"
3397+
16853398-- | The kind of error happening.
16863399data LiveStreamConfigurationIssueType
16873400 = LSCITAudioBitrateHigh
@@ -1754,6 +3467,79 @@ data LiveStreamConfigurationIssueType
17543467
17553468instance Hashable LiveStreamConfigurationIssueType
17563469
3470+instance FromText LiveStreamConfigurationIssueType where
3471+ fromText = \case
3472+ "audioBitrateHigh" -> Just LSCITAudioBitrateHigh
3473+ "audioBitrateLow" -> Just LSCITAudioBitrateLow
3474+ "audioBitrateMismatch" -> Just LSCITAudioBitrateMismatch
3475+ "audioCodec" -> Just LSCITAudioCodec
3476+ "audioCodecMismatch" -> Just LSCITAudioCodecMismatch
3477+ "audioSampleRate" -> Just LSCITAudioSampleRate
3478+ "audioSampleRateMismatch" -> Just LSCITAudioSampleRateMismatch
3479+ "audioStereoMismatch" -> Just LSCITAudioStereoMismatch
3480+ "audioTooManyChannels" -> Just LSCITAudioTooManyChannels
3481+ "badContainer" -> Just LSCITBadContainer
3482+ "bitrateHigh" -> Just LSCITBitrateHigh
3483+ "bitrateLow" -> Just LSCITBitrateLow
3484+ "frameRateHigh" -> Just LSCITFrameRateHigh
3485+ "framerateMismatch" -> Just LSCITFramerateMismatch
3486+ "gopMismatch" -> Just LSCITGopMismatch
3487+ "gopSizeLong" -> Just LSCITGopSizeLong
3488+ "gopSizeOver" -> Just LSCITGopSizeOver
3489+ "gopSizeShort" -> Just LSCITGopSizeShort
3490+ "interlacedVideo" -> Just LSCITInterlacedVideo
3491+ "multipleAudioStreams" -> Just LSCITMultipleAudioStreams
3492+ "multipleVideoStreams" -> Just LSCITMultipleVideoStreams
3493+ "noAudioStream" -> Just LSCITNoAudioStream
3494+ "noVideoStream" -> Just LSCITNoVideoStream
3495+ "openGop" -> Just LSCITOpenGop
3496+ "resolutionMismatch" -> Just LSCITResolutionMismatch
3497+ "videoBitrateMismatch" -> Just LSCITVideoBitrateMismatch
3498+ "videoCodec" -> Just LSCITVideoCodec
3499+ "videoCodecMismatch" -> Just LSCITVideoCodecMismatch
3500+ "videoIngestionStarved" -> Just LSCITVideoIngestionStarved
3501+ "videoInterlaceMismatch" -> Just LSCITVideoInterlaceMismatch
3502+ "videoProfileMismatch" -> Just LSCITVideoProfileMismatch
3503+ "videoResolutionSuboptimal" -> Just LSCITVideoResolutionSuboptimal
3504+ "videoResolutionUnsupported" -> Just LSCITVideoResolutionUnsupported
3505+ _ -> Nothing
3506+
3507+instance ToText LiveStreamConfigurationIssueType where
3508+ toText = \case
3509+ LSCITAudioBitrateHigh -> "audioBitrateHigh"
3510+ LSCITAudioBitrateLow -> "audioBitrateLow"
3511+ LSCITAudioBitrateMismatch -> "audioBitrateMismatch"
3512+ LSCITAudioCodec -> "audioCodec"
3513+ LSCITAudioCodecMismatch -> "audioCodecMismatch"
3514+ LSCITAudioSampleRate -> "audioSampleRate"
3515+ LSCITAudioSampleRateMismatch -> "audioSampleRateMismatch"
3516+ LSCITAudioStereoMismatch -> "audioStereoMismatch"
3517+ LSCITAudioTooManyChannels -> "audioTooManyChannels"
3518+ LSCITBadContainer -> "badContainer"
3519+ LSCITBitrateHigh -> "bitrateHigh"
3520+ LSCITBitrateLow -> "bitrateLow"
3521+ LSCITFrameRateHigh -> "frameRateHigh"
3522+ LSCITFramerateMismatch -> "framerateMismatch"
3523+ LSCITGopMismatch -> "gopMismatch"
3524+ LSCITGopSizeLong -> "gopSizeLong"
3525+ LSCITGopSizeOver -> "gopSizeOver"
3526+ LSCITGopSizeShort -> "gopSizeShort"
3527+ LSCITInterlacedVideo -> "interlacedVideo"
3528+ LSCITMultipleAudioStreams -> "multipleAudioStreams"
3529+ LSCITMultipleVideoStreams -> "multipleVideoStreams"
3530+ LSCITNoAudioStream -> "noAudioStream"
3531+ LSCITNoVideoStream -> "noVideoStream"
3532+ LSCITOpenGop -> "openGop"
3533+ LSCITResolutionMismatch -> "resolutionMismatch"
3534+ LSCITVideoBitrateMismatch -> "videoBitrateMismatch"
3535+ LSCITVideoCodec -> "videoCodec"
3536+ LSCITVideoCodecMismatch -> "videoCodecMismatch"
3537+ LSCITVideoIngestionStarved -> "videoIngestionStarved"
3538+ LSCITVideoInterlaceMismatch -> "videoInterlaceMismatch"
3539+ LSCITVideoProfileMismatch -> "videoProfileMismatch"
3540+ LSCITVideoResolutionSuboptimal -> "videoResolutionSuboptimal"
3541+ LSCITVideoResolutionUnsupported -> "videoResolutionUnsupported"
3542+
17573543-- | The status code of this stream
17583544data LiveStreamHealthStatusStatus
17593545 = LSHSSBad
@@ -1770,6 +3556,23 @@ data LiveStreamHealthStatusStatus
17703556
17713557instance Hashable LiveStreamHealthStatusStatus
17723558
3559+instance FromText LiveStreamHealthStatusStatus where
3560+ fromText = \case
3561+ "bad" -> Just LSHSSBad
3562+ "good" -> Just LSHSSGood
3563+ "noData" -> Just LSHSSNoData
3564+ "ok" -> Just LSHSSOK
3565+ "revoked" -> Just LSHSSRevoked
3566+ _ -> Nothing
3567+
3568+instance ToText LiveStreamHealthStatusStatus where
3569+ toText = \case
3570+ LSHSSBad -> "bad"
3571+ LSHSSGood -> "good"
3572+ LSHSSNoData -> "noData"
3573+ LSHSSOK -> "ok"
3574+ LSHSSRevoked -> "revoked"
3575+
17733576data LiveStreamStatusStreamStatus
17743577 = LSSSSActive
17753578 -- ^ @active@
@@ -1785,6 +3588,23 @@ data LiveStreamStatusStreamStatus
17853588
17863589instance Hashable LiveStreamStatusStreamStatus
17873590
3591+instance FromText LiveStreamStatusStreamStatus where
3592+ fromText = \case
3593+ "active" -> Just LSSSSActive
3594+ "created" -> Just LSSSSCreated
3595+ "error" -> Just LSSSSError
3596+ "inactive" -> Just LSSSSInactive
3597+ "ready" -> Just LSSSSReady
3598+ _ -> Nothing
3599+
3600+instance ToText LiveStreamStatusStreamStatus where
3601+ toText = \case
3602+ LSSSSActive -> "active"
3603+ LSSSSCreated -> "created"
3604+ LSSSSError -> "error"
3605+ LSSSSInactive -> "inactive"
3606+ LSSSSReady -> "ready"
3607+
17883608-- | This resource\'s privacy status.
17893609data PlaylistItemStatusPrivacyStatus
17903610 = PISPSPrivate
@@ -1797,6 +3617,19 @@ data PlaylistItemStatusPrivacyStatus
17973617
17983618instance Hashable PlaylistItemStatusPrivacyStatus
17993619
3620+instance FromText PlaylistItemStatusPrivacyStatus where
3621+ fromText = \case
3622+ "private" -> Just PISPSPrivate
3623+ "public" -> Just PISPSPublic
3624+ "unlisted" -> Just PISPSUnlisted
3625+ _ -> Nothing
3626+
3627+instance ToText PlaylistItemStatusPrivacyStatus where
3628+ toText = \case
3629+ PISPSPrivate -> "private"
3630+ PISPSPublic -> "public"
3631+ PISPSUnlisted -> "unlisted"
3632+
18003633-- | The playlist\'s privacy status.
18013634data PlaylistStatusPrivacyStatus
18023635 = PSPSPrivate
@@ -1809,6 +3642,19 @@ data PlaylistStatusPrivacyStatus
18093642
18103643instance Hashable PlaylistStatusPrivacyStatus
18113644
3645+instance FromText PlaylistStatusPrivacyStatus where
3646+ fromText = \case
3647+ "private" -> Just PSPSPrivate
3648+ "public" -> Just PSPSPublic
3649+ "unlisted" -> Just PSPSUnlisted
3650+ _ -> Nothing
3651+
3652+instance ToText PlaylistStatusPrivacyStatus where
3653+ toText = \case
3654+ PSPSPrivate -> "private"
3655+ PSPSPublic -> "public"
3656+ PSPSUnlisted -> "unlisted"
3657+
18123658-- | Describes the type of the promoted item.
18133659data PromotedItemIdType
18143660 = PIITRecentUpload
@@ -1821,6 +3667,19 @@ data PromotedItemIdType
18213667
18223668instance Hashable PromotedItemIdType
18233669
3670+instance FromText PromotedItemIdType where
3671+ fromText = \case
3672+ "recentUpload" -> Just PIITRecentUpload
3673+ "video" -> Just PIITVideo
3674+ "website" -> Just PIITWebsite
3675+ _ -> Nothing
3676+
3677+instance ToText PromotedItemIdType where
3678+ toText = \case
3679+ PIITRecentUpload -> "recentUpload"
3680+ PIITVideo -> "video"
3681+ PIITWebsite -> "website"
3682+
18243683-- | It indicates if the resource (video or channel) has upcoming\/active
18253684-- live broadcast content. Or it\'s \"none\" if there is not any
18263685-- upcoming\/active live broadcasts.
@@ -1835,6 +3694,19 @@ data SearchResultSnippetLiveBroadcastContent
18353694
18363695instance Hashable SearchResultSnippetLiveBroadcastContent
18373696
3697+instance FromText SearchResultSnippetLiveBroadcastContent where
3698+ fromText = \case
3699+ "live" -> Just SRSLBCLive
3700+ "none" -> Just SRSLBCNone
3701+ "upcoming" -> Just SRSLBCUpcoming
3702+ _ -> Nothing
3703+
3704+instance ToText SearchResultSnippetLiveBroadcastContent where
3705+ toText = \case
3706+ SRSLBCLive -> "live"
3707+ SRSLBCNone -> "none"
3708+ SRSLBCUpcoming -> "upcoming"
3709+
18383710-- | The type of activity this subscription is for (only uploads,
18393711-- everything).
18403712data SubscriptionContentDetailsActivityType
@@ -1846,6 +3718,17 @@ data SubscriptionContentDetailsActivityType
18463718
18473719instance Hashable SubscriptionContentDetailsActivityType
18483720
3721+instance FromText SubscriptionContentDetailsActivityType where
3722+ fromText = \case
3723+ "all" -> Just SCDATAll
3724+ "uploads" -> Just SCDATUploads
3725+ _ -> Nothing
3726+
3727+instance ToText SubscriptionContentDetailsActivityType where
3728+ toText = \case
3729+ SCDATAll -> "all"
3730+ SCDATUploads -> "uploads"
3731+
18493732-- | Video game rating, if any.
18503733data VideoAgeGatingVideoGameRating
18513734 = VAGVGRAnyone
@@ -1860,6 +3743,21 @@ data VideoAgeGatingVideoGameRating
18603743
18613744instance Hashable VideoAgeGatingVideoGameRating
18623745
3746+instance FromText VideoAgeGatingVideoGameRating where
3747+ fromText = \case
3748+ "anyone" -> Just VAGVGRAnyone
3749+ "m15Plus" -> Just VAGVGRM15Plus
3750+ "m16Plus" -> Just VAGVGRM16Plus
3751+ "m17Plus" -> Just VAGVGRM17Plus
3752+ _ -> Nothing
3753+
3754+instance ToText VideoAgeGatingVideoGameRating where
3755+ toText = \case
3756+ VAGVGRAnyone -> "anyone"
3757+ VAGVGRM15Plus -> "m15Plus"
3758+ VAGVGRM16Plus -> "m16Plus"
3759+ VAGVGRM17Plus -> "m17Plus"
3760+
18633761-- | The value of captions indicates whether the video has captions or not.
18643762data VideoContentDetailsCaption
18653763 = VCDCFalse
@@ -1870,6 +3768,17 @@ data VideoContentDetailsCaption
18703768
18713769instance Hashable VideoContentDetailsCaption
18723770
3771+instance FromText VideoContentDetailsCaption where
3772+ fromText = \case
3773+ "false" -> Just VCDCFalse
3774+ "true" -> Just VCDCTrue
3775+ _ -> Nothing
3776+
3777+instance ToText VideoContentDetailsCaption where
3778+ toText = \case
3779+ VCDCFalse -> "false"
3780+ VCDCTrue -> "true"
3781+
18733782-- | The value of definition indicates whether the video is available in high
18743783-- definition or only in standard definition.
18753784data VideoContentDetailsDefinition
@@ -1881,6 +3790,17 @@ data VideoContentDetailsDefinition
18813790
18823791instance Hashable VideoContentDetailsDefinition
18833792
3793+instance FromText VideoContentDetailsDefinition where
3794+ fromText = \case
3795+ "hd" -> Just VCDDHD
3796+ "sd" -> Just VCDDSD
3797+ _ -> Nothing
3798+
3799+instance ToText VideoContentDetailsDefinition where
3800+ toText = \case
3801+ VCDDHD -> "hd"
3802+ VCDDSD -> "sd"
3803+
18843804-- | Defines the context of the ping.
18853805data VideoConversionPingContext
18863806 = VCPCComment
@@ -1895,6 +3815,21 @@ data VideoConversionPingContext
18953815
18963816instance Hashable VideoConversionPingContext
18973817
3818+instance FromText VideoConversionPingContext where
3819+ fromText = \case
3820+ "comment" -> Just VCPCComment
3821+ "dislike" -> Just VCPCDislike
3822+ "like" -> Just VCPCLike
3823+ "share" -> Just VCPCShare
3824+ _ -> Nothing
3825+
3826+instance ToText VideoConversionPingContext where
3827+ toText = \case
3828+ VCPCComment -> "comment"
3829+ VCPCDislike -> "dislike"
3830+ VCPCLike -> "like"
3831+ VCPCShare -> "share"
3832+
18983833-- | The uploaded file\'s type as detected by YouTube\'s video processing
18993834-- engine. Currently, YouTube only processes video files, but this field is
19003835-- present whether a video file or another type of file was uploaded.
@@ -1917,6 +3852,27 @@ data VideoFileDetailsFileType
19173852
19183853instance Hashable VideoFileDetailsFileType
19193854
3855+instance FromText VideoFileDetailsFileType where
3856+ fromText = \case
3857+ "archive" -> Just VFDFTArchive
3858+ "audio" -> Just VFDFTAudio
3859+ "document" -> Just VFDFTDocument
3860+ "image" -> Just VFDFTImage
3861+ "other" -> Just VFDFTOther
3862+ "project" -> Just VFDFTProject
3863+ "video" -> Just VFDFTVideo
3864+ _ -> Nothing
3865+
3866+instance ToText VideoFileDetailsFileType where
3867+ toText = \case
3868+ VFDFTArchive -> "archive"
3869+ VFDFTAudio -> "audio"
3870+ VFDFTDocument -> "document"
3871+ VFDFTImage -> "image"
3872+ VFDFTOther -> "other"
3873+ VFDFTProject -> "project"
3874+ VFDFTVideo -> "video"
3875+
19203876-- | The amount that YouTube needs to rotate the original source content to
19213877-- properly display the video.
19223878data VideoFileDetailsVideoStreamRotation
@@ -1934,6 +3890,23 @@ data VideoFileDetailsVideoStreamRotation
19343890
19353891instance Hashable VideoFileDetailsVideoStreamRotation
19363892
3893+instance FromText VideoFileDetailsVideoStreamRotation where
3894+ fromText = \case
3895+ "clockwise" -> Just VFDVSRClockwise
3896+ "counterClockwise" -> Just VFDVSRCounterClockwise
3897+ "none" -> Just VFDVSRNone
3898+ "other" -> Just VFDVSROther
3899+ "upsideDown" -> Just VFDVSRUpsideDown
3900+ _ -> Nothing
3901+
3902+instance ToText VideoFileDetailsVideoStreamRotation where
3903+ toText = \case
3904+ VFDVSRClockwise -> "clockwise"
3905+ VFDVSRCounterClockwise -> "counterClockwise"
3906+ VFDVSRNone -> "none"
3907+ VFDVSROther -> "other"
3908+ VFDVSRUpsideDown -> "upsideDown"
3909+
19373910-- | The reason that YouTube failed to process the video. This property will
19383911-- only have a value if the processingStatus property\'s value is failed.
19393912data VideoProcessingDetailsProcessingFailureReason
@@ -1949,6 +3922,21 @@ data VideoProcessingDetailsProcessingFailureReason
19493922
19503923instance Hashable VideoProcessingDetailsProcessingFailureReason
19513924
3925+instance FromText VideoProcessingDetailsProcessingFailureReason where
3926+ fromText = \case
3927+ "other" -> Just VPDPFROther
3928+ "streamingFailed" -> Just VPDPFRStreamingFailed
3929+ "transcodeFailed" -> Just VPDPFRTranscodeFailed
3930+ "uploadFailed" -> Just VPDPFRUploadFailed
3931+ _ -> Nothing
3932+
3933+instance ToText VideoProcessingDetailsProcessingFailureReason where
3934+ toText = \case
3935+ VPDPFROther -> "other"
3936+ VPDPFRStreamingFailed -> "streamingFailed"
3937+ VPDPFRTranscodeFailed -> "transcodeFailed"
3938+ VPDPFRUploadFailed -> "uploadFailed"
3939+
19523940-- | The video\'s processing status. This value indicates whether YouTube was
19533941-- able to process the video or if the video is still being processed.
19543942data VideoProcessingDetailsProcessingStatus
@@ -1964,6 +3952,21 @@ data VideoProcessingDetailsProcessingStatus
19643952
19653953instance Hashable VideoProcessingDetailsProcessingStatus
19663954
3955+instance FromText VideoProcessingDetailsProcessingStatus where
3956+ fromText = \case
3957+ "failed" -> Just VPDPSFailed
3958+ "processing" -> Just VPDPSProcessing
3959+ "succeeded" -> Just VPDPSSucceeded
3960+ "terminated" -> Just VPDPSTerminated
3961+ _ -> Nothing
3962+
3963+instance ToText VideoProcessingDetailsProcessingStatus where
3964+ toText = \case
3965+ VPDPSFailed -> "failed"
3966+ VPDPSProcessing -> "processing"
3967+ VPDPSSucceeded -> "succeeded"
3968+ VPDPSTerminated -> "terminated"
3969+
19673970data VideoRatingRating
19683971 = VRRDislike
19693972 -- ^ @dislike@
@@ -1977,6 +3980,21 @@ data VideoRatingRating
19773980
19783981instance Hashable VideoRatingRating
19793982
3983+instance FromText VideoRatingRating where
3984+ fromText = \case
3985+ "dislike" -> Just VRRDislike
3986+ "like" -> Just VRRLike
3987+ "none" -> Just VRRNone
3988+ "unspecified" -> Just VRRUnspecified
3989+ _ -> Nothing
3990+
3991+instance ToText VideoRatingRating where
3992+ toText = \case
3993+ VRRDislike -> "dislike"
3994+ VRRLike -> "like"
3995+ VRRNone -> "none"
3996+ VRRUnspecified -> "unspecified"
3997+
19803998-- | Indicates if the video is an upcoming\/active live broadcast. Or it\'s
19813999-- \"none\" if the video is not an upcoming\/active live broadcast.
19824000data VideoSnippetLiveBroadcastContent
@@ -1990,6 +4008,19 @@ data VideoSnippetLiveBroadcastContent
19904008
19914009instance Hashable VideoSnippetLiveBroadcastContent
19924010
4011+instance FromText VideoSnippetLiveBroadcastContent where
4012+ fromText = \case
4013+ "live" -> Just VSLBCLive
4014+ "none" -> Just VSLBCNone
4015+ "upcoming" -> Just VSLBCUpcoming
4016+ _ -> Nothing
4017+
4018+instance ToText VideoSnippetLiveBroadcastContent where
4019+ toText = \case
4020+ VSLBCLive -> "live"
4021+ VSLBCNone -> "none"
4022+ VSLBCUpcoming -> "upcoming"
4023+
19934024-- | This value explains why a video failed to upload. This property is only
19944025-- present if the uploadStatus property indicates that the upload failed.
19954026data VideoStatusFailureReason
@@ -2009,6 +4040,25 @@ data VideoStatusFailureReason
20094040
20104041instance Hashable VideoStatusFailureReason
20114042
4043+instance FromText VideoStatusFailureReason where
4044+ fromText = \case
4045+ "codec" -> Just VSFRCodec
4046+ "conversion" -> Just VSFRConversion
4047+ "emptyFile" -> Just VSFREmptyFile
4048+ "invalidFile" -> Just VSFRInvalidFile
4049+ "tooSmall" -> Just VSFRTooSmall
4050+ "uploadAborted" -> Just VSFRUploadAborted
4051+ _ -> Nothing
4052+
4053+instance ToText VideoStatusFailureReason where
4054+ toText = \case
4055+ VSFRCodec -> "codec"
4056+ VSFRConversion -> "conversion"
4057+ VSFREmptyFile -> "emptyFile"
4058+ VSFRInvalidFile -> "invalidFile"
4059+ VSFRTooSmall -> "tooSmall"
4060+ VSFRUploadAborted -> "uploadAborted"
4061+
20124062-- | The video\'s license.
20134063data VideoStatusLicense
20144064 = VSLCreativeCommon
@@ -2019,6 +4069,17 @@ data VideoStatusLicense
20194069
20204070instance Hashable VideoStatusLicense
20214071
4072+instance FromText VideoStatusLicense where
4073+ fromText = \case
4074+ "creativeCommon" -> Just VSLCreativeCommon
4075+ "youtube" -> Just VSLYoutube
4076+ _ -> Nothing
4077+
4078+instance ToText VideoStatusLicense where
4079+ toText = \case
4080+ VSLCreativeCommon -> "creativeCommon"
4081+ VSLYoutube -> "youtube"
4082+
20224083-- | The video\'s privacy status.
20234084data VideoStatusPrivacyStatus
20244085 = VSPSPrivate
@@ -2031,6 +4092,19 @@ data VideoStatusPrivacyStatus
20314092
20324093instance Hashable VideoStatusPrivacyStatus
20334094
4095+instance FromText VideoStatusPrivacyStatus where
4096+ fromText = \case
4097+ "private" -> Just VSPSPrivate
4098+ "public" -> Just VSPSPublic
4099+ "unlisted" -> Just VSPSUnlisted
4100+ _ -> Nothing
4101+
4102+instance ToText VideoStatusPrivacyStatus where
4103+ toText = \case
4104+ VSPSPrivate -> "private"
4105+ VSPSPublic -> "public"
4106+ VSPSUnlisted -> "unlisted"
4107+
20344108-- | This value explains why YouTube rejected an uploaded video. This
20354109-- property is only present if the uploadStatus property indicates that the
20364110-- upload was rejected.
@@ -2057,6 +4131,31 @@ data VideoStatusRejectionReason
20574131
20584132instance Hashable VideoStatusRejectionReason
20594133
4134+instance FromText VideoStatusRejectionReason where
4135+ fromText = \case
4136+ "claim" -> Just VSRRClaim
4137+ "copyright" -> Just VSRRCopyright
4138+ "duplicate" -> Just VSRRDuplicate
4139+ "inappropriate" -> Just VSRRInappropriate
4140+ "length" -> Just VSRRLength
4141+ "termsOfUse" -> Just VSRRTermsOfUse
4142+ "trademark" -> Just VSRRTrademark
4143+ "uploaderAccountClosed" -> Just VSRRUploaderAccountClosed
4144+ "uploaderAccountSuspended" -> Just VSRRUploaderAccountSuspended
4145+ _ -> Nothing
4146+
4147+instance ToText VideoStatusRejectionReason where
4148+ toText = \case
4149+ VSRRClaim -> "claim"
4150+ VSRRCopyright -> "copyright"
4151+ VSRRDuplicate -> "duplicate"
4152+ VSRRInappropriate -> "inappropriate"
4153+ VSRRLength -> "length"
4154+ VSRRTermsOfUse -> "termsOfUse"
4155+ VSRRTrademark -> "trademark"
4156+ VSRRUploaderAccountClosed -> "uploaderAccountClosed"
4157+ VSRRUploaderAccountSuspended -> "uploaderAccountSuspended"
4158+
20604159-- | The status of the uploaded video.
20614160data VideoStatusUploadStatus
20624161 = VSUSDeleted
@@ -2073,6 +4172,23 @@ data VideoStatusUploadStatus
20734172
20744173instance Hashable VideoStatusUploadStatus
20754174
4175+instance FromText VideoStatusUploadStatus where
4176+ fromText = \case
4177+ "deleted" -> Just VSUSDeleted
4178+ "failed" -> Just VSUSFailed
4179+ "processed" -> Just VSUSProcessed
4180+ "rejected" -> Just VSUSRejected
4181+ "uploaded" -> Just VSUSUploaded
4182+ _ -> Nothing
4183+
4184+instance ToText VideoStatusUploadStatus where
4185+ toText = \case
4186+ VSUSDeleted -> "deleted"
4187+ VSUSFailed -> "failed"
4188+ VSUSProcessed -> "processed"
4189+ VSUSRejected -> "rejected"
4190+ VSUSUploaded -> "uploaded"
4191+
20764192data VideoSuggestionsItemEditorSuggestions
20774193 = VSIESAudioQuietAudioSwap
20784194 -- ^ @audioQuietAudioSwap@
@@ -2086,6 +4202,21 @@ data VideoSuggestionsItemEditorSuggestions
20864202
20874203instance Hashable VideoSuggestionsItemEditorSuggestions
20884204
4205+instance FromText VideoSuggestionsItemEditorSuggestions where
4206+ fromText = \case
4207+ "audioQuietAudioSwap" -> Just VSIESAudioQuietAudioSwap
4208+ "videoAutoLevels" -> Just VSIESVideoAutoLevels
4209+ "videoCrop" -> Just VSIESVideoCrop
4210+ "videoStabilize" -> Just VSIESVideoStabilize
4211+ _ -> Nothing
4212+
4213+instance ToText VideoSuggestionsItemEditorSuggestions where
4214+ toText = \case
4215+ VSIESAudioQuietAudioSwap -> "audioQuietAudioSwap"
4216+ VSIESVideoAutoLevels -> "videoAutoLevels"
4217+ VSIESVideoCrop -> "videoCrop"
4218+ VSIESVideoStabilize -> "videoStabilize"
4219+
20894220data VideoSuggestionsItemProcessingErrors
20904221 = VSIPEArchiveFile
20914222 -- ^ @archiveFile@
@@ -2103,6 +4234,25 @@ data VideoSuggestionsItemProcessingErrors
21034234
21044235instance Hashable VideoSuggestionsItemProcessingErrors
21054236
4237+instance FromText VideoSuggestionsItemProcessingErrors where
4238+ fromText = \case
4239+ "archiveFile" -> Just VSIPEArchiveFile
4240+ "audioFile" -> Just VSIPEAudioFile
4241+ "docFile" -> Just VSIPEDocFile
4242+ "imageFile" -> Just VSIPEImageFile
4243+ "notAVideoFile" -> Just VSIPENotAVideoFile
4244+ "projectFile" -> Just VSIPEProjectFile
4245+ _ -> Nothing
4246+
4247+instance ToText VideoSuggestionsItemProcessingErrors where
4248+ toText = \case
4249+ VSIPEArchiveFile -> "archiveFile"
4250+ VSIPEAudioFile -> "audioFile"
4251+ VSIPEDocFile -> "docFile"
4252+ VSIPEImageFile -> "imageFile"
4253+ VSIPENotAVideoFile -> "notAVideoFile"
4254+ VSIPEProjectFile -> "projectFile"
4255+
21064256data VideoSuggestionsItemProcessingHints
21074257 = VSIPHNonStreamableMov
21084258 -- ^ @nonStreamableMov@
@@ -2112,6 +4262,17 @@ data VideoSuggestionsItemProcessingHints
21124262
21134263instance Hashable VideoSuggestionsItemProcessingHints
21144264
4265+instance FromText VideoSuggestionsItemProcessingHints where
4266+ fromText = \case
4267+ "nonStreamableMov" -> Just VSIPHNonStreamableMov
4268+ "sendBestQualityVideo" -> Just VSIPHSendBestQualityVideo
4269+ _ -> Nothing
4270+
4271+instance ToText VideoSuggestionsItemProcessingHints where
4272+ toText = \case
4273+ VSIPHNonStreamableMov -> "nonStreamableMov"
4274+ VSIPHSendBestQualityVideo -> "sendBestQualityVideo"
4275+
21154276data VideoSuggestionsItemProcessingWarnings
21164277 = VSIPWHasEditlist
21174278 -- ^ @hasEditlist@
@@ -2130,3 +4291,24 @@ data VideoSuggestionsItemProcessingWarnings
21304291 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)
21314292
21324293instance Hashable VideoSuggestionsItemProcessingWarnings
4294+
4295+instance FromText VideoSuggestionsItemProcessingWarnings where
4296+ fromText = \case
4297+ "hasEditlist" -> Just VSIPWHasEditlist
4298+ "inconsistentResolution" -> Just VSIPWInconsistentResolution
4299+ "problematicAudioCodec" -> Just VSIPWProblematicAudioCodec
4300+ "problematicVideoCodec" -> Just VSIPWProblematicVideoCodec
4301+ "unknownAudioCodec" -> Just VSIPWUnknownAudioCodec
4302+ "unknownContainer" -> Just VSIPWUnknownContainer
4303+ "unknownVideoCodec" -> Just VSIPWUnknownVideoCodec
4304+ _ -> Nothing
4305+
4306+instance ToText VideoSuggestionsItemProcessingWarnings where
4307+ toText = \case
4308+ VSIPWHasEditlist -> "hasEditlist"
4309+ VSIPWInconsistentResolution -> "inconsistentResolution"
4310+ VSIPWProblematicAudioCodec -> "problematicAudioCodec"
4311+ VSIPWProblematicVideoCodec -> "problematicVideoCodec"
4312+ VSIPWUnknownAudioCodec -> "unknownAudioCodec"
4313+ VSIPWUnknownContainer -> "unknownContainer"
4314+ VSIPWUnknownVideoCodec -> "unknownVideoCodec"