diff options
author | Guy Harris <guy@alum.mit.edu> | 2013-07-26 21:06:38 +0000 |
---|---|---|
committer | Guy Harris <guy@alum.mit.edu> | 2013-07-26 21:06:38 +0000 |
commit | 8d81fe9a0ea725ae07071e5cc6e6cee840dd4c08 (patch) | |
tree | ff783442a831a3046030132c74095e1612ac50d4 /tools/convert_proto_tree_add_text.pl | |
parent | 2675472389982d3ae9c71f6ff7f9936fc61fadb5 (diff) | |
download | wireshark-8d81fe9a0ea725ae07071e5cc6e6cee840dd4c08.tar.gz |
The descriptive name for a field is the field full name; the name used
in packet-matching expressions and TShark's -e flag and... is the
field's abbreviated name.
svn path=/trunk/; revision=50927
Diffstat (limited to 'tools/convert_proto_tree_add_text.pl')
-rwxr-xr-x | tools/convert_proto_tree_add_text.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tools/convert_proto_tree_add_text.pl b/tools/convert_proto_tree_add_text.pl index 3e3ddcb1d2..c018dddb13 100755 --- a/tools/convert_proto_tree_add_text.pl +++ b/tools/convert_proto_tree_add_text.pl @@ -347,7 +347,7 @@ sub generate_hfs { while ($$fileContentsRef =~ / $pat /xgso) { my @proto_tree_item = (1, 1, "tree", "hf_name", "tvb", "offset", "length", "encoding", - "fieldname", "fieldtype", "filtername", "BASE_NONE", "NULL", "0x0"); + "fieldfullname", "fieldtype", "fieldabbrevname", "BASE_NONE", "NULL", "0x0"); my $str = "${1}\n"; $str =~ tr/\t\n\r/ /d; $str =~ s/ \s+ / /xg; @@ -384,7 +384,7 @@ sub generate_hfs { } } - #Field name + #field full name if (($expert ne "") || (scalar @args > 5)) { my @arg_temp = split(/=|:/, $args[4]); $proto_tree_item[8] = $arg_temp[0]; @@ -394,11 +394,11 @@ sub generate_hfs { $proto_tree_item[8] =~ s/\"//; $proto_tree_item[8] = trim($proto_tree_item[8]); - #hf name + #hf variable name $proto_tree_item[3] = sprintf("hf_%s_%s", $protabbrev, lc($proto_tree_item[8])); $proto_tree_item[3] =~ s/\s+|-|:/_/g; - #filter name + #field abbreviated name $proto_tree_item[10] = sprintf("%s.%s", $protabbrev, lc($proto_tree_item[8])); $proto_tree_item[10] =~ s/\s+|-|:/_/g; |