Extended tlvfile to include CAPF, SRST and TVS

This commit is contained in:
Diederik de Groot
2020-03-12 14:55:07 +01:00
parent b2708e4611
commit 6ef72cda50

View File

@@ -176,7 +176,6 @@ sub parse_tlv {
$record_function = $function; $record_function = $function;
print 'Function: '; print 'Function: ';
if ($function == FUNCTION_SAST) { if ($function == FUNCTION_SAST) {
print 'SAST'; print 'SAST';
} elsif ($function == FUNCTION_CCM) { } elsif ($function == FUNCTION_CCM) {
@@ -185,10 +184,17 @@ sub parse_tlv {
print 'CCM+TFTP'; print 'CCM+TFTP';
} elsif ($function == FUNCTION_TFTP) { } elsif ($function == FUNCTION_TFTP) {
print 'TFTP'; print 'TFTP';
} elsif ($function == FUNCTION_CAPF) {
print 'CAPF';
} elsif ($function == FUNCTION_SRST) {
print 'SRST';
} elsif ($function == FUNCTION_HTTPS) { } elsif ($function == FUNCTION_HTTPS) {
print 'HTTPS'; print 'HTTPS';
} elsif ($function == FUNCTION_TVS) {
print 'TVS';
} else {
print 'Unknown';
} }
print "\n"; print "\n";
} elsif ($parser->tag == RECORD_ISSUER_NAME) { } elsif ($parser->tag == RECORD_ISSUER_NAME) {
my $issuer_name = unpack ('Z*', $parser->next_value); my $issuer_name = unpack ('Z*', $parser->next_value);
@@ -432,8 +438,14 @@ sub build_tlv {
FUNCTION_CCM_TFTP; FUNCTION_CCM_TFTP;
} elsif ($function eq 'TFTP') { } elsif ($function eq 'TFTP') {
FUNCTION_TFTP; FUNCTION_TFTP;
} elsif ($function eq 'CAPF') {
FUNCTION_CAPF;
} elsif ($function eq 'SRST') {
FUNCTION_SRST;
} elsif ($function eq 'HTTPS') { } elsif ($function eq 'HTTPS') {
FUNCTION_HTTPS; FUNCTION_HTTPS;
} elsif ($function eq 'TVS') {
FUNCTION_TVS;
} else { } else {
die 'Unknown record function: ' . $function; die 'Unknown record function: ' . $function;
}; };