summaryrefslogtreecommitdiffstats
path: root/t/027_jit.t
diff options
context:
space:
mode:
authorDaniel Baumann <daniel.baumann@progress-linux.org>2024-05-14 19:15:04 +0000
committerDaniel Baumann <daniel.baumann@progress-linux.org>2024-05-14 19:15:04 +0000
commit05a59598b187dc56f9c427d44baa873cca578931 (patch)
tree62b3f4239bf255457a298cf99abc32e936264ce1 /t/027_jit.t
parentAdding debian version 259. (diff)
downloadpostgresql-common-05a59598b187dc56f9c427d44baa873cca578931.tar.xz
postgresql-common-05a59598b187dc56f9c427d44baa873cca578931.zip
Merging upstream version 260.
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to 't/027_jit.t')
-rw-r--r--t/027_jit.t44
1 files changed, 44 insertions, 0 deletions
diff --git a/t/027_jit.t b/t/027_jit.t
new file mode 100644
index 0000000..4ed5ddb
--- /dev/null
+++ b/t/027_jit.t
@@ -0,0 +1,44 @@
+use strict;
+
+use lib 't';
+use TestLib;
+
+use Test::More;
+
+my $arch = `dpkg --print-architecture`;
+chomp $arch;
+if (grep { $_ eq $arch} qw(alpha hppa hurd-i386 ia64 kfreebsd-amd64 kfreebsd-i386 loong64 m68k powerpc riscv64 sh4 sparc64 x32)) {
+ ok 1, "No JIT tests on $arch";
+ done_testing();
+ exit;
+}
+
+foreach my $v (@MAJORS) {
+ if ($v < 11) {
+ ok 1, "No JIT support on $v";
+ next;
+ }
+ note "$v";
+
+ program_ok 'root', "pg_createcluster $v main --start", 0;
+
+ my $jit_default = $v == '11' ? 'off' : 'on';
+ like_program_out 'postgres', "psql -Xatc 'show jit'", 0, qr/$jit_default/, "JIT is $jit_default by default";
+ program_ok 'root', "pg_conftool $v main set jit on", 0, "Turn on JIT on PG11" if ($v == 11);
+ program_ok 'root', "pg_ctlcluster $v main reload", 0 if ($v == 11);
+
+ unlike_program_out 'postgres', "psql -c 'explain (analyze) select count(*) from pg_class'", 0, qr/JIT/,
+ "No JIT on cheap query";
+ program_ok 'root', "pg_conftool $v main set seq_page_cost 100000", 0;
+ program_ok 'root', "pg_conftool $v main set random_page_cost 100000", 0;
+ program_ok 'root', "pg_ctlcluster $v main reload", 0;
+ like_program_out 'postgres', "psql -c 'explain (analyze) select count(*) from pg_class'", 0, qr/Timing: Generation .* ms/,
+ "Expensive query is JITed";
+
+ program_ok 'root', "pg_dropcluster --stop $v main", 0;
+ check_clean;
+}
+
+done_testing();
+
+# vim: filetype=perl