Mercurial > hg > freeDiameter
comparison contrib/tools/org_to_fd.pl @ 1324:729e5074839f
Consistently start names of Enumerated types with 'Enumerated'.
| author | Thomas Klausner <tk@giga.or.at> |
|---|---|
| date | Mon, 27 Nov 2017 15:15:59 +0100 |
| parents | b6885b0d8b10 |
| children | 3338f135989d |
comparison
equal
deleted
inserted
replaced
| 1323:10143e09abdf | 1324:729e5074839f |
|---|---|
| 38 | 38 |
| 39 if ($type =~ m/(Grouped|OctetString|Integer32|Integer64|Unsigned32|Unsigned64|Float32|Float64)/) { | 39 if ($type =~ m/(Grouped|OctetString|Integer32|Integer64|Unsigned32|Unsigned64|Float32|Float64)/) { |
| 40 $avp_type = "NULL"; | 40 $avp_type = "NULL"; |
| 41 } elsif ($type =~ m/Enumerated/) { | 41 } elsif ($type =~ m/Enumerated/) { |
| 42 print "\t\tstruct dict_object *type;\n"; | 42 print "\t\tstruct dict_object *type;\n"; |
| 43 print "\t\tstruct dict_type_data tdata = { AVP_TYPE_INTEGER32, \"" . ($vendor_name ? "$vendor_name/" : "") ."Enumerated($name)\", NULL, NULL, NULL };\n"; | 43 print "\t\tstruct dict_type_data tdata = { AVP_TYPE_INTEGER32, \"Enumerated(" . ($vendor_name ? "$vendor_name/" : "") ."$name)\", NULL, NULL, NULL };\n"; |
| 44 # XXX: add enumerated values | 44 # XXX: add enumerated values |
| 45 print "\t\tCHECK_dict_new(DICT_TYPE, &tdata, NULL, &type);\n"; | 45 print "\t\tCHECK_dict_new(DICT_TYPE, &tdata, NULL, &type);\n"; |
| 46 $avp_type = "type"; | 46 $avp_type = "type"; |
| 47 } else { | 47 } else { |
| 48 $avp_type = "${type}_type"; | 48 $avp_type = "${type}_type"; |