From: miker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Sat, 13 Jan 2007 22:05:25 +0000 (+0000)
Subject: method for checking the validity of a search term on classed indexes
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=7bce10800494e96acc1997804f168e8e59111395;p=Evergreen.git

method for checking the validity of a search term on classed indexes


git-svn-id: svn://svn.open-ils.org/ILS/trunk@6767 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm
index 4b0b1afca2..4fc03e0837 100644
--- a/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Storage/Publisher/metabib.pm
@@ -2242,6 +2242,62 @@ __PACKAGE__->register_method(
 	cachable	=> 1,
 );
 
+sub xref_count {
+	my $self = shift;
+	my $client = shift;
+	my $args = shift;
+	my $term = $$args{term};
+	my $limit = $$args{max} || 1;
+	my $min = $$args{min} || 1;
+	my @classes = @{$$args{class}};
+
+	if (!@classes) {
+		@classes = ( qw/ title author subject series keyword / );
+	}
+
+	my %matches;
+	my $bre_table = biblio::record_entry->table;
+	my $cn_table = asset::call_number->table;
+	my $cp_table = asset::copy->table;
+
+	for my $search_class ( @classes ) {
+
+		my $class = $_cdbi->{$search_class};
+		my $search_table = $class->table;
+
+		my ($index_col) = $class->columns('FTS');
+		$index_col ||= 'value';
+
+		
+		my $where = OpenILS::Application::Storage::FTS
+			->compile($term, $search_class.'.value', "$search_class.$index_col")
+			->sql_where_clause;
+
+		my $SQL = <<"		SQL";
+			SELECT	COUNT(DISTINCT X.source)
+			  FROM	(SELECT	$search_class.source
+				  FROM	$search_table $search_class
+					JOIN $bre_table b ON (b.id = $search_class.source)
+				  WHERE	$where
+				  	AND NOT b.deleted
+					AND b.active
+				  LIMIT $limit) X
+			  HAVING COUNT(DISTINCT X.source) >= $min;
+		SQL
+
+		my $res = $class->db_Main->selectrow_arrayref( $SQL );
+		$matches{$search_class} = $res ? $res->[0] : 0;
+	}
+
+	return \%matches;
+}
+__PACKAGE__->register_method(
+	api_name	=> "open-ils.storage.search.xref",
+	method		=> 'xref_count',
+	api_level	=> 1,
+);
+
+
 
 1;