summaryrefslogtreecommitdiff
path: root/source4/pidl/lib/Parse/Pidl/Samba3/Client.pm
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2005-10-04 19:38:35 +0000
committerGerald (Jerry) Carter <jerry@samba.org>2007-10-10 13:39:24 -0500
commit9879bc6aa6c7997220079b3501b9a4fb3682c813 (patch)
treea447269ee5ecdbbfe9e62a04bf724e4bba896355 /source4/pidl/lib/Parse/Pidl/Samba3/Client.pm
parenteea74cde05c1532d59b9f8ecc4f88c191a4b200f (diff)
downloadsamba-9879bc6aa6c7997220079b3501b9a4fb3682c813.tar.gz
samba-9879bc6aa6c7997220079b3501b9a4fb3682c813.tar.bz2
samba-9879bc6aa6c7997220079b3501b9a4fb3682c813.zip
r10717: Another bunch of small updates. All generated files except parse_dfs.c
compile now when generated from Samba4's dfs.idl. (This used to be commit 2b315b1942e77640eca8e0a3347b2a9ed1920f6a)
Diffstat (limited to 'source4/pidl/lib/Parse/Pidl/Samba3/Client.pm')
-rw-r--r--source4/pidl/lib/Parse/Pidl/Samba3/Client.pm12
1 files changed, 7 insertions, 5 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/Samba3/Client.pm b/source4/pidl/lib/Parse/Pidl/Samba3/Client.pm
index 83762719ea..d79aede138 100644
--- a/source4/pidl/lib/Parse/Pidl/Samba3/Client.pm
+++ b/source4/pidl/lib/Parse/Pidl/Samba3/Client.pm
@@ -25,11 +25,13 @@ sub ParseFunction($$)
{
my ($if,$fn) = @_;
- my $args = "";
+ my $inargs = "";
my $defargs = "";
foreach (@{$fn->{ELEMENTS}}) {
$defargs .= ", " . DeclLong($_);
- $args .= ", $_->{NAME}";
+ if (grep(/in/, @{$_->{DIRECTION}})) {
+ $inargs .= ", $_->{NAME}";
+ }
}
my $uif = uc($if->{NAME});
@@ -47,13 +49,13 @@ sub ParseFunction($$)
pidl "";
pidl "/* Marshall data and send request */";
pidl "";
- pidl "init_$if->{NAME}_q_$fn->{NAME}(&q$args);";
+ pidl "init_$if->{NAME}_q_$fn->{NAME}(&q$inargs);";
pidl "";
pidl "CLI_DO_RPC(cli, mem_ctx, PI_$uif, $ufn,";
pidl "\tq, r,";
pidl "\tqbuf, rbuf, ";
- pidl "\t$if->{NAME}_q_$fn->{NAME},";
- pidl "\t$if->{NAME}_r_$fn->{NAME},";
+ pidl "\t$if->{NAME}_io_q_$fn->{NAME},";
+ pidl "\t$if->{NAME}_io_r_$fn->{NAME},";
pidl "\tNT_STATUS_UNSUCCESSFUL);";
pidl "";
pidl "/* Return result */";