summaryrefslogtreecommitdiff
path: root/source4/pidl/lib/Parse
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2006-09-19 22:39:49 +0000
committerGerald (Jerry) Carter <jerry@samba.org>2007-10-10 14:19:02 -0500
commitb9785235b40ed0506fd920214967f6b0bd9fc659 (patch)
treec2288f5baa8673c1a6df8013f534fbe3f48eabfb /source4/pidl/lib/Parse
parent4818a6474c3bb5c5487199bd1dfdaa21be1af195 (diff)
downloadsamba-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/lib/Parse')
-rw-r--r--source4/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm8
-rw-r--r--source4/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm6
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);";