Changeset 1465:2f65b828eced in freeDiameter for contrib
- Timestamp:
- Mar 10, 2020, 7:50:10 AM (4 years ago)
- Branch:
- default
- Phase:
- public
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
contrib/tools/org_to_fd.pl
r1459 r1465 25 25 26 26 return "AVP_TYPE_GROUPED" if ($type =~ m/Grouped/); 27 return "AVP_TYPE_OCTETSTRING" if ($type =~ m/(Address|DiameterIdentity|DiameterURI|OctetString|IPFilterRule|Time|UTF8String )/);27 return "AVP_TYPE_OCTETSTRING" if ($type =~ m/(Address|DiameterIdentity|DiameterURI|OctetString|IPFilterRule|Time|UTF8String|QoSFilterRule)/); 28 28 return "AVP_TYPE_INTEGER32" if ($type =~ m/Enumerated|Integer32/); 29 29 return "AVP_TYPE_INTEGER64" if ($type =~ m/Integer64/); … … 33 33 return "AVP_TYPE_FLOAT64" if ($type =~ m/Float64/); 34 34 35 return "UNKNOWN TYPE: $type";35 die("unknown type '$type'"); 36 36 } 37 37 … … 68 68 69 69 sub usage($) { 70 die(sprintf("usage: %s [-V vendor_name] [-v vendor_code] [file ...]\n", $progname));71 exit( @_);70 print STDERR "usage: $progname [-V vendor_name] [-v vendor_code] [file ...]\n"; 71 exit(1); 72 72 } 73 73 … … 86 86 print_comment(""); 87 87 print_comment("The following is created automatically with:"); 88 print_comment( sprintf(" org_to_fd.pl -V '%s' -v %s", $vendor_name, $vendor));88 print_comment(" org_to_fd.pl -V '$vendor_name' -v $vendor"); 89 89 print_comment("Changes will be lost during the next update."); 90 90 print_comment("Do not modify; modify the source .org file instead."); … … 106 106 107 107 if ($name =~ m/\s/) { 108 die( sprintf("name '%s' contains space", $name));108 die("name '$name' contains space"); 109 109 } 110 110
Note: See TracChangeset
for help on using the changeset viewer.