mirror of
https://github.com/pgvector/pgvector.git
synced 2026-06-06 14:01:31 +08:00
53 lines
1.3 KiB
Perl
53 lines
1.3 KiB
Perl
use strict;
|
|
use warnings;
|
|
use PostgresNode;
|
|
use TestLib;
|
|
use Test::More tests => 7;
|
|
|
|
my $dim = 768;
|
|
|
|
my $array_sql = join(",", ('random()') x $dim);
|
|
|
|
# Initialize node
|
|
my $node = get_new_node('node');
|
|
$node->init;
|
|
$node->start;
|
|
|
|
# Create table and index
|
|
$node->safe_psql("postgres", "CREATE EXTENSION vector;");
|
|
$node->safe_psql("postgres", "CREATE TABLE tst (v vector($dim));");
|
|
$node->safe_psql("postgres",
|
|
"INSERT INTO tst SELECT ARRAY[$array_sql] FROM generate_series(1, 10000) i;"
|
|
);
|
|
$node->safe_psql("postgres", "CREATE INDEX ON tst USING ivfflat (v);");
|
|
|
|
$node->pgbench(
|
|
"--no-vacuum --client=5 --transactions=100",
|
|
0,
|
|
[qr{actually processed}],
|
|
[qr{^$}],
|
|
"concurrent INSERTs",
|
|
{
|
|
"007_inserts" => "INSERT INTO tst SELECT ARRAY[$array_sql] FROM generate_series(1, 10) i;"
|
|
}
|
|
);
|
|
|
|
sub idx_scan
|
|
{
|
|
$node->safe_psql("postgres", "SELECT idx_scan FROM pg_stat_user_indexes WHERE indexrelid = 'tst_v_idx'::regclass;");
|
|
}
|
|
|
|
my $expected = 10000 + 5 * 100 * 10;
|
|
|
|
my $count = $node->safe_psql("postgres", "SELECT COUNT(*) FROM tst;");
|
|
is($count, $expected);
|
|
is(idx_scan(), 0);
|
|
|
|
$count = $node->safe_psql("postgres", qq(
|
|
SET enable_seqscan = off;
|
|
SET ivfflat.probes = 100;
|
|
SELECT COUNT(*) FROM (SELECT v FROM tst ORDER BY v <-> (SELECT v FROM tst LIMIT 1)) t;
|
|
));
|
|
is($count, $expected);
|
|
is(idx_scan(), 1);
|