diff options
| -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; |