mirror of
https://github.com/zeek/zeek.git
synced 2025-10-02 06:38:20 +00:00
143 lines
4.4 KiB
Text
143 lines
4.4 KiB
Text
# @TEST-PORT: BROKER_PORT1
|
|
# @TEST-PORT: BROKER_PORT2
|
|
# @TEST-PORT: BROKER_PORT3
|
|
|
|
# @TEST-EXEC: zeek -b %DIR/sort-stuff.zeek common.zeek preseed-sqlite.zeek
|
|
# @TEST-EXEC: btest-bg-run manager-1 "ZEEKPATH=$ZEEKPATH:.. CLUSTER_NODE=manager-1 zeek -b %DIR/sort-stuff.zeek ../common.zeek ../master.zeek >../master.out"
|
|
# @TEST-EXEC: btest-bg-run worker-1 "ZEEKPATH=$ZEEKPATH:.. CLUSTER_NODE=worker-1 zeek -b %DIR/sort-stuff.zeek ../common.zeek ../clone.zeek >../clone.out"
|
|
# @TEST-EXEC: btest-bg-run worker-2 "ZEEKPATH=$ZEEKPATH:.. CLUSTER_NODE=worker-2 zeek -b %DIR/sort-stuff.zeek ../common.zeek ../clone.zeek >../clone2.out"
|
|
# @TEST-EXEC: btest-bg-wait 40
|
|
#
|
|
# @TEST-EXEC: btest-diff master.out
|
|
# @TEST-EXEC: btest-diff clone.out
|
|
# @TEST-EXEC: diff master.out clone.out
|
|
# @TEST-EXEC: diff master.out clone2.out
|
|
|
|
@TEST-START-FILE cluster-layout.zeek
|
|
redef Cluster::nodes = {
|
|
["manager-1"] = [$node_type=Cluster::MANAGER, $ip=127.0.0.1, $p=to_port(getenv("BROKER_PORT1"))],
|
|
["worker-1"] = [$node_type=Cluster::WORKER, $ip=127.0.0.1, $p=to_port(getenv("BROKER_PORT2")), $manager="manager-1", $interface="eth0"],
|
|
["worker-2"] = [$node_type=Cluster::WORKER, $ip=127.0.0.1, $p=to_port(getenv("BROKER_PORT3")), $manager="manager-1", $interface="eth0"],
|
|
};
|
|
@TEST-END-FILE
|
|
|
|
@TEST-START-FILE common.zeek
|
|
type testrec: record {
|
|
a: count;
|
|
b: string;
|
|
c: set[string];
|
|
};
|
|
@TEST-END-FILE
|
|
|
|
@TEST-START-FILE preseed-sqlite.zeek
|
|
global t: table[string] of count &backend=Broker::SQLITE;
|
|
global s: set[string] &backend=Broker::SQLITE;
|
|
global r: table[string] of testrec &broker_allow_complex_type &backend=Broker::SQLITE;
|
|
global rt: table[string, count, count] of count &backend=Broker::SQLITE;
|
|
|
|
event zeek_init()
|
|
{
|
|
t["a"] = 5;
|
|
delete t["a"];
|
|
add s["hi"];
|
|
t["a"] = 2;
|
|
t["a"] = 3;
|
|
t["b"] = 3;
|
|
t["c"] = 4;
|
|
delete t["c"];
|
|
t["whatever"] = 5;
|
|
r["a"] = testrec($a=1, $b="b", $c=set("elem1", "elem2"));
|
|
r["a"] = testrec($a=1, $b="c", $c=set("elem1", "elem2"));
|
|
r["b"] = testrec($a=2, $b="d", $c=set("elem1", "elem2"));
|
|
rt["a", 1, 2] = 1;
|
|
rt["a", 1, 2] += 1;
|
|
rt["a", 1, 3] = 2;
|
|
delete rt["a", 1, 3];
|
|
print sort_table(t);
|
|
print sort_set(s);
|
|
print sort_table(r);
|
|
print rt;
|
|
}
|
|
|
|
@TEST-END-FILE
|
|
|
|
@TEST-START-FILE master.zeek
|
|
@load base/frameworks/cluster
|
|
|
|
redef exit_only_after_terminate = T;
|
|
redef Log::enable_local_logging = T;
|
|
redef Log::default_rotation_interval = 0secs;
|
|
|
|
function change_function(t: table[string] of count, tpe: TableChange, idxa: string, val: count)
|
|
{
|
|
print "This should not print";
|
|
print "change_function", idxa, val, tpe;
|
|
}
|
|
|
|
global t: table[string] of count &backend=Broker::SQLITE &on_change=change_function;
|
|
global s: set[string] &backend=Broker::SQLITE;
|
|
global r: table[string] of testrec &broker_allow_complex_type &backend=Broker::SQLITE;
|
|
global rt: table[string, count, count] of count &backend=Broker::SQLITE;
|
|
|
|
redef Broker::table_store_db_directory = "..";
|
|
|
|
event zeek_init()
|
|
{
|
|
print sort_table(t);
|
|
print sort_set(s);
|
|
print sort_table(r);
|
|
print rt;
|
|
}
|
|
|
|
global peers_lost = 0;
|
|
event Broker::peer_lost(endpoint: Broker::EndpointInfo, msg: string)
|
|
{
|
|
++peers_lost;
|
|
|
|
if ( peers_lost == 2 )
|
|
terminate();
|
|
}
|
|
|
|
@TEST-END-FILE
|
|
|
|
@TEST-START-FILE clone.zeek
|
|
@load base/frameworks/cluster
|
|
|
|
redef exit_only_after_terminate = T;
|
|
redef Log::enable_local_logging = T;
|
|
redef Log::default_rotation_interval = 0secs;
|
|
|
|
global t: table[string] of count &backend=Broker::MEMORY;
|
|
global s: set[string] &backend=Broker::MEMORY;
|
|
global r: table[string] of testrec &broker_allow_complex_type &backend=Broker::MEMORY;
|
|
# This _should_ work with both SQLITE and MEMORY, since Zeek should figure out itself that
|
|
# the manager has the main copy.
|
|
global rt: table[string, count, count] of count &backend=Broker::SQLITE;
|
|
|
|
event dump_tables()
|
|
{
|
|
print sort_table(t);
|
|
print sort_set(s);
|
|
print sort_table(r);
|
|
print rt;
|
|
terminate();
|
|
}
|
|
|
|
event check_all_set()
|
|
{
|
|
# Note: 'a' gets inserted first into 'r'. However, we may still observe 'r'
|
|
# with 'b' but without 'a'. This may happen if the clone completes
|
|
# its handshake with the server after 'a' and 'b' are already in 'r'.
|
|
# In this case, the master sends a snapshot of its state and the
|
|
# insertion events for 'a' and 'b' they may trigger in any order.
|
|
if ( "whatever" in t && "hi" in s && "a" in r && "b" in r )
|
|
event dump_tables();
|
|
else
|
|
schedule 0.1sec { check_all_set() };
|
|
}
|
|
|
|
event Cluster::node_up(name: string, id: string)
|
|
{
|
|
schedule 0.1sec { check_all_set() };
|
|
}
|
|
@TEST-END-FILE
|