From 29bd658634e9afe0037170a2f3ad2512f9106761 Mon Sep 17 00:00:00 2001
From: Stefan Metzmacher <metze@samba.org>
Date: Mon, 11 Oct 2010 07:53:48 +0200
Subject: [PATCH] pidl:Samba3/ClientNDR: don't generate stubs for functions
 with pipe elements

metze
---
 pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm b/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm
index 67051a8783d..8142b356999 100644
--- a/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm
+++ b/pidl/lib/Parse/Pidl/Samba3/ClientNDR.pm
@@ -14,6 +14,7 @@ use Exporter;
 use strict;
 use Parse::Pidl qw(fatal warning error);
 use Parse::Pidl::Util qw(has_property ParseExpr);
+use Parse::Pidl::NDR qw(ContainsPipe);
 use Parse::Pidl::Typelist qw(mapTypeName);
 use Parse::Pidl::Samba4 qw(DeclLong);
 use Parse::Pidl::Samba4::Header qw(GenerateFunctionInEnv GenerateFunctionOutEnv);
@@ -378,6 +379,16 @@ sub ParseInterface($$)
 	foreach my $fn (@{$if->{FUNCTIONS}}) {
 		next if has_property($fn, "noopnum");
 		next if has_property($fn, "todo");
+
+		my $skip = 0;
+		foreach my $e (@{$fn->{ELEMENTS}}) {
+			if (ContainsPipe($e, $e->{LEVELS}[0])) {
+				$skip = 1;
+				last;
+			}
+		}
+		next if $skip;
+
 		$self->ParseFunction($if->{NAME}, $fn);
 	}
 	$self->pidl_hdr("#endif /* __CLI_$uif\__ */");
-- 
2.34.1