mirror of
https://github.com/pgvector/pgvector.git
synced 2026-06-06 05:51:21 +08:00
75 lines
1.9 KiB
Perl
75 lines
1.9 KiB
Perl
use strict;
|
|
use warnings FATAL => 'all';
|
|
use PostgreSQL::Test::Cluster;
|
|
use PostgreSQL::Test::Utils;
|
|
use Test::More;
|
|
|
|
# Ensures elements and neighbors on both same and different pages
|
|
my $dim = 1900;
|
|
|
|
my $array_sql = join(",", ('random()') x $dim);
|
|
|
|
# Initialize node
|
|
my $node = PostgreSQL::Test::Cluster->new('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", "CREATE INDEX ON tst USING hnsw (v vector_l2_ops);");
|
|
|
|
sub idx_scan
|
|
{
|
|
# Stats do not update instantaneously
|
|
# https://www.postgresql.org/docs/current/monitoring-stats.html#MONITORING-STATS-VIEWS
|
|
sleep(1);
|
|
$node->safe_psql("postgres", "SELECT idx_scan FROM pg_stat_user_indexes WHERE indexrelid = 'tst_v_idx'::regclass;");
|
|
}
|
|
|
|
for my $i (1 .. 20)
|
|
{
|
|
$node->pgbench(
|
|
"--no-vacuum --client=10 --transactions=1",
|
|
0,
|
|
[qr{actually processed}],
|
|
[qr{^$}],
|
|
"concurrent INSERTs",
|
|
{
|
|
"014_hnsw_inserts_$i" => "INSERT INTO tst VALUES (ARRAY[$array_sql]);"
|
|
}
|
|
);
|
|
|
|
my $count = $node->safe_psql("postgres", qq(
|
|
SET enable_seqscan = off;
|
|
SELECT COUNT(*) FROM (SELECT v FROM tst ORDER BY v <-> (SELECT v FROM tst LIMIT 1)) t;
|
|
));
|
|
is($count, 10);
|
|
|
|
$node->safe_psql("postgres", "TRUNCATE tst;");
|
|
}
|
|
|
|
$node->pgbench(
|
|
"--no-vacuum --client=20 --transactions=5",
|
|
0,
|
|
[qr{actually processed}],
|
|
[qr{^$}],
|
|
"concurrent INSERTs",
|
|
{
|
|
"014_hnsw_inserts" => "INSERT INTO tst SELECT ARRAY[$array_sql] FROM generate_series(1, 10) i;"
|
|
}
|
|
);
|
|
|
|
my $count = $node->safe_psql("postgres", qq(
|
|
SET enable_seqscan = off;
|
|
SET hnsw.ef_search = 1000;
|
|
SELECT COUNT(*) FROM (SELECT v FROM tst ORDER BY v <-> (SELECT v FROM tst LIMIT 1)) t;
|
|
));
|
|
# Elements may lose all incoming connections with the HNSW algorithm
|
|
# Vacuuming can fix this if one of the elements neighbors is deleted
|
|
cmp_ok($count, ">=", 997);
|
|
|
|
is(idx_scan(), 21);
|
|
|
|
done_testing();
|