Add message_queue_len to sysmon handler

az919 A large heap or long GC is a potential sign of a large mailbox. Include the mailbox size in the report.
basho · Nov 2, 2011 · 4a2cacc · 4a2cacc
1 parent 6b0e97a
commit 4a2cacc
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/src/riak_core_sysmon_handler.erl b/src/riak_core_sysmon_handler.erl
@@ -174,12 +174,13 @@ get_pretty_proc_info(Pid) ->
     get_pretty_proc_info(Pid, current_function).
 
 get_pretty_proc_info(Pid, Acf) ->
-    case process_info(Pid, [registered_name, initial_call, current_function]) of
+    case process_info(Pid, [registered_name, initial_call, current_function,
+                            message_queue_len]) of
         undefined ->
             undefined;
         [] ->
             undefined;
-        [{registered_name, RN0}, ICT1, {_, CF}] ->
+        [{registered_name, RN0}, ICT1, {_, CF}, {_, MQL}] ->
             ICT = case proc_lib:translate_initial_call(Pid) of
                      {proc_lib, init_p, 5} ->   % not by proc_lib, see docs
                          ICT1;
@@ -189,5 +190,5 @@ get_pretty_proc_info(Pid, Acf) ->
             RNL = if RN0 == [] -> [];
                      true      -> [{name, RN0}]
                   end,
-            RNL ++ [ICT, {Acf, CF}]
+            RNL ++ [ICT, {Acf, CF}, {message_queue_len, MQL}]
     end.