Bug 25538: Default to --login|-i if no command passed
[koha.git] / Koha / SuggestionEngine / Base.pm
blob8f5d9926ea1de0649b156108b0a174d6b0589d32
1 package Koha::SuggestionEngine::Base;
3 # Copyright 2012 C & P Bibliography Services
5 # This file is part of Koha.
7 # Koha is free software; you can redistribute it and/or modify it
8 # under the terms of the GNU General Public License as published by
9 # the Free Software Foundation; either version 3 of the License, or
10 # (at your option) any later version.
12 # Koha is distributed in the hope that it will be useful, but
13 # WITHOUT ANY WARRANTY; without even the implied warranty of
14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 # GNU General Public License for more details.
17 # You should have received a copy of the GNU General Public License
18 # along with Koha; if not, see <http://www.gnu.org/licenses>.
20 =head1 NAME
22 Koha::SuggestionEngine::Base - Base class for SuggestionEngine plugins
24 =head1 SYNOPSIS
26 use base qw(Koha::SuggestionEngine::Base);
28 =head1 DESCRIPTION
30 Base class for suggestion engine plugins. SuggestionEngines must
31 provide the following methods:
33 B<get_suggestions (\%param)> - get suggestions for the search described
34 in $param->{'search'}, and return them in a hashref with the suggestions
35 as keys and relevance as values.
37 B<NAME> - return a string with the name of the plugin.
39 B<VERSION> - return a string with the version of the plugin.
41 These methods may be overriden:
43 B<initialize (%params)> - initialize the plugin
45 B<destroy ()> - destroy the plugin
47 These methods should not be overridden unless you are very sure of what
48 you are doing:
50 B<new ()> - create a new plugin object
52 =head1 FUNCTIONS
54 =cut
56 use strict;
57 use warnings;
59 use base qw(Class::Accessor);
61 __PACKAGE__->mk_ro_accessors(qw( name version ));
62 __PACKAGE__->mk_accessors(qw( params ));
64 =head2 new
66 my $plugin = Koha::SuggestionEngine::Base->new;
68 Create a new filter;
70 =cut
72 sub new {
73 my $class = shift;
75 my $self = $class->SUPER::new( {} ); #name => $class->NAME,
76 #version => $class->VERSION });
78 bless $self, $class;
79 return $self;
82 =head2 initialize
84 $plugin->initalize(%params);
86 Initialize a filter using the specified parameters.
88 =cut
90 sub initialize {
91 my $self = shift;
92 my $params = shift;
94 #$self->params = $params;
96 return $self;
99 =head2 destroy
101 $plugin->destroy();
103 Destroy the filter.
105 =cut
107 sub destroy {
108 my $self = shift;
109 return;
112 =head2 get_suggestions
114 my $suggestions = $plugin->get_suggestions(\%param);
116 Return suggestions for the specified search.
118 =cut
120 sub get_suggestions {
121 my $self = shift;
122 my $param = shift;
123 return;