WikiMusic.Servant.ApiSetup

Documentation

mkApp :: MonadIO m => ApacheLogger -> AppConfig -> m Application

type PrivateAPI = ArtistsAPI :<|> (GenresAPI :<|> (SongsAPI :<|> AuthAPI))

type PublicAPI = ("login" :> (ReqBody '[JSON] LoginRequest :> LoginRespondWithAuth)) :<|> (("reset-password" :> (("email" :> (Capture "email" Text :> Post '[JSON] MakeResetPasswordLinkResponse)) :<|> ("do" :> (ReqBody '[JSON] DoPasswordResetRequest :> Verb 'POST 204 '[JSON] ())))) :<|> ("system-information" :> Get '[JSON] SystemInformationResponse))

type WikiMusicAPIServer = PrivateAPI :<|> (SwaggerAPI :<|> PublicAPI)

wiredUpPrivateServer :: Env -> Server PrivateAPI

wiredUpPublicServer :: Env -> Server PublicAPI