File: basic_archive.sql

package info (click to toggle)
postgresql-18 18.1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 156,452 kB
  • sloc: ansic: 993,977; sql: 127,739; perl: 59,135; xml: 30,905; yacc: 21,023; lex: 9,000; makefile: 6,883; sh: 5,372; cpp: 988; python: 710; asm: 40; sed: 3
file content (22 lines) | stat: -rw-r--r-- 435 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
CREATE TABLE test (a INT);
SELECT 1 FROM pg_switch_wal();

DO $$
DECLARE
	archived bool;
	loops int := 0;
BEGIN
	LOOP
		archived := count(*) > 0 FROM pg_ls_dir('.', false, false) a
			WHERE a ~ '^[0-9A-F]{24}$';
		IF archived OR loops > 120 * 10 THEN EXIT; END IF;
		PERFORM pg_sleep(0.1);
		loops := loops + 1;
	END LOOP;
END
$$;

SELECT count(*) > 0 FROM pg_ls_dir('.', false, false) a
	WHERE a ~ '^[0-9A-F]{24}$';

DROP TABLE test;