module Network.Google.Resource.FirebaseRules.Projects.Releases.Get
(
ProjectsReleasesGetResource
, projectsReleasesGet
, ProjectsReleasesGet
, pXgafv
, pUploadProtocol
, pPp
, pAccessToken
, pUploadType
, pBearerToken
, pName
, pCallback
) where
import Network.Google.FirebaseRules.Types
import Network.Google.Prelude
type ProjectsReleasesGetResource =
"v1" :>
Capture "name" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :> Get '[JSON] Release
data ProjectsReleasesGet = ProjectsReleasesGet'
{ _pXgafv :: !(Maybe Xgafv)
, _pUploadProtocol :: !(Maybe Text)
, _pPp :: !Bool
, _pAccessToken :: !(Maybe Text)
, _pUploadType :: !(Maybe Text)
, _pBearerToken :: !(Maybe Text)
, _pName :: !Text
, _pCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsReleasesGet
:: Text
-> ProjectsReleasesGet
projectsReleasesGet pPName_ =
ProjectsReleasesGet'
{ _pXgafv = Nothing
, _pUploadProtocol = Nothing
, _pPp = True
, _pAccessToken = Nothing
, _pUploadType = Nothing
, _pBearerToken = Nothing
, _pName = pPName_
, _pCallback = Nothing
}
pXgafv :: Lens' ProjectsReleasesGet (Maybe Xgafv)
pXgafv = lens _pXgafv (\ s a -> s{_pXgafv = a})
pUploadProtocol :: Lens' ProjectsReleasesGet (Maybe Text)
pUploadProtocol
= lens _pUploadProtocol
(\ s a -> s{_pUploadProtocol = a})
pPp :: Lens' ProjectsReleasesGet Bool
pPp = lens _pPp (\ s a -> s{_pPp = a})
pAccessToken :: Lens' ProjectsReleasesGet (Maybe Text)
pAccessToken
= lens _pAccessToken (\ s a -> s{_pAccessToken = a})
pUploadType :: Lens' ProjectsReleasesGet (Maybe Text)
pUploadType
= lens _pUploadType (\ s a -> s{_pUploadType = a})
pBearerToken :: Lens' ProjectsReleasesGet (Maybe Text)
pBearerToken
= lens _pBearerToken (\ s a -> s{_pBearerToken = a})
pName :: Lens' ProjectsReleasesGet Text
pName = lens _pName (\ s a -> s{_pName = a})
pCallback :: Lens' ProjectsReleasesGet (Maybe Text)
pCallback
= lens _pCallback (\ s a -> s{_pCallback = a})
instance GoogleRequest ProjectsReleasesGet where
type Rs ProjectsReleasesGet = Release
type Scopes ProjectsReleasesGet =
'["https://www.googleapis.com/auth/cloud-platform",
"https://www.googleapis.com/auth/firebase",
"https://www.googleapis.com/auth/firebase.readonly"]
requestClient ProjectsReleasesGet'{..}
= go _pName _pXgafv _pUploadProtocol (Just _pPp)
_pAccessToken
_pUploadType
_pBearerToken
_pCallback
(Just AltJSON)
firebaseRulesService
where go
= buildClient
(Proxy :: Proxy ProjectsReleasesGetResource)
mempty