add emqx_protocol test suites
This commit is contained in:
Gilbert Wong
parent
a7274b115d
commit
487fa6824d
2
Makefile
2
Makefile
|
|
@ -39,7 +39,7 @@ CT_SUITES = emqx emqx_banned emqx_connection emqx_session emqx_access emqx_broke
|
|||
emqx_json emqx_keepalive emqx_lib emqx_metrics emqx_misc emqx_mod emqx_mqtt_caps \
|
||||
emqx_mqtt_compat emqx_mqtt_properties emqx_mqueue emqx_net emqx_pqueue emqx_router emqx_sm \
|
||||
emqx_stats emqx_tables emqx_time emqx_topic emqx_trie emqx_vm emqx_zone \
|
||||
emqx_mountpoint emqx_listeners
|
||||
emqx_mountpoint emqx_listeners emqx_protocol
|
||||
|
||||
CT_OPTS = -cover test/ct.cover.spec -erl_args -name emqxct@127.0.0.1
|
||||
|
||||
|
|
|
|||
|
|
@ -0,0 +1,132 @@
|
|||
%%--------------------------------------------------------------------
|
||||
%% Copyright (c) 2013-2018 EMQ Enterprise, Inc. (http://emqtt.io)
|
||||
%%
|
||||
%% Licensed under the Apache License, Version 2.0 (the "License");
|
||||
%% you may not use this file except in compliance with the License.
|
||||
%% You may obtain a copy of the License at
|
||||
%%
|
||||
%% http://www.apache.org/licenses/LICENSE-2.0
|
||||
%%
|
||||
%% Unless required by applicable law or agreed to in writing, software
|
||||
%% distributed under the License is distributed on an "AS IS" BASIS,
|
||||
%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
||||
%% See the License for the specific language governing permissions and
|
||||
%% limitations under the License.
|
||||
%%--------------------------------------------------------------------
|
||||
|
||||
-module(emqx_protocol_SUITE).
|
||||
|
||||
-compile(export_all).
|
||||
-compile(nowarn_export_all).
|
||||
|
||||
-include("emqx.hrl").
|
||||
|
||||
-include("emqx_mqtt.hrl").
|
||||
|
||||
-include_lib("eunit/include/eunit.hrl").
|
||||
|
||||
-import(emqx_serializer, [serialize/1]).
|
||||
|
||||
all() ->
|
||||
[%% {group, parser},
|
||||
%% {group, serializer},
|
||||
{group, packet},
|
||||
{group, message}].
|
||||
|
||||
groups() ->
|
||||
[%% {parser, [],
|
||||
%% [
|
||||
%% parse_connect,
|
||||
%% parse_bridge,
|
||||
%% parse_publish,
|
||||
%% parse_puback,
|
||||
%% parse_pubrec,
|
||||
%% parse_pubrel,
|
||||
%% parse_pubcomp,
|
||||
%% parse_subscribe,
|
||||
%% parse_unsubscribe,
|
||||
%% parse_pingreq,
|
||||
%% parse_disconnect]},
|
||||
%% {serializer, [],
|
||||
%% [serialize_connect,
|
||||
%% serialize_connack,
|
||||
%% serialize_publish,
|
||||
%% serialize_puback,
|
||||
%% serialize_pubrel,
|
||||
%% serialize_subscribe,
|
||||
%% serialize_suback,
|
||||
%% serialize_unsubscribe,
|
||||
%% serialize_unsuback,
|
||||
%% serialize_pingreq,
|
||||
%% serialize_pingresp,
|
||||
%% serialize_disconnect]},
|
||||
{packet, [],
|
||||
[packet_proto_name,
|
||||
packet_type_name,
|
||||
packet_format]},
|
||||
{message, [],
|
||||
[message_make
|
||||
%% message_from_packet
|
||||
]}
|
||||
].
|
||||
|
||||
|
||||
|
||||
%%--------------------------------------------------------------------
|
||||
%% Packet Cases
|
||||
%%--------------------------------------------------------------------
|
||||
|
||||
packet_proto_name(_) ->
|
||||
?assertEqual(<<"MQIsdp">>, emqx_packet:protocol_name(3)),
|
||||
?assertEqual(<<"MQTT">>, emqx_packet:protocol_name(4)).
|
||||
|
||||
packet_type_name(_) ->
|
||||
?assertEqual('CONNECT', emqx_packet:type_name(?CONNECT)),
|
||||
?assertEqual('UNSUBSCRIBE', emqx_packet:type_name(?UNSUBSCRIBE)).
|
||||
|
||||
%% packet_connack_name(_) ->
|
||||
%% ?assertEqual('CONNACK_ACCEPT', emqx_packet:connack_name(?CONNACK_ACCEPT)),
|
||||
%% ?assertEqual('CONNACK_PROTO_VER', emqx_packet:connack_name(?CONNACK_PROTO_VER)),
|
||||
%% ?assertEqual('CONNACK_INVALID_ID', emqx_packet:connack_name(?CONNACK_INVALID_ID)),
|
||||
%% ?assertEqual('CONNACK_SERVER', emqx_packet:connack_name(?CONNACK_SERVER)),
|
||||
%% ?assertEqual('CONNACK_CREDENTIALS', emqx_packet:connack_name(?CONNACK_CREDENTIALS)),
|
||||
%% ?assertEqual('CONNACK_AUTH', emqx_packet:connack_name(?CONNACK_AUTH)).
|
||||
|
||||
packet_format(_) ->
|
||||
io:format("~s", [emqx_packet:format(?CONNECT_PACKET(#mqtt_packet_connect{}))]),
|
||||
io:format("~s", [emqx_packet:format(?CONNACK_PACKET(?CONNACK_SERVER))]),
|
||||
io:format("~s", [emqx_packet:format(?PUBLISH_PACKET(?QOS_1, 1))]),
|
||||
io:format("~s", [emqx_packet:format(?PUBLISH_PACKET(?QOS_2, <<"topic">>, 10, <<"payload">>))]),
|
||||
io:format("~s", [emqx_packet:format(?PUBACK_PACKET(?PUBACK, 98))]),
|
||||
io:format("~s", [emqx_packet:format(?PUBREL_PACKET(99))]),
|
||||
io:format("~s", [emqx_packet:format(?SUBSCRIBE_PACKET(15, [{<<"topic">>, ?QOS0}, {<<"topic1">>, ?QOS1}]))]),
|
||||
io:format("~s", [emqx_packet:format(?SUBACK_PACKET(40, [?QOS0, ?QOS1]))]),
|
||||
io:format("~s", [emqx_packet:format(?UNSUBSCRIBE_PACKET(89, [<<"t">>, <<"t2">>]))]),
|
||||
io:format("~s", [emqx_packet:format(?UNSUBACK_PACKET(90))]).
|
||||
|
||||
%%--------------------------------------------------------------------
|
||||
%% Message Cases
|
||||
%%--------------------------------------------------------------------
|
||||
|
||||
message_make(_) ->
|
||||
Msg = emqx_message:make(<<"clientid">>, <<"topic">>, <<"payload">>),
|
||||
?assertEqual(0, Msg#message.qos),
|
||||
Msg1 = emqx_message:make(<<"clientid">>, qos2, <<"topic">>, <<"payload">>),
|
||||
?assert(is_binary(Msg1#message.id)),
|
||||
?assertEqual(qos2, Msg1#message.qos).
|
||||
|
||||
%% message_from_packet(_) ->
|
||||
%% Msg = emqx_message:from_packet(?PUBLISH_PACKET(1, <<"topic">>, 10, <<"payload">>)),
|
||||
%% ?assertEqual(1, Msg#message.qos),
|
||||
%% %% ?assertEqual(10, Msg#message.pktid),
|
||||
%% ?assertEqual(<<"topic">>, Msg#message.topic),
|
||||
%% WillMsg = emqx_message:from_packet(#mqtt_packet_connect{will_flag = true,
|
||||
%% will_topic = <<"WillTopic">>,
|
||||
%% will_payload = <<"WillMsg">>}),
|
||||
%% ?assertEqual(<<"WillTopic">>, WillMsg#message.topic),
|
||||
%% ?assertEqual(<<"WillMsg">>, WillMsg#message.payload).
|
||||
|
||||
%% Msg2 = emqx_message:fomat_packet(<<"username">>, <<"clientid">>,
|
||||
%% ?PUBLISH_PACKET(1, <<"topic">>, 20, <<"payload">>)),
|
||||
|
||||
|
||||
Loading…
Reference in New Issue