ilyakooo0/gogol
1
0
Fork 0
mirror of https://github.com/ilyakooo0/gogol.git synced 2024-10-06 02:37:07 +03:00
Code Issues Projects Releases Wiki Activity

Updating services with explicit namespaces

Browse Source
This commit is contained in:
Brendan Hay 2015-09-26 19:38:18 +02:00
parent e11a2d540a
commit 854696cec4
526 changed files with 3553 additions and 3536 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gen/annex/adexchangebuyer.json
View File

@ -1,4 +1,5 @@
{ {
"library": "adexchange-buyer" "library": "adexchange-buyer",
"canonicalName": "AdExchange.Buyer"
} }

3
gen/annex/adexchangeseller.json
View File

@ -1,4 +1,5 @@
{ {
"library": "adexchange-seller" "library": "adexchange-seller",
"canonicalName": "AdExchange.Seller"
} }

3
gen/annex/admin/datatransfer.json
View File

@ -1,4 +1,5 @@
{ {
"library": "admin" "library": "admin",
"canonicalName": "Admin.DataTransfer"
} }

3
gen/annex/admin/directory.json
View File

@ -1,4 +1,5 @@
{ {
"library": "admin" "library": "admin",
"canonicalName": "Admin.Directory"
} }

2
gen/annex/admin/email_migration.json
View File

@ -1,5 +1,5 @@
{ {
"library": "admin", "library": "admin",
"canonicalName": "EmailMigration" "canonicalName": "Admin.EmailMigration"
} }

3
gen/annex/admin/reports.json
View File

@ -1,4 +1,5 @@
{ {
"library": "admin" "library": "admin",
"canonicalName": "Admin.Reports"
} }

3
gen/annex/adsense.json
View File

@ -1,4 +1,5 @@
{ {
"library": "adsense" "library": "adsense",
"canonicalName": "AdSense"
} }

3
gen/annex/adsensehost.json
View File

@ -1,4 +1,5 @@
{ {
"library": "adsense-host" "library": "adsense-host",
"canonicalName": "AdSense.Host"
} }

3
gen/annex/analytics.json
View File

@ -1,4 +1,5 @@
{ {
"library": "analytics" "library": "analytics",
"canonicalName": "Analytics"
} }

3
gen/annex/androidenterprise.json
View File

@ -1,4 +1,5 @@
{ {
"library": "android-enterprise" "library": "play-enterprise",
"canonicalName": "Play.Enterprise"
} }

3
gen/annex/androidpublisher.json
View File

@ -1,4 +1,5 @@
{ {
"library": "android-publisher" "library": "play-developer",
"canonicalName": "Play.Developer"
} }

3
gen/annex/appengine.json
View File

@ -1,4 +1,5 @@
{ {
"library": "appengine" "library": "appengine",
"canonicalName": "AppEngine"
} }

3
gen/annex/appsactivity.json
View File

@ -1,4 +1,5 @@
{ {
"library": "appsactivity" "library": "apps-activity",
"canonicalName": "Apps.Activity"
} }

3
gen/annex/appstate.json
View File

@ -1,4 +1,5 @@
{ {
"library": "appstate" "library": "games-appstate",
"canonicalName": "Games.AppState"
} }

3
gen/annex/autoscaler.json
View File

@ -1,4 +1,5 @@
{ {
"library": "autoscaler" "library": "compute-autoscaler",
"canonicalName": "Compute.Autoscaler"
} }

3
gen/annex/bigquery.json
View File

@ -1,4 +1,5 @@
{ {
"library": "bigquery" "library": "bigquery",
"canonicalName": "BigQuery"
} }

3
gen/annex/blogger.json
View File

@ -1,4 +1,5 @@
{ {
"library": "blogger" "library": "blogger",
"canonicalName": "Blogger"
} }

3
gen/annex/books.json
View File

@ -1,4 +1,5 @@
{ {
"library": "books" "library": "books",
"canonicalName": "Books"
} }

3
gen/annex/calendar.json
View File

@ -1,4 +1,5 @@
{ {
"library": "calendar" "library": "apps-calendar",
"canonicalName": "Apps.Calendar"
} }

3
gen/annex/civicinfo.json
View File

@ -1,4 +1,5 @@
{ {
"library": "civicinfo" "library": "civicinfo",
"canonicalName": "CivicInfo"
} }

3
gen/annex/classroom.json
View File

@ -1,4 +1,5 @@
{ {
"library": "classroom" "library": "classroom",
"canonicalName": "Classroom"
} }

3
gen/annex/cloudbilling.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-billing" "library": "billing",
"canonicalName": "Billing"
} }

3
gen/annex/clouddebugger.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-debugger" "library": "cloud-debugger",
"canonicalName": "Cloud.Debugger"
} }

3
gen/annex/cloudlatencytest.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-latencytest" "library": "latencytest",
"canonicalName": "LatencyTest"
} }

3
gen/annex/cloudmonitoring.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-monitoring" "library": "cloud-monitoring",
"canonicalName": "Cloud.Monitoring"
} }

3
gen/annex/cloudresourcemanager.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-resources" "library": "cloud-resourcemanager",
"canonicalName": "Cloud.ResourceManager"
} }

3
gen/annex/clouduseraccounts.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-useraccounts" "library": "compute-useraccounts",
"canonicalName": "Compute.UserAccounts"
} }

3
gen/annex/container.json
View File

@ -1,4 +1,5 @@
{ {
"library": "container" "library": "container",
"canonicalName": "Container"
} }

3
gen/annex/content.json
View File

@ -1,4 +1,5 @@
{ {
"library": "content" "library": "shopping-content",
"canonicalName": "Shopping.Content"
} }

3
gen/annex/coordinate.json
View File

@ -1,4 +1,5 @@
{ {
"library": "maps-coordinate" "library": "maps-coordinate",
"canonicalName": "Maps.Coordinate"
} }

3
gen/annex/customsearch.json
View File

@ -1,3 +1,4 @@
{ {
"library": "customsearch" "library": "customsearch",
"canonicalName": "CustomSearch"
} }

3
gen/annex/dataflow.json
View File

@ -1,4 +1,5 @@
{ {
"library": "dataflow" "library": "dataflow",
"canonicalName": "Dataflow"
} }

3
gen/annex/datastore.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-datastore" "library": "cloud-datastore",
"canonicalName": "Cloud.Datastore"
} }

3
gen/annex/deploymentmanager.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-deployments" "library": "cloud-deployments",
"canonicalName": "Cloud.Deployment"
} }

2
gen/annex/discovery.json
View File

@ -1,5 +1,5 @@
{ {
"library": "discovery", "library": "discovery",
"canonicalName": "discovery" "canonicalName": "Discovery"
} }

3
gen/annex/dns.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-dns" "library": "cloud-dns",
"canonicalName": "Cloud.DNS"
} }

3
gen/annex/doubleclickbidmanager.json
View File

@ -1,4 +1,5 @@
{ {
"library": "doubleclick-bids" "library": "doubleclick-bids",
"canonicalName": "DoubleClick.Bids"
} }

3
gen/annex/doubleclicksearch.json
View File

@ -1,4 +1,5 @@
{ {
"library": "doubleclick-search" "library": "doubleclick-search",
"canonicalName": "DoubleClick.Search"
} }

3
gen/annex/drive.json
View File

@ -1,4 +1,5 @@
{ {
"library": "drive" "library": "drive",
"canonicalName": "Drive"
} }

3
gen/annex/fitness.json
View File

@ -1,4 +1,5 @@
{ {
"library": "fitness" "library": "fitness",
"canonicalName": "Fitness"
} }

3
gen/annex/freebase.json
View File

@ -1,4 +1,5 @@
{ {
"library": "freebasesearch" "library": "freebasesearch",
"canonicalName": "Freebase.Search"
} }

3
gen/annex/fusiontables.json
View File

@ -1,4 +1,5 @@
{ {
"library": "fusiontables" "library": "fusiontables",
"canonicalName": "FusionTables"
} }

3
gen/annex/games.json
View File

@ -1,4 +1,5 @@
{ {
"library": "games" "library": "games",
"canonicalName": "Games"
} }

3
gen/annex/gamesconfiguration.json
View File

@ -1,4 +1,5 @@
{ {
"library": "games-configuration" "library": "games-configuration",
"canonicalName": "Games.Configuration"
} }

3
gen/annex/gamesmanagement.json
View File

@ -1,4 +1,5 @@
{ {
"library": "games-management" "library": "games-management",
"canonicalName": "Games.Management"
} }

3
gen/annex/gan.json
View File

@ -1,4 +1,5 @@
{ {
"library": "affiliatenetwork" "library": "affiliates",
"canonicalName": "Affiliates"
} }

3
gen/annex/genomics.json
View File

@ -1,4 +1,5 @@
{ {
"library": "genomics" "library": "genomics",
"canonicalName": "Genomics"
} }

3
gen/annex/gmail.json
View File

@ -1,4 +1,5 @@
{ {
"library": "gmail" "library": "gmail",
"canonicalName": "Gmail"
} }

3
gen/annex/groupsmigration.json
View File

@ -1,4 +1,5 @@
{ {
"library": "groups" "library": "groups-migration",
"canonicalName": "Groups.Migration"
} }

3
gen/annex/groupssettings.json
View File

@ -1,4 +1,5 @@
{ {
"library": "groups" "library": "groups-migration",
"canonicalName": "Groups.Settings"
} }

3
gen/annex/licensing.json
View File

@ -1,4 +1,5 @@
{ {
"library": "licensing" "library": "apps-licensing",
"canonicalName": "Apps.Licensing"
} }

3
gen/annex/logging.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-logging" "library": "cloud-logging",
"canonicalName": "Cloud.Logging"
} }

3
gen/annex/mapsengine.json
View File

@ -1,4 +1,5 @@
{ {
"library": "maps-engine" "library": "maps-engine",
"canonicalName": "Map.Engine"
} }

3
gen/annex/mirror.json
View File

@ -1,4 +1,5 @@
{ {
"library": "mirror" "library": "mirror",
"canonicalName": "Mirror"
} }

3
gen/annex/oauth2.json
View File

@ -1,4 +1,5 @@
{ {
"library": "oauth2" "library": "oauth2",
"canonicalName": "OAuth2"
} }

3
gen/annex/pagespeedonline.json
View File

@ -1,4 +1,5 @@
{ {
"library": "pagespeed" "library": "pagespeed",
"canonicalName": "PageSpeed"
} }

3
gen/annex/partners.json
View File

@ -1,4 +1,5 @@
{ {
"library": "partners" "library": "partners",
"canonicalName": "Partners"
} }

3
gen/annex/playmoviespartner.json
View File

@ -1,4 +1,5 @@
{ {
"library": "play-moviespartner" "library": "play-moviespartner",
"canonicalName": "Play.Movies.Partner"
} }

3
gen/annex/prediction.json
View File

@ -1,4 +1,5 @@
{ {
"library": "prediction" "library": "prediction",
"canonicalName": "Prediction"
} }

3
gen/annex/proximitybeacon.json
View File

@ -1,4 +1,5 @@
{ {
"library": "proximitybeacon" "library": "proximitybeacon",
"canonicalName": "ProximityBeacon"
} }

3
gen/annex/pubsub.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-pubsub" "library": "cloud-pubsub",
"canonicalName": "Cloud.PubSub"
} }

3
gen/annex/qpxexpress.json
View File

@ -1,4 +1,5 @@
{ {
"library": "qpxexpress" "library": "qpxexpress",
"canonicalName": "QPXExpress"
} }

4
gen/annex/replicapool.json
View File

@ -1,4 +1,4 @@
{ {
"library": "compute-instancegroups", "library": "compute-instancegroups-manager",
"canonicalName": "Compute.InstanceGroups" "canonicalName": "Compute.InstanceGroups.Manager"
} }

3
gen/annex/reseller.json
View File

@ -1,3 +1,4 @@
{ {
"library": "reseller" "library": "apps-reseller",
"canonicalName": "Apps.Reseller"
} }

3
gen/annex/resourceviews.json
View File

@ -1,4 +1,5 @@
{ {
"library": "resourceviews" "library": "compute-instancegroups",
"canonicalName": "Compute.InstanceGroups"
} }

3
gen/annex/siteverification.json
View File

@ -1,4 +1,5 @@
{ {
"library": "siteverification" "library": "siteverification",
"canonicalName": "SiteVerification"
} }

3
gen/annex/sqladmin.json
View File

@ -1,4 +1,5 @@
{ {
"library": "cloud-sqladmin" "library": "cloud-sqladmin",
"canonicalName": "Cloud.SQLAdmin"
} }

3
gen/annex/storage.json
View File

@ -1,4 +1,5 @@
{ {
"library": "storage" "library": "cloud-storage",
"canonicalName": "Cloud.Storage"
} }

3
gen/annex/storagetransfer.json
View File

@ -1,4 +1,5 @@
{ {
"library": "storage-transfer" "library": "cloud-storage-transfer",
"canonicalName": "Cloud.Storage.Transfer"
} }

3
gen/annex/tagmanager.json
View File

@ -1,4 +1,5 @@
{ {
"library": "tagmanager" "library": "tagmanager",
"canonicalName": "TagManager"
} }

3
gen/annex/taskqueue.json
View File

@ -1,4 +1,5 @@
{ {
"library": "taskqueue" "library": "appengine-taskqueue",
"canonicalName": "AppEngine.TaskQueue"
} }

3
gen/annex/tasks.json
View File

@ -1,4 +1,5 @@
{ {
"library": "tasks" "library": "apps-tasks",
"canonicalName": "Apps.Tasks"
} }

3
gen/annex/translate.json
View File

@ -1,4 +1,5 @@
{ {
"library": "translate" "library": "translate",
"canonicalName": "Translate"
} }

3
gen/annex/urlshortener.json
View File

@ -1,4 +1,5 @@
{ {
"library": "urlshortener" "library": "urlshortener",
"canonicalName": "URLShortener"
} }

4
gen/annex/webfonts.json
View File

@ -1,5 +1,5 @@
{ {
"library": "webfonts", "library": "fonts",
"canonicalName": "WebFonts" "canonicalName": "Fonts"
} }

3
gen/annex/webmasters.json
View File

@ -1,4 +1,5 @@
{ {
"library": "webmaster-tools" "library": "webmaster-tools",
"canonicalName": "Webmaster.Tools"
} }

3
gen/annex/youtube.json
View File

@ -1,4 +1,5 @@
{ {
"library": "youtube" "library": "youtube",
"canonicalName": "YouTube"
} }

3
gen/annex/youtubeanalytics.json
View File

@ -1,4 +1,5 @@
{ {
"library": "youtube-analytics" "library": "youtube-analytics",
"canonicalName": "YouTube.Analytics"
} }

2
gen/src/Gen/Syntax.hs
View File

@ -38,7 +38,7 @@ apiAlias n ls = TypeDecl noLoc n [] alias
where where
alias = case map (TyCon . UnQual) ls of alias = case map (TyCon . UnQual) ls of
[] -> unit_tycon [] -> unit_tycon
x:xs -> foldr' (\l r -> TyInfix l (UnQual (sym ":<|>")) r) x xs x:xs -> foldl' (\l r -> TyInfix l (UnQual (sym ":<|>")) r) x xs
-- type Method = :> ... -- type Method = :> ...
verbDecl :: Service s r -> Local -> Local -> Method -> Decl verbDecl :: Service s r -> Local -> Local -> Method -> Decl

7
gen/src/Gen/Text.hs
View File

@ -53,7 +53,7 @@ renameTitle =
renameAbbrev :: Text -> Text renameAbbrev :: Text -> Text
renameAbbrev = mconcat renameAbbrev = mconcat
. Text.split separator . Text.split dot
. stripPrefix "Google " . stripPrefix "Google "
. stripSuffix " API" . stripSuffix " API"
@ -71,8 +71,6 @@ renameBranch t
cat = Fold.foldMap (Text.intercalate "_" . map component . Text.split dot) cat = Fold.foldMap (Text.intercalate "_" . map component . Text.split dot)
split = Text.split separator split = Text.split separator
dot x = x == '.'
component x component x
| Text.length x <= 1 = x | Text.length x <= 1 = x
| isDigit (Text.last x) = Text.toUpper x | isDigit (Text.last x) = Text.toUpper x
@ -102,6 +100,9 @@ separator x =
|| x == '_' || x == '_'
|| x == '*' || x == '*'
dot :: Char -> Bool
dot x = x == '.'
renameReserved :: Text -> Text renameReserved :: Text -> Text
renameReserved x renameReserved x
| x `Set.member` xs = x <> "'" | x `Set.member` xs = x <> "'"

33
gen/src/Gen/Tree.hs
View File

@ -26,6 +26,7 @@ import Control.Monad
import Control.Monad.Except import Control.Monad.Except
import Data.Aeson hiding (json) import Data.Aeson hiding (json)
import Data.Bifunctor import Data.Bifunctor
import Data.Foldable (foldr')
import qualified Data.List.NonEmpty as NE import qualified Data.List.NonEmpty as NE
import Data.Monoid import Data.Monoid
import Data.Text (Text) import Data.Text (Text)
@ -72,12 +73,7 @@ populate d Templates{..} l = (encodeString d :/) . dir lib <$> layout
[ touch ".gitkeep" [ touch ".gitkeep"
] ]
, dir "gen" , dir "gen" . concatMap service . NE.toList $ _libServices l
[ dir "Network"
[ dir "Google" $
concatMap service (NE.toList (_libServices l))
]
]
, file (lib <.> "cabal") cabalTemplate , file (lib <.> "cabal") cabalTemplate
, file "README.md" readmeTemplate , file "README.md" readmeTemplate
@ -85,14 +81,10 @@ populate d Templates{..} l = (encodeString d :/) . dir lib <$> layout
service s = service s =
[ mod' (tocNS s) mempty tocTemplate (pure svc) [ mod' (tocNS s) mempty tocTemplate (pure svc)
, dir (fromText (svcAbbrev s)) , mod' (typesNS s) (typeImports s) typesTemplate (pure svc)
[ mod' (typesNS s) (typeImports s) typesTemplate (pure svc) , mod' (prodNS s) (prodImports s) prodTemplate (pure svc)
, dir "Types"
[ mod' (prodNS s) (prodImports s) prodTemplate (pure svc)
, mod' (sumNS s) (sumImports s) sumTemplate (pure svc) , mod' (sumNS s) (sumImports s) sumTemplate (pure svc)
] ]
]
]
where where
svc = toJSON s svc = toJSON s
@ -111,13 +103,28 @@ module' :: ToJSON a
-> Template -> Template
-> Either Error a -> Either Error a
-> DirTree (Either Error Rendered) -> DirTree (Either Error Rendered)
module' ns is t f = file' (filename $ nsToPath ns) t $ do module' ns is t f = namespaced ns t $ do
x <- f >>= JS.objectErr (show ns) x <- f >>= JS.objectErr (show ns)
return $! x <> fromPairs return $! x <> fromPairs
[ "moduleName" .= ns [ "moduleName" .= ns
, "moduleImports" .= is , "moduleImports" .= is
] ]
namespaced :: ToJSON a
=> NS
-> Template
-> Either Error a
-> DirTree (Either Error Rendered)
namespaced (NS ns) t x =
case map fromText ns of
[] -> error "Empty namespace."
[p] -> f p
ps -> foldr' nest (f (last ps)) (init ps)
where
f p = file' (p <.> "hs") t x
nest d c = Dir (encodeString d) [c]
file' :: ToJSON a file' :: ToJSON a
=> Path => Path
-> Template -> Template

10
gen/src/Gen/Types.hs
View File

@ -386,7 +386,7 @@ data Service s r = Service
{ _svcLibrary :: Text { _svcLibrary :: Text
, _svcTitle :: Text , _svcTitle :: Text
, _svcName :: Text , _svcName :: Text
, _svcCanonicalName :: Maybe Text , _svcCanonicalName :: Text
, _svcDescription :: Help , _svcDescription :: Help
, _svcRevision :: Maybe Text , _svcRevision :: Maybe Text
, _svcVersion :: Text , _svcVersion :: Text
@ -410,7 +410,7 @@ instance FromJSON s => FromJSON (Service s Resource) where
<$> o .: "library" <$> o .: "library"
<*> o .: "title" <*> o .: "title"
<*> o .: "name" <*> o .: "name"
<*> o .:? "canonicalName" <*> o .: "canonicalName"
<*> o .: "description" <*> o .: "description"
<*> o .:? "revision" <*> o .:? "revision"
<*> o .: "version" <*> o .: "version"
@ -437,9 +437,7 @@ instance ToJSON (Service Data API) where
] ]
svcAbbrev :: Service s r -> Text svcAbbrev :: Service s r -> Text
svcAbbrev s = upperHead svcAbbrev = upperHead . renameAbbrev . _svcCanonicalName
. renameAbbrev
$ fromMaybe (_svcTitle s) (_svcCanonicalName s)
typeImports, prodImports, sumImports :: Service s r -> [NS] typeImports, prodImports, sumImports :: Service s r -> [NS]
typeImports s = ["Network.Google.Prelude", prodNS s, sumNS s] typeImports s = ["Network.Google.Prelude", prodNS s, sumNS s]
@ -447,7 +445,7 @@ prodImports s = ["Network.Google.Prelude", sumNS s]
sumImports _ = ["Network.Google.Prelude"] sumImports _ = ["Network.Google.Prelude"]
tocNS, typesNS, prodNS, sumNS :: Service s r -> NS tocNS, typesNS, prodNS, sumNS :: Service s r -> NS
tocNS s = NS ["Network", "Google", svcAbbrev s] tocNS s = NS $ "Network" : "Google" : Text.split (== '.') (_svcCanonicalName s)
typesNS = (<> "Types") . tocNS typesNS = (<> "Types") . tocNS
prodNS = (<> "Product") . typesNS prodNS = (<> "Product") . typesNS
sumNS = (<> "Sum") . typesNS sumNS = (<> "Sum") . typesNS

89
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer.hs → gogol-adexchange-buyer/gen/Network/Google/AdExchange/Buyer.hs
View File

@ -5,7 +5,7 @@
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-} {-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
-- | -- |
-- Module : Network.Google.AdExchangeBuyer -- Module : Network.Google.AdExchange.Buyer
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@ -17,7 +17,7 @@
-- reports. -- reports.
-- --
-- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference> -- /See:/ <https://developers.google.com/ad-exchange/buyer-rest Ad Exchange Buyer API Reference>
module Network.Google.AdExchangeBuyer module Network.Google.AdExchange.Buyer
( (
-- * Resources -- * Resources
AdExchangeBuyer AdExchangeBuyer
@ -903,7 +903,7 @@ module Network.Google.AdExchangeBuyer
, wpdAllowInterestTargetedAds , wpdAllowInterestTargetedAds
) where ) where
import Network.Google.AdExchangeBuyer.Types import Network.Google.AdExchange.Buyer.Types
import Network.Google.Prelude import Network.Google.Prelude
{- $resources {- $resources
@ -911,23 +911,23 @@ TODO
-} -}
type AdExchangeBuyer = type AdExchangeBuyer =
DealsAPI :<|> MarketplacenotesAPI :<|> DealsAPI :<|>
NegotiationroundsAPI :<|> NegotiationroundsAPI
AccountsAPI :<|> :<|> AccountsAPI
BudgetAPI :<|> :<|> BudgetAPI
CreativesAPI :<|> :<|> CreativesAPI
PerformanceReportAPI :<|> :<|> PerformanceReportAPI
MarketplaceoffersAPI :<|> :<|> MarketplaceoffersAPI
PretargetingConfigAPI :<|> :<|> PretargetingConfigAPI
MarketplaceordersAPI :<|> :<|> MarketplaceordersAPI
ClientaccessAPI :<|> :<|> ClientaccessAPI
BillingInfoAPI :<|> :<|> BillingInfoAPI
MarketplacedealsAPI :<|> :<|> MarketplacedealsAPI
NegotiationsAPI :<|> :<|> NegotiationsAPI
OffersAPI :<|> MarketplacenotesAPI :<|> OffersAPI
type MarketplacenotesAPI = type MarketplacenotesAPI =
MarketplacenotesList :<|> MarketplacenotesInsert MarketplacenotesInsert :<|> MarketplacenotesList
-- | Add notes to the order -- | Add notes to the order
type MarketplacenotesInsert = type MarketplacenotesInsert =
@ -986,8 +986,8 @@ type NegotiationroundsInsert =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type AccountsAPI = type AccountsAPI =
AccountsPatch :<|> AccountsList :<|> AccountsPatch :<|> AccountsGet :<|>
AccountsGet :<|> AccountsUpdate :<|> AccountsList AccountsUpdate
-- | Retrieves the authenticated user\'s list of accounts. -- | Retrieves the authenticated user\'s list of accounts.
type AccountsList = type AccountsList =
@ -1037,7 +1037,7 @@ type AccountsUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type BudgetAPI = type BudgetAPI =
BudgetGet :<|> BudgetUpdate :<|> BudgetPatch BudgetPatch :<|> BudgetGet :<|> BudgetUpdate
-- | Updates the budget amount for the budget of the adgroup specified by the -- | Updates the budget amount for the budget of the adgroup specified by the
-- accountId and billingId, with the budget amount in the request. This -- accountId and billingId, with the budget amount in the request. This
@ -1083,7 +1083,7 @@ type BudgetUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type CreativesAPI = type CreativesAPI =
CreativesList :<|> CreativesGet :<|> CreativesInsert CreativesInsert :<|> CreativesList :<|> CreativesGet
-- | Submit a new creative. -- | Submit a new creative.
type CreativesInsert = type CreativesInsert =
@ -1147,7 +1147,7 @@ type PerformanceReportList =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type MarketplaceoffersAPI = type MarketplaceoffersAPI =
MarketplaceoffersSearch :<|> MarketplaceoffersGet MarketplaceoffersGet :<|> MarketplaceoffersSearch
-- | Gets the requested negotiation. -- | Gets the requested negotiation.
type MarketplaceoffersGet = type MarketplaceoffersGet =
@ -1175,12 +1175,11 @@ type MarketplaceoffersSearch =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type PretargetingConfigAPI = type PretargetingConfigAPI =
PretargetingConfigList :<|> PretargetingConfigInsert :<|> PretargetingConfigList
PretargetingConfigPatch :<|> :<|> PretargetingConfigPatch
PretargetingConfigGet :<|> :<|> PretargetingConfigGet
PretargetingConfigDelete :<|> :<|> PretargetingConfigDelete
PretargetingConfigUpdate :<|> :<|> PretargetingConfigUpdate
PretargetingConfigInsert
-- | Inserts a new pretargeting configuration. -- | Inserts a new pretargeting configuration.
type PretargetingConfigInsert = type PretargetingConfigInsert =
@ -1261,10 +1260,10 @@ type PretargetingConfigUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type MarketplaceordersAPI = type MarketplaceordersAPI =
MarketplaceordersPatch :<|> MarketplaceordersInsert :<|> MarketplaceordersPatch
MarketplaceordersGet :<|> :<|> MarketplaceordersGet
MarketplaceordersSearch :<|> :<|> MarketplaceordersSearch
MarketplaceordersUpdate :<|> MarketplaceordersInsert :<|> MarketplaceordersUpdate
-- | Create the given list of orders -- | Create the given list of orders
type MarketplaceordersInsert = type MarketplaceordersInsert =
@ -1332,11 +1331,11 @@ type MarketplaceordersUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type ClientaccessAPI = type ClientaccessAPI =
ClientaccessList :<|> ClientaccessInsert :<|> ClientaccessList :<|>
ClientaccessPatch :<|> ClientaccessPatch
ClientaccessGet :<|> :<|> ClientaccessGet
ClientaccessDelete :<|> :<|> ClientaccessDelete
ClientaccessUpdate :<|> ClientaccessInsert :<|> ClientaccessUpdate
type ClientaccessInsert = type ClientaccessInsert =
"adexchangebuyer" :> "v1.4" :> "clientAccess" :> "adexchangebuyer" :> "v1.4" :> "clientAccess" :>
@ -1409,7 +1408,7 @@ type ClientaccessUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type BillingInfoAPI = type BillingInfoAPI =
BillingInfoGet :<|> BillingInfoList BillingInfoList :<|> BillingInfoGet
-- | Retrieves a list of billing information for all accounts of the -- | Retrieves a list of billing information for all accounts of the
-- authenticated user. -- authenticated user.
@ -1436,9 +1435,9 @@ type BillingInfoGet =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type MarketplacedealsAPI = type MarketplacedealsAPI =
MarketplacedealsList :<|> MarketplacedealsInsert :<|> MarketplacedealsList :<|>
MarketplacedealsDelete :<|> MarketplacedealsDelete
MarketplacedealsUpdate :<|> MarketplacedealsInsert :<|> MarketplacedealsUpdate
-- | Add new deals for the specified order -- | Add new deals for the specified order
type MarketplacedealsInsert = type MarketplacedealsInsert =
@ -1496,8 +1495,8 @@ type MarketplacedealsUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type NegotiationsAPI = type NegotiationsAPI =
NegotiationsList :<|> NegotiationsInsert :<|> NegotiationsList :<|>
NegotiationsGet :<|> NegotiationsInsert NegotiationsGet
-- | Creates or updates the requested negotiation. -- | Creates or updates the requested negotiation.
type NegotiationsInsert = type NegotiationsInsert =
@ -1534,7 +1533,7 @@ type NegotiationsGet =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type OffersAPI = type OffersAPI =
OffersList :<|> OffersGet :<|> OffersInsert OffersInsert :<|> OffersList :<|> OffersGet
-- | Creates or updates the requested offer. -- | Creates or updates the requested offer.
type OffersInsert = type OffersInsert =

8
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types.hs → gogol-adexchange-buyer/gen/Network/Google/AdExchange/Buyer/Types.hs
View File

@ -5,14 +5,14 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.AdExchangeBuyer.Types -- Module : Network.Google.AdExchange.Buyer.Types
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.AdExchangeBuyer.Types module Network.Google.AdExchange.Buyer.Types
( (
-- * Account -- * Account
@ -833,6 +833,6 @@ module Network.Google.AdExchangeBuyer.Types
, wpdAllowInterestTargetedAds , wpdAllowInterestTargetedAds
) where ) where
import Network.Google.AdExchangeBuyer.Types.Product import Network.Google.AdExchange.Buyer.Types.Product
import Network.Google.AdExchangeBuyer.Types.Sum import Network.Google.AdExchange.Buyer.Types.Sum
import Network.Google.Prelude import Network.Google.Prelude

6
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Product.hs → gogol-adexchange-buyer/gen/Network/Google/AdExchange/Buyer/Types/Product.hs
View File

@ -5,16 +5,16 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.AdExchangeBuyer.Types.Product -- Module : Network.Google.AdExchange.Buyer.Types.Product
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.AdExchangeBuyer.Types.Product where module Network.Google.AdExchange.Buyer.Types.Product where
import Network.Google.AdExchangeBuyer.Types.Sum import Network.Google.AdExchange.Buyer.Types.Sum
import Network.Google.Prelude import Network.Google.Prelude
-- | Configuration data for an Ad Exchange buyer account. -- | Configuration data for an Ad Exchange buyer account.

4
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Sum.hs → gogol-adexchange-buyer/gen/Network/Google/AdExchange/Buyer/Types/Sum.hs
View File

@ -6,13 +6,13 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.AdExchangeSeller.Types.Sum -- Module : Network.Google.AdExchange.Buyer.Types.Sum
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.AdExchangeSeller.Types.Sum where module Network.Google.AdExchange.Buyer.Types.Sum where
import Network.Google.Prelude import Network.Google.Prelude

8
gogol-adexchange-buyer/gogol-adexchange-buyer.cabal
View File

@ -32,12 +32,12 @@ library
ghc-options: -Wall ghc-options: -Wall
exposed-modules: exposed-modules:
Network.Google.AdExchangeBuyer Network.Google.AdExchange.Buyer
, Network.Google.AdExchangeBuyer.Types , Network.Google.AdExchange.Buyer.Types
other-modules: other-modules:
Network.Google.AdExchangeBuyer.Types.Product Network.Google.AdExchange.Buyer.Types.Product
, Network.Google.AdExchangeBuyer.Types.Sum , Network.Google.AdExchange.Buyer.Types.Sum
build-depends: build-depends:
gogol-core == 0.0.1.* gogol-core == 0.0.1.*

24
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller.hs → gogol-adexchange-seller/gen/Network/Google/AdExchange/Seller.hs
View File

@ -5,7 +5,7 @@
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-} {-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
-- | -- |
-- Module : Network.Google.AdExchangeSeller -- Module : Network.Google.AdExchange.Seller
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@ -16,7 +16,7 @@
-- to generate reports -- to generate reports
-- --
-- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference> -- /See:/ <https://developers.google.com/ad-exchange/seller-rest/ Ad Exchange Seller API Reference>
module Network.Google.AdExchangeSeller module Network.Google.AdExchange.Seller
( (
-- * Resources -- * Resources
AdExchangeSeller AdExchangeSeller
@ -201,7 +201,7 @@ module Network.Google.AdExchangeSeller
, urlcItems , urlcItems
) where ) where
import Network.Google.AdExchangeSeller.Types import Network.Google.AdExchange.Seller.Types
import Network.Google.Prelude import Network.Google.Prelude
{- $resources {- $resources
@ -211,11 +211,11 @@ TODO
type AdExchangeSeller = AccountsAPI type AdExchangeSeller = AccountsAPI
type AccountsAPI = type AccountsAPI =
ReportsAPI :<|> AdclientsAPI :<|> ReportsAPI :<|> AlertsAPI :<|>
AlertsAPI :<|> UrlchannelsAPI
UrlchannelsAPI :<|> :<|> CustomchannelsAPI
CustomchannelsAPI :<|> :<|> PreferreddealsAPI
PreferreddealsAPI :<|> MetadataAPI :<|> AdclientsAPI :<|> MetadataAPI
type AdclientsAPI = AdclientsList type AdclientsAPI = AdclientsList
@ -236,7 +236,7 @@ type AdclientsList =
type ReportsAPI = SavedAPI type ReportsAPI = SavedAPI
type SavedAPI = SavedGenerate :<|> SavedList type SavedAPI = SavedList :<|> SavedGenerate
-- | List all saved reports in this Ad Exchange account. -- | List all saved reports in this Ad Exchange account.
type SavedList = type SavedList =
@ -309,7 +309,7 @@ type UrlchannelsList =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type CustomchannelsAPI = type CustomchannelsAPI =
CustomchannelsGet :<|> CustomchannelsList CustomchannelsList :<|> CustomchannelsGet
-- | List all custom channels in the specified ad client for this Ad Exchange -- | List all custom channels in the specified ad client for this Ad Exchange
-- account. -- account.
@ -346,7 +346,7 @@ type CustomchannelsGet =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type PreferreddealsAPI = type PreferreddealsAPI =
PreferreddealsGet :<|> PreferreddealsList PreferreddealsList :<|> PreferreddealsGet
-- | List the preferred deals for this Ad Exchange account. -- | List the preferred deals for this Ad Exchange account.
type PreferreddealsList = type PreferreddealsList =
@ -375,7 +375,7 @@ type PreferreddealsGet =
:> QueryParam "fields" Text :> QueryParam "fields" Text
:> QueryParam "alt" Text :> QueryParam "alt" Text
type MetadataAPI = DimensionsAPI :<|> MetricsAPI type MetadataAPI = MetricsAPI :<|> DimensionsAPI
type MetricsAPI = MetricsList type MetricsAPI = MetricsList

8
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types.hs → gogol-adexchange-seller/gen/Network/Google/AdExchange/Seller/Types.hs
View File

@ -5,14 +5,14 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.AdExchangeSeller.Types -- Module : Network.Google.AdExchange.Seller.Types
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.AdExchangeSeller.Types module Network.Google.AdExchange.Seller.Types
( (
-- * Account -- * Account
@ -171,6 +171,6 @@ module Network.Google.AdExchangeSeller.Types
, urlcItems , urlcItems
) where ) where
import Network.Google.AdExchangeSeller.Types.Product import Network.Google.AdExchange.Seller.Types.Product
import Network.Google.AdExchangeSeller.Types.Sum import Network.Google.AdExchange.Seller.Types.Sum
import Network.Google.Prelude import Network.Google.Prelude

6
gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Product.hs → gogol-adexchange-seller/gen/Network/Google/AdExchange/Seller/Types/Product.hs
View File

@ -5,16 +5,16 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.AdExchangeSeller.Types.Product -- Module : Network.Google.AdExchange.Seller.Types.Product
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.AdExchangeSeller.Types.Product where module Network.Google.AdExchange.Seller.Types.Product where
import Network.Google.AdExchangeSeller.Types.Sum import Network.Google.AdExchange.Seller.Types.Sum
import Network.Google.Prelude import Network.Google.Prelude
-- --

18
gogol-adexchange-seller/gen/Network/Google/AdExchange/Seller/Types/Sum.hs Normal file
View File

@ -0,0 +1,18 @@
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- |
-- Module : Network.Google.AdExchange.Seller.Types.Sum
-- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
module Network.Google.AdExchange.Seller.Types.Sum where
import Network.Google.Prelude

8
gogol-adexchange-seller/gogol-adexchange-seller.cabal
View File

@ -31,12 +31,12 @@ library
ghc-options: -Wall ghc-options: -Wall
exposed-modules: exposed-modules:
Network.Google.AdExchangeSeller Network.Google.AdExchange.Seller
, Network.Google.AdExchangeSeller.Types , Network.Google.AdExchange.Seller.Types
other-modules: other-modules:
Network.Google.AdExchangeSeller.Types.Product Network.Google.AdExchange.Seller.Types.Product
, Network.Google.AdExchangeSeller.Types.Sum , Network.Google.AdExchange.Seller.Types.Sum
build-depends: build-depends:
gogol-core == 0.0.1.* gogol-core == 0.0.1.*

15
gogol-admin/gen/Network/Google/DataTransfer.hs → gogol-admin/gen/Network/Google/Admin/DataTransfer.hs
View File

@ -5,7 +5,7 @@
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-} {-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
-- | -- |
-- Module : Network.Google.DataTransfer -- Module : Network.Google.Admin.DataTransfer
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@ -16,10 +16,10 @@
-- another. -- another.
-- --
-- /See:/ <https://developers.google.com/admin-sdk/data-transfer/ Admin Data Transfer API Reference> -- /See:/ <https://developers.google.com/admin-sdk/data-transfer/ Admin Data Transfer API Reference>
module Network.Google.DataTransfer module Network.Google.Admin.DataTransfer
( (
-- * Resources -- * Resources
DataTransfer AdminDataTransfer
, TransfersAPI , TransfersAPI
, TransfersInsert , TransfersInsert
, TransfersList , TransfersList
@ -81,17 +81,18 @@ module Network.Google.DataTransfer
, dtlrDataTransfers , dtlrDataTransfers
) where ) where
import Network.Google.DataTransfer.Types import Network.Google.Admin.DataTransfer.Types
import Network.Google.Prelude import Network.Google.Prelude
{- $resources {- $resources
TODO TODO
-} -}
type DataTransfer = ApplicationsAPI :<|> TransfersAPI type AdminDataTransfer =
TransfersAPI :<|> ApplicationsAPI
type TransfersAPI = type TransfersAPI =
TransfersList :<|> TransfersGet :<|> TransfersInsert TransfersInsert :<|> TransfersList :<|> TransfersGet
-- | Inserts a data transfer request. -- | Inserts a data transfer request.
type TransfersInsert = type TransfersInsert =
@ -135,7 +136,7 @@ type TransfersGet =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type ApplicationsAPI = type ApplicationsAPI =
ApplicationsGet :<|> ApplicationsList ApplicationsList :<|> ApplicationsGet
-- | Lists the applications available for data transfer for a customer. -- | Lists the applications available for data transfer for a customer.
type ApplicationsList = type ApplicationsList =

8
gogol-admin/gen/Network/Google/DataTransfer/Types.hs → gogol-admin/gen/Network/Google/Admin/DataTransfer/Types.hs
View File

@ -5,14 +5,14 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.DataTransfer.Types -- Module : Network.Google.Admin.DataTransfer.Types
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.DataTransfer.Types module Network.Google.Admin.DataTransfer.Types
( (
-- * Application -- * Application
@ -66,6 +66,6 @@ module Network.Google.DataTransfer.Types
, dtlrDataTransfers , dtlrDataTransfers
) where ) where
import Network.Google.DataTransfer.Types.Product import Network.Google.Admin.DataTransfer.Types.Product
import Network.Google.DataTransfer.Types.Sum import Network.Google.Admin.DataTransfer.Types.Sum
import Network.Google.Prelude import Network.Google.Prelude

6
gogol-admin/gen/Network/Google/DataTransfer/Types/Product.hs → gogol-admin/gen/Network/Google/Admin/DataTransfer/Types/Product.hs
View File

@ -5,16 +5,16 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.DataTransfer.Types.Product -- Module : Network.Google.Admin.DataTransfer.Types.Product
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.DataTransfer.Types.Product where module Network.Google.Admin.DataTransfer.Types.Product where
import Network.Google.DataTransfer.Types.Sum import Network.Google.Admin.DataTransfer.Types.Sum
import Network.Google.Prelude import Network.Google.Prelude
-- | The JSON template for an Application resource. -- | The JSON template for an Application resource.

18
gogol-admin/gen/Network/Google/Admin/DataTransfer/Types/Sum.hs Normal file
View File

@ -0,0 +1,18 @@
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- |
-- Module : Network.Google.Admin.DataTransfer.Types.Sum
-- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated
-- Portability : non-portable (GHC extensions)
--
module Network.Google.Admin.DataTransfer.Types.Sum where
import Network.Google.Prelude

96
gogol-admin/gen/Network/Google/Directory.hs → gogol-admin/gen/Network/Google/Admin/Directory.hs
View File

@ -5,7 +5,7 @@
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-} {-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
-- | -- |
-- Module : Network.Google.Directory -- Module : Network.Google.Admin.Directory
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
@ -17,10 +17,10 @@
-- security features, and more. -- security features, and more.
-- --
-- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference> -- /See:/ <https://developers.google.com/admin-sdk/directory/ Admin Directory API Reference>
module Network.Google.Directory module Network.Google.Admin.Directory
( (
-- * Resources -- * Resources
Directory AdminDirectory
, GroupsAPI , GroupsAPI
, AliasesAPI , AliasesAPI
, AliasesInsert , AliasesInsert
@ -571,29 +571,29 @@ module Network.Google.Directory
, vcItems , vcItems
) where ) where
import Network.Google.Directory.Types import Network.Google.Admin.Directory.Types
import Network.Google.Prelude import Network.Google.Prelude
{- $resources {- $resources
TODO TODO
-} -}
type Directory = type AdminDirectory =
UsersAPI :<|> GroupsAPI :<|> UsersAPI :<|> SchemasAPI :<|>
SchemasAPI :<|> TokensAPI
TokensAPI :<|> :<|> ChannelsAPI
ChannelsAPI :<|> :<|> MembersAPI
MembersAPI :<|> :<|> MobiledevicesAPI
MobiledevicesAPI :<|> :<|> OrgunitsAPI
OrgunitsAPI :<|> :<|> VerificationCodesAPI
VerificationCodesAPI :<|> :<|> NotificationsAPI
NotificationsAPI :<|> :<|> ChromeosdevicesAPI
ChromeosdevicesAPI :<|> AspsAPI :<|> GroupsAPI :<|> AspsAPI
type GroupsAPI = AliasesAPI type GroupsAPI = AliasesAPI
type AliasesAPI = type AliasesAPI =
AliasesList :<|> AliasesDelete :<|> AliasesInsert AliasesInsert :<|> AliasesList :<|> AliasesDelete
-- | Add a alias for the group -- | Add a alias for the group
type AliasesInsert = type AliasesInsert =
@ -635,11 +635,11 @@ type AliasesDelete =
:> QueryParam "fields" Text :> QueryParam "fields" Text
:> QueryParam "alt" Text :> QueryParam "alt" Text
type UsersAPI = PhotosAPI :<|> AliasesAPI type UsersAPI = AliasesAPI :<|> PhotosAPI
type AliasesAPI = type AliasesAPI =
AliasesList :<|> AliasesInsert :<|> AliasesList :<|> AliasesDelete
AliasesDelete :<|> AliasesWatch :<|> AliasesInsert :<|> AliasesWatch
-- | Add a alias for the user -- | Add a alias for the user
type AliasesInsert = type AliasesInsert =
@ -698,8 +698,8 @@ type AliasesWatch =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type PhotosAPI = type PhotosAPI =
PhotosGet :<|> PhotosPatch :<|> PhotosGet :<|> PhotosDelete :<|>
PhotosDelete :<|> PhotosUpdate :<|> PhotosPatch PhotosUpdate
-- | Add a photo for the user. This method supports patch semantics. -- | Add a photo for the user. This method supports patch semantics.
type PhotosPatch = type PhotosPatch =
@ -758,10 +758,10 @@ type PhotosUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type SchemasAPI = type SchemasAPI =
SchemasList :<|> SchemasInsert :<|> SchemasList :<|> SchemasPatch :<|>
SchemasPatch :<|> SchemasGet
SchemasGet :<|> :<|> SchemasDelete
SchemasDelete :<|> SchemasUpdate :<|> SchemasInsert :<|> SchemasUpdate
-- | Create schema. -- | Create schema.
type SchemasInsert = type SchemasInsert =
@ -846,7 +846,7 @@ type SchemasUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type TokensAPI = type TokensAPI =
TokensGet :<|> TokensDelete :<|> TokensList TokensList :<|> TokensGet :<|> TokensDelete
-- | Returns the set of tokens specified user has issued to 3rd party -- | Returns the set of tokens specified user has issued to 3rd party
-- applications. -- applications.
@ -907,10 +907,10 @@ type ChannelsStop =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type MembersAPI = type MembersAPI =
MembersList :<|> MembersInsert :<|> MembersList :<|> MembersPatch :<|>
MembersPatch :<|> MembersGet
MembersGet :<|> :<|> MembersDelete
MembersDelete :<|> MembersUpdate :<|> MembersInsert :<|> MembersUpdate
-- | Add user to the specified group. -- | Add user to the specified group.
type MembersInsert = type MembersInsert =
@ -999,9 +999,9 @@ type MembersUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type MobiledevicesAPI = type MobiledevicesAPI =
MobiledevicesGet :<|> MobiledevicesList :<|> MobiledevicesGet :<|>
MobiledevicesAction :<|> MobiledevicesAction
MobiledevicesDelete :<|> MobiledevicesList :<|> MobiledevicesDelete
-- | Retrieve all Mobile Devices of a customer (paginated) -- | Retrieve all Mobile Devices of a customer (paginated)
type MobiledevicesList = type MobiledevicesList =
@ -1071,11 +1071,10 @@ type MobiledevicesDelete =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type OrgunitsAPI = type OrgunitsAPI =
OrgunitsList :<|> OrgunitsInsert :<|> OrgunitsList :<|> OrgunitsPatch
OrgunitsPatch :<|> :<|> OrgunitsGet
OrgunitsGet :<|> :<|> OrgunitsDelete
OrgunitsDelete :<|> :<|> OrgunitsUpdate
OrgunitsUpdate :<|> OrgunitsInsert
-- | Add Organization Unit -- | Add Organization Unit
type OrgunitsInsert = type OrgunitsInsert =
@ -1162,9 +1161,8 @@ type OrgunitsUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type VerificationCodesAPI = type VerificationCodesAPI =
VerificationCodesGenerate :<|> VerificationCodesList :<|> VerificationCodesGenerate
VerificationCodesInvalidate :<|> :<|> VerificationCodesInvalidate
VerificationCodesList
-- | Returns the current set of valid backup verification codes for the -- | Returns the current set of valid backup verification codes for the
-- specified user. -- specified user.
@ -1209,10 +1207,10 @@ type VerificationCodesInvalidate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type NotificationsAPI = type NotificationsAPI =
NotificationsPatch :<|> NotificationsList :<|> NotificationsPatch :<|>
NotificationsGet :<|> NotificationsGet
NotificationsDelete :<|> :<|> NotificationsDelete
NotificationsUpdate :<|> NotificationsList :<|> NotificationsUpdate
-- | Retrieves a list of notifications. -- | Retrieves a list of notifications.
type NotificationsList = type NotificationsList =
@ -1287,9 +1285,9 @@ type NotificationsUpdate =
:> QueryParam "alt" Text :> QueryParam "alt" Text
type ChromeosdevicesAPI = type ChromeosdevicesAPI =
ChromeosdevicesPatch :<|> ChromeosdevicesList :<|> ChromeosdevicesPatch :<|>
ChromeosdevicesGet :<|> ChromeosdevicesGet
ChromeosdevicesUpdate :<|> ChromeosdevicesList :<|> ChromeosdevicesUpdate
-- | Retrieve all Chrome OS Devices of a customer (paginated) -- | Retrieve all Chrome OS Devices of a customer (paginated)
type ChromeosdevicesList = type ChromeosdevicesList =
@ -1359,7 +1357,7 @@ type ChromeosdevicesUpdate =
:> QueryParam "fields" Text :> QueryParam "fields" Text
:> QueryParam "alt" Text :> QueryParam "alt" Text
type AspsAPI = AspsGet :<|> AspsDelete :<|> AspsList type AspsAPI = AspsList :<|> AspsGet :<|> AspsDelete
-- | List the ASPs issued by a user. -- | List the ASPs issued by a user.
type AspsList = type AspsList =

8
gogol-admin/gen/Network/Google/Directory/Types.hs → gogol-admin/gen/Network/Google/Admin/Directory/Types.hs
View File

@ -5,14 +5,14 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.Directory.Types -- Module : Network.Google.Admin.Directory.Types
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.Directory.Types module Network.Google.Admin.Directory.Types
( (
-- * Alias -- * Alias
@ -495,6 +495,6 @@ module Network.Google.Directory.Types
, vcItems , vcItems
) where ) where
import Network.Google.Directory.Types.Product import Network.Google.Admin.Directory.Types.Product
import Network.Google.Directory.Types.Sum import Network.Google.Admin.Directory.Types.Sum
import Network.Google.Prelude import Network.Google.Prelude

6
gogol-admin/gen/Network/Google/Directory/Types/Product.hs → gogol-admin/gen/Network/Google/Admin/Directory/Types/Product.hs
View File

@ -5,16 +5,16 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.Directory.Types.Product -- Module : Network.Google.Admin.Directory.Types.Product
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.Directory.Types.Product where module Network.Google.Admin.Directory.Types.Product where
import Network.Google.Directory.Types.Sum import Network.Google.Admin.Directory.Types.Sum
import Network.Google.Prelude import Network.Google.Prelude
-- | JSON template for Alias object in Directory API. -- | JSON template for Alias object in Directory API.

4
gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Sum.hs → gogol-admin/gen/Network/Google/Admin/Directory/Types/Sum.hs
View File

@ -6,13 +6,13 @@
{-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | -- |
-- Module : Network.Google.AdExchangeBuyer.Types.Sum -- Module : Network.Google.Admin.Directory.Types.Sum
-- Copyright : (c) 2015 Brendan Hay -- Copyright : (c) 2015 Brendan Hay
-- License : Mozilla Public License, v. 2.0. -- License : Mozilla Public License, v. 2.0.
-- Maintainer : Brendan Hay <brendan.g.hay@gmail.com> -- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>
-- Stability : auto-generated -- Stability : auto-generated
-- Portability : non-portable (GHC extensions) -- Portability : non-portable (GHC extensions)
-- --
module Network.Google.AdExchangeBuyer.Types.Sum where module Network.Google.Admin.Directory.Types.Sum where
import Network.Google.Prelude import Network.Google.Prelude

Some files were not shown because too many files have changed in this diff Show More