{-# 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.AndroidDeviceProvisioning.Partners.Devices.FindByIdentifier
(
PartnersDevicesFindByIdentifierResource
, partnersDevicesFindByIdentifier
, PartnersDevicesFindByIdentifier
, pdfbiXgafv
, pdfbiUploadProtocol
, pdfbiAccessToken
, pdfbiPartnerId
, pdfbiUploadType
, pdfbiPayload
, pdfbiCallback
) where
import Network.Google.AndroidDeviceProvisioning.Types
import Network.Google.Prelude
type PartnersDevicesFindByIdentifierResource =
"v1" :>
"partners" :>
Capture "partnerId" (Textual Int64) :>
"devices:findByIdentifier" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON] FindDevicesByDeviceIdentifierRequest
:> Post '[JSON] FindDevicesByDeviceIdentifierResponse
data PartnersDevicesFindByIdentifier = PartnersDevicesFindByIdentifier'
{ _pdfbiXgafv :: !(Maybe Xgafv)
, _pdfbiUploadProtocol :: !(Maybe Text)
, _pdfbiAccessToken :: !(Maybe Text)
, _pdfbiPartnerId :: !(Textual Int64)
, _pdfbiUploadType :: !(Maybe Text)
, _pdfbiPayload :: !FindDevicesByDeviceIdentifierRequest
, _pdfbiCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
partnersDevicesFindByIdentifier
:: Int64
-> FindDevicesByDeviceIdentifierRequest
-> PartnersDevicesFindByIdentifier
partnersDevicesFindByIdentifier pPdfbiPartnerId_ pPdfbiPayload_ =
PartnersDevicesFindByIdentifier'
{ _pdfbiXgafv = Nothing
, _pdfbiUploadProtocol = Nothing
, _pdfbiAccessToken = Nothing
, _pdfbiPartnerId = _Coerce # pPdfbiPartnerId_
, _pdfbiUploadType = Nothing
, _pdfbiPayload = pPdfbiPayload_
, _pdfbiCallback = Nothing
}
pdfbiXgafv :: Lens' PartnersDevicesFindByIdentifier (Maybe Xgafv)
pdfbiXgafv
= lens _pdfbiXgafv (\ s a -> s{_pdfbiXgafv = a})
pdfbiUploadProtocol :: Lens' PartnersDevicesFindByIdentifier (Maybe Text)
pdfbiUploadProtocol
= lens _pdfbiUploadProtocol
(\ s a -> s{_pdfbiUploadProtocol = a})
pdfbiAccessToken :: Lens' PartnersDevicesFindByIdentifier (Maybe Text)
pdfbiAccessToken
= lens _pdfbiAccessToken
(\ s a -> s{_pdfbiAccessToken = a})
pdfbiPartnerId :: Lens' PartnersDevicesFindByIdentifier Int64
pdfbiPartnerId
= lens _pdfbiPartnerId
(\ s a -> s{_pdfbiPartnerId = a})
. _Coerce
pdfbiUploadType :: Lens' PartnersDevicesFindByIdentifier (Maybe Text)
pdfbiUploadType
= lens _pdfbiUploadType
(\ s a -> s{_pdfbiUploadType = a})
pdfbiPayload :: Lens' PartnersDevicesFindByIdentifier FindDevicesByDeviceIdentifierRequest
pdfbiPayload
= lens _pdfbiPayload (\ s a -> s{_pdfbiPayload = a})
pdfbiCallback :: Lens' PartnersDevicesFindByIdentifier (Maybe Text)
pdfbiCallback
= lens _pdfbiCallback
(\ s a -> s{_pdfbiCallback = a})
instance GoogleRequest
PartnersDevicesFindByIdentifier where
type Rs PartnersDevicesFindByIdentifier =
FindDevicesByDeviceIdentifierResponse
type Scopes PartnersDevicesFindByIdentifier = '[]
requestClient PartnersDevicesFindByIdentifier'{..}
= go _pdfbiPartnerId _pdfbiXgafv _pdfbiUploadProtocol
_pdfbiAccessToken
_pdfbiUploadType
_pdfbiCallback
(Just AltJSON)
_pdfbiPayload
androidDeviceProvisioningService
where go
= buildClient
(Proxy ::
Proxy PartnersDevicesFindByIdentifierResource)
mempty