diff options
Diffstat (limited to 'source4/build/pidl')
-rw-r--r-- | source4/build/pidl/client.pm | 4 | ||||
-rw-r--r-- | source4/build/pidl/header.pm | 1 | ||||
-rw-r--r-- | source4/build/pidl/idl.pm | 2 | ||||
-rw-r--r-- | source4/build/pidl/idl.yp | 2 |
4 files changed, 9 insertions, 0 deletions
diff --git a/source4/build/pidl/client.pm b/source4/build/pidl/client.pm index 9502c68e1a..1c0baa16f8 100644 --- a/source4/build/pidl/client.pm +++ b/source4/build/pidl/client.pm @@ -34,6 +34,10 @@ struct rpc_request *dcerpc_$name\_send(struct dcom_interface *d, TALLOC_CTX *mem return NULL; } + ZERO_STRUCT(r->in.ORPCthis); + r->in.ORPCthis.version.MajorVersion = 5; + r->in.ORPCthis.version.MinorVersion = 1; + "; } else { $objarg = "NULL"; diff --git a/source4/build/pidl/header.pm b/source4/build/pidl/header.pm index 0c4c5df425..cc9b804387 100644 --- a/source4/build/pidl/header.pm +++ b/source4/build/pidl/header.pm @@ -350,6 +350,7 @@ sub HeaderInterface($) $res .= "NTSTATUS dcerpc_server_$interface->{NAME}_init(void);\n\n"; } + $count = $interface->{INHERITED_FUNCTIONS}; foreach my $d (@{$data}) { if ($d->{TYPE} eq "FUNCTION") { my $u_name = uc $d->{NAME}; diff --git a/source4/build/pidl/idl.pm b/source4/build/pidl/idl.pm index 19525e42f3..a3e2e2ca8c 100644 --- a/source4/build/pidl/idl.pm +++ b/source4/build/pidl/idl.pm @@ -2080,8 +2080,10 @@ sub parse_idl($$) die("No such parent interface " . $x->{BASE}); } + $x->{INHERITED_FUNCTIONS} = scalar @{$parent->{INHERITED_DATA}}; @{$x->{INHERITED_DATA}} = (@{$parent->{INHERITED_DATA}}, @{$x->{DATA}}); } else { + $x->{INHERITED_FUNCTIONS} = 0; $x->{INHERITED_DATA} = $x->{DATA}; } } diff --git a/source4/build/pidl/idl.yp b/source4/build/pidl/idl.yp index 24f88dd531..e571645c4b 100644 --- a/source4/build/pidl/idl.yp +++ b/source4/build/pidl/idl.yp @@ -368,8 +368,10 @@ sub parse_idl($$) die("No such parent interface " . $x->{BASE}); } + $x->{INHERITED_FUNCTIONS} = scalar @{$parent->{INHERITED_DATA}}; @{$x->{INHERITED_DATA}} = (@{$parent->{INHERITED_DATA}}, @{$x->{DATA}}); } else { + $x->{INHERITED_FUNCTIONS} = 0; $x->{INHERITED_DATA} = $x->{DATA}; } } |