mirror of
https://github.com/zeek/zeek.git
synced 2025-10-14 04:28:20 +00:00
ab15437339
- Moving all functions into the Log::* namespace, using the recent bifcl updates. Moved logging-specific stuff to logging.bif. - Log::create_stream() now takes a record Log::Stream as its second argument, which specifies columns and (optionally) the event. - All the internal BiFs are now called "Log::__<something>", with script-level wrappers "Log::<something>". That first allows to add additional code at the script-level, and second makes things better comprehendible as now all relevant functionality is collected (and later documetned) in policy/logging.bro. - New function Log::flush(id), which does the obvious assuming the writer supports it. - add_default_filter() is now called implicitly with every create_stream(). Seems that we usually want that functionality, and when not, remove_default_filter() gets rid of it. - The namespace of a stream's ID is now used as the default "path" (e.g., if the namespace is SSH, the default log file is "ssh.log"). - Updated policy/test-logging.bro as well as the btest tests according to these changes.
50 lines
1.5 KiB
Text
50 lines
1.5 KiB
Text
module SSH;
|
|
|
|
export {
|
|
# Create a new ID for our log stream
|
|
redef enum Log::ID += { SSH };
|
|
|
|
# Define a record with all the columns the log file can have.
|
|
# (I'm using a subset of fields from ssh-ext for demonstration.)
|
|
type Log: record {
|
|
t: time;
|
|
id: conn_id; # Will be rolled out into individual columns.
|
|
status: string &optional;
|
|
country: string &default="unknown";
|
|
};
|
|
}
|
|
|
|
global log_ssh: event(rec: Log);
|
|
|
|
function fail(rec: Log): bool
|
|
{
|
|
return rec$status != "success";
|
|
}
|
|
|
|
event bro_init()
|
|
{
|
|
# Create the stream.
|
|
# First argument is the ID for the stream.
|
|
# Second argument is a record of type Log::Stream.
|
|
Log::create_stream(SSH, [$columns=Log, $ev=log_ssh]);
|
|
|
|
Log::add_filter(SSH, [$name="f1", $path="ssh.success", $pred=function(rec: Log): bool { return rec$status == "success"; }]);
|
|
Log::add_filter(SSH, [$name="f2", $path="ssh.failure", $pred=fail]);
|
|
|
|
local cid = [$orig_h=1.2.3.4, $orig_p=1234/tcp, $resp_h=2.3.4.5, $resp_p=80/tcp];
|
|
|
|
local r: Log = [$t=network_time(), $id=cid, $status="success"];
|
|
|
|
# Log something.
|
|
Log::write(SSH, r);
|
|
Log::write(SSH, [$t=network_time(), $id=cid, $status="failure", $country="US"]);
|
|
Log::write(SSH, [$t=network_time(), $id=cid, $status="failure", $country="UK"]);
|
|
Log::write(SSH, [$t=network_time(), $id=cid, $status="success", $country="BR"]);
|
|
Log::write(SSH, [$t=network_time(), $id=cid, $status="failure", $country="MX"]);
|
|
}
|
|
|
|
event log_ssh(rec: Log)
|
|
{
|
|
print fmt("Ran the log handler from the same module. Extracting time: %0.6f", rec$t);
|
|
print rec;
|
|
}
|