{-# LANGUAGE FlexibleContexts #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MonoLocalBinds #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}
module Vikunja.API.User where
import Vikunja.Core
import Vikunja.MimeTypes
import Vikunja.Model as M
import qualified Data.Aeson as A
import qualified Data.ByteString as B
import qualified Data.ByteString.Lazy as BL
import qualified Data.Data as P (Typeable, TypeRep, typeOf, typeRep)
import qualified Data.Foldable as P
import qualified Data.Map as Map
import qualified Data.Maybe as P
import qualified Data.Proxy as P (Proxy(..))
import qualified Data.Set as Set
import qualified Data.String as P
import qualified Data.Text as T
import qualified Data.Text.Encoding as T
import qualified Data.Text.Lazy as TL
import qualified Data.Text.Lazy.Encoding as TL
import qualified Data.Time as TI
import qualified Network.HTTP.Client.MultipartFormData as NH
import qualified Network.HTTP.Media as ME
import qualified Network.HTTP.Types as NH
import qualified Web.FormUrlEncoded as WH
import qualified Web.HttpApiData as WH
import Data.Text (Text)
import GHC.Base ((<|>))
import Prelude ((==),(/=),($), (.),(<$>),(<*>),(>>=),Maybe(..),Bool(..),Char,Double,FilePath,Float,Int,Integer,String,fmap,undefined,mempty,maybe,pure,Monad,Applicative,Functor)
import qualified Prelude as P
userConfirmPost
:: (Consumes UserConfirmPost MimeJSON, MimeRender MimeJSON UserEmailConfirm)
=> UserEmailConfirm
-> VikunjaRequest UserConfirmPost MimeJSON ModelsMessage MimeJSON
userConfirmPost :: UserEmailConfirm
-> VikunjaRequest UserConfirmPost MimeJSON ModelsMessage MimeJSON
userConfirmPost UserEmailConfirm
credentials =
Method
-> [ByteString]
-> VikunjaRequest UserConfirmPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/confirm"]
VikunjaRequest UserConfirmPost MimeJSON ModelsMessage MimeJSON
-> UserEmailConfirm
-> VikunjaRequest UserConfirmPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` UserEmailConfirm
credentials
data UserConfirmPost
instance HasBodyParam UserConfirmPost UserEmailConfirm
instance Consumes UserConfirmPost MimeJSON
instance Produces UserConfirmPost MimeJSON
userDeletionCancelPost
:: (Consumes UserDeletionCancelPost MimeJSON, MimeRender MimeJSON V1UserPasswordConfirmation)
=> V1UserPasswordConfirmation
-> VikunjaRequest UserDeletionCancelPost MimeJSON ModelsMessage MimeJSON
userDeletionCancelPost :: V1UserPasswordConfirmation
-> VikunjaRequest
UserDeletionCancelPost MimeJSON ModelsMessage MimeJSON
userDeletionCancelPost V1UserPasswordConfirmation
credentials =
Method
-> [ByteString]
-> VikunjaRequest
UserDeletionCancelPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/deletion/cancel"]
VikunjaRequest
UserDeletionCancelPost MimeJSON ModelsMessage MimeJSON
-> V1UserPasswordConfirmation
-> VikunjaRequest
UserDeletionCancelPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` V1UserPasswordConfirmation
credentials
data UserDeletionCancelPost
instance HasBodyParam UserDeletionCancelPost V1UserPasswordConfirmation
instance Consumes UserDeletionCancelPost MimeJSON
instance Produces UserDeletionCancelPost MimeJSON
userDeletionConfirmPost
:: (Consumes UserDeletionConfirmPost MimeJSON, MimeRender MimeJSON V1UserDeletionRequestConfirm)
=> V1UserDeletionRequestConfirm
-> VikunjaRequest UserDeletionConfirmPost MimeJSON ModelsMessage MimeJSON
userDeletionConfirmPost :: V1UserDeletionRequestConfirm
-> VikunjaRequest
UserDeletionConfirmPost MimeJSON ModelsMessage MimeJSON
userDeletionConfirmPost V1UserDeletionRequestConfirm
credentials =
Method
-> [ByteString]
-> VikunjaRequest
UserDeletionConfirmPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/deletion/confirm"]
VikunjaRequest
UserDeletionConfirmPost MimeJSON ModelsMessage MimeJSON
-> V1UserDeletionRequestConfirm
-> VikunjaRequest
UserDeletionConfirmPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` V1UserDeletionRequestConfirm
credentials
data UserDeletionConfirmPost
instance HasBodyParam UserDeletionConfirmPost V1UserDeletionRequestConfirm
instance Consumes UserDeletionConfirmPost MimeJSON
instance Produces UserDeletionConfirmPost MimeJSON
userDeletionRequestPost
:: (Consumes UserDeletionRequestPost MimeJSON, MimeRender MimeJSON V1UserPasswordConfirmation)
=> V1UserPasswordConfirmation
-> VikunjaRequest UserDeletionRequestPost MimeJSON ModelsMessage MimeJSON
userDeletionRequestPost :: V1UserPasswordConfirmation
-> VikunjaRequest
UserDeletionRequestPost MimeJSON ModelsMessage MimeJSON
userDeletionRequestPost V1UserPasswordConfirmation
credentials =
Method
-> [ByteString]
-> VikunjaRequest
UserDeletionRequestPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/deletion/request"]
VikunjaRequest
UserDeletionRequestPost MimeJSON ModelsMessage MimeJSON
-> V1UserPasswordConfirmation
-> VikunjaRequest
UserDeletionRequestPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` V1UserPasswordConfirmation
credentials
data UserDeletionRequestPost
instance HasBodyParam UserDeletionRequestPost V1UserPasswordConfirmation
instance Consumes UserDeletionRequestPost MimeJSON
instance Produces UserDeletionRequestPost MimeJSON
userExportDownloadPost
:: (Consumes UserExportDownloadPost MimeJSON, MimeRender MimeJSON V1UserPasswordConfirmation)
=> V1UserPasswordConfirmation
-> VikunjaRequest UserExportDownloadPost MimeJSON ModelsMessage MimeJSON
userExportDownloadPost :: V1UserPasswordConfirmation
-> VikunjaRequest
UserExportDownloadPost MimeJSON ModelsMessage MimeJSON
userExportDownloadPost V1UserPasswordConfirmation
password =
Method
-> [ByteString]
-> VikunjaRequest
UserExportDownloadPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/export/download"]
VikunjaRequest
UserExportDownloadPost MimeJSON ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserExportDownloadPost MimeJSON ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
UserExportDownloadPost MimeJSON ModelsMessage MimeJSON
-> V1UserPasswordConfirmation
-> VikunjaRequest
UserExportDownloadPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` V1UserPasswordConfirmation
password
data UserExportDownloadPost
instance HasBodyParam UserExportDownloadPost V1UserPasswordConfirmation
instance Consumes UserExportDownloadPost MimeJSON
instance Produces UserExportDownloadPost MimeJSON
userExportRequestPost
:: (Consumes UserExportRequestPost MimeJSON, MimeRender MimeJSON V1UserPasswordConfirmation)
=> V1UserPasswordConfirmation
-> VikunjaRequest UserExportRequestPost MimeJSON ModelsMessage MimeJSON
userExportRequestPost :: V1UserPasswordConfirmation
-> VikunjaRequest
UserExportRequestPost MimeJSON ModelsMessage MimeJSON
userExportRequestPost V1UserPasswordConfirmation
password =
Method
-> [ByteString]
-> VikunjaRequest
UserExportRequestPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/export/request"]
VikunjaRequest
UserExportRequestPost MimeJSON ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserExportRequestPost MimeJSON ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
UserExportRequestPost MimeJSON ModelsMessage MimeJSON
-> V1UserPasswordConfirmation
-> VikunjaRequest
UserExportRequestPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` V1UserPasswordConfirmation
password
data UserExportRequestPost
instance HasBodyParam UserExportRequestPost V1UserPasswordConfirmation
instance Consumes UserExportRequestPost MimeJSON
instance Produces UserExportRequestPost MimeJSON
userGet
:: VikunjaRequest UserGet MimeNoContent V1UserWithSettings MimeJSON
userGet :: VikunjaRequest UserGet MimeNoContent V1UserWithSettings MimeJSON
userGet =
Method
-> [ByteString]
-> VikunjaRequest UserGet MimeNoContent V1UserWithSettings MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/user"]
VikunjaRequest UserGet MimeNoContent V1UserWithSettings MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest UserGet MimeNoContent V1UserWithSettings MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UserGet
instance Produces UserGet MimeJSON
userPasswordPost
:: (Consumes UserPasswordPost MimeJSON, MimeRender MimeJSON V1UserPassword)
=> V1UserPassword
-> VikunjaRequest UserPasswordPost MimeJSON ModelsMessage MimeJSON
userPasswordPost :: V1UserPassword
-> VikunjaRequest UserPasswordPost MimeJSON ModelsMessage MimeJSON
userPasswordPost V1UserPassword
userPassword =
Method
-> [ByteString]
-> VikunjaRequest UserPasswordPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/password"]
VikunjaRequest UserPasswordPost MimeJSON ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest UserPasswordPost MimeJSON ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest UserPasswordPost MimeJSON ModelsMessage MimeJSON
-> V1UserPassword
-> VikunjaRequest UserPasswordPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` V1UserPassword
userPassword
data UserPasswordPost
instance HasBodyParam UserPasswordPost V1UserPassword
instance Consumes UserPasswordPost MimeJSON
instance Produces UserPasswordPost MimeJSON
userPasswordResetPost
:: (Consumes UserPasswordResetPost MimeJSON, MimeRender MimeJSON UserPasswordReset)
=> UserPasswordReset
-> VikunjaRequest UserPasswordResetPost MimeJSON ModelsMessage MimeJSON
userPasswordResetPost :: UserPasswordReset
-> VikunjaRequest
UserPasswordResetPost MimeJSON ModelsMessage MimeJSON
userPasswordResetPost UserPasswordReset
credentials =
Method
-> [ByteString]
-> VikunjaRequest
UserPasswordResetPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/password/reset"]
VikunjaRequest
UserPasswordResetPost MimeJSON ModelsMessage MimeJSON
-> UserPasswordReset
-> VikunjaRequest
UserPasswordResetPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` UserPasswordReset
credentials
data UserPasswordResetPost
instance HasBodyParam UserPasswordResetPost UserPasswordReset
instance Consumes UserPasswordResetPost MimeJSON
instance Produces UserPasswordResetPost MimeJSON
userPasswordTokenPost
:: (Consumes UserPasswordTokenPost MimeJSON, MimeRender MimeJSON UserPasswordTokenRequest)
=> UserPasswordTokenRequest
-> VikunjaRequest UserPasswordTokenPost MimeJSON ModelsMessage MimeJSON
userPasswordTokenPost :: UserPasswordTokenRequest
-> VikunjaRequest
UserPasswordTokenPost MimeJSON ModelsMessage MimeJSON
userPasswordTokenPost UserPasswordTokenRequest
credentials =
Method
-> [ByteString]
-> VikunjaRequest
UserPasswordTokenPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/password/token"]
VikunjaRequest
UserPasswordTokenPost MimeJSON ModelsMessage MimeJSON
-> UserPasswordTokenRequest
-> VikunjaRequest
UserPasswordTokenPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` UserPasswordTokenRequest
credentials
data UserPasswordTokenPost
instance HasBodyParam UserPasswordTokenPost UserPasswordTokenRequest
instance Consumes UserPasswordTokenPost MimeJSON
instance Produces UserPasswordTokenPost MimeJSON
userSettingsAvatarGet
:: VikunjaRequest UserSettingsAvatarGet MimeNoContent V1UserAvatarProvider MimeJSON
userSettingsAvatarGet :: VikunjaRequest
UserSettingsAvatarGet MimeNoContent V1UserAvatarProvider MimeJSON
userSettingsAvatarGet =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsAvatarGet MimeNoContent V1UserAvatarProvider MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/user/settings/avatar"]
VikunjaRequest
UserSettingsAvatarGet MimeNoContent V1UserAvatarProvider MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsAvatarGet MimeNoContent V1UserAvatarProvider MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UserSettingsAvatarGet
instance Produces UserSettingsAvatarGet MimeJSON
userSettingsAvatarPost
:: (Consumes UserSettingsAvatarPost MimeJSON, MimeRender MimeJSON V1UserAvatarProvider)
=> V1UserAvatarProvider
-> VikunjaRequest UserSettingsAvatarPost MimeJSON ModelsMessage MimeJSON
userSettingsAvatarPost :: V1UserAvatarProvider
-> VikunjaRequest
UserSettingsAvatarPost MimeJSON ModelsMessage MimeJSON
userSettingsAvatarPost V1UserAvatarProvider
avatar =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsAvatarPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/settings/avatar"]
VikunjaRequest
UserSettingsAvatarPost MimeJSON ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsAvatarPost MimeJSON ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
UserSettingsAvatarPost MimeJSON ModelsMessage MimeJSON
-> V1UserAvatarProvider
-> VikunjaRequest
UserSettingsAvatarPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` V1UserAvatarProvider
avatar
data UserSettingsAvatarPost
instance HasBodyParam UserSettingsAvatarPost V1UserAvatarProvider
instance Consumes UserSettingsAvatarPost MimeJSON
instance Produces UserSettingsAvatarPost MimeJSON
userSettingsAvatarUploadPut
:: (Consumes UserSettingsAvatarUploadPut MimeMultipartFormData)
=> Avatar
-> VikunjaRequest UserSettingsAvatarUploadPut MimeMultipartFormData ModelsMessage MimeJSON
userSettingsAvatarUploadPut :: Avatar
-> VikunjaRequest
UserSettingsAvatarUploadPut
MimeMultipartFormData
ModelsMessage
MimeJSON
userSettingsAvatarUploadPut (Avatar Text
avatar) =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsAvatarUploadPut
MimeMultipartFormData
ModelsMessage
MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"PUT" [ByteString
"/user/settings/avatar/upload"]
VikunjaRequest
UserSettingsAvatarUploadPut
MimeMultipartFormData
ModelsMessage
MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsAvatarUploadPut
MimeMultipartFormData
ModelsMessage
MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
UserSettingsAvatarUploadPut
MimeMultipartFormData
ModelsMessage
MimeJSON
-> Part
-> VikunjaRequest
UserSettingsAvatarUploadPut
MimeMultipartFormData
ModelsMessage
MimeJSON
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> Part -> VikunjaRequest req contentType res accept
`_addMultiFormPart` Text -> ByteString -> Part
forall (m :: * -> *).
Applicative m =>
Text -> ByteString -> PartM m
NH.partLBS Text
"avatar" (MimeMultipartFormData -> Text -> ByteString
forall mtype x. MimeRender mtype x => mtype -> x -> ByteString
mimeRender' MimeMultipartFormData
MimeMultipartFormData Text
avatar)
data UserSettingsAvatarUploadPut
instance Consumes UserSettingsAvatarUploadPut MimeMultipartFormData
instance Produces UserSettingsAvatarUploadPut MimeJSON
userSettingsEmailPost
:: (Consumes UserSettingsEmailPost MimeJSON, MimeRender MimeJSON UserEmailUpdate)
=> UserEmailUpdate
-> VikunjaRequest UserSettingsEmailPost MimeJSON ModelsMessage MimeJSON
userSettingsEmailPost :: UserEmailUpdate
-> VikunjaRequest
UserSettingsEmailPost MimeJSON ModelsMessage MimeJSON
userSettingsEmailPost UserEmailUpdate
userEmailUpdate =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsEmailPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/settings/email"]
VikunjaRequest
UserSettingsEmailPost MimeJSON ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsEmailPost MimeJSON ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
UserSettingsEmailPost MimeJSON ModelsMessage MimeJSON
-> UserEmailUpdate
-> VikunjaRequest
UserSettingsEmailPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` UserEmailUpdate
userEmailUpdate
data UserSettingsEmailPost
instance HasBodyParam UserSettingsEmailPost UserEmailUpdate
instance Consumes UserSettingsEmailPost MimeJSON
instance Produces UserSettingsEmailPost MimeJSON
userSettingsGeneralPost
:: (Consumes UserSettingsGeneralPost MimeJSON, MimeRender MimeJSON V1UserSettings)
=> V1UserSettings
-> VikunjaRequest UserSettingsGeneralPost MimeJSON ModelsMessage MimeJSON
userSettingsGeneralPost :: V1UserSettings
-> VikunjaRequest
UserSettingsGeneralPost MimeJSON ModelsMessage MimeJSON
userSettingsGeneralPost V1UserSettings
avatar =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsGeneralPost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/settings/general"]
VikunjaRequest
UserSettingsGeneralPost MimeJSON ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsGeneralPost MimeJSON ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
UserSettingsGeneralPost MimeJSON ModelsMessage MimeJSON
-> V1UserSettings
-> VikunjaRequest
UserSettingsGeneralPost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` V1UserSettings
avatar
data UserSettingsGeneralPost
instance HasBodyParam UserSettingsGeneralPost V1UserSettings
instance Consumes UserSettingsGeneralPost MimeJSON
instance Produces UserSettingsGeneralPost MimeJSON
userSettingsTokenCaldavGet
:: VikunjaRequest UserSettingsTokenCaldavGet MimeNoContent [UserToken] MimeJSON
userSettingsTokenCaldavGet :: VikunjaRequest
UserSettingsTokenCaldavGet MimeNoContent [UserToken] MimeJSON
userSettingsTokenCaldavGet =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsTokenCaldavGet MimeNoContent [UserToken] MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/user/settings/token/caldav"]
VikunjaRequest
UserSettingsTokenCaldavGet MimeNoContent [UserToken] MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsTokenCaldavGet MimeNoContent [UserToken] MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UserSettingsTokenCaldavGet
instance Produces UserSettingsTokenCaldavGet MimeJSON
userSettingsTokenCaldavIdGet
:: Id
-> VikunjaRequest UserSettingsTokenCaldavIdGet MimeNoContent ModelsMessage MimeJSON
userSettingsTokenCaldavIdGet :: Id
-> VikunjaRequest
UserSettingsTokenCaldavIdGet MimeNoContent ModelsMessage MimeJSON
userSettingsTokenCaldavIdGet (Id Int
id) =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsTokenCaldavIdGet MimeNoContent ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/user/settings/token/caldav/",Int -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Int
id]
VikunjaRequest
UserSettingsTokenCaldavIdGet MimeNoContent ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsTokenCaldavIdGet MimeNoContent ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UserSettingsTokenCaldavIdGet
instance Produces UserSettingsTokenCaldavIdGet MimeJSON
userSettingsTokenCaldavPut
:: VikunjaRequest UserSettingsTokenCaldavPut MimeNoContent UserToken MimeJSON
userSettingsTokenCaldavPut :: VikunjaRequest
UserSettingsTokenCaldavPut MimeNoContent UserToken MimeJSON
userSettingsTokenCaldavPut =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsTokenCaldavPut MimeNoContent UserToken MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"PUT" [ByteString
"/user/settings/token/caldav"]
VikunjaRequest
UserSettingsTokenCaldavPut MimeNoContent UserToken MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsTokenCaldavPut MimeNoContent UserToken MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UserSettingsTokenCaldavPut
instance Produces UserSettingsTokenCaldavPut MimeJSON
userSettingsTotpDisablePost
:: (Consumes UserSettingsTotpDisablePost MimeJSON, MimeRender MimeJSON UserLogin)
=> UserLogin
-> VikunjaRequest UserSettingsTotpDisablePost MimeJSON ModelsMessage MimeJSON
userSettingsTotpDisablePost :: UserLogin
-> VikunjaRequest
UserSettingsTotpDisablePost MimeJSON ModelsMessage MimeJSON
userSettingsTotpDisablePost UserLogin
totp =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsTotpDisablePost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/settings/totp/disable"]
VikunjaRequest
UserSettingsTotpDisablePost MimeJSON ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsTotpDisablePost MimeJSON ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
UserSettingsTotpDisablePost MimeJSON ModelsMessage MimeJSON
-> UserLogin
-> VikunjaRequest
UserSettingsTotpDisablePost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` UserLogin
totp
data UserSettingsTotpDisablePost
instance HasBodyParam UserSettingsTotpDisablePost UserLogin
instance Consumes UserSettingsTotpDisablePost MimeJSON
instance Produces UserSettingsTotpDisablePost MimeJSON
userSettingsTotpEnablePost
:: (Consumes UserSettingsTotpEnablePost MimeJSON, MimeRender MimeJSON UserTOTPPasscode)
=> UserTOTPPasscode
-> VikunjaRequest UserSettingsTotpEnablePost MimeJSON ModelsMessage MimeJSON
userSettingsTotpEnablePost :: UserTOTPPasscode
-> VikunjaRequest
UserSettingsTotpEnablePost MimeJSON ModelsMessage MimeJSON
userSettingsTotpEnablePost UserTOTPPasscode
totp =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsTotpEnablePost MimeJSON ModelsMessage MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/settings/totp/enable"]
VikunjaRequest
UserSettingsTotpEnablePost MimeJSON ModelsMessage MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsTotpEnablePost MimeJSON ModelsMessage MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
VikunjaRequest
UserSettingsTotpEnablePost MimeJSON ModelsMessage MimeJSON
-> UserTOTPPasscode
-> VikunjaRequest
UserSettingsTotpEnablePost MimeJSON ModelsMessage MimeJSON
forall req param contentType res accept.
(HasBodyParam req param, Consumes req contentType,
MimeRender contentType param) =>
VikunjaRequest req contentType res accept
-> param -> VikunjaRequest req contentType res accept
`setBodyParam` UserTOTPPasscode
totp
data UserSettingsTotpEnablePost
instance HasBodyParam UserSettingsTotpEnablePost UserTOTPPasscode
instance Consumes UserSettingsTotpEnablePost MimeJSON
instance Produces UserSettingsTotpEnablePost MimeJSON
userSettingsTotpEnrollPost
:: VikunjaRequest UserSettingsTotpEnrollPost MimeNoContent UserTOTP MimeJSON
userSettingsTotpEnrollPost :: VikunjaRequest
UserSettingsTotpEnrollPost MimeNoContent UserTOTP MimeJSON
userSettingsTotpEnrollPost =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsTotpEnrollPost MimeNoContent UserTOTP MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/settings/totp/enroll"]
VikunjaRequest
UserSettingsTotpEnrollPost MimeNoContent UserTOTP MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsTotpEnrollPost MimeNoContent UserTOTP MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UserSettingsTotpEnrollPost
instance Produces UserSettingsTotpEnrollPost MimeJSON
userSettingsTotpGet
:: VikunjaRequest UserSettingsTotpGet MimeNoContent UserTOTP MimeJSON
userSettingsTotpGet :: VikunjaRequest UserSettingsTotpGet MimeNoContent UserTOTP MimeJSON
userSettingsTotpGet =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsTotpGet MimeNoContent UserTOTP MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/user/settings/totp"]
VikunjaRequest UserSettingsTotpGet MimeNoContent UserTOTP MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsTotpGet MimeNoContent UserTOTP MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UserSettingsTotpGet
instance Produces UserSettingsTotpGet MimeJSON
userSettingsTotpQrcodeGet
:: VikunjaRequest UserSettingsTotpQrcodeGet MimeNoContent FilePath MimeJSON
userSettingsTotpQrcodeGet :: VikunjaRequest
UserSettingsTotpQrcodeGet MimeNoContent FilePath MimeJSON
userSettingsTotpQrcodeGet =
Method
-> [ByteString]
-> VikunjaRequest
UserSettingsTotpQrcodeGet MimeNoContent FilePath MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/user/settings/totp/qrcode"]
VikunjaRequest
UserSettingsTotpQrcodeGet MimeNoContent FilePath MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest
UserSettingsTotpQrcodeGet MimeNoContent FilePath MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UserSettingsTotpQrcodeGet
instance Produces UserSettingsTotpQrcodeGet MimeJSON
userTimezonesGet
:: VikunjaRequest UserTimezonesGet MimeNoContent [Text] MimeJSON
userTimezonesGet :: VikunjaRequest UserTimezonesGet MimeNoContent [Text] MimeJSON
userTimezonesGet =
Method
-> [ByteString]
-> VikunjaRequest UserTimezonesGet MimeNoContent [Text] MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/user/timezones"]
VikunjaRequest UserTimezonesGet MimeNoContent [Text] MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest UserTimezonesGet MimeNoContent [Text] MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UserTimezonesGet
instance Produces UserTimezonesGet MimeJSON
userTokenPost
:: VikunjaRequest UserTokenPost MimeNoContent AuthToken MimeJSON
userTokenPost :: VikunjaRequest UserTokenPost MimeNoContent AuthToken MimeJSON
userTokenPost =
Method
-> [ByteString]
-> VikunjaRequest UserTokenPost MimeNoContent AuthToken MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"POST" [ByteString
"/user/token"]
data UserTokenPost
instance Produces UserTokenPost MimeJSON
usernameAvatarGet
:: Username
-> VikunjaRequest UsernameAvatarGet MimeNoContent FilePath MimeOctetStream
usernameAvatarGet :: Username
-> VikunjaRequest
UsernameAvatarGet MimeNoContent FilePath MimeOctetStream
usernameAvatarGet (Username Text
username) =
Method
-> [ByteString]
-> VikunjaRequest
UsernameAvatarGet MimeNoContent FilePath MimeOctetStream
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/",Text -> ByteString
forall a. ToHttpApiData a => a -> ByteString
toPath Text
username,ByteString
"/avatar"]
data UsernameAvatarGet
instance HasOptionalParam UsernameAvatarGet Size where
applyOptionalParam :: VikunjaRequest UsernameAvatarGet contentType res accept
-> Size -> VikunjaRequest UsernameAvatarGet contentType res accept
applyOptionalParam VikunjaRequest UsernameAvatarGet contentType res accept
req (Size Int
xs) =
VikunjaRequest UsernameAvatarGet contentType res accept
req VikunjaRequest UsernameAvatarGet contentType res accept
-> [QueryItem]
-> VikunjaRequest UsernameAvatarGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Int) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"size", Int -> Maybe Int
forall a. a -> Maybe a
Just Int
xs)
instance Produces UsernameAvatarGet MimeOctetStream
usersGet
:: VikunjaRequest UsersGet MimeNoContent [UserUser] MimeJSON
usersGet :: VikunjaRequest UsersGet MimeNoContent [UserUser] MimeJSON
usersGet =
Method
-> [ByteString]
-> VikunjaRequest UsersGet MimeNoContent [UserUser] MimeJSON
forall req contentType res accept.
Method -> [ByteString] -> VikunjaRequest req contentType res accept
_mkRequest Method
"GET" [ByteString
"/users"]
VikunjaRequest UsersGet MimeNoContent [UserUser] MimeJSON
-> Proxy AuthApiKeyJWTKeyAuth
-> VikunjaRequest UsersGet MimeNoContent [UserUser] MimeJSON
forall authMethod req contentType res accept.
AuthMethod authMethod =>
VikunjaRequest req contentType res accept
-> Proxy authMethod -> VikunjaRequest req contentType res accept
`_hasAuthType` (Proxy AuthApiKeyJWTKeyAuth
forall k (t :: k). Proxy t
P.Proxy :: P.Proxy AuthApiKeyJWTKeyAuth)
data UsersGet
instance HasOptionalParam UsersGet S where
applyOptionalParam :: VikunjaRequest UsersGet contentType res accept
-> S -> VikunjaRequest UsersGet contentType res accept
applyOptionalParam VikunjaRequest UsersGet contentType res accept
req (S Text
xs) =
VikunjaRequest UsersGet contentType res accept
req VikunjaRequest UsersGet contentType res accept
-> [QueryItem] -> VikunjaRequest UsersGet contentType res accept
forall req contentType res accept.
VikunjaRequest req contentType res accept
-> [QueryItem] -> VikunjaRequest req contentType res accept
`addQuery` (Method, Maybe Text) -> [QueryItem]
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
toQuery (Method
"s", Text -> Maybe Text
forall a. a -> Maybe a
Just Text
xs)
instance Produces UsersGet MimeJSON