diff options
Diffstat (limited to 'source4/pidl/lib/Parse/Pidl/Samba3')
| -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);"; |