diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2006-09-19 22:39:49 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 14:19:02 -0500 |
commit | b9785235b40ed0506fd920214967f6b0bd9fc659 (patch) | |
tree | c2288f5baa8673c1a6df8013f534fbe3f48eabfb /source4/pidl | |
parent | 4818a6474c3bb5c5487199bd1dfdaa21be1af195 (diff) | |
download | samba-b9785235b40ed0506fd920214967f6b0bd9fc659.tar.gz samba-b9785235b40ed0506fd920214967f6b0bd9fc659.tar.bz2 samba-b9785235b40ed0506fd920214967f6b0bd9fc659.zip |
r18693: Print debug info when DEBUGLEVEL >= 10 in the Samba3 code.
(This used to be commit d28ae3f70ad4f6b09780e600ecb98c39cc62fd24)
Diffstat (limited to 'source4/pidl')
-rw-r--r-- | source4/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm | 8 | ||||
-rw-r--r-- | source4/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm | 6 |
2 files changed, 14 insertions, 0 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm b/source4/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm index 31ea73f7aa..3b75bf33a6 100644 --- a/source4/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm +++ b/source4/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm @@ -52,7 +52,15 @@ sub ParseFunction($$) } } + pidl ""; + pidl "if (DEBUGLEVEL >= 10)"; + pidl "\tNDR_PRINT_IN_DEBUG($fn->{NAME}, &r);"; + pidl ""; pidl "status = cli_do_rpc_ndr(cli, mem_ctx, PI_$uif, $ufn, &r, (ndr_pull_flags_fn_t)ndr_pull_$fn->{NAME}, (ndr_push_flags_fn_t)ndr_push_$fn->{NAME});"; + pidl ""; + pidl "if (DEBUGLEVEL >= 10)"; + pidl "\tNDR_PRINT_OUT_DEBUG($fn->{NAME}, &r);"; + pidl ""; pidl "if (NT_STATUS_IS_ERR(status)) {"; pidl "\treturn status;"; pidl "}"; diff --git a/source4/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm b/source4/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm index 8ef4529402..070ccde8ee 100644 --- a/source4/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm +++ b/source4/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm @@ -80,6 +80,9 @@ sub ParseFunction($$) pidl "\treturn False;"; pidl "}"; pidl ""; + pidl "if (DEBUGLEVEL >= 10)"; + pidl "\tNDR_PRINT_IN_DEBUG($fn->{NAME}, &r);"; + pidl ""; my %env = (); my $hasout = 0; @@ -119,6 +122,9 @@ sub ParseFunction($$) pidl "$ret;"; pidl ""; + pidl "if (DEBUGLEVEL >= 10)"; + pidl "\tNDR_PRINT_OUT_DEBUG($fn->{NAME}, &r);"; + pidl ""; pidl "push = ndr_push_init_ctx(mem_ctx);"; pidl "if (push == NULL) {"; pidl "\ttalloc_free(mem_ctx);"; |