mirror of
https://github.com/zeek/zeek.git
synced 2025-10-02 06:38:20 +00:00
d5fd29edcd
While we support initializing records via coercion from an expression
list, e.g.,
local x: X = [$x1=1, $x2=2];
this can sometimes obscure the code to readers, e.g., when assigning to
value declared and typed elsewhere. The language runtime has a similar
overhead since instead of just constructing a known type it needs to
check at runtime that the coercion from the expression list is valid;
this can be slower than just writing the readible code in the first
place, see #4559.
With this patch we use explicit construction, e.g.,
local x = X($x1=1, $x2=2);
40 lines
1.3 KiB
Text
40 lines
1.3 KiB
Text
##! Software identification and extraction for HTTP traffic.
|
|
|
|
@load base/frameworks/software
|
|
|
|
module HTTP;
|
|
|
|
export {
|
|
redef enum Software::Type += {
|
|
## Identifier for web servers in the software framework.
|
|
SERVER,
|
|
## Identifier for app servers in the software framework.
|
|
APPSERVER,
|
|
## Identifier for web browsers in the software framework.
|
|
BROWSER,
|
|
};
|
|
|
|
## The pattern of HTTP User-Agents which you would like to ignore.
|
|
option ignored_user_agents = /NO_DEFAULT/;
|
|
}
|
|
|
|
event http_header(c: connection, is_orig: bool, name: string, value: string) &priority=2
|
|
{
|
|
if ( is_orig )
|
|
{
|
|
if ( name == "USER-AGENT" && ignored_user_agents !in value )
|
|
Software::found(c$id, Software::Info($unparsed_version=value, $host=c$id$orig_h, $software_type=BROWSER));
|
|
}
|
|
else
|
|
{
|
|
if ( name == "SERVER" )
|
|
Software::found(c$id, Software::Info($unparsed_version=value, $host=c$id$resp_h, $host_p=c$id$resp_p, $software_type=SERVER));
|
|
else if ( name == "X-POWERED-BY" )
|
|
Software::found(c$id, Software::Info($unparsed_version=value, $host=c$id$resp_h, $host_p=c$id$resp_p, $software_type=APPSERVER));
|
|
else if ( name == "MICROSOFTSHAREPOINTTEAMSERVICES" )
|
|
{
|
|
value = cat("SharePoint/", value);
|
|
Software::found(c$id, Software::Info($unparsed_version=value, $host=c$id$resp_h, $host_p=c$id$resp_p, $software_type=APPSERVER));
|
|
}
|
|
}
|
|
}
|