diff options
| author | Anders Svensson <anders@erlang.org> | 2014-07-21 11:03:54 +0200 |
|---|---|---|
| committer | Anders Svensson <anders@erlang.org> | 2014-07-21 16:08:21 +0200 |
| commit | 66833b6dc19dd7fd8a19862e7815c6c3c1b4f230 (patch) | |
| tree | beaff4b34cbb90aea2707898449b2dbda3ca1ebb | |
| parent | 3f090a60f737aa2410b47460d070401d9dd5179e (diff) | |
| download | erlang-66833b6dc19dd7fd8a19862e7815c6c3c1b4f230.tar.gz | |
Add info item for diameter:service_info/2
To extract only process info from connections info, which can be useful
to reduce the amount of information returned.
Choose 'info' for the item since process_info is more than one word: all
others are one. Don't choose memory since it's too specific: might want
to use it for more.
| -rw-r--r-- | lib/diameter/src/base/diameter_service.erl | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/lib/diameter/src/base/diameter_service.erl b/lib/diameter/src/base/diameter_service.erl index 8b25802568..44c2b707b7 100644 --- a/lib/diameter/src/base/diameter_service.erl +++ b/lib/diameter/src/base/diameter_service.erl @@ -1573,7 +1573,8 @@ transports(#state{watchdogT = WatchdogT}) -> -define(OTHER_INFO, [connections, name, peers, - statistics]). + statistics, + info]). service_info(Item, S) when is_atom(Item) -> @@ -1663,6 +1664,7 @@ complete_info(Item, #state{service = Svc} = S) -> keys -> ?ALL_INFO ++ ?CAP_INFO ++ ?OTHER_INFO; all -> service_info(?ALL_INFO, S); statistics -> info_stats(S); + info -> info_info(S); connections -> info_connections(S); peers -> info_peers(S) end. @@ -1846,6 +1848,13 @@ mk_app(#diameter_app{} = A) -> info_pending(#state{} = S) -> diameter_traffic:pending(transports(S)). +%% info_info/1 +%% +%% Extract process_info from connections info. + +info_info(S) -> + [I || L <- conn_list(S), {info, I} <- L]. + %% info_connections/1 %% %% One entry per transport connection. Statistics for each entry are |