Print full container types in record_fields()

This commit is contained in:
Henri DF 2019-11-12 13:16:38 +01:00
parent b86a8acc2b
commit 26633eb727
3 changed files with 46 additions and 2 deletions

View file

@ -846,6 +846,35 @@ TableVal* RecordType::GetRecordFieldsVal(const RecordVal* rv) const
if ( ft->Tag() == TYPE_RECORD )
nr->Assign(0, new StringVal("record " + ft->GetName()));
else if ( ft->Tag() == TYPE_VECTOR )
{
string s = "vector[";
s += type_name(ft->YieldType()->Tag());
s += "]";
nr->Assign(0, new StringVal(s));
}
else if ( ft->Tag() == TYPE_TABLE )
{
string s;
if ( ft->IsSet() )
s = "set[";
else
s = "table[";
const type_list* tl = ((const IndexType*) ft)->IndexTypes();
loop_over_list(*tl, i)
{
if (i > 0)
s += ",";
s += type_name((*tl)[i]->Tag());
}
s += "]";
if (ft->YieldType())
{
s += " of ";
s += type_name(ft->YieldType()->Tag());
}
nr->Assign(0, new StringVal(s));
}
else
nr->Assign(0, new StringVal(type_name(ft->Tag())));

View file

@ -48,3 +48,9 @@ F
[a] = [type_name=count, log=F, value=<uninitialized>, default_val=<uninitialized>],
[d] = [type_name=string, log=T, value=<uninitialized>, default_val=<uninitialized>]
}
{
[a] = [type_name=set[double], log=F, value=<uninitialized>, default_val=<uninitialized>],
[b] = [type_name=set[double,string], log=F, value=<uninitialized>, default_val=<uninitialized>],
[c] = [type_name=table[double,string] of string, log=F, value=<uninitialized>, default_val=<uninitialized>],
[d] = [type_name=vector[string], log=F, value=<uninitialized>, default_val=<uninitialized>]
}

View file

@ -24,6 +24,13 @@ type r: record {
type mystring: string;
type cr: record {
a: set[double];
b: set[double, string];
c: table[double, string] of string;
d: vector of string;
};
event zeek_init()
{
local x: r = [$a=42, $d="Bar", $e=tt];
@ -47,4 +54,6 @@ event zeek_init()
print record_fields("myrec");
print record_fields("tt");
print record_fields("r");
print record_fields("cr");
}