r21064: The core of this patch is

[samba.git] / source3 / lib / tallocmsg.c

diff --git a/source3/lib/tallocmsg.c b/source3/lib/tallocmsg.c
index e98e457880d2ff9ccc29bed898cfd4dffeb84d60..0f493538f3c104a21f27c7cc58fed2270ff3cd91 100644 (file)
--- a/source3/lib/tallocmsg.c
+++ b/source3/lib/tallocmsg.c
@@ -1,6 +1,6 @@
 /* 
-   samba -- Unix SMB/Netbios implementation.
-   Copyright (C) 2001 by Martin Pool
+   samba -- Unix SMB/CIFS implementation.
+   Copyright (C) 2001, 2002 by Martin Pool
    
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -25,14 +25,75 @@
  * Glue code between talloc profiling and the Samba messaging system.
  **/
 
+struct msg_pool_usage_state {
+       TALLOC_CTX *mem_ctx;
+       ssize_t len;
+       size_t buflen;
+       char *s;
+};
+
+static void msg_pool_usage_helper(const void *ptr, int depth, int max_depth, int is_ref, void *_s)
+{
+       const char *name = talloc_get_name(ptr);
+       struct msg_pool_usage_state *state = (struct msg_pool_usage_state *)_s;
+
+       if (is_ref) {
+               sprintf_append(state->mem_ctx, &state->s, &state->len, &state->buflen,
+                              "%*sreference to: %s\n", depth*4, "", name);
+               return;
+       }
+
+       if (depth == 0) {
+               sprintf_append(state->mem_ctx, &state->s, &state->len, &state->buflen,
+                              "%stalloc report on '%s' (total %6lu bytes in %3lu blocks)\n", 
+                              (max_depth < 0 ? "full " :""), name,
+                              (unsigned long)talloc_total_size(ptr),
+                              (unsigned long)talloc_total_blocks(ptr));
+               return;
+       }
+
+       sprintf_append(state->mem_ctx, &state->s, &state->len, &state->buflen,
+                      "%*s%-30s contains %6lu bytes in %3lu blocks (ref %d)\n", 
+                      depth*4, "",
+                      name,
+                      (unsigned long)talloc_total_size(ptr),
+                      (unsigned long)talloc_total_blocks(ptr),
+                      talloc_reference_count(ptr));
+}
 
 /**
  * Respond to a POOL_USAGE message by sending back string form of memory
  * usage stats.
  **/
-void msg_pool_usage(int msg_type, pid_t pid, void *buf, size_t len)
+void msg_pool_usage(int msg_type, struct process_id src_pid,
+                   void *UNUSED(buf), size_t UNUSED(len),
+                   void *private_data)
 {
+       struct msg_pool_usage_state state;
+
+       SMB_ASSERT(msg_type == MSG_REQ_POOL_USAGE);
+       
        DEBUG(2,("Got POOL_USAGE\n"));
+
+       state.mem_ctx = talloc_init("msg_pool_usage");
+       if (!state.mem_ctx) {
+               return;
+       }
+       state.len       = 0;
+       state.buflen    = 512;
+       state.s         = NULL;
+
+       talloc_report_depth_cb(NULL, 0, -1, msg_pool_usage_helper, &state);
+
+       if (!state.s) {
+               talloc_destroy(state.mem_ctx);
+               return;
+       }
+       
+       message_send_pid(src_pid, MSG_POOL_USAGE,
+                        state.s, strlen(state.s)+1, True);
+
+       talloc_destroy(state.mem_ctx);
 }
 
 /**
@@ -40,6 +101,6 @@ void msg_pool_usage(int msg_type, pid_t pid, void *buf, size_t len)
  **/
 void register_msg_pool_usage(void)
 {
-       message_register(MSG_REQ_POOL_USAGE, msg_pool_usage);
+       message_register(MSG_REQ_POOL_USAGE, msg_pool_usage, NULL);
        DEBUG(2, ("Registered MSG_REQ_POOL_USAGE\n"));
 }