hauleth.dev
Pure Erlang implementation of 9p2000 protocol
filesystem
fs
9p2000
erlang
9p
Test messages with no data
+26
-1
+26
-1
test/e9p_msg_SUITE.erl
+26
-1
test/e9p_msg_SUITE.erl
···
11
11
-include_lib("stdlib/include/assert.hrl").
12
12
-include_lib("common_test/include/ct.hrl").
13
13
14
-
all() -> [stat_encode_decode, rstat_encode_decode].
14
+
all() -> [
15
+
stat_encode_decode,
16
+
rstat_encode_decode,
17
+
rclunk_encode_decode,
18
+
rflush_encode_decode,
19
+
rwstat_encode_decode,
20
+
rremove_encode_decode
21
+
].
15
22
16
23
stat_encode_decode(_Conf) ->
17
24
Stat = #{
···
50
57
Out = e9p_msg:encode(Tag, Msg),
51
58
Decoded = e9p_msg:parse(iolist_to_binary(Out)),
52
59
?assertEqual({ok, Tag, Msg}, Decoded).
60
+
61
+
rclunk_encode_decode(_Conf) ->
62
+
enc_dec(#rclunk{}).
63
+
64
+
rflush_encode_decode(_Conf) ->
65
+
enc_dec(#rflush{}).
66
+
67
+
rwstat_encode_decode(_Conf) ->
68
+
enc_dec(#rwstat{}).
69
+
70
+
rremove_encode_decode(_Conf) ->
71
+
enc_dec(#rremove{}).
72
+
73
+
enc_dec(Data) ->
74
+
Tag = 1,
75
+
Out = e9p_msg:encode(Tag, Data),
76
+
Encoded = iolist_to_binary(Out),
77
+
?assertEqual({ok, Tag, Data}, e9p_msg:parse(Encoded)).