r4518: added proper support for "typedef enum" in pidl. We can now use enums as types in switch

statements and variable types, and the value will be printed with its string name and value
(This used to be commit 1852033f2ec7584657d586e44d25a280959e4d81)

1 files changed, 20 insertions, 0 deletions

diff --git a/source4/build/pidl/util.pm b/source4/build/pidl/util.pm
index 7293a903d5..0f09a8571f 100644
--- a/source4/build/pidl/util.pm
+++ b/source4/build/pidl/util.pm
@@ -4,6 +4,8 @@
 # released under the GNU GPL
 package util;
 
+my %is_enum;
+
 #####################################################################
 # load a data structure from a file (as saved with SaveStructure)
 sub LoadStructure($)
@@ -200,6 +202,20 @@ sub property_matches($$$)
 	return undef;
 }
 
+my %enum_list;
+
+sub register_enum($)
+{
+	my $name = shift;
+	$enum_list{$name} = 1;
+}
+
+sub is_enum($)
+{
+	my $name = shift;
+	return defined $enum_list{$name}
+}
+
 sub is_scalar_type($)
 {
     my($type) = shift;
@@ -213,6 +229,10 @@ sub is_scalar_type($)
 	    return 1;
     }
 
+    if (is_enum($type)) {
+	    return 1;
+    }
+    
     return 0;
 }