diff options
| author | Matthieu Patou <mat@matws.net> | 2011-08-02 22:42:44 +0400 |
|---|---|---|
| committer | Matthieu Patou <mat@matws.net> | 2011-08-06 01:33:06 +0400 |
| commit | dc829a438a8b9f5cb8cd05dbbe24470bf192f935 (patch) | |
| tree | c4f50975f609494e74ef5702aeda968b54b4bfb4 | |
| parent | ba882bfd904fc9afb0b136c104ce9b51cf4bb3b0 (diff) | |
| download | samba-dc829a438a8b9f5cb8cd05dbbe24470bf192f935.tar.gz samba-dc829a438a8b9f5cb8cd05dbbe24470bf192f935.tar.bz2 samba-dc829a438a8b9f5cb8cd05dbbe24470bf192f935.zip | |
pidl: handle datablob for wireshark generator
| -rw-r--r-- | pidl/lib/Parse/Pidl/Wireshark/NDR.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/pidl/lib/Parse/Pidl/Wireshark/NDR.pm b/pidl/lib/Parse/Pidl/Wireshark/NDR.pm index 7c10a535f3..8c236a6020 100644 --- a/pidl/lib/Parse/Pidl/Wireshark/NDR.pm +++ b/pidl/lib/Parse/Pidl/Wireshark/NDR.pm @@ -332,6 +332,10 @@ sub ElementLevel($$$$$$$) } else { warn("Unable to handle string with flags $e->{PROPERTIES}->{flag}"); } + } elsif ($l->{DATA_TYPE} eq "DATA_BLOB") { + my $remain = 0; + $remain = 1 if (property_matches($e->{ORIGINAL}, "flag", ".*LIBNDR_FLAG_REMAINING.*")); + $self->pidl_code("offset = dissect_ndr_datablob(tvb, offset, pinfo, tree, drep, $hf, $remain);"); } else { my $call; |