diff options
author | Stefan Metzmacher <metze@samba.org> | 2005-01-05 16:31:05 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:08:19 -0500 |
commit | ecd9557922ec676214c72be93684eb7d54ec5773 (patch) | |
tree | 47d5f90940ccd55e87287d4bcc79d1a24bbe25d6 /source4 | |
parent | 4a49604e6c84597f97d98dd884f053edd6a84da3 (diff) | |
download | samba-ecd9557922ec676214c72be93684eb7d54ec5773.tar.gz samba-ecd9557922ec676214c72be93684eb7d54ec5773.tar.bz2 samba-ecd9557922ec676214c72be93684eb7d54ec5773.zip |
r4540: sync enum and bitmap code
metze
(This used to be commit 2f3aea72ee7d9d90f7b910d11bdd1e96f9f0ebe1)
Diffstat (limited to 'source4')
-rw-r--r-- | source4/build/pidl/header.pm | 2 | ||||
-rw-r--r-- | source4/build/pidl/parser.pm | 31 | ||||
-rw-r--r-- | source4/build/pidl/util.pm | 24 |
3 files changed, 26 insertions, 31 deletions
diff --git a/source4/build/pidl/header.pm b/source4/build/pidl/header.pm index 15a0bd4276..10adf94dba 100644 --- a/source4/build/pidl/header.pm +++ b/source4/build/pidl/header.pm @@ -98,7 +98,7 @@ sub HeaderEnum($$) my($enum) = shift; my($name) = shift; - util::register_enum($name); + util::register_enum($enum, $name); $res .= "\nenum $name {\n"; $tab_depth++; diff --git a/source4/build/pidl/parser.pm b/source4/build/pidl/parser.pm index 00d48270de..2aa7dfc3d6 100644 --- a/source4/build/pidl/parser.pm +++ b/source4/build/pidl/parser.pm @@ -469,17 +469,14 @@ sub ParseElementPullSwitch($$$$) !util::has_property($utype, "nodiscriminant")) { my $e2 = find_sibling($e, $switch); my $type_decl = $e2->{TYPE}; - my $type_fn = $e2->{TYPE}; pidl "\tif (($ndr_flags) & NDR_SCALARS) {\n"; if (util::is_enum($e2->{TYPE})) { $type_decl = util::enum_type_decl($e2); - $type_fn = util::enum_type_fn($e2); } elsif (util::is_bitmap($e2->{TYPE})) { $type_decl = util::bitmap_type_decl($e2); - $type_fn = util::bitmap_type_fn($e2); } pidl "\t\t$type_decl _level;\n"; - pidl "\t\tNDR_CHECK(ndr_pull_$type_fn(ndr, &_level));\n"; + pidl "\t\tNDR_CHECK(ndr_pull_$e2->{TYPE}(ndr, &_level));\n"; if ($switch_var =~ /r->in/) { pidl "\t\tif (!(ndr->flags & LIBNDR_FLAG_REF_ALLOC) && _level != $switch_var) {\n"; } else { @@ -804,16 +801,11 @@ sub ParseStructPush($) sub ParseEnumPush($) { my($enum) = shift; + my($type_fn) = util::enum_type_fn($enum); start_flags($enum); - if (util::has_property($enum->{PARENT}, "v1_enum")) { - pidl "\tNDR_CHECK(ndr_push_uint32(ndr, r));\n"; - } elsif (util::has_property($enum->{PARENT}, "enum8bit")) { - pidl "\tNDR_CHECK(ndr_push_uint8(ndr, r));\n"; - } else { - pidl "\tNDR_CHECK(ndr_push_uint16(ndr, r));\n"; - } + pidl "\tNDR_CHECK(ndr_push_$type_fn(ndr, r));\n"; end_flags($enum); } @@ -823,19 +815,12 @@ sub ParseEnumPush($) sub ParseEnumPull($) { my($enum) = shift; + my($type_fn) = util::enum_type_fn($enum); start_flags($enum); - if (util::has_property($enum->{PARENT}, "v1_enum")) { - pidl "\tuint32_t v;\n"; - pidl "\tNDR_CHECK(ndr_pull_uint32(ndr, &v));\n"; - } elsif (util::has_property($enum->{PARENT}, "enum8bit")) { - pidl "\tuint8_t v;\n"; - pidl "\tNDR_CHECK(ndr_pull_uint8(ndr, &v));\n"; - } else { - pidl "\tuint16_t v;\n"; - pidl "\tNDR_CHECK(ndr_pull_uint16(ndr, &v));\n"; - } + pidl "\t$type_fn v;\n"; + pidl "\tNDR_CHECK(ndr_pull_$type_fn(ndr, &v));\n"; pidl "\t*r = v;\n"; end_flags($enum); @@ -873,7 +858,6 @@ sub ParseEnumPrint($) sub ParseBitmapPush($) { my($bitmap) = shift; - my($type_decl) = util::bitmap_type_decl($bitmap); my($type_fn) = util::bitmap_type_fn($bitmap); start_flags($bitmap); @@ -888,12 +872,11 @@ sub ParseBitmapPush($) sub ParseBitmapPull($) { my($bitmap) = shift; - my($type_decl) = util::bitmap_type_decl($bitmap); my($type_fn) = util::bitmap_type_fn($bitmap); start_flags($bitmap); - pidl "\t$type_decl v;\n"; + pidl "\t$type_fn v;\n"; pidl "\tNDR_CHECK(ndr_pull_$type_fn(ndr, &v));\n"; pidl "\t*r = v;\n"; diff --git a/source4/build/pidl/util.pm b/source4/build/pidl/util.pm index 1b00bdea1b..e3ec3d6138 100644 --- a/source4/build/pidl/util.pm +++ b/source4/build/pidl/util.pm @@ -202,10 +202,11 @@ sub property_matches($$$) my %enum_list; -sub register_enum($) +sub register_enum($$) { + my $enum = shift; my $name = shift; - $enum_list{$name} = 1; + $enum_list{$name} = $enum; } sub is_enum($) @@ -214,16 +215,27 @@ sub is_enum($) return defined $enum_list{$name} } +sub get_enum($) +{ + my $name = shift; + return $enum_list{$name}; +} + sub enum_type_decl($) { - my $e = shift; - return "enum $e->{TYPE}"; + my $enum = shift; + return "enum $enum->{TYPE}"; } sub enum_type_fn($) { - my $e = shift; - return "$e->{TYPE}"; + my $enum = shift; + if (util::has_property($enum->{PARENT}, "enum8bit")) { + return "uint8"; + } elsif (util::has_property($enum->{PARENT}, "v1_enum")) { + return "uint32"; + } + return "uint16"; } my %bitmap_list; |