projects
/
BackupPC.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
match phrase
[BackupPC.git]
/
lib
/
BackupPC
/
Search
/
KinoSearch.pm
diff --git
a/lib/BackupPC/Search/KinoSearch.pm
b/lib/BackupPC/Search/KinoSearch.pm
index
67eff7e
..
e1ba8da
100644
(file)
--- a/
lib/BackupPC/Search/KinoSearch.pm
+++ b/
lib/BackupPC/Search/KinoSearch.pm
@@
-43,22
+43,34
@@
sub indexer {
);
my $blob_type = KinoSearch::Plan::BlobType->new( stored => 1 );
my $string_type = KinoSearch::Plan::StringType->new; # non-tokenized
);
my $blob_type = KinoSearch::Plan::BlobType->new( stored => 1 );
my $string_type = KinoSearch::Plan::StringType->new; # non-tokenized
- my $num_type = KinoSearch::Plan::Int64Type->new;
+ my $num_type = KinoSearch::Plan::Int64Type->new( sortable => 1 );
+ my $sort_type = KinoSearch::Plan::StringType->new( sortable => 1 ); # non-tokenized
# numeric
$schema->spec_field( name => $_, type => $string_type ) foreach ( qw/
backup_date
backupnum
# numeric
$schema->spec_field( name => $_, type => $string_type ) foreach ( qw/
backup_date
backupnum
- date
fid
shareid
fid
shareid
- size
type
/ );
# non-tokenized strings
$schema->spec_field( name => $_, type => $string_type ) foreach ( qw/
type
/ );
# non-tokenized strings
$schema->spec_field( name => $_, type => $string_type ) foreach ( qw/
- _uri filepath hname sname
+ _uri
+ hname
+ /);
+
+ # sortable
+ $schema->spec_field( name => $_, type => $sort_type ) foreach (qw/
+ sname
+ filepath
+ /);
+
+ # sortable numeric
+ $schema->spec_field( name => $_, type => $sort_type ) foreach (qw/
+ date
+ size
/);
# tokenized magic columns for infix search
/);
# tokenized magic columns for infix search
@@
-134,9
+146,11
@@
sub search {
my $sort_spec = KinoSearch::Search::SortSpec->new( rules => $rules );
my $sort_spec = KinoSearch::Search::SortSpec->new( rules => $rules );
-# $q =~ s/(.)/$1 /g;
+ my $split = $q;
+ $split =~ s/(.)/$1 /g; # _file_path_split
+ $split = qq{"$split"}; # exact ordering
my $hits = $self->searcher->hits(
my $hits = $self->searcher->hits(
- query => $
q
,
+ query => $
split
,
sort_spec => $sort_spec,
);
sort_spec => $sort_spec,
);