sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2025-01-15 23:24:37 +03:00
Code

r4993: Generate nicer name for enum hf.

Browse Source 
Start work on supporting bitmaps.
This commit is contained in:
Tim Potter 2005-01-25 23:14:46 +00:00 committed by Gerald (Jerry) Carter
parent 4640d3371e
commit 6f418f1426
1 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
source/build/pidl/eparser.pm
View File

@ -288,12 +288,24 @@ sub NeededTypedef($)
if ($t->{DATA}->{TYPE} eq "ENUM") {
$needed{"hf_$t->{NAME}"} = {
'name' => $t->{NAME},
'name' => field2name($t->{NAME}),
'ft' => 'FT_UINT16',
'base' => 'BASE_DEC',
'strings' => "VALS($t->{NAME}_vals)"
};
}
if ($t->{DATA}->{TYPE} eq "BITMAP") {
foreach my $e (@{$t->{DATA}{ELEMENTS}}) {
$e =~ /^(.*?) \( (.*?) \)$/;
$needed{"hf_$t->{NAME}_$1"} = {
'name' => "$t->{NAME} $1",
'ft' => "FT_BOOLEAN",
'base' => "32",
'bitmask' => "$2"
};
}
}
}
#####################################################################
@ -766,7 +778,8 @@ sub RewriteC($$$)
next, if !($x =~ /^hf_/);
pidl "\t{ &$x,\n";
$needed{$x}{strings} = "NULL", if !defined($needed{$x}{strings});
pidl "\t { \"$needed{$x}{name}\", \"$x\", $needed{$x}{ft}, $needed{$x}{base}, $needed{$x}{strings}, 0, \"$x\", HFILL }},\n";
$needed{$x}{bitmask} = "0", if !defined($needed{$x}{bitmask});
pidl "\t { \"$needed{$x}{name}\", \"$x\", $needed{$x}{ft}, $needed{$x}{base}, $needed{$x}{strings}, $needed{$x}{bitmask}, \"$x\", HFILL }},\n";
}
pidl "\t};\n\n";