summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Radestock <matthias@lshift.net>2008-11-19 15:02:20 +0000
committerMatthias Radestock <matthias@lshift.net>2008-11-19 15:02:20 +0000
commit8c0969ec73efbffd31a4d4196447d545ad1da2ac (patch)
tree83aff082ca60a6740f8602fb8860c3370a4bcecb
parent94691ffcadd1ae6840a7198a26451ca860dfbe2a (diff)
downloadrabbitmq-server-8c0969ec73efbffd31a4d4196447d545ad1da2ac.tar.gz
add function to get hold of all connections (i.e. reader pids)
-rw-r--r--src/rabbit_networking.erl8
1 files changed, 7 insertions, 1 deletions
diff --git a/src/rabbit_networking.erl b/src/rabbit_networking.erl
index 79c927cb..9fc34503 100644
--- a/src/rabbit_networking.erl
+++ b/src/rabbit_networking.erl
@@ -26,7 +26,8 @@
-module(rabbit_networking).
-export([start/0, start_tcp_listener/2, stop_tcp_listener/2,
- on_node_down/1, active_listeners/0, node_listeners/1]).
+ on_node_down/1, active_listeners/0, node_listeners/1,
+ connections/0]).
%%used by TCP-based transports, e.g. STOMP adapter
-export([check_tcp_listener_address/3]).
@@ -46,6 +47,7 @@
-spec(stop_tcp_listener/2 :: (host(), ip_port()) -> 'ok').
-spec(active_listeners/0 :: () -> [listener()]).
-spec(node_listeners/1 :: (node()) -> [listener()]).
+-spec(connections/0 :: () -> [pid()]).
-spec(on_node_down/1 :: (node()) -> 'ok').
-spec(check_tcp_listener_address/3 :: (atom(), host(), ip_port()) ->
{ip_address(), atom()}).
@@ -136,6 +138,10 @@ start_client(Sock) ->
Child ! {go, Sock},
Child.
+connections() ->
+ [Pid || {_, Pid, _, _} <- supervisor:which_children(
+ rabbit_tcp_client_sup)].
+
%%--------------------------------------------------------------------
tcp_host({0,0,0,0}) ->