mirror of
https://github.com/zeek/zeek.git
synced 2025-10-02 06:38:20 +00:00
101 lines
2.6 KiB
Text
101 lines
2.6 KiB
Text
# @TEST-PORT: BROKER_PORT
|
|
#
|
|
# @TEST-EXEC: btest-bg-run recv "zeek -D -b ../recv.zeek >recv.out"
|
|
# @TEST-EXEC: btest-bg-run send "zeek -D -b ../send.zeek >send.out"
|
|
#
|
|
# @TEST-EXEC: btest-bg-wait 45
|
|
# @TEST-EXEC: btest-diff recv/recv.out
|
|
# @TEST-EXEC: btest-diff send/send.out
|
|
|
|
# @TEST-START-FILE send.zeek
|
|
|
|
redef exit_only_after_terminate = T;
|
|
|
|
global event_count = 0;
|
|
global p: opaque of paraglob = paraglob_init(vector("hello", "*ello", "*"));
|
|
|
|
global ping: event(msg: opaque of paraglob, c: count);
|
|
|
|
event zeek_init()
|
|
{
|
|
print "Starting send.";
|
|
print paraglob_match(p, "hello");
|
|
Broker::subscribe("bro/event/my_topic");
|
|
Broker::peer("127.0.0.1", to_port(getenv("BROKER_PORT")));
|
|
print "is_remote should be F, and is", is_remote_event();
|
|
}
|
|
|
|
function send_event()
|
|
{
|
|
++event_count;
|
|
local e = Broker::make_event(ping, p, event_count);
|
|
Broker::publish("bro/event/my_topic", e);
|
|
}
|
|
|
|
event Broker::peer_added(endpoint: Broker::EndpointInfo, msg: string)
|
|
{
|
|
print fmt("sender added peer: endpoint=%s msg=%s",
|
|
endpoint$network$address, msg);
|
|
send_event();
|
|
}
|
|
|
|
event Broker::peer_lost(endpoint: Broker::EndpointInfo, msg: string)
|
|
{
|
|
print fmt("sender lost peer: endpoint=%s msg=%s",
|
|
endpoint$network$address, msg);
|
|
terminate();
|
|
}
|
|
|
|
event pong(msg: opaque of paraglob, n: count)
|
|
{
|
|
print "is_remote should be T, and is", is_remote_event();
|
|
print fmt("sender got pong number: %s", n);
|
|
send_event();
|
|
}
|
|
|
|
# @TEST-END-FILE
|
|
|
|
|
|
# @TEST-START-FILE recv.zeek
|
|
|
|
redef exit_only_after_terminate = T;
|
|
|
|
const events_to_recv = 3;
|
|
|
|
global handler: event(msg: string, c: count);
|
|
global auto_handler: event(msg: string, c: count);
|
|
|
|
global pong: event(msg: opaque of paraglob, c: count);
|
|
|
|
event zeek_init()
|
|
{
|
|
Broker::subscribe("bro/event/my_topic");
|
|
Broker::listen("127.0.0.1", to_port(getenv("BROKER_PORT")));
|
|
}
|
|
|
|
event Broker::peer_added(endpoint: Broker::EndpointInfo, msg: string)
|
|
{
|
|
print fmt("receiver added peer: endpoint=%s msg=%s", endpoint$network$address, msg);
|
|
}
|
|
|
|
event Broker::peer_lost(endpoint: Broker::EndpointInfo, msg: string)
|
|
{
|
|
print fmt("receiver lost peer: endpoint=%s msg=%s", endpoint$network$address, msg);
|
|
}
|
|
|
|
event ping(msg: opaque of paraglob, n: count)
|
|
{
|
|
print "is_remote should be T, and is", is_remote_event();
|
|
if ( n > events_to_recv )
|
|
{
|
|
terminate();
|
|
return;
|
|
}
|
|
print fmt("receiver got ping number: %s", n);
|
|
print paraglob_match(msg, "hello");
|
|
|
|
local e = Broker::make_event(pong, msg, n);
|
|
Broker::publish("bro/event/my_topic", e);
|
|
}
|
|
|
|
# @TEST-END-FILE
|