From 371f00f2f0698915b49599a834696c7ae3631ce7 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Thu, 23 May 2019 09:36:50 +0000 Subject: xapcmd: xcpdb supports compaction To minimize the delay on active inboxes, it's actually ideal to run xapian-compact at the end of the per-partition cpdb process; since the new DB isn't accessible yet and so we don't have to deal with lock contention with -mda or -watch processes. The downside is temporary file overhead (3x instead of 2x) required. --- script/public-inbox-xcpdb | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) (limited to 'script/public-inbox-xcpdb') diff --git a/script/public-inbox-xcpdb b/script/public-inbox-xcpdb index d494991d..78d37da2 100755 --- a/script/public-inbox-xcpdb +++ b/script/public-inbox-xcpdb @@ -2,17 +2,21 @@ # Copyright (C) 2019 all contributors # License: AGPL-3.0+ # xcpdb: Xapian copy database, a wrapper around Xapian's copydatabase(1) +use Getopt::Long qw(:config gnu_getopt no_ignore_case auto_abbrev); use PublicInbox::InboxWritable; use PublicInbox::Xapcmd; use PublicInbox::Admin; PublicInbox::Admin::require_or_die('-search'); my $usage = "Usage: public-inbox-xcpdb INBOX_DIR\n"; +my $opt = {}; +GetOptions($opt, qw(compact)) or die "bad command-line args\n$usage"; my @ibxs = PublicInbox::Admin::resolve_inboxes(\@ARGV) or die $usage; + my $cmd = [ \&PublicInbox::Xapcmd::cpdb ]; open my $null, '>', '/dev/null' or die "failed to open /dev/null: $!\n"; -my $rdr = { 1 => fileno($null) }; +$opt->{1} = fileno($null); foreach (@ibxs) { my $ibx = PublicInbox::InboxWritable->new($_); # we rely on --no-renumber to keep docids synched to NNTP - PublicInbox::Xapcmd::run($ibx, $cmd, undef, $rdr); + PublicInbox::Xapcmd::run($ibx, $cmd, undef, $opt); } -- cgit v1.2.3-24-ge0c7