{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE TypeOperators #-}
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.Google.Resource.Directory.MobileDevices.List
(
MobileDevicesListResource
, mobileDevicesList
, MobileDevicesList
, mdlOrderBy
, mdlCustomerId
, mdlSortOrder
, mdlQuery
, mdlProjection
, mdlPageToken
, mdlMaxResults
) where
import Network.Google.Directory.Types
import Network.Google.Prelude
type MobileDevicesListResource =
"admin" :>
"directory" :>
"v1" :>
"customer" :>
Capture "customerId" Text :>
"devices" :>
"mobile" :>
QueryParam "orderBy" MobileDevicesListOrderBy :>
QueryParam "sortOrder" MobileDevicesListSortOrder :>
QueryParam "query" Text :>
QueryParam "projection" MobileDevicesListProjection
:>
QueryParam "pageToken" Text :>
QueryParam "maxResults" (Textual Int32) :>
QueryParam "alt" AltJSON :>
Get '[JSON] MobileDevices
data MobileDevicesList = MobileDevicesList'
{ _mdlOrderBy :: !(Maybe MobileDevicesListOrderBy)
, _mdlCustomerId :: !Text
, _mdlSortOrder :: !(Maybe MobileDevicesListSortOrder)
, _mdlQuery :: !(Maybe Text)
, _mdlProjection :: !(Maybe MobileDevicesListProjection)
, _mdlPageToken :: !(Maybe Text)
, _mdlMaxResults :: !(Maybe (Textual Int32))
} deriving (Eq,Show,Data,Typeable,Generic)
mobileDevicesList
:: Text
-> MobileDevicesList
mobileDevicesList pMdlCustomerId_ =
MobileDevicesList'
{ _mdlOrderBy = Nothing
, _mdlCustomerId = pMdlCustomerId_
, _mdlSortOrder = Nothing
, _mdlQuery = Nothing
, _mdlProjection = Nothing
, _mdlPageToken = Nothing
, _mdlMaxResults = Nothing
}
mdlOrderBy :: Lens' MobileDevicesList (Maybe MobileDevicesListOrderBy)
mdlOrderBy
= lens _mdlOrderBy (\ s a -> s{_mdlOrderBy = a})
mdlCustomerId :: Lens' MobileDevicesList Text
mdlCustomerId
= lens _mdlCustomerId
(\ s a -> s{_mdlCustomerId = a})
mdlSortOrder :: Lens' MobileDevicesList (Maybe MobileDevicesListSortOrder)
mdlSortOrder
= lens _mdlSortOrder (\ s a -> s{_mdlSortOrder = a})
mdlQuery :: Lens' MobileDevicesList (Maybe Text)
mdlQuery = lens _mdlQuery (\ s a -> s{_mdlQuery = a})
mdlProjection :: Lens' MobileDevicesList (Maybe MobileDevicesListProjection)
mdlProjection
= lens _mdlProjection
(\ s a -> s{_mdlProjection = a})
mdlPageToken :: Lens' MobileDevicesList (Maybe Text)
mdlPageToken
= lens _mdlPageToken (\ s a -> s{_mdlPageToken = a})
mdlMaxResults :: Lens' MobileDevicesList (Maybe Int32)
mdlMaxResults
= lens _mdlMaxResults
(\ s a -> s{_mdlMaxResults = a})
. mapping _Coerce
instance GoogleRequest MobileDevicesList where
type Rs MobileDevicesList = MobileDevices
type Scopes MobileDevicesList =
'["https://www.googleapis.com/auth/admin.directory.device.mobile",
"https://www.googleapis.com/auth/admin.directory.device.mobile.action",
"https://www.googleapis.com/auth/admin.directory.device.mobile.readonly"]
requestClient MobileDevicesList'{..}
= go _mdlCustomerId _mdlOrderBy _mdlSortOrder
_mdlQuery
_mdlProjection
_mdlPageToken
_mdlMaxResults
(Just AltJSON)
directoryService
where go
= buildClient
(Proxy :: Proxy MobileDevicesListResource)
mempty