summaryrefslogtreecommitdiffstats
path: root/source
diff options
context:
space:
mode:
authorTim Potter <tpot@samba.org>2005-08-29 12:22:48 +0000
committerTim Potter <tpot@samba.org>2005-08-29 12:22:48 +0000
commitc40b67621be157a87806c4c1c48eae2185d9ba28 (patch)
tree62a2e42ebee8d7aed0c5abbca522337b3296e0a6 /source
parent24fa16415d3d2a0a1e4ed1d0ecf21cdd9a6ab55b (diff)
downloadsamba-c40b67621be157a87806c4c1c48eae2185d9ba28.tar.gz
samba-c40b67621be157a87806c4c1c48eae2185d9ba28.tar.xz
samba-c40b67621be157a87806c4c1c48eae2185d9ba28.zip
r9734: The ethereal parser generator was generating duplicate functions for
fields in structures with the same name as a structure (i.e security_ace.object and security_ace_object). I've twiddled the naming scheme a bit and things are a bit more unique but there is still may be some naming conflicts in other IDL files. We are now getting confused over fields with the same name in unions (e.g security_ace_object_ctr.object) plus some other union weirdness.
Diffstat (limited to 'source')
-rw-r--r--source/pidl/lib/Parse/Pidl/Ethereal/NDR.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/source/pidl/lib/Parse/Pidl/Ethereal/NDR.pm b/source/pidl/lib/Parse/Pidl/Ethereal/NDR.pm
index 92199e13f10..ad466b246a3 100644
--- a/source/pidl/lib/Parse/Pidl/Ethereal/NDR.pm
+++ b/source/pidl/lib/Parse/Pidl/Ethereal/NDR.pm
@@ -115,7 +115,7 @@ sub Enum($$$)
{
my ($e,$name,$ifname) = @_;
my $valsstring = "$ifname\_$name\_vals";
- my $dissectorname = "$ifname\_dissect\_".StripPrefixes($name)."_enum";
+ my $dissectorname = "$ifname\_dissect\_enum\_".StripPrefixes($name);
return if (defined($conformance->{noemit}->{$dissectorname}));
@@ -154,7 +154,7 @@ sub Enum($$$)
sub Bitmap($$$)
{
my ($e,$name,$ifname) = @_;
- my $dissectorname = "$ifname\_dissect\_".StripPrefixes($name)."_bitmap";
+ my $dissectorname = "$ifname\_dissect\_bitmap\_".StripPrefixes($name);
register_ett("ett_$ifname\_$name");
@@ -313,7 +313,7 @@ sub Element($$$)
{
my ($e,$pn,$ifname) = @_;
- my $dissectorname = "$ifname\_dissect\_".StripPrefixes($pn)."\_".StripPrefixes($e->{NAME});
+ my $dissectorname = "$ifname\_dissect\_element\_".StripPrefixes($pn)."\_".StripPrefixes($e->{NAME});
my $call_code = "offset = $dissectorname(tvb, offset, pinfo, tree, drep);";
@@ -402,7 +402,7 @@ sub Function($$$)
sub Struct($$$)
{
my ($e,$name,$ifname) = @_;
- my $dissectorname = "$ifname\_dissect\_".StripPrefixes($name);
+ my $dissectorname = "$ifname\_dissect\_struct\_".StripPrefixes($name);
return if (defined($conformance->{noemit}->{$dissectorname}));