mirror of
https://github.com/samba-team/samba.git
synced 2025-01-25 06:04:04 +03:00
8b24cae630
* Use "#!/usr/bin/env bash" for improved portability * Drop test_info() definition and replace it with a comment The use of test_info() is pointless. * Drop call to cluster_is_healthy() This is a holdover from when the previous test would restart daemons to get things ready for a test. There was also a bug where going into recovery during the restart would sometimes cause the cluster to become unhealthy. If we really need something like this then we can add it to ctdb_test_init(). * Make order of preamble consistent Signed-off-by: Martin Schwenke <martin@meltin.net> Reviewed-by: Amitay Isaacs <amitay@gmail.com>
63 lines
1.5 KiB
Bash
Executable File
63 lines
1.5 KiB
Bash
Executable File
#!/usr/bin/env bash
|
|
|
|
# Verify that 'ctdb statisticsreset' works as expected
|
|
|
|
# This is pretty superficial. It just checks that a few particular
|
|
# items reduce.
|
|
|
|
. "${TEST_SCRIPTS_DIR}/integration.bash"
|
|
|
|
set -e
|
|
|
|
ctdb_test_init
|
|
|
|
try_command_on_node 0 "$CTDB listnodes | wc -l"
|
|
num_nodes="$out"
|
|
|
|
get_stat ()
|
|
{
|
|
local label="$1"
|
|
|
|
cat "$outfile" |
|
|
sed -rn -e "s@^[[:space:]]+${label}[[:space:]]+([[:digit:]])@\1@p" |
|
|
head -1
|
|
}
|
|
|
|
check_reduced ()
|
|
{
|
|
local label="$1"
|
|
local before="$2"
|
|
local after="$3"
|
|
|
|
if [ $after -lt $before ] ; then
|
|
echo "GOOD: ${label} reduced from ${before} to ${after}"
|
|
else
|
|
die "BAD: ${label} did not reduce from ${before} to ${after}"
|
|
fi
|
|
}
|
|
|
|
n=0
|
|
while [ $n -lt $num_nodes ] ; do
|
|
echo "Getting initial statistics for node ${n}..."
|
|
|
|
try_command_on_node -v $n $CTDB statistics
|
|
|
|
before_req_control=$(get_stat "req_control")
|
|
before_reply_control=$(get_stat "reply_control")
|
|
before_node_packets_recv=$(get_stat "node_packets_recv")
|
|
|
|
try_command_on_node $n $CTDB statisticsreset
|
|
|
|
try_command_on_node -v $n $CTDB statistics
|
|
|
|
after_req_control=$(get_stat "req_control")
|
|
after_reply_control=$(get_stat "reply_control")
|
|
after_node_packets_recv=$(get_stat "node_packets_recv")
|
|
|
|
check_reduced "req_control" "$before_req_control" "$after_req_control"
|
|
check_reduced "reply_control" "$before_reply_control" "$after_reply_control"
|
|
check_reduced "node_packets_recv" "$before_node_packets_recv" "$after_node_packets_recv"
|
|
|
|
n=$(($n + 1))
|
|
done
|