extindex: speed up --reindex --fast

[public-inbox.git] / lib / PublicInbox / Over.pm

diff --git a/lib/PublicInbox/Over.pm b/lib/PublicInbox/Over.pm
index 19da056a10aff5de4455e80c1e30b03190352258..30ad949dd027153f30835f928c962d00e5d9f82a 100644 (file)
--- a/lib/PublicInbox/Over.pm
+++ b/lib/PublicInbox/Over.pm
@@ -16,9 +16,11 @@ use constant DEFAULT_LIMIT => 1000;
 sub dbh_new {
        my ($self, $rw) = @_;
        my $f = delete $self->{filename};
-       if (!-f $f) { # SQLite defaults mode to 0644, we want 0666
+       if (!-s $f) { # SQLite defaults mode to 0644, we want 0666
                if ($rw) {
                        require PublicInbox::Spawn;
+                       my ($dir) = ($f =~ m!(.+)/[^/]+\z!);
+                       PublicInbox::Spawn::nodatacow_dir($dir);
                        open my $fh, '+>>', $f or die "failed to open $f: $!";
                        PublicInbox::Spawn::nodatacow_fd(fileno($fh));
                } else {
@@ -106,8 +108,8 @@ sub do_get {
 }
 
 sub query_xover {
-       my ($self, $beg, $end) = @_;
-       do_get($self, <<'', {}, $beg, $end);
+       my ($self, $beg, $end, $opt) = @_;
+       do_get($self, <<'', $opt, $beg, $end);
 SELECT num,ts,ds,ddd FROM over WHERE num >= ? AND num <= ?
 ORDER BY num ASC