mirror of
https://github.com/zeek/zeek.git
synced 2025-10-04 07:38:19 +00:00
597a4d6704
- policy/ renamed to scripts/ - By default BROPATH now contains: - scripts/ - scripts/policy - scripts/site - *Nearly* all tests pass. - All of scripts/base/ is loaded by main.cc - Can be disabled by setting $BRO_NO_BASE_SCRIPTS - Scripts in scripts/base/ don't use relative path loading to ease use of BRO_NO_BASE_SCRIPTS (to copy and paste that script). - The scripts in scripts/base/protocols/ only (or soon will only) do logging and state building. - The scripts in scripts/base/frameworks/ add functionality without causing any additional overhead. - All "detection" activity happens through scripts in scripts/policy/. - Communications framework modified temporarily to need an environment variable to actually enable (ENABLE_COMMUNICATION=1) - This is so the communications framework can be loaded as part of the base without causing trouble when it's not needed. - This will be removed once a resolution to ticket #540 is reached.
40 lines
947 B
Text
40 lines
947 B
Text
|
|
redef dns_skip_all_auth = F;
|
|
redef dns_skip_all_addl = F;
|
|
|
|
module DNS;
|
|
|
|
export {
|
|
redef record Info += {
|
|
auth: set[string] &log &optional;
|
|
addl: set[string] &log &optional;
|
|
};
|
|
}
|
|
|
|
event do_reply(c: connection, msg: dns_msg, ans: dns_answer, reply: string) &priority=4
|
|
{
|
|
# The "ready" flag will be set here. This causes the setting from the
|
|
# base script to be overridden since the base script will log immediately
|
|
# after all of the ANS replies have been seen.
|
|
c$dns$ready=F;
|
|
|
|
if ( ans$answer_type == DNS_AUTH )
|
|
{
|
|
if ( ! c$dns?$auth )
|
|
c$dns$auth = set();
|
|
add c$dns$auth[reply];
|
|
}
|
|
else if ( ans$answer_type == DNS_ADDL )
|
|
{
|
|
if ( ! c$dns?$addl )
|
|
c$dns$addl = set();
|
|
add c$dns$addl[reply];
|
|
}
|
|
|
|
if ( c$dns?$answers && c$dns?$auth && c$dns?$addl &&
|
|
c$dns$total_replies == |c$dns$answers| + |c$dns$auth| + |c$dns$addl| )
|
|
{
|
|
# *Now* all replies desired have been seen.
|
|
c$dns$ready = T;
|
|
}
|
|
}
|