From b8a8870d276950fa7992047f98181bc137d63066 Mon Sep 17 00:00:00 2001 From: David Disseldorp Date: Fri, 13 Jan 2012 13:51:22 -0800 Subject: idl: add to_null property to_null specifies that character conversion should only occur until the null pointer in an array based string. Signed-off-by: Jeremy Allison Autobuild-User: Jeremy Allison Autobuild-Date: Sat Jan 14 00:51:54 CET 2012 on sn-devel-104 --- pidl/lib/Parse/Pidl/NDR.pm | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'pidl') diff --git a/pidl/lib/Parse/Pidl/NDR.pm b/pidl/lib/Parse/Pidl/NDR.pm index db776ae3ef..ed7fdab94c 100644 --- a/pidl/lib/Parse/Pidl/NDR.pm +++ b/pidl/lib/Parse/Pidl/NDR.pm @@ -171,6 +171,7 @@ sub GetElementLevelTable($$$) my $is_string = 0; my $is_fixed = 0; my $is_inline = 0; + my $is_to_null = 0; if ($d eq "*") { $is_conformant = 1; @@ -208,6 +209,10 @@ sub GetElementLevelTable($$$) delete($e->{PROPERTIES}->{string}); } + if (has_property($e, "to_null")) { + $is_to_null = 1; + } + push (@$order, { TYPE => "ARRAY", SIZE_IS => $size, @@ -218,7 +223,8 @@ sub GetElementLevelTable($$$) IS_VARYING => $is_varying, IS_CONFORMANT => $is_conformant, IS_FIXED => $is_fixed, - IS_INLINE => $is_inline + IS_INLINE => $is_inline, + IS_TO_NULL => $is_to_null }); } @@ -1102,6 +1108,7 @@ my %property_list = ( "noheader" => ["ELEMENT"], "charset" => ["ELEMENT"], "length_is" => ["ELEMENT"], + "to_null" => ["ELEMENT"], ); ##################################################################### -- cgit