test(sys_mon): add test for closed port
This commit is contained in:
parent
d89925ce7b
commit
427866f8ad
|
@ -125,6 +125,16 @@ t_sys_mon(_Config) ->
|
||||||
validate_sys_mon_info(PidOrPort, SysMonName, ValidateInfo, InfoOrPort)
|
validate_sys_mon_info(PidOrPort, SysMonName, ValidateInfo, InfoOrPort)
|
||||||
end, ?INPUTINFO).
|
end, ?INPUTINFO).
|
||||||
|
|
||||||
|
%% Existing port, but closed.
|
||||||
|
t_sys_mon_dead_port(_Config) ->
|
||||||
|
process_flag(trap_exit, true),
|
||||||
|
Port = dead_port(),
|
||||||
|
{PidOrPort, SysMonName, ValidateInfo, InfoOrPort} =
|
||||||
|
{self(), busy_port,
|
||||||
|
fmt("busy_port warning: suspid = ~p, port = ~p",
|
||||||
|
[self(), Port]), Port},
|
||||||
|
validate_sys_mon_info(PidOrPort, SysMonName, ValidateInfo, InfoOrPort).
|
||||||
|
|
||||||
t_sys_mon2(_Config) ->
|
t_sys_mon2(_Config) ->
|
||||||
?SYSMON ! {timeout, ignored, reset},
|
?SYSMON ! {timeout, ignored, reset},
|
||||||
?SYSMON ! {ignored},
|
?SYSMON ! {ignored},
|
||||||
|
@ -156,3 +166,8 @@ some_function(Parent, _Arg2) ->
|
||||||
stop ->
|
stop ->
|
||||||
ok
|
ok
|
||||||
end.
|
end.
|
||||||
|
|
||||||
|
dead_port() ->
|
||||||
|
Port = erlang:open_port({spawn, "ls"}, []),
|
||||||
|
catch exit(Port, kill),
|
||||||
|
Port.
|
||||||
|
|
Loading…
Reference in New Issue