haal-models-0.1.3.0: src/Haal/Models/DTLS/CtinydtlsPsk.hs
-- Generated by haal-gen. Do not edit manually.
module Haal.Models.DTLS.CtinydtlsPsk
( CtinydtlsPskInput (..)
, CtinydtlsPskOutput (..)
, ctinydtlsPsk
) where
import Haal.Automaton.MealyAutomaton (MealyAutomaton, mkMealyAutomatonTable)
data CtinydtlsPskInput
= In_PSK_CLIENT_HELLO
| In_PSK_CLIENT_KEY_EXCHANGE
| In_CHANGE_CIPHER_SPEC
| In_FINISHED
| In_APPLICATION
| In_Alert_WARNING_CLOSE_NOTIFY
| In_Alert_FATAL_UNEXPECTED_MESSAGE
deriving (Show, Eq, Ord, Enum, Bounded)
data CtinydtlsPskOutput
= Out_HELLO_VERIFY_REQUEST
| Out_TIMEOUT
| Out_SERVER_HELLO_SERVER_HELLO_DONE
| Out_Alert_FATAL_UNEXPECTED_MESSAGE
| Out_Alert_FATAL_CLOSE_NOTIFY
| Out_Alert_FATAL_DECRYPT_ERROR
| Out_CHANGE_CIPHER_SPEC_FINISHED
| Out_APPLICATION
deriving (Show, Eq, Ord, Enum, Bounded)
{- Transitions (state input -> next state / output):
0 In_PSK_CLIENT_HELLO -> 1 / Out_HELLO_VERIFY_REQUEST
In_PSK_CLIENT_KEY_EXCHANGE -> 2 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 3 / Out_TIMEOUT
In_FINISHED -> 0 / Out_TIMEOUT
In_APPLICATION -> 0 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 0 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 0 / Out_TIMEOUT
1 In_PSK_CLIENT_HELLO -> 4 / Out_SERVER_HELLO_SERVER_HELLO_DONE
In_PSK_CLIENT_KEY_EXCHANGE -> 5 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 6 / Out_TIMEOUT
In_FINISHED -> 1 / Out_TIMEOUT
In_APPLICATION -> 1 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 1 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 1 / Out_TIMEOUT
2 In_PSK_CLIENT_HELLO -> 5 / Out_HELLO_VERIFY_REQUEST
In_PSK_CLIENT_KEY_EXCHANGE -> 2 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 19 / Out_TIMEOUT
In_FINISHED -> 2 / Out_TIMEOUT
In_APPLICATION -> 2 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 2 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 2 / Out_TIMEOUT
3 In_PSK_CLIENT_HELLO -> 6 / Out_HELLO_VERIFY_REQUEST
In_PSK_CLIENT_KEY_EXCHANGE -> 19 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 3 / Out_TIMEOUT
In_FINISHED -> 3 / Out_TIMEOUT
In_APPLICATION -> 3 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 3 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 3 / Out_TIMEOUT
4 In_PSK_CLIENT_HELLO -> 7 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_PSK_CLIENT_KEY_EXCHANGE -> 8 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 9 / Out_TIMEOUT
In_FINISHED -> 7 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_APPLICATION -> 4 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 10 / Out_Alert_FATAL_CLOSE_NOTIFY
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 10 / Out_TIMEOUT
5 In_PSK_CLIENT_HELLO -> 18 / Out_SERVER_HELLO_SERVER_HELLO_DONE
In_PSK_CLIENT_KEY_EXCHANGE -> 5 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 15 / Out_TIMEOUT
In_FINISHED -> 5 / Out_TIMEOUT
In_APPLICATION -> 5 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 5 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 5 / Out_TIMEOUT
6 In_PSK_CLIENT_HELLO -> 9 / Out_SERVER_HELLO_SERVER_HELLO_DONE
In_PSK_CLIENT_KEY_EXCHANGE -> 15 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 6 / Out_TIMEOUT
In_FINISHED -> 6 / Out_TIMEOUT
In_APPLICATION -> 6 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 6 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 6 / Out_TIMEOUT
7 In_PSK_CLIENT_HELLO -> 7 / Out_TIMEOUT
In_PSK_CLIENT_KEY_EXCHANGE -> 11 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 12 / Out_TIMEOUT
In_FINISHED -> 7 / Out_TIMEOUT
In_APPLICATION -> 7 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 10 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 10 / Out_TIMEOUT
8 In_PSK_CLIENT_HELLO -> 11 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_PSK_CLIENT_KEY_EXCHANGE -> 11 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_CHANGE_CIPHER_SPEC -> 20 / Out_TIMEOUT
In_FINISHED -> 11 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_APPLICATION -> 8 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 17 / Out_Alert_FATAL_CLOSE_NOTIFY
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 17 / Out_TIMEOUT
9 In_PSK_CLIENT_HELLO -> 13 / Out_Alert_FATAL_DECRYPT_ERROR
In_PSK_CLIENT_KEY_EXCHANGE -> 14 / Out_Alert_FATAL_DECRYPT_ERROR
In_CHANGE_CIPHER_SPEC -> 13 / Out_Alert_FATAL_DECRYPT_ERROR
In_FINISHED -> 13 / Out_Alert_FATAL_DECRYPT_ERROR
In_APPLICATION -> 13 / Out_Alert_FATAL_DECRYPT_ERROR
In_Alert_WARNING_CLOSE_NOTIFY -> 13 / Out_Alert_FATAL_DECRYPT_ERROR
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 13 / Out_Alert_FATAL_DECRYPT_ERROR
10 In_PSK_CLIENT_HELLO -> 4 / Out_SERVER_HELLO_SERVER_HELLO_DONE
In_PSK_CLIENT_KEY_EXCHANGE -> 17 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 13 / Out_TIMEOUT
In_FINISHED -> 10 / Out_TIMEOUT
In_APPLICATION -> 10 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 10 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 10 / Out_TIMEOUT
11 In_PSK_CLIENT_HELLO -> 11 / Out_TIMEOUT
In_PSK_CLIENT_KEY_EXCHANGE -> 11 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 12 / Out_TIMEOUT
In_FINISHED -> 11 / Out_TIMEOUT
In_APPLICATION -> 11 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 17 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 17 / Out_TIMEOUT
12 In_PSK_CLIENT_HELLO -> 12 / Out_TIMEOUT
In_PSK_CLIENT_KEY_EXCHANGE -> 12 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 12 / Out_TIMEOUT
In_FINISHED -> 12 / Out_TIMEOUT
In_APPLICATION -> 12 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 12 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 12 / Out_TIMEOUT
13 In_PSK_CLIENT_HELLO -> 9 / Out_SERVER_HELLO_SERVER_HELLO_DONE
In_PSK_CLIENT_KEY_EXCHANGE -> 14 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 13 / Out_TIMEOUT
In_FINISHED -> 13 / Out_TIMEOUT
In_APPLICATION -> 13 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 13 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 13 / Out_TIMEOUT
14 In_PSK_CLIENT_HELLO -> 16 / Out_SERVER_HELLO_SERVER_HELLO_DONE
In_PSK_CLIENT_KEY_EXCHANGE -> 14 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 12 / Out_TIMEOUT
In_FINISHED -> 14 / Out_TIMEOUT
In_APPLICATION -> 14 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 14 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 14 / Out_TIMEOUT
15 In_PSK_CLIENT_HELLO -> 16 / Out_SERVER_HELLO_SERVER_HELLO_DONE
In_PSK_CLIENT_KEY_EXCHANGE -> 15 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 15 / Out_TIMEOUT
In_FINISHED -> 15 / Out_TIMEOUT
In_APPLICATION -> 15 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 15 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 15 / Out_TIMEOUT
16 In_PSK_CLIENT_HELLO -> 14 / Out_Alert_FATAL_DECRYPT_ERROR
In_PSK_CLIENT_KEY_EXCHANGE -> 14 / Out_Alert_FATAL_DECRYPT_ERROR
In_CHANGE_CIPHER_SPEC -> 12 / Out_Alert_FATAL_DECRYPT_ERROR
In_FINISHED -> 14 / Out_Alert_FATAL_DECRYPT_ERROR
In_APPLICATION -> 14 / Out_Alert_FATAL_DECRYPT_ERROR
In_Alert_WARNING_CLOSE_NOTIFY -> 14 / Out_Alert_FATAL_DECRYPT_ERROR
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 14 / Out_Alert_FATAL_DECRYPT_ERROR
17 In_PSK_CLIENT_HELLO -> 18 / Out_SERVER_HELLO_SERVER_HELLO_DONE
In_PSK_CLIENT_KEY_EXCHANGE -> 17 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 12 / Out_TIMEOUT
In_FINISHED -> 17 / Out_TIMEOUT
In_APPLICATION -> 17 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 17 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 17 / Out_TIMEOUT
18 In_PSK_CLIENT_HELLO -> 11 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_PSK_CLIENT_KEY_EXCHANGE -> 8 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 21 / Out_TIMEOUT
In_FINISHED -> 11 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_APPLICATION -> 18 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 17 / Out_Alert_FATAL_CLOSE_NOTIFY
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 17 / Out_TIMEOUT
19 In_PSK_CLIENT_HELLO -> 15 / Out_HELLO_VERIFY_REQUEST
In_PSK_CLIENT_KEY_EXCHANGE -> 19 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 19 / Out_TIMEOUT
In_FINISHED -> 19 / Out_TIMEOUT
In_APPLICATION -> 19 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 19 / Out_TIMEOUT
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 19 / Out_TIMEOUT
20 In_PSK_CLIENT_HELLO -> 12 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_PSK_CLIENT_KEY_EXCHANGE -> 12 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_CHANGE_CIPHER_SPEC -> 21 / Out_TIMEOUT
In_FINISHED -> 22 / Out_CHANGE_CIPHER_SPEC_FINISHED
In_APPLICATION -> 20 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 12 / Out_Alert_FATAL_CLOSE_NOTIFY
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 12 / Out_TIMEOUT
21 In_PSK_CLIENT_HELLO -> 12 / Out_Alert_FATAL_DECRYPT_ERROR
In_PSK_CLIENT_KEY_EXCHANGE -> 12 / Out_Alert_FATAL_DECRYPT_ERROR
In_CHANGE_CIPHER_SPEC -> 12 / Out_Alert_FATAL_DECRYPT_ERROR
In_FINISHED -> 12 / Out_Alert_FATAL_DECRYPT_ERROR
In_APPLICATION -> 12 / Out_Alert_FATAL_DECRYPT_ERROR
In_Alert_WARNING_CLOSE_NOTIFY -> 12 / Out_Alert_FATAL_DECRYPT_ERROR
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 12 / Out_Alert_FATAL_DECRYPT_ERROR
22 In_PSK_CLIENT_HELLO -> 23 / Out_SERVER_HELLO_SERVER_HELLO_DONE
In_PSK_CLIENT_KEY_EXCHANGE -> 22 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 12 / Out_TIMEOUT
In_FINISHED -> 22 / Out_TIMEOUT
In_APPLICATION -> 22 / Out_APPLICATION
In_Alert_WARNING_CLOSE_NOTIFY -> 12 / Out_Alert_FATAL_CLOSE_NOTIFY
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 12 / Out_TIMEOUT
23 In_PSK_CLIENT_HELLO -> 12 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_PSK_CLIENT_KEY_EXCHANGE -> 24 / Out_TIMEOUT
In_CHANGE_CIPHER_SPEC -> 21 / Out_TIMEOUT
In_FINISHED -> 12 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_APPLICATION -> 23 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 12 / Out_Alert_FATAL_CLOSE_NOTIFY
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 12 / Out_TIMEOUT
24 In_PSK_CLIENT_HELLO -> 12 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_PSK_CLIENT_KEY_EXCHANGE -> 12 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_CHANGE_CIPHER_SPEC -> 20 / Out_TIMEOUT
In_FINISHED -> 12 / Out_Alert_FATAL_UNEXPECTED_MESSAGE
In_APPLICATION -> 24 / Out_TIMEOUT
In_Alert_WARNING_CLOSE_NOTIFY -> 12 / Out_Alert_FATAL_CLOSE_NOTIFY
In_Alert_FATAL_UNEXPECTED_MESSAGE -> 12 / Out_TIMEOUT
-}
ctinydtlsPsk :: MealyAutomaton Int CtinydtlsPskInput CtinydtlsPskOutput
ctinydtlsPsk =
case mkMealyAutomatonTable 25 0 deltaTable lambdaTable of
Right m -> m
Left err -> error ("haal-gen: invalid transition table: " ++ err)
where
deltaTable =
"\1\2\3\0\0\0\0\
\\4\5\6\1\1\1\1\
\\5\2\19\2\2\2\2\
\\6\19\3\3\3\3\3\
\\7\8\9\7\4\10\10\
\\18\5\15\5\5\5\5\
\\9\15\6\6\6\6\6\
\\7\11\12\7\7\10\10\
\\11\11\20\11\8\17\17\
\\13\14\13\13\13\13\13\
\\4\17\13\10\10\10\10\
\\11\11\12\11\11\17\17\
\\12\12\12\12\12\12\12\
\\9\14\13\13\13\13\13\
\\16\14\12\14\14\14\14\
\\16\15\15\15\15\15\15\
\\14\14\12\14\14\14\14\
\\18\17\12\17\17\17\17\
\\11\8\21\11\18\17\17\
\\15\19\19\19\19\19\19\
\\12\12\21\22\20\12\12\
\\12\12\12\12\12\12\12\
\\23\22\12\22\22\12\12\
\\12\24\21\12\23\12\12\
\\12\12\20\12\24\12\12"
lambdaTable =
"\0\1\1\1\1\1\1\
\\2\1\1\1\1\1\1\
\\0\1\1\1\1\1\1\
\\0\1\1\1\1\1\1\
\\3\1\1\3\1\4\1\
\\2\1\1\1\1\1\1\
\\2\1\1\1\1\1\1\
\\1\1\1\1\1\1\1\
\\3\3\1\3\1\4\1\
\\5\5\5\5\5\5\5\
\\2\1\1\1\1\1\1\
\\1\1\1\1\1\1\1\
\\1\1\1\1\1\1\1\
\\2\1\1\1\1\1\1\
\\2\1\1\1\1\1\1\
\\2\1\1\1\1\1\1\
\\5\5\5\5\5\5\5\
\\2\1\1\1\1\1\1\
\\3\1\1\3\1\4\1\
\\0\1\1\1\1\1\1\
\\3\3\1\6\1\4\1\
\\5\5\5\5\5\5\5\
\\2\1\1\1\7\4\1\
\\3\1\1\3\1\4\1\
\\3\3\1\3\1\4\1"