From 2bb6ce659d3386e7f9c49720d7bee2cf8e68d708 Mon Sep 17 00:00:00 2001 From: Marc Scholten Date: Mon, 23 May 2022 20:43:49 +0200 Subject: [PATCH] Added DataSync types for user signup and confirmation --- IHP/DataSync/Types.hs | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/IHP/DataSync/Types.hs b/IHP/DataSync/Types.hs index 1609b9f2b..6ca547975 100644 --- a/IHP/DataSync/Types.hs +++ b/IHP/DataSync/Types.hs @@ -26,6 +26,8 @@ data DataSyncMessage | CommitTransaction { requestId :: !Int, id :: !UUID } | LoginWithEmailAndPassword { requestId :: !Int, email :: !Text, password :: !Text } | LoginWithJWT { requestId :: !Int, jwt :: !Text } + | CreateUser { requestId :: !Int, email :: !Text, password :: !Text } + | ConfirmUser { requestId :: !Int, userId :: !UUID, token :: !Text } deriving (Eq, Show) data DataSyncResponse @@ -52,6 +54,12 @@ data DataSyncResponse | UserUnconfirmed { requestId :: !Int } | InvalidCredentials { requestId :: !Int } + | DidCreateUser { requestId :: !Int, userId :: !UUID, emailConfirmationRequired :: !Bool, jwt :: !Text } + | CreateUserFailed { requestId :: !Int, validationFailures :: [(Text, Text)] } + | DidConfirmUser { requestId :: !Int, jwt :: !Text } + | DidConfirmUserAlready { requestId :: !Int } + | ConfirmUserFailed { requestId :: !Int } + data GraphQLResult = GraphQLResult { graphQLResult :: !UndecodedJSON, requestId :: !Int } data DataSyncTransaction