b8929a46c1
* Fix the Exit in testcases * Fix Exit in emqx_mod_sup_SUITE * Update testcases for log_tracer * Fix Exit in emqx_protocol_SUITE * Add will_acl_check * Fix more Exits
674 lines
35 KiB
Erlang
674 lines
35 KiB
Erlang
%%--------------------------------------------------------------------
|
|
%% 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_lib("eunit/include/eunit.hrl").
|
|
|
|
-include_lib("common_test/include/ct.hrl").
|
|
|
|
-include("emqx_mqtt.hrl").
|
|
|
|
-define(TOPICS, [<<"TopicA">>, <<"TopicA/B">>, <<"Topic/C">>, <<"TopicA/C">>,
|
|
<<"/TopicA">>]).
|
|
|
|
-define(CLIENT, ?CONNECT_PACKET(#mqtt_packet_connect{
|
|
client_id = <<"mqtt_client">>,
|
|
username = <<"emqx">>,
|
|
password = <<"public">>})).
|
|
|
|
-record(pstate, {
|
|
zone,
|
|
sendfun,
|
|
peername,
|
|
peercert,
|
|
proto_ver,
|
|
proto_name,
|
|
client_id,
|
|
is_assigned,
|
|
conn_pid,
|
|
conn_props,
|
|
ack_props,
|
|
username,
|
|
session,
|
|
clean_start,
|
|
topic_aliases,
|
|
packet_size,
|
|
keepalive,
|
|
mountpoint,
|
|
is_super,
|
|
is_bridge,
|
|
enable_ban,
|
|
enable_acl,
|
|
acl_deny_action,
|
|
recv_stats,
|
|
send_stats,
|
|
connected,
|
|
connected_at,
|
|
ignore_loop,
|
|
topic_alias_maximum
|
|
}).
|
|
|
|
|
|
-define(TEST_PSTATE(ProtoVer, SendStats),
|
|
#pstate{zone = test,
|
|
sendfun = fun(_Packet, _Options) -> ok end,
|
|
peername = test_peername,
|
|
peercert = test_peercert,
|
|
proto_ver = ProtoVer,
|
|
proto_name = <<"MQTT">>,
|
|
client_id = <<"test_pstate">>,
|
|
is_assigned = false,
|
|
conn_pid = self(),
|
|
username = <<"emqx">>,
|
|
is_super = false,
|
|
clean_start = false,
|
|
topic_aliases = #{},
|
|
packet_size = 1000,
|
|
mountpoint = <<>>,
|
|
is_bridge = false,
|
|
enable_ban = false,
|
|
enable_acl = true,
|
|
acl_deny_action = disconnect,
|
|
recv_stats = #{msg => 0, pkt => 0},
|
|
send_stats = SendStats,
|
|
connected = false,
|
|
ignore_loop = false,
|
|
topic_alias_maximum = #{to_client => 0, from_client => 0}}).
|
|
|
|
all() ->
|
|
[
|
|
{group, mqtt_common},
|
|
{group, mqttv4},
|
|
{group, mqttv5},
|
|
{group, acl}
|
|
].
|
|
|
|
groups() ->
|
|
[{mqtt_common, [sequence],
|
|
[will_topic_check,
|
|
will_acl_check
|
|
]},
|
|
{mqttv4, [sequence],
|
|
[connect_v4,
|
|
subscribe_v4]},
|
|
{mqttv5, [sequence],
|
|
[connect_v5,
|
|
subscribe_v5]},
|
|
{acl, [sequence],
|
|
[acl_deny_action_ct,
|
|
acl_deny_action_eunit]}].
|
|
|
|
init_per_suite(Config) ->
|
|
[start_apps(App, SchemaFile, ConfigFile) ||
|
|
{App, SchemaFile, ConfigFile}
|
|
<- [{emqx, deps_path(emqx, "priv/emqx.schema"),
|
|
deps_path(emqx, "etc/gen.emqx.conf")}]],
|
|
emqx_zone:set_env(external, max_topic_alias, 20),
|
|
Config.
|
|
|
|
end_per_suite(_Config) ->
|
|
application:stop(emqx).
|
|
|
|
batch_connect(NumberOfConnections) ->
|
|
batch_connect([], NumberOfConnections).
|
|
|
|
batch_connect(Socks, 0) ->
|
|
Socks;
|
|
batch_connect(Socks, NumberOfConnections) ->
|
|
{ok, Sock} = emqx_client_sock:connect({127, 0, 0, 1}, 1883,
|
|
[binary, {packet, raw}, {active, false}],
|
|
3000),
|
|
batch_connect([Sock | Socks], NumberOfConnections - 1).
|
|
|
|
with_connection(DoFun, NumberOfConnections) ->
|
|
Socks = batch_connect(NumberOfConnections),
|
|
try
|
|
DoFun(Socks)
|
|
after
|
|
lists:foreach(fun(Sock) ->
|
|
emqx_client_sock:close(Sock)
|
|
end, Socks)
|
|
end.
|
|
|
|
with_connection(DoFun) ->
|
|
with_connection(DoFun, 1).
|
|
|
|
% {ok, Sock} = emqx_client_sock:connect({127, 0, 0, 1}, 1883,
|
|
% [binary, {packet, raw},
|
|
% {active, false}], 3000),
|
|
% try
|
|
% DoFun(Sock)
|
|
% after
|
|
% emqx_client_sock:close(Sock)
|
|
% end.
|
|
|
|
connect_v4(_) ->
|
|
with_connection(fun([Sock]) ->
|
|
emqx_client_sock:send(Sock, raw_send_serialize(?PACKET(?PUBLISH))),
|
|
{error, closed} =gen_tcp:recv(Sock, 0)
|
|
end),
|
|
with_connection(fun([Sock]) ->
|
|
ConnectPacket = raw_send_serialize(?CONNECT_PACKET
|
|
(#mqtt_packet_connect{
|
|
client_id = <<"mqttv4_client">>,
|
|
username = <<"admin">>,
|
|
password = <<"public">>,
|
|
proto_ver = ?MQTT_PROTO_V4
|
|
})),
|
|
emqx_client_sock:send(Sock, ConnectPacket),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?CONNACK_PACKET(?CONNACK_ACCEPT), _} = raw_recv_parse(Data, ?MQTT_PROTO_V4),
|
|
|
|
emqx_client_sock:send(Sock, ConnectPacket),
|
|
{error, closed} = gen_tcp:recv(Sock, 0)
|
|
end),
|
|
ok.
|
|
|
|
|
|
connect_v5(_) ->
|
|
with_connection(fun([Sock]) ->
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
properties =
|
|
#{'Request-Response-Information' => -1}}))),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?DISCONNECT_PACKET(?RC_PROTOCOL_ERROR), _} = raw_recv_parse(Data, ?MQTT_PROTO_V5)
|
|
end),
|
|
|
|
with_connection(fun([Sock]) ->
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
properties =
|
|
#{'Request-Problem-Information' => 2}}))),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?DISCONNECT_PACKET(?RC_PROTOCOL_ERROR), _} = raw_recv_parse(Data, ?MQTT_PROTO_V5)
|
|
end),
|
|
|
|
with_connection(fun([Sock]) ->
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
properties =
|
|
#{'Request-Response-Information' => 1}})
|
|
)),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?CONNACK_PACKET(?RC_SUCCESS, 0,
|
|
#{'Response-Information' := _RespInfo}), _} =
|
|
raw_recv_parse(Data, ?MQTT_PROTO_V5)
|
|
end),
|
|
|
|
% topic alias = 0
|
|
with_connection(fun([Sock]) ->
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
properties =
|
|
#{'Topic-Alias-Maximum' => 10}}),
|
|
#{version => ?MQTT_PROTO_V5}
|
|
)),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?CONNACK_PACKET(?RC_SUCCESS, 0,
|
|
#{'Topic-Alias-Maximum' := 20}), _} =
|
|
raw_recv_parse(Data, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?PUBLISH_PACKET(?QOS_1, <<"TopicA">>, 1, #{'Topic-Alias' => 0}, <<"hello">>),
|
|
#{version => ?MQTT_PROTO_V5}
|
|
)),
|
|
|
|
{ok, Data2} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?DISCONNECT_PACKET(?RC_TOPIC_ALIAS_INVALID), _} = raw_recv_parse(Data2, ?MQTT_PROTO_V5)
|
|
end),
|
|
|
|
% topic alias maximum
|
|
with_connection(fun([Sock]) ->
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
properties =
|
|
#{'Topic-Alias-Maximum' => 10}}),
|
|
#{version => ?MQTT_PROTO_V5}
|
|
)),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?CONNACK_PACKET(?RC_SUCCESS, 0,
|
|
#{'Topic-Alias-Maximum' := 20}), _} =
|
|
raw_recv_parse(Data, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock, raw_send_serialize(?SUBSCRIBE_PACKET(1, [{<<"TopicA">>, #{rh => 1,
|
|
qos => ?QOS_2,
|
|
rap => 0,
|
|
nl => 0,
|
|
rc => 0}}]), #{version => ?MQTT_PROTO_V5})),
|
|
|
|
{ok, Data2} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?SUBACK_PACKET(1, #{}, [2]), _} = raw_recv_parse(Data2, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?PUBLISH_PACKET(?QOS_1, <<"TopicA">>, 1, #{'Topic-Alias' => 15}, <<"hello">>),
|
|
#{version => ?MQTT_PROTO_V5}
|
|
)),
|
|
|
|
{ok, Data3} = gen_tcp:recv(Sock, 0),
|
|
|
|
{ok, ?PUBACK_PACKET(1, 0), _} = raw_recv_parse(Data3, ?MQTT_PROTO_V5),
|
|
|
|
{ok, Data4} = gen_tcp:recv(Sock, 0),
|
|
|
|
{ok, ?PUBLISH_PACKET(?QOS_1, <<"TopicA">>, _, <<"hello">>), _} = raw_recv_parse(Data4, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?PUBLISH_PACKET(?QOS_1, <<"TopicA">>, 2, #{'Topic-Alias' => 21}, <<"hello">>),
|
|
#{version => ?MQTT_PROTO_V5}
|
|
)),
|
|
|
|
{ok, Data5} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?DISCONNECT_PACKET(?RC_TOPIC_ALIAS_INVALID), _} = raw_recv_parse(Data5, ?MQTT_PROTO_V5)
|
|
end),
|
|
|
|
% test clean start
|
|
with_connection(fun([Sock]) ->
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
clean_start = true,
|
|
client_id = <<"myclient">>,
|
|
properties =
|
|
#{'Session-Expiry-Interval' => 10}})
|
|
)),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?CONNACK_PACKET(?RC_SUCCESS, 0), _} = raw_recv_parse(Data, ?MQTT_PROTO_V5),
|
|
emqx_client_sock:send(Sock, raw_send_serialize(
|
|
?DISCONNECT_PACKET(?RC_SUCCESS)
|
|
))
|
|
end),
|
|
|
|
timer:sleep(1000),
|
|
|
|
with_connection(fun([Sock]) ->
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
clean_start = false,
|
|
client_id = <<"myclient">>,
|
|
properties =
|
|
#{'Session-Expiry-Interval' => 10}})
|
|
)),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?CONNACK_PACKET(?RC_SUCCESS, 1), _} = raw_recv_parse(Data, ?MQTT_PROTO_V5)
|
|
end),
|
|
|
|
% test will message publish and cancel
|
|
with_connection(fun([Sock]) ->
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
clean_start = true,
|
|
client_id = <<"myclient">>,
|
|
will_flag = true,
|
|
will_qos = ?QOS_1,
|
|
will_retain = false,
|
|
will_props = #{'Will-Delay-Interval' => 5},
|
|
will_topic = <<"TopicA">>,
|
|
will_payload = <<"will message">>,
|
|
properties = #{'Session-Expiry-Interval' => 0}
|
|
}
|
|
)
|
|
)
|
|
),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?CONNACK_PACKET(?RC_SUCCESS, 0), _} = raw_recv_parse(Data, ?MQTT_PROTO_V5),
|
|
|
|
{ok, Sock2} = emqx_client_sock:connect({127, 0, 0, 1}, 1883,
|
|
[binary, {packet, raw},
|
|
{active, false}], 3000),
|
|
|
|
do_connect(Sock2, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock2, raw_send_serialize(?SUBSCRIBE_PACKET(1, [{<<"TopicA">>, #{rh => 1,
|
|
qos => ?QOS_2,
|
|
rap => 0,
|
|
nl => 0,
|
|
rc => 0}}]), #{version => ?MQTT_PROTO_V5})),
|
|
|
|
{ok, SubData} = gen_tcp:recv(Sock2, 0),
|
|
{ok, ?SUBACK_PACKET(1, #{}, [2]), _} = raw_recv_parse(SubData, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock, raw_send_serialize(
|
|
?DISCONNECT_PACKET(?RC_SUCCESS))),
|
|
|
|
{error, timeout} = gen_tcp:recv(Sock2, 0, 2000),
|
|
|
|
% session resumed
|
|
{ok, Sock3} = emqx_client_sock:connect({127, 0, 0, 1}, 1883,
|
|
[binary, {packet, raw},
|
|
{active, false}], 3000),
|
|
|
|
emqx_client_sock:send(Sock3,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
clean_start = false,
|
|
client_id = <<"myclient">>,
|
|
will_flag = true,
|
|
will_qos = ?QOS_1,
|
|
will_retain = false,
|
|
will_props = #{'Will-Delay-Interval' => 5},
|
|
will_topic = <<"TopicA">>,
|
|
will_payload = <<"will message 2">>,
|
|
properties = #{'Session-Expiry-Interval' => 3}
|
|
}
|
|
),
|
|
#{version => ?MQTT_PROTO_V5}
|
|
)
|
|
),
|
|
{ok, Data3} = gen_tcp:recv(Sock3, 0),
|
|
{ok, ?CONNACK_PACKET(?RC_SUCCESS, 0), _} = raw_recv_parse(Data3, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock3, raw_send_serialize(
|
|
?DISCONNECT_PACKET(?RC_DISCONNECT_WITH_WILL_MESSAGE),
|
|
#{version => ?MQTT_PROTO_V5}
|
|
)
|
|
),
|
|
|
|
{ok, WillData} = gen_tcp:recv(Sock2, 0, 5000),
|
|
{ok, ?PUBLISH_PACKET(?QOS_1, <<"TopicA">>, _, <<"will message 2">>), _} = raw_recv_parse(WillData, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:close(Sock2)
|
|
end),
|
|
|
|
% duplicate client id
|
|
with_connection(fun([Sock, Sock1]) ->
|
|
emqx_zone:set_env(external, use_username_as_clientid, true),
|
|
emqx_client_sock:send(Sock,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
clean_start = true,
|
|
client_id = <<"myclient">>,
|
|
properties =
|
|
#{'Session-Expiry-Interval' => 10}})
|
|
)),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?CONNACK_PACKET(?RC_SUCCESS, 0), _} = raw_recv_parse(Data, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock1,
|
|
raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
proto_ver = ?MQTT_PROTO_V5,
|
|
clean_start = false,
|
|
client_id = <<"myclient">>,
|
|
username = <<"admin">>,
|
|
password = <<"public">>,
|
|
properties =
|
|
#{'Session-Expiry-Interval' => 10}})
|
|
)),
|
|
{ok, Data1} = gen_tcp:recv(Sock1, 0),
|
|
{ok, ?CONNACK_PACKET(?RC_SUCCESS, 0), _} = raw_recv_parse(Data1, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock, raw_send_serialize(?SUBSCRIBE_PACKET(1, [{<<"TopicA">>, #{rh => 1,
|
|
qos => ?QOS_2,
|
|
rap => 0,
|
|
nl => 0,
|
|
rc => 0}}]),
|
|
#{version => ?MQTT_PROTO_V5})),
|
|
|
|
{ok, SubData} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?SUBACK_PACKET(1, #{}, [2]), _} = raw_recv_parse(SubData, ?MQTT_PROTO_V5),
|
|
|
|
emqx_client_sock:send(Sock1, raw_send_serialize(?SUBSCRIBE_PACKET(1, [{<<"TopicA">>, #{rh => 1,
|
|
qos => ?QOS_2,
|
|
rap => 0,
|
|
nl => 0,
|
|
rc => 0}}]),
|
|
#{version => ?MQTT_PROTO_V5})),
|
|
|
|
{ok, SubData1} = gen_tcp:recv(Sock1, 0),
|
|
{ok, ?SUBACK_PACKET(1, #{}, [2]), _} = raw_recv_parse(SubData1, ?MQTT_PROTO_V5)
|
|
end, 2),
|
|
|
|
ok.
|
|
|
|
do_connect(Sock, ProtoVer) ->
|
|
emqx_client_sock:send(Sock, raw_send_serialize(
|
|
?CONNECT_PACKET(
|
|
#mqtt_packet_connect{
|
|
client_id = <<"mqtt_client">>,
|
|
proto_ver = ProtoVer
|
|
}))),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?CONNACK_PACKET(?CONNACK_ACCEPT), _} = raw_recv_parse(Data, ProtoVer).
|
|
|
|
subscribe_v4(_) ->
|
|
with_connection(fun([Sock]) ->
|
|
do_connect(Sock, ?MQTT_PROTO_V4),
|
|
SubPacket = raw_send_serialize(
|
|
?SUBSCRIBE_PACKET(15,
|
|
[{<<"topic">>, #{rh => 1,
|
|
qos => ?QOS_2,
|
|
rap => 0,
|
|
nl => 0,
|
|
rc => 0}}])),
|
|
emqx_client_sock:send(Sock, SubPacket),
|
|
{ok, Data} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?SUBACK_PACKET(15, _), _} = raw_recv_parse(Data, ?MQTT_PROTO_V4)
|
|
end),
|
|
ok.
|
|
|
|
subscribe_v5(_) ->
|
|
with_connection(fun([Sock]) ->
|
|
do_connect(Sock, ?MQTT_PROTO_V5),
|
|
SubPacket = raw_send_serialize(?SUBSCRIBE_PACKET(15, #{'Subscription-Identifier' => -1},[]),
|
|
#{version => ?MQTT_PROTO_V5}),
|
|
emqx_client_sock:send(Sock, SubPacket),
|
|
{ok, DisConnData} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?DISCONNECT_PACKET(?RC_TOPIC_FILTER_INVALID), _} =
|
|
raw_recv_parse(DisConnData, ?MQTT_PROTO_V5)
|
|
end),
|
|
with_connection(fun([Sock]) ->
|
|
do_connect(Sock, ?MQTT_PROTO_V5),
|
|
SubPacket = raw_send_serialize(
|
|
?SUBSCRIBE_PACKET(0, #{}, [{<<"TopicQos0">>,
|
|
#{rh => 1, qos => ?QOS_2,
|
|
rap => 0, nl => 0,
|
|
rc => 0}}]),
|
|
#{version => ?MQTT_PROTO_V5}),
|
|
emqx_client_sock:send(Sock, SubPacket),
|
|
{ok, DisConnData} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?DISCONNECT_PACKET(?RC_MALFORMED_PACKET), _} =
|
|
raw_recv_parse(DisConnData, ?MQTT_PROTO_V5)
|
|
end),
|
|
with_connection(fun([Sock]) ->
|
|
do_connect(Sock, ?MQTT_PROTO_V5),
|
|
SubPacket = raw_send_serialize(
|
|
?SUBSCRIBE_PACKET(1, #{'Subscription-Identifier' => 0},
|
|
[{<<"TopicQos0">>,
|
|
#{rh => 1, qos => ?QOS_2,
|
|
rap => 0, nl => 0,
|
|
rc => 0}}]),
|
|
#{version => ?MQTT_PROTO_V5}),
|
|
emqx_client_sock:send(Sock, SubPacket),
|
|
{ok, DisConnData} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?DISCONNECT_PACKET(?RC_SUBSCRIPTION_IDENTIFIERS_NOT_SUPPORTED), _} =
|
|
raw_recv_parse(DisConnData, ?MQTT_PROTO_V5)
|
|
end),
|
|
with_connection(fun([Sock]) ->
|
|
do_connect(Sock, ?MQTT_PROTO_V5),
|
|
SubPacket = raw_send_serialize(
|
|
?SUBSCRIBE_PACKET(1, #{'Subscription-Identifier' => 1},
|
|
[{<<"TopicQos0">>,
|
|
#{rh => 1, qos => ?QOS_2,
|
|
rap => 0, nl => 0,
|
|
rc => 0}}]),
|
|
#{version => ?MQTT_PROTO_V5}),
|
|
emqx_client_sock:send(Sock, SubPacket),
|
|
{ok, SubData} = gen_tcp:recv(Sock, 0),
|
|
{ok, ?SUBACK_PACKET(1, #{}, [2]), _} =
|
|
raw_recv_parse(SubData, ?MQTT_PROTO_V5)
|
|
end),
|
|
ok.
|
|
|
|
publish_v4(_) ->
|
|
ok.
|
|
|
|
publish_v5(_) ->
|
|
ok.
|
|
|
|
raw_send_serialize(Packet) ->
|
|
emqx_frame:serialize(Packet).
|
|
|
|
raw_send_serialize(Packet, Opts) ->
|
|
emqx_frame:serialize(Packet, Opts).
|
|
|
|
raw_recv_parse(P, ProtoVersion) ->
|
|
emqx_frame:parse(P, {none, #{max_packet_size => ?MAX_PACKET_SIZE,
|
|
version => ProtoVersion}}).
|
|
|
|
acl_deny_action_ct(_) ->
|
|
emqx_zone:set_env(external, acl_deny_action, disconnect),
|
|
process_flag(trap_exit, true),
|
|
[acl_deny_do_disconnect(subscribe, QoS, <<"acl_deny_action">>) || QoS <- lists:seq(0, 2)],
|
|
[acl_deny_do_disconnect(publish, QoS, <<"acl_deny_action">>) || QoS <- lists:seq(0, 2)],
|
|
emqx_zone:set_env(external, acl_deny_action, ignore),
|
|
ok.
|
|
|
|
acl_deny_action_eunit(_) ->
|
|
PState = ?TEST_PSTATE(?MQTT_PROTO_V5, #{msg => 0, pkt => 0}),
|
|
CodeName = emqx_reason_codes:name(?RC_NOT_AUTHORIZED, ?MQTT_PROTO_V5),
|
|
{error, CodeName, NEWPSTATE1} = emqx_protocol:process_packet(?PUBLISH_PACKET(?QOS_1, <<"acl_deny_action">>, 1, <<"payload">>), PState),
|
|
?assertEqual(#{pkt => 1, msg => 0}, NEWPSTATE1#pstate.send_stats),
|
|
{error, CodeName, NEWPSTATE2} = emqx_protocol:process_packet(?PUBLISH_PACKET(?QOS_2, <<"acl_deny_action">>, 2, <<"payload">>), PState),
|
|
?assertEqual(#{pkt => 1, msg => 0}, NEWPSTATE2#pstate.send_stats).
|
|
|
|
will_topic_check(_) ->
|
|
{ok, Client} = emqx_client:start_link([{username, <<"emqx">>},
|
|
{will_flag, true},
|
|
{will_topic, <<"aaa">>},
|
|
{will_payload, <<"I have died">>},
|
|
{will_qos, 0}]),
|
|
{ok, _} = emqx_client:connect(Client),
|
|
|
|
{ok, T} = emqx_client:start_link([{client_id, <<"client">>}]),
|
|
emqx_client:connect(T),
|
|
emqx_client:subscribe(T, <<"aaa">>),
|
|
ct:sleep(200),
|
|
|
|
emqx_client:stop(Client),
|
|
ct:sleep(100),
|
|
false = is_process_alive(Client),
|
|
emqx_ct_broker_helpers:wait_mqtt_payload(<<"I have died">>),
|
|
emqx_client:stop(T).
|
|
|
|
will_acl_check(_) ->
|
|
%% The connection will be rejected if publishing of the will message is not allowed by
|
|
%% ACL rules
|
|
process_flag(trap_exit, true),
|
|
{ok, Client} = emqx_client:start_link([{username, <<"pub_deny">>},
|
|
{will_flag, true},
|
|
{will_topic, <<"pub_deny">>},
|
|
{will_payload, <<"I have died">>},
|
|
{will_qos, 0}]),
|
|
?assertMatch({error,{_,_}}, emqx_client:connect(Client)).
|
|
|
|
acl_deny_do_disconnect(publish, QoS, Topic) ->
|
|
process_flag(trap_exit, true),
|
|
{ok, Client} = emqx_client:start_link([{username, <<"emqx">>}]),
|
|
{ok, _} = emqx_client:connect(Client),
|
|
emqx_client:publish(Client, Topic, <<"test">>, QoS),
|
|
receive
|
|
{'EXIT', Client, {shutdown,tcp_closed}} ->
|
|
ct:pal(info, "[OK] after publish, received exit: {shutdown,tcp_closed}"),
|
|
false = is_process_alive(Client);
|
|
{'EXIT', Client, Reason} ->
|
|
ct:pal(info, "[OK] after publish, client got disconnected: ~p", [Reason])
|
|
after 1000 -> ct:fail({timeout, wait_tcp_closed})
|
|
end;
|
|
|
|
acl_deny_do_disconnect(subscribe, QoS, Topic) ->
|
|
process_flag(trap_exit, true),
|
|
{ok, Client} = emqx_client:start_link([{username, <<"emqx">>}]),
|
|
{ok, _} = emqx_client:connect(Client),
|
|
{ok, _, [128]} = emqx_client:subscribe(Client, Topic, QoS),
|
|
receive
|
|
{'EXIT', Client, {shutdown,tcp_closed}} ->
|
|
ct:pal(info, "[OK] after subscribe, received exit: {shutdown,tcp_closed}"),
|
|
false = is_process_alive(Client);
|
|
{'EXIT', Client, Reason} ->
|
|
ct:pal(info, "[OK] after subscribe, client got disconnected: ~p", [Reason])
|
|
after 1000 -> ct:fail({timeout, wait_tcp_closed})
|
|
end.
|
|
|
|
start_apps(App, SchemaFile, ConfigFile) ->
|
|
read_schema_configs(App, SchemaFile, ConfigFile),
|
|
set_special_configs(App),
|
|
application:ensure_all_started(App).
|
|
|
|
read_schema_configs(App, SchemaFile, ConfigFile) ->
|
|
Schema = cuttlefish_schema:files([SchemaFile]),
|
|
Conf = conf_parse:file(ConfigFile),
|
|
NewConfig = cuttlefish_generator:map(Schema, Conf),
|
|
Vals = proplists:get_value(App, NewConfig, []),
|
|
[application:set_env(App, Par, Value) || {Par, Value} <- Vals].
|
|
|
|
set_special_configs(emqx) ->
|
|
application:set_env(emqx, enable_acl_cache, false),
|
|
application:set_env(emqx, plugins_loaded_file,
|
|
deps_path(emqx, "test/emqx_SUITE_data/loaded_plugins")),
|
|
application:set_env(emqx, acl_deny_action, disconnect),
|
|
application:set_env(emqx, acl_file,
|
|
deps_path(emqx, "test/emqx_access_SUITE_data/acl_deny_action.conf"));
|
|
set_special_configs(_App) ->
|
|
ok.
|
|
|
|
deps_path(App, RelativePath) ->
|
|
%% Note: not lib_dir because etc dir is not sym-link-ed to _build dir
|
|
%% but priv dir is
|
|
Path0 = code:priv_dir(App),
|
|
Path = case file:read_link(Path0) of
|
|
{ok, Resolved} -> Resolved;
|
|
{error, _} -> Path0
|
|
end,
|
|
filename:join([Path, "..", RelativePath]).
|
|
|
|
local_path(RelativePath) ->
|
|
deps_path(emqx_auth_username, RelativePath).
|