From 8fccf75834c11798e3b13a4cebedfb8ae683857a Mon Sep 17 00:00:00 2001
From: Amit Kapila
Date: Tue, 13 Oct 2020 08:30:35 +0530
Subject: Add tests for logical replication spilled stats.

Commit 9868167500 added a mechanism to track statistics corresponding to
the spilling of changes from ReorderBuffer but didn't add any tests.

Author: Amit Kapila and Sawada Masahiko
Discussion: https://postgr.es/m/CA+fd4k5_pPAYRTDrO2PbtTOe0eHQpBvuqmCr8ic39uTNmR49Eg@mail.gmail.com
---
 contrib/test_decoding/sql/stats.sql | 62 +++++++++++++++++++++++++++++++++++++
 1 file changed, 62 insertions(+)
 create mode 100644 contrib/test_decoding/sql/stats.sql

(limited to 'contrib/test_decoding/sql')

diff --git a/contrib/test_decoding/sql/stats.sql b/contrib/test_decoding/sql/stats.sql
new file mode 100644
index 00000000000..7d406f0b113
--- /dev/null
+++ b/contrib/test_decoding/sql/stats.sql
@@ -0,0 +1,62 @@
+-- predictability
+SET synchronous_commit = on;
+
+SELECT 'init' FROM pg_create_logical_replication_slot('regression_slot', 'test_decoding');
+
+CREATE TABLE stats_test(data text);
+
+-- function to wait for counters to advance
+CREATE FUNCTION wait_for_decode_stats(check_reset bool) RETURNS void AS $$
+DECLARE
+  start_time timestamptz := clock_timestamp();
+  updated bool;
+BEGIN
+  -- we don't want to wait forever; loop will exit after 30 seconds
+  FOR i IN 1 .. 300 LOOP
+
+    -- check to see if all updates have been reset/updated
+    SELECT CASE WHEN check_reset THEN (spill_txns = 0)
+                ELSE (spill_txns > 0)
+           END
+    INTO updated
+    FROM pg_stat_replication_slots WHERE name='regression_slot';
+
+    exit WHEN updated;
+
+    -- wait a little
+    perform pg_sleep_for('100 milliseconds');
+
+    -- reset stats snapshot so we can test again
+    perform pg_stat_clear_snapshot();
+
+  END LOOP;
+
+  -- report time waited in postmaster log (where it won't change test output)
+  RAISE LOG 'wait_for_decode_stats delayed % seconds',
+    extract(epoch from clock_timestamp() - start_time);
+END
+$$ LANGUAGE plpgsql;
+
+-- spilling the xact
+BEGIN;
+INSERT INTO stats_test SELECT 'serialize-topbig--1:'||g.i FROM generate_series(1, 5000) g(i);
+COMMIT;
+SELECT count(*) FROM pg_logical_slot_peek_changes('regression_slot', NULL,NULL);
+
+-- check stats, wait for stats collector to update.
+SELECT wait_for_decode_stats(false);
+SELECT name, spill_txns, spill_count FROM pg_stat_replication_slots;
+
+-- reset the slot stats, and wait for stats collector to reset
+SELECT pg_stat_reset_replication_slot('regression_slot');
+SELECT wait_for_decode_stats(true);
+SELECT name, spill_txns, spill_count FROM pg_stat_replication_slots;
+
+-- decode and check stats again.
+SELECT count(*) FROM pg_logical_slot_peek_changes('regression_slot', NULL,NULL);
+SELECT wait_for_decode_stats(false);
+SELECT name, spill_txns, spill_count FROM pg_stat_replication_slots;
+
+DROP FUNCTION wait_for_decode_stats(bool);
+DROP TABLE stats_test;
+SELECT pg_drop_replication_slot('regression_slot');
-- 
cgit v1.2.3