annotate sites/all/modules/custom/solrsearch/solrsearch_search.module @ 0:015d06b10d37 default tip

initial
author dwinter
date Wed, 31 Jul 2013 13:49:13 +0200
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
015d06b10d37 initial
dwinter
parents:
diff changeset
1 <?php
015d06b10d37 initial
dwinter
parents:
diff changeset
2
015d06b10d37 initial
dwinter
parents:
diff changeset
3 include('solrsearch_search_blocks.inc');
015d06b10d37 initial
dwinter
parents:
diff changeset
4 include('solrsearch_search_author_block.inc');
015d06b10d37 initial
dwinter
parents:
diff changeset
5 include('solrsearch_search_title_block.inc');
015d06b10d37 initial
dwinter
parents:
diff changeset
6 include('solrsearch_terms.inc');
015d06b10d37 initial
dwinter
parents:
diff changeset
7
015d06b10d37 initial
dwinter
parents:
diff changeset
8 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
9 * @file
015d06b10d37 initial
dwinter
parents:
diff changeset
10 * Provides a content search implementation for node content for use with the
015d06b10d37 initial
dwinter
parents:
diff changeset
11 * Apache Solr search application.
015d06b10d37 initial
dwinter
parents:
diff changeset
12 */
015d06b10d37 initial
dwinter
parents:
diff changeset
13
015d06b10d37 initial
dwinter
parents:
diff changeset
14 #todo loesche diese funktoe finde nicht von wo aus dieaufgerufen wird!!
015d06b10d37 initial
dwinter
parents:
diff changeset
15 function solrsearch_index_delete_entity_from_index($env_id, $entity_type, $entity_id) {
015d06b10d37 initial
dwinter
parents:
diff changeset
16
015d06b10d37 initial
dwinter
parents:
diff changeset
17 return true;
015d06b10d37 initial
dwinter
parents:
diff changeset
18 }
015d06b10d37 initial
dwinter
parents:
diff changeset
19 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
20 * Implements hook_init().
015d06b10d37 initial
dwinter
parents:
diff changeset
21 *
015d06b10d37 initial
dwinter
parents:
diff changeset
22 * Checks if we should run an empty facet query so the facet blocks can be
015d06b10d37 initial
dwinter
parents:
diff changeset
23 * displayed.
015d06b10d37 initial
dwinter
parents:
diff changeset
24 */
015d06b10d37 initial
dwinter
parents:
diff changeset
25 function solrsearch_search_init() {
015d06b10d37 initial
dwinter
parents:
diff changeset
26 // Useless without facetapi
015d06b10d37 initial
dwinter
parents:
diff changeset
27 //dpm("solrserch_init");
015d06b10d37 initial
dwinter
parents:
diff changeset
28 if (!module_exists('facetapi')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
29 return NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
30 }
015d06b10d37 initial
dwinter
parents:
diff changeset
31
015d06b10d37 initial
dwinter
parents:
diff changeset
32 // Using a simple query we will figure out if we have to execute this snippet
015d06b10d37 initial
dwinter
parents:
diff changeset
33 // on every page or exit as fast as possible.
015d06b10d37 initial
dwinter
parents:
diff changeset
34 $query = "SELECT count(env_id)
015d06b10d37 initial
dwinter
parents:
diff changeset
35 FROM {solrsearch_environment_variable}
015d06b10d37 initial
dwinter
parents:
diff changeset
36 WHERE name = 'solrsearch_search_show_facets'";
015d06b10d37 initial
dwinter
parents:
diff changeset
37 $count = db_query($query)->fetchField();
015d06b10d37 initial
dwinter
parents:
diff changeset
38
015d06b10d37 initial
dwinter
parents:
diff changeset
39 //dpm($query);
015d06b10d37 initial
dwinter
parents:
diff changeset
40 //dpm($count);
015d06b10d37 initial
dwinter
parents:
diff changeset
41 if ($count == 0) {
015d06b10d37 initial
dwinter
parents:
diff changeset
42 return NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
43 }
015d06b10d37 initial
dwinter
parents:
diff changeset
44
015d06b10d37 initial
dwinter
parents:
diff changeset
45 // Load the default search page, we only support facets to link to this
015d06b10d37 initial
dwinter
parents:
diff changeset
46 // search page due to complexity and slow downs
015d06b10d37 initial
dwinter
parents:
diff changeset
47 //dpm("SEARCH PAGE I");
015d06b10d37 initial
dwinter
parents:
diff changeset
48
015d06b10d37 initial
dwinter
parents:
diff changeset
49 $search_page_id = solrsearch_search_default_search_page();
015d06b10d37 initial
dwinter
parents:
diff changeset
50 //dpm("SP".$search_page_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
51 $search_page = solrsearch_search_page_load($search_page_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
52 // Do not continue if our search page is not valid
015d06b10d37 initial
dwinter
parents:
diff changeset
53 if (empty($search_page)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
54 return NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
55 }
015d06b10d37 initial
dwinter
parents:
diff changeset
56 //dpm("SEARCH PAGE II");
015d06b10d37 initial
dwinter
parents:
diff changeset
57 //dpm($search_page);
015d06b10d37 initial
dwinter
parents:
diff changeset
58 $show_facets = solrsearch_environment_variable_get($search_page['env_id'], 'solrsearch_search_show_facets', 0);
015d06b10d37 initial
dwinter
parents:
diff changeset
59 //dpm($show_facets);
015d06b10d37 initial
dwinter
parents:
diff changeset
60 if ($show_facets) {
015d06b10d37 initial
dwinter
parents:
diff changeset
61
015d06b10d37 initial
dwinter
parents:
diff changeset
62 // Converts current path to lowercase for case insensitive matching.
015d06b10d37 initial
dwinter
parents:
diff changeset
63 $paths = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
64 $paths[] = drupal_strtolower(drupal_get_path_alias(current_path()));
015d06b10d37 initial
dwinter
parents:
diff changeset
65 $paths[] = drupal_strtolower(current_path());
015d06b10d37 initial
dwinter
parents:
diff changeset
66
015d06b10d37 initial
dwinter
parents:
diff changeset
67 $facet_pages = solrsearch_environment_variable_get($search_page['env_id'], 'solrsearch_search_facet_pages', '');
015d06b10d37 initial
dwinter
parents:
diff changeset
68 //dpm("FACET_PAGES");
015d06b10d37 initial
dwinter
parents:
diff changeset
69 //dpm($facet_pages);
015d06b10d37 initial
dwinter
parents:
diff changeset
70 //dpm($paths);
015d06b10d37 initial
dwinter
parents:
diff changeset
71 //dpm("FACET_PAGES_PATJS");
015d06b10d37 initial
dwinter
parents:
diff changeset
72 // Iterates over each environment to check if an empty query should be run.
015d06b10d37 initial
dwinter
parents:
diff changeset
73 if (!empty($facet_pages)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
74 // Compares path with settings, runs query if there is a match.
015d06b10d37 initial
dwinter
parents:
diff changeset
75 $patterns = drupal_strtolower($facet_pages);
015d06b10d37 initial
dwinter
parents:
diff changeset
76 foreach ($paths as $path) {
015d06b10d37 initial
dwinter
parents:
diff changeset
77 //dpm($path."===".$patterns);
015d06b10d37 initial
dwinter
parents:
diff changeset
78 if (drupal_match_path($path, $patterns)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
79 //dpm("MATCH");
015d06b10d37 initial
dwinter
parents:
diff changeset
80 try {
015d06b10d37 initial
dwinter
parents:
diff changeset
81 if (!empty($search_page['search_path'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
82
015d06b10d37 initial
dwinter
parents:
diff changeset
83 $solr = solrsearch_get_solr($search_page['env_id']);
015d06b10d37 initial
dwinter
parents:
diff changeset
84 // Initializes params for empty query.
015d06b10d37 initial
dwinter
parents:
diff changeset
85 //dpm("solr");
015d06b10d37 initial
dwinter
parents:
diff changeset
86 //dpm($solr);
015d06b10d37 initial
dwinter
parents:
diff changeset
87 $params = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
88 'spellcheck' => 'false',
015d06b10d37 initial
dwinter
parents:
diff changeset
89 'fq' => array(),
015d06b10d37 initial
dwinter
parents:
diff changeset
90 'rows' => 1,
015d06b10d37 initial
dwinter
parents:
diff changeset
91 );
015d06b10d37 initial
dwinter
parents:
diff changeset
92 $context['page_id'] = $search_page_id;
015d06b10d37 initial
dwinter
parents:
diff changeset
93 $context['search_type'] = 'solrsearch_search_show_facets';
015d06b10d37 initial
dwinter
parents:
diff changeset
94 solrsearch_search_run_empty('solrsearch', $params, $search_page['search_path'], $solr, $context);
015d06b10d37 initial
dwinter
parents:
diff changeset
95 }
015d06b10d37 initial
dwinter
parents:
diff changeset
96 }
015d06b10d37 initial
dwinter
parents:
diff changeset
97 catch (Exception $e) {
015d06b10d37 initial
dwinter
parents:
diff changeset
98 watchdog('Apache Solr', nl2br(check_plain($e->getMessage())), NULL, WATCHDOG_ERROR);
015d06b10d37 initial
dwinter
parents:
diff changeset
99 }
015d06b10d37 initial
dwinter
parents:
diff changeset
100 }
015d06b10d37 initial
dwinter
parents:
diff changeset
101 }
015d06b10d37 initial
dwinter
parents:
diff changeset
102 }
015d06b10d37 initial
dwinter
parents:
diff changeset
103 }
015d06b10d37 initial
dwinter
parents:
diff changeset
104 }
015d06b10d37 initial
dwinter
parents:
diff changeset
105
015d06b10d37 initial
dwinter
parents:
diff changeset
106 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
107 * Implements hook_menu().
015d06b10d37 initial
dwinter
parents:
diff changeset
108 */
015d06b10d37 initial
dwinter
parents:
diff changeset
109 function solrsearch_search_menu() {
015d06b10d37 initial
dwinter
parents:
diff changeset
110 $items['admin/config/search/solrsearch/search-pages'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
111 'title' => 'Pages/Blocks',
015d06b10d37 initial
dwinter
parents:
diff changeset
112 'description' => 'Configure search pages',
015d06b10d37 initial
dwinter
parents:
diff changeset
113 'page callback' => 'solrsearch_search_page_list_all',
015d06b10d37 initial
dwinter
parents:
diff changeset
114 'access arguments' => array('administer search'),
015d06b10d37 initial
dwinter
parents:
diff changeset
115 'type' => MENU_LOCAL_TASK,
015d06b10d37 initial
dwinter
parents:
diff changeset
116 'file' => 'solrsearch_search.admin.inc',
015d06b10d37 initial
dwinter
parents:
diff changeset
117 );
015d06b10d37 initial
dwinter
parents:
diff changeset
118 $items['admin/config/search/solrsearch/search-pages/add'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
119 'title' => 'Add search page',
015d06b10d37 initial
dwinter
parents:
diff changeset
120 'page callback' => 'drupal_get_form',
015d06b10d37 initial
dwinter
parents:
diff changeset
121 'page arguments' => array('solrsearch_search_page_settings_form'),
015d06b10d37 initial
dwinter
parents:
diff changeset
122 'access arguments' => array('administer search'),
015d06b10d37 initial
dwinter
parents:
diff changeset
123 'type' => MENU_LOCAL_ACTION,
015d06b10d37 initial
dwinter
parents:
diff changeset
124 'weight' => 1,
015d06b10d37 initial
dwinter
parents:
diff changeset
125 'file' => 'solrsearch_search.admin.inc',
015d06b10d37 initial
dwinter
parents:
diff changeset
126 );
015d06b10d37 initial
dwinter
parents:
diff changeset
127 $items['admin/config/search/solrsearch/search-pages/%solrsearch_search_page/edit'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
128 'title' => 'Edit search page',
015d06b10d37 initial
dwinter
parents:
diff changeset
129 'page callback' => 'drupal_get_form',
015d06b10d37 initial
dwinter
parents:
diff changeset
130 'page arguments' => array('solrsearch_search_page_settings_form', 5),
015d06b10d37 initial
dwinter
parents:
diff changeset
131 'access arguments' => array('administer search'),
015d06b10d37 initial
dwinter
parents:
diff changeset
132 'file' => 'solrsearch_search.admin.inc',
015d06b10d37 initial
dwinter
parents:
diff changeset
133 );
015d06b10d37 initial
dwinter
parents:
diff changeset
134 $items['admin/config/search/solrsearch/search-pages/%solrsearch_search_page/delete'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
135 'title' => 'Delete search page',
015d06b10d37 initial
dwinter
parents:
diff changeset
136 'page callback' => 'drupal_get_form',
015d06b10d37 initial
dwinter
parents:
diff changeset
137 'page arguments' => array('solrsearch_search_delete_search_page_confirm', 5),
015d06b10d37 initial
dwinter
parents:
diff changeset
138 'access arguments' => array('administer search'),
015d06b10d37 initial
dwinter
parents:
diff changeset
139 'file' => 'solrsearch_search.admin.inc',
015d06b10d37 initial
dwinter
parents:
diff changeset
140 );
015d06b10d37 initial
dwinter
parents:
diff changeset
141 $items['admin/config/search/solrsearch/search-pages/%solrsearch_search_page/clone'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
142 'title' => 'Clone search page',
015d06b10d37 initial
dwinter
parents:
diff changeset
143 'page callback' => 'drupal_get_form',
015d06b10d37 initial
dwinter
parents:
diff changeset
144 'page arguments' => array('solrsearch_search_clone_search_page_confirm', 5),
015d06b10d37 initial
dwinter
parents:
diff changeset
145 'access arguments' => array('administer search'),
015d06b10d37 initial
dwinter
parents:
diff changeset
146 'file' => 'solrsearch_search.admin.inc',
015d06b10d37 initial
dwinter
parents:
diff changeset
147 );
015d06b10d37 initial
dwinter
parents:
diff changeset
148 $items['admin/config/search/solrsearch/search-pages/addblock'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
149 'title' => 'Add search block "More Like This"',
015d06b10d37 initial
dwinter
parents:
diff changeset
150 'page callback' => 'drupal_get_form',
015d06b10d37 initial
dwinter
parents:
diff changeset
151 'page arguments' => array('solrsearch_search_mlt_add_block_form'),
015d06b10d37 initial
dwinter
parents:
diff changeset
152 'access arguments' => array('administer search'),
015d06b10d37 initial
dwinter
parents:
diff changeset
153 'type' => MENU_LOCAL_ACTION,
015d06b10d37 initial
dwinter
parents:
diff changeset
154 'weight' => 2,
015d06b10d37 initial
dwinter
parents:
diff changeset
155 'file' => 'solrsearch_search.admin.inc',
015d06b10d37 initial
dwinter
parents:
diff changeset
156 );
015d06b10d37 initial
dwinter
parents:
diff changeset
157
015d06b10d37 initial
dwinter
parents:
diff changeset
158
015d06b10d37 initial
dwinter
parents:
diff changeset
159 return $items;
015d06b10d37 initial
dwinter
parents:
diff changeset
160 }
015d06b10d37 initial
dwinter
parents:
diff changeset
161
015d06b10d37 initial
dwinter
parents:
diff changeset
162 function UNUSED_solrsearch_search_menu_alter(&$items) {
015d06b10d37 initial
dwinter
parents:
diff changeset
163 // Gets default search information.
015d06b10d37 initial
dwinter
parents:
diff changeset
164 $default_info = search_get_default_module_info();
015d06b10d37 initial
dwinter
parents:
diff changeset
165 $search_types = solrsearch_search_load_all_search_types();
015d06b10d37 initial
dwinter
parents:
diff changeset
166 $search_pages = solrsearch_search_load_all_search_pages();
015d06b10d37 initial
dwinter
parents:
diff changeset
167
015d06b10d37 initial
dwinter
parents:
diff changeset
168 // Iterates over search pages, builds menu items.
015d06b10d37 initial
dwinter
parents:
diff changeset
169 foreach ($search_pages as $search_page) {
015d06b10d37 initial
dwinter
parents:
diff changeset
170 // Validate the environemnt ID in case of import or missed deletion.
015d06b10d37 initial
dwinter
parents:
diff changeset
171 $environment = solrsearch_environment_load($search_page['env_id']);
015d06b10d37 initial
dwinter
parents:
diff changeset
172 if (!$environment) {
015d06b10d37 initial
dwinter
parents:
diff changeset
173 continue;
015d06b10d37 initial
dwinter
parents:
diff changeset
174 }
015d06b10d37 initial
dwinter
parents:
diff changeset
175
015d06b10d37 initial
dwinter
parents:
diff changeset
176 // Parses search path into it's various parts, builds menu items dependent
015d06b10d37 initial
dwinter
parents:
diff changeset
177 // on whether %keys is in the path.
015d06b10d37 initial
dwinter
parents:
diff changeset
178 $parts = explode('/', $search_page['search_path']);
015d06b10d37 initial
dwinter
parents:
diff changeset
179 $keys_pos = count($parts);
015d06b10d37 initial
dwinter
parents:
diff changeset
180 // Tests whether we are simulating a core search tab.
015d06b10d37 initial
dwinter
parents:
diff changeset
181 $core_solr_search = ($parts[0] == 'search');
015d06b10d37 initial
dwinter
parents:
diff changeset
182 $position = array_search('%', $parts);
015d06b10d37 initial
dwinter
parents:
diff changeset
183 $page_title = isset($search_page['page_title']) ? $search_page['page_title'] : 'Search Results';
015d06b10d37 initial
dwinter
parents:
diff changeset
184
015d06b10d37 initial
dwinter
parents:
diff changeset
185
015d06b10d37 initial
dwinter
parents:
diff changeset
186 // Replace possible tokens [term:tid], [node:nid], [user:uid] with their
015d06b10d37 initial
dwinter
parents:
diff changeset
187 // menu-specific variant
015d06b10d37 initial
dwinter
parents:
diff changeset
188 $items[$search_page['search_path']] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
189 'title' => $page_title,
015d06b10d37 initial
dwinter
parents:
diff changeset
190 'page callback' => 'solrsearch_search_custom_page',
015d06b10d37 initial
dwinter
parents:
diff changeset
191 'page arguments' => array($search_page['page_id'], '', $position),
015d06b10d37 initial
dwinter
parents:
diff changeset
192 'access arguments' => array('search content'),
015d06b10d37 initial
dwinter
parents:
diff changeset
193 'type' => ($core_solr_search) ? MENU_LOCAL_TASK : MENU_SUGGESTED_ITEM,
015d06b10d37 initial
dwinter
parents:
diff changeset
194 'file' => 'solrsearch_search.pages.inc',
015d06b10d37 initial
dwinter
parents:
diff changeset
195 'file path' => drupal_get_path('module', 'solrsearch_search'),
015d06b10d37 initial
dwinter
parents:
diff changeset
196 );
015d06b10d37 initial
dwinter
parents:
diff changeset
197
015d06b10d37 initial
dwinter
parents:
diff changeset
198 // Not using menu tail because of inflexibility with clean urls
015d06b10d37 initial
dwinter
parents:
diff changeset
199 $items[$search_page['search_path'] . '/%'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
200 'title' => $page_title,
015d06b10d37 initial
dwinter
parents:
diff changeset
201 'page callback' => 'solrsearch_search_custom_page',
015d06b10d37 initial
dwinter
parents:
diff changeset
202 'page arguments' => array($search_page['page_id'], $keys_pos, $position),
015d06b10d37 initial
dwinter
parents:
diff changeset
203 'access arguments' => array('search content'),
015d06b10d37 initial
dwinter
parents:
diff changeset
204 'type' => !($core_solr_search) ? MENU_CALLBACK : MENU_LOCAL_TASK,
015d06b10d37 initial
dwinter
parents:
diff changeset
205 'file' => 'solrsearch_search.pages.inc',
015d06b10d37 initial
dwinter
parents:
diff changeset
206 'file path' => drupal_get_path('module', 'solrsearch_search'),
015d06b10d37 initial
dwinter
parents:
diff changeset
207 );
015d06b10d37 initial
dwinter
parents:
diff changeset
208
015d06b10d37 initial
dwinter
parents:
diff changeset
209 // If title has a certain callback for the selected type we use it
015d06b10d37 initial
dwinter
parents:
diff changeset
210 $search_type_id = !empty($search_page['settings']['solrsearch_search_search_type']) ? $search_page['settings']['solrsearch_search_search_type'] : FALSE;
015d06b10d37 initial
dwinter
parents:
diff changeset
211 $search_type = !empty($search_types[$search_type_id]) ? $search_types[$search_type_id] : FALSE;
015d06b10d37 initial
dwinter
parents:
diff changeset
212
015d06b10d37 initial
dwinter
parents:
diff changeset
213 if ($search_type && !empty($position)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
214 $title_callback = $search_type['title callback'];
015d06b10d37 initial
dwinter
parents:
diff changeset
215 $items[$search_page['search_path']]['title callback'] = $title_callback;
015d06b10d37 initial
dwinter
parents:
diff changeset
216 $items[$search_page['search_path']]['title arguments'] = array($search_page['page_id'], $position);
015d06b10d37 initial
dwinter
parents:
diff changeset
217 $items[$search_page['search_path'] . '/%']['title callback'] = $title_callback;
015d06b10d37 initial
dwinter
parents:
diff changeset
218 $items[$search_page['search_path'] . '/%']['title arguments'] = array($search_page['page_id'], $position);
015d06b10d37 initial
dwinter
parents:
diff changeset
219 }
015d06b10d37 initial
dwinter
parents:
diff changeset
220 // If we have additional searches in the search/* path
015d06b10d37 initial
dwinter
parents:
diff changeset
221 if ($core_solr_search) {
015d06b10d37 initial
dwinter
parents:
diff changeset
222 $items[$search_page['search_path'] . '/%']['tab_root'] = 'search/' . $default_info['path'] . '/%';
015d06b10d37 initial
dwinter
parents:
diff changeset
223 $items[$search_page['search_path'] . '/%']['tab_parent'] = 'search/' . $default_info['path'];
015d06b10d37 initial
dwinter
parents:
diff changeset
224 }
015d06b10d37 initial
dwinter
parents:
diff changeset
225 }
015d06b10d37 initial
dwinter
parents:
diff changeset
226 }
015d06b10d37 initial
dwinter
parents:
diff changeset
227
015d06b10d37 initial
dwinter
parents:
diff changeset
228 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
229 * Function that loads all the search types
015d06b10d37 initial
dwinter
parents:
diff changeset
230 *
015d06b10d37 initial
dwinter
parents:
diff changeset
231 * @return array $search_types
015d06b10d37 initial
dwinter
parents:
diff changeset
232 */
015d06b10d37 initial
dwinter
parents:
diff changeset
233 function solrsearch_search_load_all_search_types() {
015d06b10d37 initial
dwinter
parents:
diff changeset
234 $search_types = &drupal_static(__FUNCTION__);
015d06b10d37 initial
dwinter
parents:
diff changeset
235
015d06b10d37 initial
dwinter
parents:
diff changeset
236 if (isset($search_types)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
237 return $search_types;
015d06b10d37 initial
dwinter
parents:
diff changeset
238 }
015d06b10d37 initial
dwinter
parents:
diff changeset
239 // Use cache_get to avoid DB when using memcache, etc.
015d06b10d37 initial
dwinter
parents:
diff changeset
240 $cache = cache_get('solrsearch_search:search_types', 'cache_solrsearch');
015d06b10d37 initial
dwinter
parents:
diff changeset
241 if (isset($cache->data)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
242 $search_types = $cache->data;
015d06b10d37 initial
dwinter
parents:
diff changeset
243 }
015d06b10d37 initial
dwinter
parents:
diff changeset
244 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
245 $search_types = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
246 'bundle' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
247 'name' => solrsearch_field_name_map('bundle'),
015d06b10d37 initial
dwinter
parents:
diff changeset
248 'default menu' => 'search/type/%',
015d06b10d37 initial
dwinter
parents:
diff changeset
249 'title callback' => 'solrsearch_search_get_value_title',
015d06b10d37 initial
dwinter
parents:
diff changeset
250 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
251 );
015d06b10d37 initial
dwinter
parents:
diff changeset
252 drupal_alter('solrsearch_search_types', $search_types);
015d06b10d37 initial
dwinter
parents:
diff changeset
253 cache_set('solrsearch_search:search_types', $search_types, 'cache_solrsearch');
015d06b10d37 initial
dwinter
parents:
diff changeset
254 }
015d06b10d37 initial
dwinter
parents:
diff changeset
255 return $search_types;
015d06b10d37 initial
dwinter
parents:
diff changeset
256 }
015d06b10d37 initial
dwinter
parents:
diff changeset
257
015d06b10d37 initial
dwinter
parents:
diff changeset
258
015d06b10d37 initial
dwinter
parents:
diff changeset
259
015d06b10d37 initial
dwinter
parents:
diff changeset
260 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
261 * Used as a callback function to generate a title for a node/page depending
015d06b10d37 initial
dwinter
parents:
diff changeset
262 * on the input in the configuration screen
015d06b10d37 initial
dwinter
parents:
diff changeset
263 * @param integer $search_page_id
015d06b10d37 initial
dwinter
parents:
diff changeset
264 * @param integer $value
015d06b10d37 initial
dwinter
parents:
diff changeset
265 * @return String
015d06b10d37 initial
dwinter
parents:
diff changeset
266 */
015d06b10d37 initial
dwinter
parents:
diff changeset
267 /*
015d06b10d37 initial
dwinter
parents:
diff changeset
268 function solrsearch_search_get_value_title($search_page_id = NULL, $value = NULL) {
015d06b10d37 initial
dwinter
parents:
diff changeset
269 $page_title = 'Search results for %value';
015d06b10d37 initial
dwinter
parents:
diff changeset
270 if (isset($value) && isset($search_page_id)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
271 $search_page = solrsearch_search_page_load($search_page_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
272 $page_title = str_replace('%value', '!value', $search_page['page_title']);
015d06b10d37 initial
dwinter
parents:
diff changeset
273 $title = $value;
015d06b10d37 initial
dwinter
parents:
diff changeset
274 }
015d06b10d37 initial
dwinter
parents:
diff changeset
275 return t($page_title, array('!value' => $title));
015d06b10d37 initial
dwinter
parents:
diff changeset
276 }
015d06b10d37 initial
dwinter
parents:
diff changeset
277 */
015d06b10d37 initial
dwinter
parents:
diff changeset
278
015d06b10d37 initial
dwinter
parents:
diff changeset
279 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
280 * Get or set the default search page id for the current page.
015d06b10d37 initial
dwinter
parents:
diff changeset
281 */
015d06b10d37 initial
dwinter
parents:
diff changeset
282 function solrsearch_search_default_search_page($page_id = NULL) {
015d06b10d37 initial
dwinter
parents:
diff changeset
283 $default_page_id = &drupal_static(__FUNCTION__, NULL);
015d06b10d37 initial
dwinter
parents:
diff changeset
284
015d06b10d37 initial
dwinter
parents:
diff changeset
285 if (isset($page_id)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
286 $default_page_id = $page_id;
015d06b10d37 initial
dwinter
parents:
diff changeset
287 }
015d06b10d37 initial
dwinter
parents:
diff changeset
288 if (empty($default_page_id)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
289 $default_page_id = variable_get('solrsearch_search_default_search_page', 'core_solr_search');
015d06b10d37 initial
dwinter
parents:
diff changeset
290 }
015d06b10d37 initial
dwinter
parents:
diff changeset
291 return $default_page_id;
015d06b10d37 initial
dwinter
parents:
diff changeset
292 }
015d06b10d37 initial
dwinter
parents:
diff changeset
293
015d06b10d37 initial
dwinter
parents:
diff changeset
294 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
295 * Implements hook_solrsearch_default_environment()
015d06b10d37 initial
dwinter
parents:
diff changeset
296 *
015d06b10d37 initial
dwinter
parents:
diff changeset
297 * Make sure the core search page is using the default environment.
015d06b10d37 initial
dwinter
parents:
diff changeset
298 */
015d06b10d37 initial
dwinter
parents:
diff changeset
299 function solrsearch_search_solrsearch_default_environment($env_id, $old_env_id) {
015d06b10d37 initial
dwinter
parents:
diff changeset
300 $page = solrsearch_search_page_load('core_solr_search');
015d06b10d37 initial
dwinter
parents:
diff changeset
301 if ($page && $page['env_id'] != $env_id) {
015d06b10d37 initial
dwinter
parents:
diff changeset
302 $page['env_id'] = $env_id;
015d06b10d37 initial
dwinter
parents:
diff changeset
303 solrsearch_search_page_save($page);
015d06b10d37 initial
dwinter
parents:
diff changeset
304 }
015d06b10d37 initial
dwinter
parents:
diff changeset
305 }
015d06b10d37 initial
dwinter
parents:
diff changeset
306
015d06b10d37 initial
dwinter
parents:
diff changeset
307 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
308 * Load a search page
015d06b10d37 initial
dwinter
parents:
diff changeset
309 * @param string $page_id
015d06b10d37 initial
dwinter
parents:
diff changeset
310 * @return array
015d06b10d37 initial
dwinter
parents:
diff changeset
311 */
015d06b10d37 initial
dwinter
parents:
diff changeset
312 function solrsearch_search_page_load($page_id) {
015d06b10d37 initial
dwinter
parents:
diff changeset
313 //dpm(" solrsearch_search_page_load");
015d06b10d37 initial
dwinter
parents:
diff changeset
314
015d06b10d37 initial
dwinter
parents:
diff changeset
315 $search_pages = solrsearch_search_load_all_search_pages();
015d06b10d37 initial
dwinter
parents:
diff changeset
316 //dpm($search_pages);
015d06b10d37 initial
dwinter
parents:
diff changeset
317 if (!empty($search_pages[$page_id])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
318 return $search_pages[$page_id];
015d06b10d37 initial
dwinter
parents:
diff changeset
319 }
015d06b10d37 initial
dwinter
parents:
diff changeset
320 return FALSE;
015d06b10d37 initial
dwinter
parents:
diff changeset
321 }
015d06b10d37 initial
dwinter
parents:
diff changeset
322
015d06b10d37 initial
dwinter
parents:
diff changeset
323 function solrsearch_search_page_save($search_page) {
015d06b10d37 initial
dwinter
parents:
diff changeset
324 if (!empty($search_page)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
325 db_merge('solrsearch_search_page')
015d06b10d37 initial
dwinter
parents:
diff changeset
326 ->key(array('page_id' => $search_page['page_id']))
015d06b10d37 initial
dwinter
parents:
diff changeset
327 ->fields(array(
015d06b10d37 initial
dwinter
parents:
diff changeset
328 'label' => $search_page['label'],
015d06b10d37 initial
dwinter
parents:
diff changeset
329 'page_id' => $search_page['page_id'],
015d06b10d37 initial
dwinter
parents:
diff changeset
330 'description' => $search_page['description'],
015d06b10d37 initial
dwinter
parents:
diff changeset
331 'env_id' => $search_page['env_id'],
015d06b10d37 initial
dwinter
parents:
diff changeset
332 'search_path' => $search_page['search_path'],
015d06b10d37 initial
dwinter
parents:
diff changeset
333 'page_title' => $search_page['page_title'],
015d06b10d37 initial
dwinter
parents:
diff changeset
334 'settings' => serialize($search_page['settings']),
015d06b10d37 initial
dwinter
parents:
diff changeset
335 ))
015d06b10d37 initial
dwinter
parents:
diff changeset
336 ->execute();
015d06b10d37 initial
dwinter
parents:
diff changeset
337 }
015d06b10d37 initial
dwinter
parents:
diff changeset
338 }
015d06b10d37 initial
dwinter
parents:
diff changeset
339
015d06b10d37 initial
dwinter
parents:
diff changeset
340 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
341 * Function that clones a search page
015d06b10d37 initial
dwinter
parents:
diff changeset
342 *
015d06b10d37 initial
dwinter
parents:
diff changeset
343 * @param $page_id
015d06b10d37 initial
dwinter
parents:
diff changeset
344 * The page identifier it needs to clone.
015d06b10d37 initial
dwinter
parents:
diff changeset
345 *
015d06b10d37 initial
dwinter
parents:
diff changeset
346 */
015d06b10d37 initial
dwinter
parents:
diff changeset
347 function solrsearch_search_page_clone($page_id) {
015d06b10d37 initial
dwinter
parents:
diff changeset
348 $search_page = solrsearch_search_page_load($page_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
349 // Get all search_pages
015d06b10d37 initial
dwinter
parents:
diff changeset
350 $search_pages = solrsearch_search_load_all_search_pages();
015d06b10d37 initial
dwinter
parents:
diff changeset
351 // Create an unique ID
015d06b10d37 initial
dwinter
parents:
diff changeset
352 $new_search_page_id = solrsearch_create_unique_id($search_pages, $search_page['page_id']);
015d06b10d37 initial
dwinter
parents:
diff changeset
353 // Set this id to the new search page
015d06b10d37 initial
dwinter
parents:
diff changeset
354 $search_page['page_id'] = $new_search_page_id;
015d06b10d37 initial
dwinter
parents:
diff changeset
355 $search_page['label'] = $search_page['label'] . ' [cloned]';
015d06b10d37 initial
dwinter
parents:
diff changeset
356 // All cloned search pages should be removable
015d06b10d37 initial
dwinter
parents:
diff changeset
357 if (isset($search_page['settings']['solrsearch_search_not_removable'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
358 unset($search_page['settings']['solrsearch_search_not_removable']);
015d06b10d37 initial
dwinter
parents:
diff changeset
359 }
015d06b10d37 initial
dwinter
parents:
diff changeset
360 // Save our new search page in the database
015d06b10d37 initial
dwinter
parents:
diff changeset
361 solrsearch_search_page_save($search_page);
015d06b10d37 initial
dwinter
parents:
diff changeset
362 }
015d06b10d37 initial
dwinter
parents:
diff changeset
363
015d06b10d37 initial
dwinter
parents:
diff changeset
364 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
365 * Implements hook_block_info().
015d06b10d37 initial
dwinter
parents:
diff changeset
366 */
015d06b10d37 initial
dwinter
parents:
diff changeset
367 function solrsearch_search_block_info() {
015d06b10d37 initial
dwinter
parents:
diff changeset
368 // Get all of the moreLikeThis blocks that the user has created
015d06b10d37 initial
dwinter
parents:
diff changeset
369 $blocks = solrsearch_search_load_all_mlt_blocks();
015d06b10d37 initial
dwinter
parents:
diff changeset
370 foreach ($blocks as $delta => $settings) {
015d06b10d37 initial
dwinter
parents:
diff changeset
371 $blocks[$delta] += array('info' => t('Solr Search recommendations: !name', array('!name' => $settings['name'])) , 'cache' => DRUPAL_CACHE_PER_PAGE);
015d06b10d37 initial
dwinter
parents:
diff changeset
372 }
015d06b10d37 initial
dwinter
parents:
diff changeset
373 // Add the sort block.
015d06b10d37 initial
dwinter
parents:
diff changeset
374 $blocks['sort'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
375 'info' => t('Solr Search Core: Sorting'),
015d06b10d37 initial
dwinter
parents:
diff changeset
376 'cache' => DRUPAL_CACHE_CUSTOM,
015d06b10d37 initial
dwinter
parents:
diff changeset
377 );
015d06b10d37 initial
dwinter
parents:
diff changeset
378
015d06b10d37 initial
dwinter
parents:
diff changeset
379 $blocks['solrsearch'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
380 'info' => t('Solr Search Core: Search'),
015d06b10d37 initial
dwinter
parents:
diff changeset
381 'cache' => DRUPAL_CACHE_CUSTOM,
015d06b10d37 initial
dwinter
parents:
diff changeset
382 );
015d06b10d37 initial
dwinter
parents:
diff changeset
383
015d06b10d37 initial
dwinter
parents:
diff changeset
384
015d06b10d37 initial
dwinter
parents:
diff changeset
385 $blocks['solrsearch_author'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
386 'info' => t('Solr Search Core: Search - author'),
015d06b10d37 initial
dwinter
parents:
diff changeset
387 'cache' => DRUPAL_CACHE_CUSTOM,
015d06b10d37 initial
dwinter
parents:
diff changeset
388 );
015d06b10d37 initial
dwinter
parents:
diff changeset
389
015d06b10d37 initial
dwinter
parents:
diff changeset
390 $blocks['solrsearch_title'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
391 'info' => t('Solr Search Core: Search - title'),
015d06b10d37 initial
dwinter
parents:
diff changeset
392 'cache' => DRUPAL_CACHE_CUSTOM,
015d06b10d37 initial
dwinter
parents:
diff changeset
393 );
015d06b10d37 initial
dwinter
parents:
diff changeset
394
015d06b10d37 initial
dwinter
parents:
diff changeset
395
015d06b10d37 initial
dwinter
parents:
diff changeset
396
015d06b10d37 initial
dwinter
parents:
diff changeset
397 return $blocks;
015d06b10d37 initial
dwinter
parents:
diff changeset
398 }
015d06b10d37 initial
dwinter
parents:
diff changeset
399
015d06b10d37 initial
dwinter
parents:
diff changeset
400 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
401 * Implements hook_block_view().
015d06b10d37 initial
dwinter
parents:
diff changeset
402 */
015d06b10d37 initial
dwinter
parents:
diff changeset
403 function solrsearch_search_block_view($delta = '') {
015d06b10d37 initial
dwinter
parents:
diff changeset
404
015d06b10d37 initial
dwinter
parents:
diff changeset
405 if ($delta == 'sort') {
015d06b10d37 initial
dwinter
parents:
diff changeset
406 $environments = solrsearch_load_all_environments();
015d06b10d37 initial
dwinter
parents:
diff changeset
407 foreach ($environments as $env_id => $environment) {
015d06b10d37 initial
dwinter
parents:
diff changeset
408 if (solrsearch_has_searched($env_id) && !solrsearch_suppress_blocks($env_id) && $delta == 'sort') {
015d06b10d37 initial
dwinter
parents:
diff changeset
409 $response = NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
410 $query = solrsearch_current_query($env_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
411 $solrsort = NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
412 if ($query) {
015d06b10d37 initial
dwinter
parents:
diff changeset
413 // Get the query and response. Without these no blocks make sense.
015d06b10d37 initial
dwinter
parents:
diff changeset
414 $response = solrsearch_static_response_cache($query->getSearcher());
015d06b10d37 initial
dwinter
parents:
diff changeset
415 }
015d06b10d37 initial
dwinter
parents:
diff changeset
416
015d06b10d37 initial
dwinter
parents:
diff changeset
417 // If there are less than two results, do not return the sort block
015d06b10d37 initial
dwinter
parents:
diff changeset
418 if (empty($response) || ($response->response->numFound < 2)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
419 return NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
420 }
015d06b10d37 initial
dwinter
parents:
diff changeset
421
015d06b10d37 initial
dwinter
parents:
diff changeset
422 // Check if we have to return a cached version of this block
015d06b10d37 initial
dwinter
parents:
diff changeset
423 if ($query) {
015d06b10d37 initial
dwinter
parents:
diff changeset
424 // Get the URI without any query parameter.
015d06b10d37 initial
dwinter
parents:
diff changeset
425 $uri = parse_url(request_uri());
015d06b10d37 initial
dwinter
parents:
diff changeset
426 // Get the current sort as an array.
015d06b10d37 initial
dwinter
parents:
diff changeset
427 $solrsort = $query->getSolrsort();
015d06b10d37 initial
dwinter
parents:
diff changeset
428 $cache_id = $uri['path'] . ':' . implode(':', $solrsort);
015d06b10d37 initial
dwinter
parents:
diff changeset
429 // Do we have something in cache ?
015d06b10d37 initial
dwinter
parents:
diff changeset
430 if ($cache = cache_get($cache_id, 'cache_block')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
431 $block = $cache->data;
015d06b10d37 initial
dwinter
parents:
diff changeset
432 return $block;
015d06b10d37 initial
dwinter
parents:
diff changeset
433 }
015d06b10d37 initial
dwinter
parents:
diff changeset
434 }
015d06b10d37 initial
dwinter
parents:
diff changeset
435
015d06b10d37 initial
dwinter
parents:
diff changeset
436 $sorts = $query->getAvailableSorts();
015d06b10d37 initial
dwinter
parents:
diff changeset
437 $sort_links = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
438 $path = $query->getPath();
015d06b10d37 initial
dwinter
parents:
diff changeset
439 $new_query = clone $query;
015d06b10d37 initial
dwinter
parents:
diff changeset
440 $toggle = array('asc' => 'desc', 'desc' => 'asc');
015d06b10d37 initial
dwinter
parents:
diff changeset
441 foreach ($sorts as $name => $sort) {
015d06b10d37 initial
dwinter
parents:
diff changeset
442 $active = $solrsort['#name'] == $name;
015d06b10d37 initial
dwinter
parents:
diff changeset
443 if ($name == 'score') {
015d06b10d37 initial
dwinter
parents:
diff changeset
444 $direction = '';
015d06b10d37 initial
dwinter
parents:
diff changeset
445 $new_direction = 'desc'; // We only sort by descending score.
015d06b10d37 initial
dwinter
parents:
diff changeset
446 }
015d06b10d37 initial
dwinter
parents:
diff changeset
447 elseif ($active) {
015d06b10d37 initial
dwinter
parents:
diff changeset
448 $direction = $toggle[$solrsort['#direction']];
015d06b10d37 initial
dwinter
parents:
diff changeset
449 $new_direction = $toggle[$solrsort['#direction']];
015d06b10d37 initial
dwinter
parents:
diff changeset
450 }
015d06b10d37 initial
dwinter
parents:
diff changeset
451 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
452 $direction = '';
015d06b10d37 initial
dwinter
parents:
diff changeset
453 $new_direction = $sort['default'];
015d06b10d37 initial
dwinter
parents:
diff changeset
454 }
015d06b10d37 initial
dwinter
parents:
diff changeset
455 $new_query->setSolrsort($name, $new_direction);
015d06b10d37 initial
dwinter
parents:
diff changeset
456 $sort_links[$name] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
457 'text' => $sort['title'],
015d06b10d37 initial
dwinter
parents:
diff changeset
458 'path' => $path,
015d06b10d37 initial
dwinter
parents:
diff changeset
459 'options' => array('query' => $new_query->getSolrsortUrlQuery()),
015d06b10d37 initial
dwinter
parents:
diff changeset
460 'active' => $active,
015d06b10d37 initial
dwinter
parents:
diff changeset
461 'direction' => $direction,
015d06b10d37 initial
dwinter
parents:
diff changeset
462 );
015d06b10d37 initial
dwinter
parents:
diff changeset
463 }
015d06b10d37 initial
dwinter
parents:
diff changeset
464 foreach ($sort_links as $name => $link) {
015d06b10d37 initial
dwinter
parents:
diff changeset
465 $themed_links[$name] = theme('solrsearch_sort_link', $link);
015d06b10d37 initial
dwinter
parents:
diff changeset
466 }
015d06b10d37 initial
dwinter
parents:
diff changeset
467 $block = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
468 'subject' => t('Sort by'),
015d06b10d37 initial
dwinter
parents:
diff changeset
469 'content' => theme('solrsearch_sort_list', array('items' => $themed_links))
015d06b10d37 initial
dwinter
parents:
diff changeset
470 );
015d06b10d37 initial
dwinter
parents:
diff changeset
471 // Cache the block
015d06b10d37 initial
dwinter
parents:
diff changeset
472 cache_set($cache_id, $block, 'cache_block');
015d06b10d37 initial
dwinter
parents:
diff changeset
473 return $block;
015d06b10d37 initial
dwinter
parents:
diff changeset
474 }
015d06b10d37 initial
dwinter
parents:
diff changeset
475 }
015d06b10d37 initial
dwinter
parents:
diff changeset
476 }
015d06b10d37 initial
dwinter
parents:
diff changeset
477 elseif ($delta == 'solrsearch') {
015d06b10d37 initial
dwinter
parents:
diff changeset
478
015d06b10d37 initial
dwinter
parents:
diff changeset
479 return solrsearch_search_block();
015d06b10d37 initial
dwinter
parents:
diff changeset
480 }
015d06b10d37 initial
dwinter
parents:
diff changeset
481
015d06b10d37 initial
dwinter
parents:
diff changeset
482 elseif($delta == 'solrsearch_author'){
015d06b10d37 initial
dwinter
parents:
diff changeset
483
015d06b10d37 initial
dwinter
parents:
diff changeset
484 return solrsearch_search_author_block();
015d06b10d37 initial
dwinter
parents:
diff changeset
485 }
015d06b10d37 initial
dwinter
parents:
diff changeset
486
015d06b10d37 initial
dwinter
parents:
diff changeset
487 elseif($delta == 'solrsearch_title'){
015d06b10d37 initial
dwinter
parents:
diff changeset
488
015d06b10d37 initial
dwinter
parents:
diff changeset
489 return solrsearch_search_title_block();
015d06b10d37 initial
dwinter
parents:
diff changeset
490 }
015d06b10d37 initial
dwinter
parents:
diff changeset
491
015d06b10d37 initial
dwinter
parents:
diff changeset
492
015d06b10d37 initial
dwinter
parents:
diff changeset
493
015d06b10d37 initial
dwinter
parents:
diff changeset
494 elseif (($node = menu_get_object()) && (!arg(2) || arg(2) == 'view')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
495 $suggestions = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
496 // Determine whether the user can view the current node. Probably not necessary.
015d06b10d37 initial
dwinter
parents:
diff changeset
497 $block = solrsearch_search_mlt_block_load($delta);
015d06b10d37 initial
dwinter
parents:
diff changeset
498 if ($block && node_access('view', $node)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
499 // Get our specific environment for the MLT block
015d06b10d37 initial
dwinter
parents:
diff changeset
500 $env_id = (!empty($block['mlt_env_id'])) ? $block['mlt_env_id'] : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
501 try {
015d06b10d37 initial
dwinter
parents:
diff changeset
502 $solr = solrsearch_get_solr($env_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
503 $context['search_type'] = 'solrsearch_search_mlt';
015d06b10d37 initial
dwinter
parents:
diff changeset
504 $context['block_id'] = $delta;
015d06b10d37 initial
dwinter
parents:
diff changeset
505 $docs = solrsearch_search_mlt_suggestions($block, solrsearch_document_id($node->nid), $solr, $context);
015d06b10d37 initial
dwinter
parents:
diff changeset
506 if (!empty($docs)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
507 $suggestions['subject'] = check_plain($block['name']);
015d06b10d37 initial
dwinter
parents:
diff changeset
508 $suggestions['content'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
509 '#theme' => 'solrsearch_search_mlt_recommendation_block',
015d06b10d37 initial
dwinter
parents:
diff changeset
510 '#docs' => $docs,
015d06b10d37 initial
dwinter
parents:
diff changeset
511 '#delta' => $delta
015d06b10d37 initial
dwinter
parents:
diff changeset
512 );
015d06b10d37 initial
dwinter
parents:
diff changeset
513 }
015d06b10d37 initial
dwinter
parents:
diff changeset
514 }
015d06b10d37 initial
dwinter
parents:
diff changeset
515 catch (Exception $e) {
015d06b10d37 initial
dwinter
parents:
diff changeset
516 watchdog('Apache Solr', nl2br(check_plain($e->getMessage())), NULL, WATCHDOG_ERROR);
015d06b10d37 initial
dwinter
parents:
diff changeset
517 }
015d06b10d37 initial
dwinter
parents:
diff changeset
518 }
015d06b10d37 initial
dwinter
parents:
diff changeset
519 return $suggestions;
015d06b10d37 initial
dwinter
parents:
diff changeset
520 }
015d06b10d37 initial
dwinter
parents:
diff changeset
521 }
015d06b10d37 initial
dwinter
parents:
diff changeset
522
015d06b10d37 initial
dwinter
parents:
diff changeset
523 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
524 * Implements hook_form_[form_id]_alter().
015d06b10d37 initial
dwinter
parents:
diff changeset
525 */
015d06b10d37 initial
dwinter
parents:
diff changeset
526 function solrsearch_search_form_block_admin_display_form_alter(&$form) {
015d06b10d37 initial
dwinter
parents:
diff changeset
527 foreach ($form['blocks'] as $key => $block) {
015d06b10d37 initial
dwinter
parents:
diff changeset
528 if ((strpos($key, "solrsearch_search_mlt-") === 0) && $block['module']['#value'] == 'solrsearch_search') {
015d06b10d37 initial
dwinter
parents:
diff changeset
529 $form['blocks'][$key]['delete'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
530 '#type' => 'link',
015d06b10d37 initial
dwinter
parents:
diff changeset
531 '#title' => 'delete',
015d06b10d37 initial
dwinter
parents:
diff changeset
532 '#href' => 'admin/config/search/solrsearch/search-pages/block/' . $block['delta']['#value'] . '/delete',
015d06b10d37 initial
dwinter
parents:
diff changeset
533 );
015d06b10d37 initial
dwinter
parents:
diff changeset
534 }
015d06b10d37 initial
dwinter
parents:
diff changeset
535 }
015d06b10d37 initial
dwinter
parents:
diff changeset
536 }
015d06b10d37 initial
dwinter
parents:
diff changeset
537
015d06b10d37 initial
dwinter
parents:
diff changeset
538 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
539 * Implements hook_block_configure().
015d06b10d37 initial
dwinter
parents:
diff changeset
540 */
015d06b10d37 initial
dwinter
parents:
diff changeset
541 function solrsearch_search_block_configure($delta = '') {
015d06b10d37 initial
dwinter
parents:
diff changeset
542 if ($delta != 'sort') {
015d06b10d37 initial
dwinter
parents:
diff changeset
543 require_once(drupal_get_path('module', 'solrsearch') . '/solrsearch_search.admin.inc');
015d06b10d37 initial
dwinter
parents:
diff changeset
544 return solrsearch_search_mlt_block_form($delta);
015d06b10d37 initial
dwinter
parents:
diff changeset
545 }
015d06b10d37 initial
dwinter
parents:
diff changeset
546 }
015d06b10d37 initial
dwinter
parents:
diff changeset
547
015d06b10d37 initial
dwinter
parents:
diff changeset
548 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
549 * Implements hook_block_save().
015d06b10d37 initial
dwinter
parents:
diff changeset
550 */
015d06b10d37 initial
dwinter
parents:
diff changeset
551 function solrsearch_search_block_save($delta = '', $edit = array()) {
015d06b10d37 initial
dwinter
parents:
diff changeset
552 if ($delta != 'sort') {
015d06b10d37 initial
dwinter
parents:
diff changeset
553 require_once(drupal_get_path('module', 'solrsearch') . '/solrsearch_search.admin.inc');
015d06b10d37 initial
dwinter
parents:
diff changeset
554 solrsearch_search_mlt_save_block($edit, $delta);
015d06b10d37 initial
dwinter
parents:
diff changeset
555 }
015d06b10d37 initial
dwinter
parents:
diff changeset
556 }
015d06b10d37 initial
dwinter
parents:
diff changeset
557
015d06b10d37 initial
dwinter
parents:
diff changeset
558
015d06b10d37 initial
dwinter
parents:
diff changeset
559 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
560 * Return all the saved search pages
015d06b10d37 initial
dwinter
parents:
diff changeset
561 * @return array $search_pages
015d06b10d37 initial
dwinter
parents:
diff changeset
562 * Array of all search pages
015d06b10d37 initial
dwinter
parents:
diff changeset
563 */
015d06b10d37 initial
dwinter
parents:
diff changeset
564 function solrsearch_search_load_all_search_pages() {
015d06b10d37 initial
dwinter
parents:
diff changeset
565 $search_pages = &drupal_static(__FUNCTION__, array());
015d06b10d37 initial
dwinter
parents:
diff changeset
566 //dpm("solrsearch_search_load_all_search_pages");
015d06b10d37 initial
dwinter
parents:
diff changeset
567 if (!empty($search_pages)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
568 return $search_pages;
015d06b10d37 initial
dwinter
parents:
diff changeset
569 }
015d06b10d37 initial
dwinter
parents:
diff changeset
570
015d06b10d37 initial
dwinter
parents:
diff changeset
571 // If ctools module is enabled, add search pages from code, e.g. from a
015d06b10d37 initial
dwinter
parents:
diff changeset
572 // feature module.
015d06b10d37 initial
dwinter
parents:
diff changeset
573 if (module_exists('ctools')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
574 ctools_include('export');
015d06b10d37 initial
dwinter
parents:
diff changeset
575 $defaults = ctools_export_load_object('solrsearch_search_page', 'all');
015d06b10d37 initial
dwinter
parents:
diff changeset
576 foreach ($defaults as $page_id => $default) {
015d06b10d37 initial
dwinter
parents:
diff changeset
577 $search_pages[$page_id] = (array) $default;
015d06b10d37 initial
dwinter
parents:
diff changeset
578 }
015d06b10d37 initial
dwinter
parents:
diff changeset
579 }
015d06b10d37 initial
dwinter
parents:
diff changeset
580
015d06b10d37 initial
dwinter
parents:
diff changeset
581 // Get all search_pages and their id
015d06b10d37 initial
dwinter
parents:
diff changeset
582 $search_pages_db = db_query('SELECT * FROM {solrsearch_search_page}')->fetchAllAssoc('page_id', PDO::FETCH_ASSOC);
015d06b10d37 initial
dwinter
parents:
diff changeset
583 //$search_pages_db = db_query('SELECT * FROM {apachesolr_search_page}')->fetchAllAssoc('page_id', PDO::FETCH_ASSOC);
015d06b10d37 initial
dwinter
parents:
diff changeset
584 //dpm($search_pages);
015d06b10d37 initial
dwinter
parents:
diff changeset
585 //dpm("QUERY");
015d06b10d37 initial
dwinter
parents:
diff changeset
586 $search_pages = $search_pages + $search_pages_db;
015d06b10d37 initial
dwinter
parents:
diff changeset
587
015d06b10d37 initial
dwinter
parents:
diff changeset
588 // Ensure that the core search page uses the default environment. In some
015d06b10d37 initial
dwinter
parents:
diff changeset
589 // instances, for example when unit testing, this search page isn't defined.
015d06b10d37 initial
dwinter
parents:
diff changeset
590 if (isset($search_pages['core_solr_search'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
591 $search_pages['core_solr_search']['env_id'] = solrsearch_default_environment();
015d06b10d37 initial
dwinter
parents:
diff changeset
592 }
015d06b10d37 initial
dwinter
parents:
diff changeset
593
015d06b10d37 initial
dwinter
parents:
diff changeset
594 // convert settings to an array
015d06b10d37 initial
dwinter
parents:
diff changeset
595 foreach ($search_pages as $id => $search_page) {
015d06b10d37 initial
dwinter
parents:
diff changeset
596 if (is_string($search_pages[$id]['settings'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
597 $search_pages[$id]['settings'] = unserialize($search_pages[$id]['settings']);
015d06b10d37 initial
dwinter
parents:
diff changeset
598 // Prevent false outcomes for the following search page
015d06b10d37 initial
dwinter
parents:
diff changeset
599 $settings = 0;
015d06b10d37 initial
dwinter
parents:
diff changeset
600 }
015d06b10d37 initial
dwinter
parents:
diff changeset
601 }
015d06b10d37 initial
dwinter
parents:
diff changeset
602 //dpm($search_pages);
015d06b10d37 initial
dwinter
parents:
diff changeset
603 //dpm("QUERY II");
015d06b10d37 initial
dwinter
parents:
diff changeset
604 return $search_pages;
015d06b10d37 initial
dwinter
parents:
diff changeset
605 }
015d06b10d37 initial
dwinter
parents:
diff changeset
606
015d06b10d37 initial
dwinter
parents:
diff changeset
607 function solrsearch_search_load_all_mlt_blocks() {
015d06b10d37 initial
dwinter
parents:
diff changeset
608 $search_blocks = variable_get('solrsearch_search_mlt_blocks', array());
015d06b10d37 initial
dwinter
parents:
diff changeset
609 return $search_blocks;
015d06b10d37 initial
dwinter
parents:
diff changeset
610 }
015d06b10d37 initial
dwinter
parents:
diff changeset
611
015d06b10d37 initial
dwinter
parents:
diff changeset
612 function solrsearch_search_mlt_block_load($block_id) {
015d06b10d37 initial
dwinter
parents:
diff changeset
613 $search_blocks = variable_get('solrsearch_search_mlt_blocks', array());
015d06b10d37 initial
dwinter
parents:
diff changeset
614 return isset($search_blocks[$block_id]) ? $search_blocks[$block_id] : FALSE;
015d06b10d37 initial
dwinter
parents:
diff changeset
615 }
015d06b10d37 initial
dwinter
parents:
diff changeset
616
015d06b10d37 initial
dwinter
parents:
diff changeset
617 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
618 * Performs a moreLikeThis query using the settings and retrieves documents.
015d06b10d37 initial
dwinter
parents:
diff changeset
619 *
015d06b10d37 initial
dwinter
parents:
diff changeset
620 * @param $settings
015d06b10d37 initial
dwinter
parents:
diff changeset
621 * An array of settings.
015d06b10d37 initial
dwinter
parents:
diff changeset
622 * @param $id
015d06b10d37 initial
dwinter
parents:
diff changeset
623 * The Solr ID of the document for which you want related content.
015d06b10d37 initial
dwinter
parents:
diff changeset
624 * For a node that is solrsearch_document_id($node->nid)
015d06b10d37 initial
dwinter
parents:
diff changeset
625 * @param $solr
015d06b10d37 initial
dwinter
parents:
diff changeset
626 * The solr environment you want to query against
015d06b10d37 initial
dwinter
parents:
diff changeset
627 *
015d06b10d37 initial
dwinter
parents:
diff changeset
628 * @return An array of response documents, or NULL
015d06b10d37 initial
dwinter
parents:
diff changeset
629 */
015d06b10d37 initial
dwinter
parents:
diff changeset
630 function solrsearch_search_mlt_suggestions($settings, $id, $solr = NULL, $context = array()) {
015d06b10d37 initial
dwinter
parents:
diff changeset
631
015d06b10d37 initial
dwinter
parents:
diff changeset
632 try {
015d06b10d37 initial
dwinter
parents:
diff changeset
633 $fields = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
634 'mlt_mintf' => 'mlt.mintf',
015d06b10d37 initial
dwinter
parents:
diff changeset
635 'mlt_mindf' => 'mlt.mindf',
015d06b10d37 initial
dwinter
parents:
diff changeset
636 'mlt_minwl' => 'mlt.minwl',
015d06b10d37 initial
dwinter
parents:
diff changeset
637 'mlt_maxwl' => 'mlt.maxwl',
015d06b10d37 initial
dwinter
parents:
diff changeset
638 'mlt_maxqt' => 'mlt.maxqt',
015d06b10d37 initial
dwinter
parents:
diff changeset
639 'mlt_boost' => 'mlt.boost',
015d06b10d37 initial
dwinter
parents:
diff changeset
640 'mlt_qf' => 'mlt.qf',
015d06b10d37 initial
dwinter
parents:
diff changeset
641 );
015d06b10d37 initial
dwinter
parents:
diff changeset
642 $params = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
643 'q' => 'id:' . $id,
015d06b10d37 initial
dwinter
parents:
diff changeset
644 'qt' => 'mlt',
015d06b10d37 initial
dwinter
parents:
diff changeset
645 'fl' => array('entity_id', 'entity_type', 'label', 'path', 'url'),
015d06b10d37 initial
dwinter
parents:
diff changeset
646 'mlt.fl' => $settings['mlt_fl'],
015d06b10d37 initial
dwinter
parents:
diff changeset
647 'start' => 0,
015d06b10d37 initial
dwinter
parents:
diff changeset
648 'rows' => $settings['num_results'],
015d06b10d37 initial
dwinter
parents:
diff changeset
649 );
015d06b10d37 initial
dwinter
parents:
diff changeset
650 // We can optionally specify a Solr object.
015d06b10d37 initial
dwinter
parents:
diff changeset
651 $query = solrsearch_drupal_query('solrsearch_mlt', $params, '', '', $solr, $context);
015d06b10d37 initial
dwinter
parents:
diff changeset
652
015d06b10d37 initial
dwinter
parents:
diff changeset
653 foreach ($fields as $form_key => $name) {
015d06b10d37 initial
dwinter
parents:
diff changeset
654 if (!empty($settings[$form_key])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
655 $query->addParam($name, $settings[$form_key]);
015d06b10d37 initial
dwinter
parents:
diff changeset
656 }
015d06b10d37 initial
dwinter
parents:
diff changeset
657 }
015d06b10d37 initial
dwinter
parents:
diff changeset
658
015d06b10d37 initial
dwinter
parents:
diff changeset
659 $type_filters = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
660 if (is_array($settings['mlt_type_filters']) && !empty($settings['mlt_type_filters'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
661 $query->addFilter('bundle', '(' . implode(' OR ', $settings['mlt_type_filters']) . ') ');
015d06b10d37 initial
dwinter
parents:
diff changeset
662 }
015d06b10d37 initial
dwinter
parents:
diff changeset
663
015d06b10d37 initial
dwinter
parents:
diff changeset
664 if ($custom_filters = $settings['mlt_custom_filters']) {
015d06b10d37 initial
dwinter
parents:
diff changeset
665 // @todo - fix the settings form to take a comma-delimited set of filters.
015d06b10d37 initial
dwinter
parents:
diff changeset
666 $query->addFilter('', $custom_filters);
015d06b10d37 initial
dwinter
parents:
diff changeset
667 }
015d06b10d37 initial
dwinter
parents:
diff changeset
668
015d06b10d37 initial
dwinter
parents:
diff changeset
669 // This hook allows modules to modify the query object.
015d06b10d37 initial
dwinter
parents:
diff changeset
670 drupal_alter('solrsearch_query', $query);
015d06b10d37 initial
dwinter
parents:
diff changeset
671 if ($query->abort_search) {
015d06b10d37 initial
dwinter
parents:
diff changeset
672 return NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
673 }
015d06b10d37 initial
dwinter
parents:
diff changeset
674
015d06b10d37 initial
dwinter
parents:
diff changeset
675 $response = $query->search();
015d06b10d37 initial
dwinter
parents:
diff changeset
676
015d06b10d37 initial
dwinter
parents:
diff changeset
677 if (isset($response->response->docs)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
678 return (array) $response->response->docs;
015d06b10d37 initial
dwinter
parents:
diff changeset
679 }
015d06b10d37 initial
dwinter
parents:
diff changeset
680 }
015d06b10d37 initial
dwinter
parents:
diff changeset
681 catch (Exception $e) {
015d06b10d37 initial
dwinter
parents:
diff changeset
682 watchdog('Apache Solr', nl2br(check_plain($e->getMessage())), NULL, WATCHDOG_ERROR);
015d06b10d37 initial
dwinter
parents:
diff changeset
683 }
015d06b10d37 initial
dwinter
parents:
diff changeset
684 }
015d06b10d37 initial
dwinter
parents:
diff changeset
685
015d06b10d37 initial
dwinter
parents:
diff changeset
686 function theme_solrsearch_search_mlt_recommendation_block($vars) {
015d06b10d37 initial
dwinter
parents:
diff changeset
687 $docs = $vars['docs'];
015d06b10d37 initial
dwinter
parents:
diff changeset
688 $links = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
689 foreach ($docs as $result) {
015d06b10d37 initial
dwinter
parents:
diff changeset
690 // Suitable for single-site mode. Label is already safe.
015d06b10d37 initial
dwinter
parents:
diff changeset
691 $links[] = l($result->label, $result->path, array('html' => TRUE));
015d06b10d37 initial
dwinter
parents:
diff changeset
692 }
015d06b10d37 initial
dwinter
parents:
diff changeset
693 $links = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
694 '#theme' => 'item_list',
015d06b10d37 initial
dwinter
parents:
diff changeset
695 '#items' => $links,
015d06b10d37 initial
dwinter
parents:
diff changeset
696 );
015d06b10d37 initial
dwinter
parents:
diff changeset
697 return render($links);
015d06b10d37 initial
dwinter
parents:
diff changeset
698 }
015d06b10d37 initial
dwinter
parents:
diff changeset
699
015d06b10d37 initial
dwinter
parents:
diff changeset
700 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
701 * Implements hook_search_info().
015d06b10d37 initial
dwinter
parents:
diff changeset
702 */
015d06b10d37 initial
dwinter
parents:
diff changeset
703 function UNUSED_solrsearch_search_search_info() {
015d06b10d37 initial
dwinter
parents:
diff changeset
704 // Load our core search page
015d06b10d37 initial
dwinter
parents:
diff changeset
705 // This core search page is assumed to always be there. It cannot be deleted.
015d06b10d37 initial
dwinter
parents:
diff changeset
706 $search_page = solrsearch_search_page_load('core_solr_search');
015d06b10d37 initial
dwinter
parents:
diff changeset
707
015d06b10d37 initial
dwinter
parents:
diff changeset
708 // This can happen during install, or if the DB was manually changed.
015d06b10d37 initial
dwinter
parents:
diff changeset
709 if (empty($search_page)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
710 $search_page = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
711 $search_page['page_title'] = 'echo';
015d06b10d37 initial
dwinter
parents:
diff changeset
712 $search_page['search_path'] = 'solrsearch/site';
015d06b10d37 initial
dwinter
parents:
diff changeset
713 }
015d06b10d37 initial
dwinter
parents:
diff changeset
714
015d06b10d37 initial
dwinter
parents:
diff changeset
715 return array(
015d06b10d37 initial
dwinter
parents:
diff changeset
716 'title' => $search_page['page_title'],
015d06b10d37 initial
dwinter
parents:
diff changeset
717 'path' => str_replace('solrsearch/', '', $search_page['search_path']),
015d06b10d37 initial
dwinter
parents:
diff changeset
718 'conditions_callback' => variable_get('solrsearch_search_conditions_callback', 'solrsearch_search_conditions'),
015d06b10d37 initial
dwinter
parents:
diff changeset
719 );
015d06b10d37 initial
dwinter
parents:
diff changeset
720 }
015d06b10d37 initial
dwinter
parents:
diff changeset
721
015d06b10d37 initial
dwinter
parents:
diff changeset
722 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
723 * Implements hook_search_reset().
015d06b10d37 initial
dwinter
parents:
diff changeset
724 */
015d06b10d37 initial
dwinter
parents:
diff changeset
725 function UNUSED_solrsearch_search_search_reset() {
015d06b10d37 initial
dwinter
parents:
diff changeset
726 module_load_include('inc', 'solrsearch', 'solrsearch.index');
015d06b10d37 initial
dwinter
parents:
diff changeset
727 $env_id = solrsearch_default_environment();
015d06b10d37 initial
dwinter
parents:
diff changeset
728 solrsearch_index_mark_for_reindex($env_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
729 }
015d06b10d37 initial
dwinter
parents:
diff changeset
730
015d06b10d37 initial
dwinter
parents:
diff changeset
731 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
732 * Implements hook_search_status().
015d06b10d37 initial
dwinter
parents:
diff changeset
733 */
015d06b10d37 initial
dwinter
parents:
diff changeset
734 function UNUSED_solrsearch_search_search_status() {
015d06b10d37 initial
dwinter
parents:
diff changeset
735 module_load_include('inc', 'solrsearch', 'solrsearch.index');
015d06b10d37 initial
dwinter
parents:
diff changeset
736 $env_id = solrsearch_default_environment();
015d06b10d37 initial
dwinter
parents:
diff changeset
737 return solrsearch_index_status($env_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
738 }
015d06b10d37 initial
dwinter
parents:
diff changeset
739
015d06b10d37 initial
dwinter
parents:
diff changeset
740 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
741 * Implements hook_search_execute().
015d06b10d37 initial
dwinter
parents:
diff changeset
742 * @param $keys
015d06b10d37 initial
dwinter
parents:
diff changeset
743 * The keys that are available after the path that is defined in
015d06b10d37 initial
dwinter
parents:
diff changeset
744 * hook_search_info
015d06b10d37 initial
dwinter
parents:
diff changeset
745 * @param $conditions
015d06b10d37 initial
dwinter
parents:
diff changeset
746 * Conditions that are coming from solrsearch_search_conditions
015d06b10d37 initial
dwinter
parents:
diff changeset
747 */
015d06b10d37 initial
dwinter
parents:
diff changeset
748 function solrsearch_search_search_execute($keys = NULL, $conditions = NULL) {
015d06b10d37 initial
dwinter
parents:
diff changeset
749
015d06b10d37 initial
dwinter
parents:
diff changeset
750 $search_page = solrsearch_search_page_load('core_solr_search');
015d06b10d37 initial
dwinter
parents:
diff changeset
751 $results = solrsearch_search_search_results($keys, $conditions, $search_page);
015d06b10d37 initial
dwinter
parents:
diff changeset
752 return $results;
015d06b10d37 initial
dwinter
parents:
diff changeset
753 }
015d06b10d37 initial
dwinter
parents:
diff changeset
754
015d06b10d37 initial
dwinter
parents:
diff changeset
755 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
756 * Implementation of a search_view() conditions callback.
015d06b10d37 initial
dwinter
parents:
diff changeset
757 */
015d06b10d37 initial
dwinter
parents:
diff changeset
758 function solrsearch_search_conditions() {
015d06b10d37 initial
dwinter
parents:
diff changeset
759 //get default conditions from the core_solr_search
015d06b10d37 initial
dwinter
parents:
diff changeset
760 $search_page = solrsearch_search_page_load('core_solr_search');
015d06b10d37 initial
dwinter
parents:
diff changeset
761 $conditions = solrsearch_search_conditions_default($search_page);
015d06b10d37 initial
dwinter
parents:
diff changeset
762 return $conditions;
015d06b10d37 initial
dwinter
parents:
diff changeset
763 }
015d06b10d37 initial
dwinter
parents:
diff changeset
764
015d06b10d37 initial
dwinter
parents:
diff changeset
765 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
766 * Implements hook_search_page().
015d06b10d37 initial
dwinter
parents:
diff changeset
767 * @param $results
015d06b10d37 initial
dwinter
parents:
diff changeset
768 * The results that came from apache solr
015d06b10d37 initial
dwinter
parents:
diff changeset
769 */
015d06b10d37 initial
dwinter
parents:
diff changeset
770 function solrsearch_search_search_page($results) {
015d06b10d37 initial
dwinter
parents:
diff changeset
771 $search_page = solrsearch_search_page_load('core_solr_search');
015d06b10d37 initial
dwinter
parents:
diff changeset
772 $build = solrsearch_search_search_page_custom($results, $search_page);
015d06b10d37 initial
dwinter
parents:
diff changeset
773 return $build;
015d06b10d37 initial
dwinter
parents:
diff changeset
774 }
015d06b10d37 initial
dwinter
parents:
diff changeset
775
015d06b10d37 initial
dwinter
parents:
diff changeset
776 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
777 * Mimics solrsearch_search_search_page() but is used for custom search pages
015d06b10d37 initial
dwinter
parents:
diff changeset
778 * We prefer to keep them seperate so we are not dependent from core search
015d06b10d37 initial
dwinter
parents:
diff changeset
779 * when someone tries to disable the core search
015d06b10d37 initial
dwinter
parents:
diff changeset
780 * @param $results
015d06b10d37 initial
dwinter
parents:
diff changeset
781 * The results that came from apache solr
015d06b10d37 initial
dwinter
parents:
diff changeset
782 * @param $build
015d06b10d37 initial
dwinter
parents:
diff changeset
783 * the build array from where this function was called. Good to append output
015d06b10d37 initial
dwinter
parents:
diff changeset
784 * to the build array
015d06b10d37 initial
dwinter
parents:
diff changeset
785 * @param $search_page
015d06b10d37 initial
dwinter
parents:
diff changeset
786 * the search page that is requesting an output
015d06b10d37 initial
dwinter
parents:
diff changeset
787 */
015d06b10d37 initial
dwinter
parents:
diff changeset
788 function solrsearch_search_search_page_custom($results, $search_page, $build = array()) {
015d06b10d37 initial
dwinter
parents:
diff changeset
789 if (!empty($search_page['settings']['solrsearch_search_spellcheck'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
790 // Retrieve suggestion
015d06b10d37 initial
dwinter
parents:
diff changeset
791 $suggestions = solrsearch_search_get_search_suggestions($search_page['env_id']);
015d06b10d37 initial
dwinter
parents:
diff changeset
792 if ($search_page && !empty($suggestions)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
793 $build['suggestions'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
794 '#theme' => 'solrsearch_search_suggestions',
015d06b10d37 initial
dwinter
parents:
diff changeset
795 '#links' => array(l($suggestions[0], $search_page['search_path'] . '/' . $suggestions[0])),
015d06b10d37 initial
dwinter
parents:
diff changeset
796 );
015d06b10d37 initial
dwinter
parents:
diff changeset
797 }
015d06b10d37 initial
dwinter
parents:
diff changeset
798 }
015d06b10d37 initial
dwinter
parents:
diff changeset
799 // Retrieve expected results from searching
015d06b10d37 initial
dwinter
parents:
diff changeset
800 if (!empty($results['solrsearch_search_browse'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
801 // Show facet browsing blocks.
015d06b10d37 initial
dwinter
parents:
diff changeset
802 $build['search_results'] = solrsearch_search_page_browse($results['solrsearch_search_browse'], $search_page['env_id']);
015d06b10d37 initial
dwinter
parents:
diff changeset
803 }
015d06b10d37 initial
dwinter
parents:
diff changeset
804 elseif ($results) {
015d06b10d37 initial
dwinter
parents:
diff changeset
805
015d06b10d37 initial
dwinter
parents:
diff changeset
806 $build['search_results'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
807 '#theme' => 'solrsearch_results',
015d06b10d37 initial
dwinter
parents:
diff changeset
808 '#results' => $results,
015d06b10d37 initial
dwinter
parents:
diff changeset
809 '#module' => 'solrsearch_search',
015d06b10d37 initial
dwinter
parents:
diff changeset
810 '#search_page' => $search_page,
015d06b10d37 initial
dwinter
parents:
diff changeset
811 );
015d06b10d37 initial
dwinter
parents:
diff changeset
812 }
015d06b10d37 initial
dwinter
parents:
diff changeset
813 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
814 // Give the user some custom help text.
015d06b10d37 initial
dwinter
parents:
diff changeset
815 $build['search_results'] = array('#markup' => theme('solrsearch_search_noresults'));
015d06b10d37 initial
dwinter
parents:
diff changeset
816 }
015d06b10d37 initial
dwinter
parents:
diff changeset
817
015d06b10d37 initial
dwinter
parents:
diff changeset
818 // Allows modules to alter the render array before returning.
015d06b10d37 initial
dwinter
parents:
diff changeset
819 drupal_alter('solrsearch_search_page', $build, $search_page);
015d06b10d37 initial
dwinter
parents:
diff changeset
820
015d06b10d37 initial
dwinter
parents:
diff changeset
821 return $build;
015d06b10d37 initial
dwinter
parents:
diff changeset
822 }
015d06b10d37 initial
dwinter
parents:
diff changeset
823
015d06b10d37 initial
dwinter
parents:
diff changeset
824 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
825 * Executes search depending on the conditions given.
015d06b10d37 initial
dwinter
parents:
diff changeset
826 * See solrsearch_search.pages.inc for another use of this function
015d06b10d37 initial
dwinter
parents:
diff changeset
827 */
015d06b10d37 initial
dwinter
parents:
diff changeset
828 function solrsearch_search_search_results($keys = NULL, $conditions = NULL, $search_page = NULL) {
015d06b10d37 initial
dwinter
parents:
diff changeset
829
015d06b10d37 initial
dwinter
parents:
diff changeset
830 $params = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
831 $results = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
832 // Process the search form. Note that if there is $_POST data,
015d06b10d37 initial
dwinter
parents:
diff changeset
833 // search_form_submit() will cause a redirect to search/[module path]/[keys],
015d06b10d37 initial
dwinter
parents:
diff changeset
834 // which will get us back to this page callback. In other words, the search
015d06b10d37 initial
dwinter
parents:
diff changeset
835 // form submits with POST but redirects to GET. This way we can keep
015d06b10d37 initial
dwinter
parents:
diff changeset
836 // the search query URL clean as a whistle.
015d06b10d37 initial
dwinter
parents:
diff changeset
837 if (empty($_POST['form_id'])
015d06b10d37 initial
dwinter
parents:
diff changeset
838 || ($_POST['form_id'] != 'solrsearch_search_custom_page_search_form')
015d06b10d37 initial
dwinter
parents:
diff changeset
839 && ($_POST['form_id'] != 'search_form')
015d06b10d37 initial
dwinter
parents:
diff changeset
840 && ($_POST['form_id'] != 'search_block_form') ) {
015d06b10d37 initial
dwinter
parents:
diff changeset
841
015d06b10d37 initial
dwinter
parents:
diff changeset
842 // Check input variables
015d06b10d37 initial
dwinter
parents:
diff changeset
843 if (empty($search_page)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
844 $search_page = solrsearch_search_page_load('core_solr_search');
015d06b10d37 initial
dwinter
parents:
diff changeset
845 // Verify if it actually loaded
015d06b10d37 initial
dwinter
parents:
diff changeset
846 if (empty($search_page)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
847 // Something must have been really messed up.
015d06b10d37 initial
dwinter
parents:
diff changeset
848 solrsearch_failure(t('Solr search'), $keys);
015d06b10d37 initial
dwinter
parents:
diff changeset
849 return array();
015d06b10d37 initial
dwinter
parents:
diff changeset
850 }
015d06b10d37 initial
dwinter
parents:
diff changeset
851 }
015d06b10d37 initial
dwinter
parents:
diff changeset
852 if (empty($conditions)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
853 $conditions = solrsearch_search_conditions_default($search_page);
015d06b10d37 initial
dwinter
parents:
diff changeset
854 }
015d06b10d37 initial
dwinter
parents:
diff changeset
855
015d06b10d37 initial
dwinter
parents:
diff changeset
856 // Sort options from the conditions array.
015d06b10d37 initial
dwinter
parents:
diff changeset
857 // @see solrsearch_search_conditions_default()
015d06b10d37 initial
dwinter
parents:
diff changeset
858 // See This condition callback to find out how.
015d06b10d37 initial
dwinter
parents:
diff changeset
859 $solrsort = isset($conditions['solrsearch_search_sort']) ? $conditions['solrsearch_search_sort'] : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
860 // What to do when we have an initial empty search
015d06b10d37 initial
dwinter
parents:
diff changeset
861 $empty_search_behavior = isset($search_page['settings']['solrsearch_search_browse']) ? $search_page['settings']['solrsearch_search_browse'] : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
862
015d06b10d37 initial
dwinter
parents:
diff changeset
863 try {
015d06b10d37 initial
dwinter
parents:
diff changeset
864
015d06b10d37 initial
dwinter
parents:
diff changeset
865 $solr = solrsearch_get_solr($search_page['env_id']);
015d06b10d37 initial
dwinter
parents:
diff changeset
866 // Default parameters
015d06b10d37 initial
dwinter
parents:
diff changeset
867 $params['fq'] = isset($conditions['fq']) ? $conditions['fq'] : array();
015d06b10d37 initial
dwinter
parents:
diff changeset
868 $params['rows'] = $search_page['settings']['solrsearch_search_per_page'];
015d06b10d37 initial
dwinter
parents:
diff changeset
869
015d06b10d37 initial
dwinter
parents:
diff changeset
870 if (empty($search_page['settings']['solrsearch_search_spellcheck'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
871 // Spellcheck needs to have a string as false/true
015d06b10d37 initial
dwinter
parents:
diff changeset
872 $params['spellcheck'] = 'false';
015d06b10d37 initial
dwinter
parents:
diff changeset
873 }
015d06b10d37 initial
dwinter
parents:
diff changeset
874 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
875 $params['spellcheck'] = 'true';
015d06b10d37 initial
dwinter
parents:
diff changeset
876 }
015d06b10d37 initial
dwinter
parents:
diff changeset
877
015d06b10d37 initial
dwinter
parents:
diff changeset
878 // Empty text Behavior
015d06b10d37 initial
dwinter
parents:
diff changeset
879 if (!$keys && !isset($conditions['f']) && ($empty_search_behavior == 'browse' || $empty_search_behavior == 'blocks')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
880 // Pass empty search behavior as string on to solrsearch_search_search_page()
015d06b10d37 initial
dwinter
parents:
diff changeset
881 // Hardcoded solrsearch name since we rely on this for the facets
015d06b10d37 initial
dwinter
parents:
diff changeset
882
015d06b10d37 initial
dwinter
parents:
diff changeset
883 $context['page_id'] = $search_page['page_id'];
015d06b10d37 initial
dwinter
parents:
diff changeset
884 $context['search_type'] = 'solrsearch_search_browse';
015d06b10d37 initial
dwinter
parents:
diff changeset
885 solrsearch_search_run_empty('solrsearch', $params, $search_page['search_path'], $solr, $context);
015d06b10d37 initial
dwinter
parents:
diff changeset
886 $results['solrsearch_search_browse'] = $empty_search_behavior;
015d06b10d37 initial
dwinter
parents:
diff changeset
887
015d06b10d37 initial
dwinter
parents:
diff changeset
888 if ($empty_search_behavior == 'browse') {
015d06b10d37 initial
dwinter
parents:
diff changeset
889 // Hide sidebar blocks for content-area browsing instead.
015d06b10d37 initial
dwinter
parents:
diff changeset
890 solrsearch_suppress_blocks($search_page['env_id'], TRUE);
015d06b10d37 initial
dwinter
parents:
diff changeset
891 }
015d06b10d37 initial
dwinter
parents:
diff changeset
892 }
015d06b10d37 initial
dwinter
parents:
diff changeset
893 // Full text behavior. Triggers with a text search or a facet
015d06b10d37 initial
dwinter
parents:
diff changeset
894 elseif (($keys || isset($conditions['f'])) || ($empty_search_behavior == 'results')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
895
015d06b10d37 initial
dwinter
parents:
diff changeset
896 $params['q'] = $keys;
015d06b10d37 initial
dwinter
parents:
diff changeset
897 // Hardcoded solrsearch name since we rely on this for the facets
015d06b10d37 initial
dwinter
parents:
diff changeset
898 $context['page_id'] = $search_page['page_id'];
015d06b10d37 initial
dwinter
parents:
diff changeset
899 $context['search_type'] = 'solrsearch_search_results';
015d06b10d37 initial
dwinter
parents:
diff changeset
900 $results = solrsearch_search_run('solrsearch', $params, $solrsort, $search_page['search_path'], pager_find_page(), $solr, $context);
015d06b10d37 initial
dwinter
parents:
diff changeset
901 }
015d06b10d37 initial
dwinter
parents:
diff changeset
902 }
015d06b10d37 initial
dwinter
parents:
diff changeset
903 catch (Exception $e) {
015d06b10d37 initial
dwinter
parents:
diff changeset
904 watchdog('Apache Solr', nl2br(check_plain($e->getMessage())), NULL, WATCHDOG_ERROR);
015d06b10d37 initial
dwinter
parents:
diff changeset
905 solrsearch_failure(t('Solr search'), $keys);
015d06b10d37 initial
dwinter
parents:
diff changeset
906 }
015d06b10d37 initial
dwinter
parents:
diff changeset
907 }
015d06b10d37 initial
dwinter
parents:
diff changeset
908 return $results;
015d06b10d37 initial
dwinter
parents:
diff changeset
909 }
015d06b10d37 initial
dwinter
parents:
diff changeset
910
015d06b10d37 initial
dwinter
parents:
diff changeset
911 function solrsearch_search_conditions_default($search_page) {
015d06b10d37 initial
dwinter
parents:
diff changeset
912 $conditions = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
913 $search_type = isset($search_page['settings']['solrsearch_search_search_type']) ? $search_page['settings']['solrsearch_search_search_type'] : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
914 $allow_user_input = isset($search_page['settings']['solrsearch_search_allow_user_input']) ? $search_page['settings']['solrsearch_search_allow_user_input'] : FALSE;
015d06b10d37 initial
dwinter
parents:
diff changeset
915 $path_replacer = isset($search_page['settings']['solrsearch_search_path_replacer']) ? $search_page['settings']['solrsearch_search_path_replacer'] : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
916 $set_custom_filter = isset($search_page['settings']['solrsearch_search_custom_enable']) ? $search_page['settings']['solrsearch_search_custom_enable'] : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
917 $search_page_fq = !empty($search_page['settings']['fq']) ? $search_page['settings']['fq'] : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
918
015d06b10d37 initial
dwinter
parents:
diff changeset
919
015d06b10d37 initial
dwinter
parents:
diff changeset
920
015d06b10d37 initial
dwinter
parents:
diff changeset
921
015d06b10d37 initial
dwinter
parents:
diff changeset
922
015d06b10d37 initial
dwinter
parents:
diff changeset
923 $conditions['fq'] = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
924 // We only allow this to happen if the search page explicitely allows it
015d06b10d37 initial
dwinter
parents:
diff changeset
925 if ($allow_user_input) {
015d06b10d37 initial
dwinter
parents:
diff changeset
926 // Get the filterQueries from the url
015d06b10d37 initial
dwinter
parents:
diff changeset
927 if (!empty($_GET['fq']) && is_array($_GET['fq'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
928 // Reset the array so that we have one level lower to go through
015d06b10d37 initial
dwinter
parents:
diff changeset
929 $conditions['fq'] = $_GET['fq'];
015d06b10d37 initial
dwinter
parents:
diff changeset
930 }
015d06b10d37 initial
dwinter
parents:
diff changeset
931 foreach($conditions['fq'] as $condition_id => $condition) {
015d06b10d37 initial
dwinter
parents:
diff changeset
932 // If the user input does not pass our validation we do not allow
015d06b10d37 initial
dwinter
parents:
diff changeset
933 // it to query solr
015d06b10d37 initial
dwinter
parents:
diff changeset
934 $test_query = solrsearch_drupal_subquery('Test');
015d06b10d37 initial
dwinter
parents:
diff changeset
935 if (!$test_query->validFilterValue($condition)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
936 unset($conditions['fq'][$condition_id]);
015d06b10d37 initial
dwinter
parents:
diff changeset
937 }
015d06b10d37 initial
dwinter
parents:
diff changeset
938 }
015d06b10d37 initial
dwinter
parents:
diff changeset
939 }
015d06b10d37 initial
dwinter
parents:
diff changeset
940
015d06b10d37 initial
dwinter
parents:
diff changeset
941 // Custom filters added in search pages
015d06b10d37 initial
dwinter
parents:
diff changeset
942 if (!empty($search_page_fq) && !empty($set_custom_filter)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
943 if (!empty($path_replacer)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
944 // If the manual filter has a % in it, replace it with $value
015d06b10d37 initial
dwinter
parents:
diff changeset
945 $conditions['fq'][] = str_replace('%', $path_replacer, $search_page_fq);
015d06b10d37 initial
dwinter
parents:
diff changeset
946 }
015d06b10d37 initial
dwinter
parents:
diff changeset
947 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
948 // Put the complete filter in the filter query
015d06b10d37 initial
dwinter
parents:
diff changeset
949 $conditions['fq'][] = $search_page_fq;
015d06b10d37 initial
dwinter
parents:
diff changeset
950 }
015d06b10d37 initial
dwinter
parents:
diff changeset
951 }
015d06b10d37 initial
dwinter
parents:
diff changeset
952
015d06b10d37 initial
dwinter
parents:
diff changeset
953 // Search type filters (such as taxonomy)
015d06b10d37 initial
dwinter
parents:
diff changeset
954 if (!empty($path_replacer) && !empty($search_type) && $search_type != 'custom') {
015d06b10d37 initial
dwinter
parents:
diff changeset
955 $conditions['fq'][] = $search_type . ':' . $path_replacer;
015d06b10d37 initial
dwinter
parents:
diff changeset
956 }
015d06b10d37 initial
dwinter
parents:
diff changeset
957
015d06b10d37 initial
dwinter
parents:
diff changeset
958 // We may also have filters added by facet API module. The 'f'
015d06b10d37 initial
dwinter
parents:
diff changeset
959 // is determined by variable FacetapiUrlProcessor::$filterKey. Hard
015d06b10d37 initial
dwinter
parents:
diff changeset
960 // coded here to avoid extra class loading.
015d06b10d37 initial
dwinter
parents:
diff changeset
961 if (!empty($_GET['f']) && is_array($_GET['f'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
962 if (module_exists('facetapi')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
963 $conditions['f'] = $_GET['f'];
015d06b10d37 initial
dwinter
parents:
diff changeset
964 }
015d06b10d37 initial
dwinter
parents:
diff changeset
965 }
015d06b10d37 initial
dwinter
parents:
diff changeset
966 // Add the sort from the page to our conditions
015d06b10d37 initial
dwinter
parents:
diff changeset
967 $sort = isset($_GET['solrsort']) ? $_GET['solrsort'] : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
968 $conditions['solrsearch_search_sort'] = $sort;
015d06b10d37 initial
dwinter
parents:
diff changeset
969
015d06b10d37 initial
dwinter
parents:
diff changeset
970
015d06b10d37 initial
dwinter
parents:
diff changeset
971 $conditions['fq'][] = "doc-type:indexMeta";
015d06b10d37 initial
dwinter
parents:
diff changeset
972 return $conditions;
015d06b10d37 initial
dwinter
parents:
diff changeset
973 }
015d06b10d37 initial
dwinter
parents:
diff changeset
974
015d06b10d37 initial
dwinter
parents:
diff changeset
975 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
976 * Handle browse results for empty searches.
015d06b10d37 initial
dwinter
parents:
diff changeset
977 */
015d06b10d37 initial
dwinter
parents:
diff changeset
978 function solrsearch_search_page_browse($empty_search_behavior, $env_id) {
015d06b10d37 initial
dwinter
parents:
diff changeset
979 $build = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
980 //dpm("solrsearch_search_page_browse");
015d06b10d37 initial
dwinter
parents:
diff changeset
981 //dpm($empty_search_behavior);
015d06b10d37 initial
dwinter
parents:
diff changeset
982
015d06b10d37 initial
dwinter
parents:
diff changeset
983 // Switch in case we come up with new flags.
015d06b10d37 initial
dwinter
parents:
diff changeset
984 switch ($empty_search_behavior) {
015d06b10d37 initial
dwinter
parents:
diff changeset
985 case 'browse':
015d06b10d37 initial
dwinter
parents:
diff changeset
986 if (module_exists('facetapi') && $query = solrsearch_current_query($env_id)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
987 module_load_include('inc', 'facetapi', 'facetapi.block');
015d06b10d37 initial
dwinter
parents:
diff changeset
988 // Get facet render elements.
015d06b10d37 initial
dwinter
parents:
diff changeset
989 $searcher = $query->getSearcher();
015d06b10d37 initial
dwinter
parents:
diff changeset
990 $elements = facetapi_build_realm($searcher, 'block');
015d06b10d37 initial
dwinter
parents:
diff changeset
991 $build = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
992 //dpm($searcher);
015d06b10d37 initial
dwinter
parents:
diff changeset
993 //dpm($elements);
015d06b10d37 initial
dwinter
parents:
diff changeset
994 foreach (element_children($elements) as $key) {
015d06b10d37 initial
dwinter
parents:
diff changeset
995 $delta = "facetapi_{$key}";
015d06b10d37 initial
dwinter
parents:
diff changeset
996 // @todo: order/filter these pseudo-blocks according to block.module weight, visibility (see 7.x-1beta4)
015d06b10d37 initial
dwinter
parents:
diff changeset
997 $block = new stdClass();
015d06b10d37 initial
dwinter
parents:
diff changeset
998 $block->visibility = TRUE;
015d06b10d37 initial
dwinter
parents:
diff changeset
999 $block->enabled = TRUE;
015d06b10d37 initial
dwinter
parents:
diff changeset
1000 $block->module = 'facetapi';
015d06b10d37 initial
dwinter
parents:
diff changeset
1001 $block->subject = theme('facetapi_title', array('title' => $elements[$key]['#title']));
015d06b10d37 initial
dwinter
parents:
diff changeset
1002 $build[$delta] = $elements[$key];
015d06b10d37 initial
dwinter
parents:
diff changeset
1003 $block->region = NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
1004 $block->delta = 'solrsearch-' . $key;
015d06b10d37 initial
dwinter
parents:
diff changeset
1005 // @todo: the final themed block's div id attribute does not coincide with "real" block's id (see facetapi_get_delta_map())
015d06b10d37 initial
dwinter
parents:
diff changeset
1006 $build[$delta]['#block'] = $block;
015d06b10d37 initial
dwinter
parents:
diff changeset
1007 $build[$delta]['#theme_wrappers'][] = 'block';
015d06b10d37 initial
dwinter
parents:
diff changeset
1008 $build['#sorted'] = TRUE;
015d06b10d37 initial
dwinter
parents:
diff changeset
1009 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1010 $build['#theme_wrappers'][] = 'solrsearch_search_browse_blocks';
015d06b10d37 initial
dwinter
parents:
diff changeset
1011 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1012 break;
015d06b10d37 initial
dwinter
parents:
diff changeset
1013 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1014 return $build;
015d06b10d37 initial
dwinter
parents:
diff changeset
1015 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1016
015d06b10d37 initial
dwinter
parents:
diff changeset
1017 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1018 * Shows a groups of blocks for starting a search from a filter.
015d06b10d37 initial
dwinter
parents:
diff changeset
1019 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1020 function theme_solrsearch_search_browse_blocks($vars) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1021 $result = '';
015d06b10d37 initial
dwinter
parents:
diff changeset
1022 if ($vars['content']['#children']) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1023 $result .= "<div class='solrsearch-browse-blocks'>\n<h2>" . t('Browse available categories') . "</h2>\n";
015d06b10d37 initial
dwinter
parents:
diff changeset
1024 $result .= '<p>' . t('Pick a category to launch a search.') . "</p>\n";
015d06b10d37 initial
dwinter
parents:
diff changeset
1025 $result .= $vars['content']['#children'] . "\n</div>\n";
015d06b10d37 initial
dwinter
parents:
diff changeset
1026 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1027
015d06b10d37 initial
dwinter
parents:
diff changeset
1028 return $result;
015d06b10d37 initial
dwinter
parents:
diff changeset
1029 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1030
015d06b10d37 initial
dwinter
parents:
diff changeset
1031 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1032 * Execute a search with zero results rows so as to populate facets.
015d06b10d37 initial
dwinter
parents:
diff changeset
1033 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1034 function solrsearch_search_run_empty($name, array $params = array(), $base_path = '', $solr = NULL, $context = array()) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1035 $query = solrsearch_drupal_query($name, $params, '', $base_path, $solr, $context);
015d06b10d37 initial
dwinter
parents:
diff changeset
1036 $query->addParam('rows', '0');
015d06b10d37 initial
dwinter
parents:
diff changeset
1037 $solr_id = $query->solr('getId');
015d06b10d37 initial
dwinter
parents:
diff changeset
1038 list($final_query, $response) = solrsearch_do_query($query);
015d06b10d37 initial
dwinter
parents:
diff changeset
1039 solrsearch_has_searched($solr_id, TRUE);
015d06b10d37 initial
dwinter
parents:
diff changeset
1040 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1041
015d06b10d37 initial
dwinter
parents:
diff changeset
1042 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1043 * Execute a search results based on keyword, filter, and sort strings.
015d06b10d37 initial
dwinter
parents:
diff changeset
1044 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1045 * @param $name
015d06b10d37 initial
dwinter
parents:
diff changeset
1046 * @param $params
015d06b10d37 initial
dwinter
parents:
diff changeset
1047 * Array - 'q' is the keywords to search.
015d06b10d37 initial
dwinter
parents:
diff changeset
1048 * @param $solrsort
015d06b10d37 initial
dwinter
parents:
diff changeset
1049 * @param $base_path
015d06b10d37 initial
dwinter
parents:
diff changeset
1050 * For constructing filter and sort links. Leave empty unless the links need to point somewhere
015d06b10d37 initial
dwinter
parents:
diff changeset
1051 * other than the base path of the current request.
015d06b10d37 initial
dwinter
parents:
diff changeset
1052 * @param integer $page
015d06b10d37 initial
dwinter
parents:
diff changeset
1053 * For pagination.
015d06b10d37 initial
dwinter
parents:
diff changeset
1054 * @param DrupalApacheSolrServiceInterface $solr
015d06b10d37 initial
dwinter
parents:
diff changeset
1055 * The solr server resource to execute the search on.
015d06b10d37 initial
dwinter
parents:
diff changeset
1056 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1057 * @return stdClass $response
015d06b10d37 initial
dwinter
parents:
diff changeset
1058 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1059 * @throws Exception
015d06b10d37 initial
dwinter
parents:
diff changeset
1060 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1061 function solrsearch_search_run($name, array $params = array(), $solrsort = '', $base_path = '', $page = 0, DrupalApacheSolrServiceInterface $solr = NULL, $context = array()) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1062 // Merge the default params into the params sent in.
015d06b10d37 initial
dwinter
parents:
diff changeset
1063
015d06b10d37 initial
dwinter
parents:
diff changeset
1064 $params += solrsearch_search_basic_params();
015d06b10d37 initial
dwinter
parents:
diff changeset
1065 // This is the object that knows about the query coming from the user.
015d06b10d37 initial
dwinter
parents:
diff changeset
1066 $query = solrsearch_drupal_query($name, $params, $solrsort, $base_path, $solr, $context);
015d06b10d37 initial
dwinter
parents:
diff changeset
1067
015d06b10d37 initial
dwinter
parents:
diff changeset
1068 if ($query->getParam('q')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1069 solrsearch_search_add_spellcheck_params($query);
015d06b10d37 initial
dwinter
parents:
diff changeset
1070 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1071
015d06b10d37 initial
dwinter
parents:
diff changeset
1072 // Add the paging parameters
015d06b10d37 initial
dwinter
parents:
diff changeset
1073 $query->page = $page;
015d06b10d37 initial
dwinter
parents:
diff changeset
1074
015d06b10d37 initial
dwinter
parents:
diff changeset
1075 solrsearch_search_add_boost_params($query);
015d06b10d37 initial
dwinter
parents:
diff changeset
1076 if ($query->getParam('q')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1077 solrsearch_search_highlighting_params($query);
015d06b10d37 initial
dwinter
parents:
diff changeset
1078 if (!$query->getParam('hl.fl')) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1079 $qf = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
1080 foreach ($query->getParam('qf') as $field) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1081 // Truncate off any boost so we get the simple field name.
015d06b10d37 initial
dwinter
parents:
diff changeset
1082 $parts = explode('^', $field, 2);
015d06b10d37 initial
dwinter
parents:
diff changeset
1083 $qf[$parts[0]] = TRUE;
015d06b10d37 initial
dwinter
parents:
diff changeset
1084 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1085 foreach (array('content', 'ts_comments') as $field) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1086 if (isset($qf[$field])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1087 $query->addParam('hl.fl', $field);
015d06b10d37 initial
dwinter
parents:
diff changeset
1088 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1089 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1090 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1091 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1092 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
1093 // No highlighting, use the teaser as a snippet.
015d06b10d37 initial
dwinter
parents:
diff changeset
1094 $query->addParam('fl', 'teaser');
015d06b10d37 initial
dwinter
parents:
diff changeset
1095 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1096
015d06b10d37 initial
dwinter
parents:
diff changeset
1097
015d06b10d37 initial
dwinter
parents:
diff changeset
1098 list($final_query, $response) = solrsearch_do_query($query);
015d06b10d37 initial
dwinter
parents:
diff changeset
1099
015d06b10d37 initial
dwinter
parents:
diff changeset
1100 $env_id = $query->solr('getId');
015d06b10d37 initial
dwinter
parents:
diff changeset
1101 solrsearch_has_searched($env_id, TRUE);
015d06b10d37 initial
dwinter
parents:
diff changeset
1102 $process_response_callback = solrsearch_environment_variable_get($env_id, 'process_response_callback', 'solrsearch_search_process_response');
015d06b10d37 initial
dwinter
parents:
diff changeset
1103 if (function_exists($process_response_callback)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1104 return call_user_func($process_response_callback, $response, $final_query);
015d06b10d37 initial
dwinter
parents:
diff changeset
1105 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1106 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
1107 return solrsearch_search_process_response($response, $final_query);
015d06b10d37 initial
dwinter
parents:
diff changeset
1108 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1109 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1110
015d06b10d37 initial
dwinter
parents:
diff changeset
1111 function solrsearch_search_basic_params(DrupalSolrQueryInterface $query = NULL) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1112 $params = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1113 'fl' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1114 'id',
015d06b10d37 initial
dwinter
parents:
diff changeset
1115 'entity_type',
015d06b10d37 initial
dwinter
parents:
diff changeset
1116 'author_c',
015d06b10d37 initial
dwinter
parents:
diff changeset
1117 'author',
015d06b10d37 initial
dwinter
parents:
diff changeset
1118 'title',
015d06b10d37 initial
dwinter
parents:
diff changeset
1119 'title_s',
015d06b10d37 initial
dwinter
parents:
diff changeset
1120 'keyword',
015d06b10d37 initial
dwinter
parents:
diff changeset
1121 'year',
015d06b10d37 initial
dwinter
parents:
diff changeset
1122 'IM_date',
015d06b10d37 initial
dwinter
parents:
diff changeset
1123 'IM_signature',
015d06b10d37 initial
dwinter
parents:
diff changeset
1124 'archive-path',
015d06b10d37 initial
dwinter
parents:
diff changeset
1125 'doc-type',
015d06b10d37 initial
dwinter
parents:
diff changeset
1126 'mpiwg-dri',
015d06b10d37 initial
dwinter
parents:
diff changeset
1127 'access-type',
015d06b10d37 initial
dwinter
parents:
diff changeset
1128 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1129 'mm' => 1,
015d06b10d37 initial
dwinter
parents:
diff changeset
1130 'rows' => 10,
015d06b10d37 initial
dwinter
parents:
diff changeset
1131 'pf' => 'title^2.0 author^1.0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1132 'ps' => 15,
015d06b10d37 initial
dwinter
parents:
diff changeset
1133 'hl' => 'true',
015d06b10d37 initial
dwinter
parents:
diff changeset
1134 'hl.fl' => 'title',
015d06b10d37 initial
dwinter
parents:
diff changeset
1135 'hl.snippets' => 3,
015d06b10d37 initial
dwinter
parents:
diff changeset
1136 'hl.mergeContigious' => 'true',
015d06b10d37 initial
dwinter
parents:
diff changeset
1137 'f.content.hl.alternateField' => 'teaser',
015d06b10d37 initial
dwinter
parents:
diff changeset
1138 'f.content.hl.maxAlternateFieldLength' => 256,
015d06b10d37 initial
dwinter
parents:
diff changeset
1139 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1140 if ($query) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1141 $query->addParams($params);
015d06b10d37 initial
dwinter
parents:
diff changeset
1142 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1143 return $params;
015d06b10d37 initial
dwinter
parents:
diff changeset
1144 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1145
015d06b10d37 initial
dwinter
parents:
diff changeset
1146 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1147 * Add highlighting settings to the search params.
015d06b10d37 initial
dwinter
parents:
diff changeset
1148 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1149 * These settings are set in solrconfig.xml.
015d06b10d37 initial
dwinter
parents:
diff changeset
1150 * See the defaults there.
015d06b10d37 initial
dwinter
parents:
diff changeset
1151 * If you wish to override them, you can via settings.php or drush
015d06b10d37 initial
dwinter
parents:
diff changeset
1152 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1153 function solrsearch_search_highlighting_params(DrupalSolrQueryInterface $query = NULL) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1154 $params['hl'] = variable_get('solrsearch_hl_active', NULL);
015d06b10d37 initial
dwinter
parents:
diff changeset
1155 $params['hl.fragsize']= variable_get('solrsearch_hl_textsnippetlength', NULL);
015d06b10d37 initial
dwinter
parents:
diff changeset
1156 $params['hl.simple.pre'] = variable_get('solrsearch_hl_pretag', NULL);
015d06b10d37 initial
dwinter
parents:
diff changeset
1157 $params['hl.simple.post'] = variable_get('solrsearch_hl_posttag', NULL);
015d06b10d37 initial
dwinter
parents:
diff changeset
1158 $params['hl.snippets'] = variable_get('solrsearch_hl_numsnippets', NULL);
015d06b10d37 initial
dwinter
parents:
diff changeset
1159 // This should be an array of possible field names.
015d06b10d37 initial
dwinter
parents:
diff changeset
1160 $params['hl.fl'] = variable_get('solrsearch_hl_fieldtohighlight', NULL);
015d06b10d37 initial
dwinter
parents:
diff changeset
1161 $params = array_filter($params);
015d06b10d37 initial
dwinter
parents:
diff changeset
1162 if ($query) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1163 $query->addParams($params);
015d06b10d37 initial
dwinter
parents:
diff changeset
1164 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1165 return $params;
015d06b10d37 initial
dwinter
parents:
diff changeset
1166 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1167
015d06b10d37 initial
dwinter
parents:
diff changeset
1168 function solrsearch_search_add_spellcheck_params(DrupalSolrQueryInterface $query) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1169 $params = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
1170
015d06b10d37 initial
dwinter
parents:
diff changeset
1171 // Add new parameter to the search request
015d06b10d37 initial
dwinter
parents:
diff changeset
1172 $params['spellcheck.q'] = $query->getParam('q');
015d06b10d37 initial
dwinter
parents:
diff changeset
1173 $params['spellcheck'] = 'true';
015d06b10d37 initial
dwinter
parents:
diff changeset
1174 $query->addParams($params);
015d06b10d37 initial
dwinter
parents:
diff changeset
1175 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1176
015d06b10d37 initial
dwinter
parents:
diff changeset
1177 function solrsearch_search_add_boost_params(DrupalSolrQueryInterface $query) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1178 $env_id = $query->solr('getId');
015d06b10d37 initial
dwinter
parents:
diff changeset
1179 $params = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
1180
015d06b10d37 initial
dwinter
parents:
diff changeset
1181 $defaults = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1182 'content' => '1.0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1183 'ts_comments' => '0.5',
015d06b10d37 initial
dwinter
parents:
diff changeset
1184 'tos_content_extra' => '0.1',
015d06b10d37 initial
dwinter
parents:
diff changeset
1185 'label' => '5.0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1186 'tos_name' => '3.0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1187 'taxonomy_names' => '2.0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1188 'tags_h1' => '5.0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1189 'tags_h2_h3' => '3.0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1190 'tags_h4_h5_h6' => '2.0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1191 'tags_inline' => '1.0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1192 'tags_a' => '0',
015d06b10d37 initial
dwinter
parents:
diff changeset
1193 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1194 $qf = solrsearch_environment_variable_get($env_id, 'field_bias', $defaults);
015d06b10d37 initial
dwinter
parents:
diff changeset
1195 $fields = $query->solr('getFields');
015d06b10d37 initial
dwinter
parents:
diff changeset
1196 if ($qf && $fields) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1197 foreach ($fields as $field_name => $field) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1198 if (!empty($qf[$field_name])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1199 $prefix = substr($field_name, 0, 3);
015d06b10d37 initial
dwinter
parents:
diff changeset
1200 if ($field_name == 'content' || $prefix == 'IM_' || $prefix == 'TT_') {
015d06b10d37 initial
dwinter
parents:
diff changeset
1201 // Normed fields tend to have a lower score. Multiplying by 40 is
015d06b10d37 initial
dwinter
parents:
diff changeset
1202 // a rough attempt to bring the score in line with fields that are
015d06b10d37 initial
dwinter
parents:
diff changeset
1203 // not normed.
015d06b10d37 initial
dwinter
parents:
diff changeset
1204 $qf[$field_name] *= 40.0;
015d06b10d37 initial
dwinter
parents:
diff changeset
1205 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1206 $params['qf'][$field_name] = $field_name . '^' . $qf[$field_name];
015d06b10d37 initial
dwinter
parents:
diff changeset
1207 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1208 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1209 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1210
015d06b10d37 initial
dwinter
parents:
diff changeset
1211 $date_settings = solrsearch_environment_variable_get($env_id, 'solrsearch_search_date_boost', '0:0');
015d06b10d37 initial
dwinter
parents:
diff changeset
1212 $comment_settings = solrsearch_environment_variable_get($env_id, 'solrsearch_search_comment_boost', '0:0');
015d06b10d37 initial
dwinter
parents:
diff changeset
1213 $changed_settings = solrsearch_environment_variable_get($env_id, 'solrsearch_search_changed_boost', '0:0');
015d06b10d37 initial
dwinter
parents:
diff changeset
1214 $sticky_boost = solrsearch_environment_variable_get($env_id, 'solrsearch_search_sticky_boost', '0');
015d06b10d37 initial
dwinter
parents:
diff changeset
1215 $promote_boost = solrsearch_environment_variable_get($env_id, 'solrsearch_search_promote_boost', '0');
015d06b10d37 initial
dwinter
parents:
diff changeset
1216 // For the boost functions for the created timestamp, etc we use the
015d06b10d37 initial
dwinter
parents:
diff changeset
1217 // standard date-biasing function, as suggested (but steeper) at
015d06b10d37 initial
dwinter
parents:
diff changeset
1218 // http://wiki.apache.org/solr/SolrRelevancyFAQ#How_can_I_boost_the_score_of_newer_documents
015d06b10d37 initial
dwinter
parents:
diff changeset
1219 // ms() returns the time difference in ms between now and the date
015d06b10d37 initial
dwinter
parents:
diff changeset
1220 // The function is thus: $ab/(ms(NOW,date)*$steepness + $ab).
015d06b10d37 initial
dwinter
parents:
diff changeset
1221 list($date_steepness, $date_boost) = explode(':', $date_settings);
015d06b10d37 initial
dwinter
parents:
diff changeset
1222 if ($date_boost) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1223 $ab = 4 / $date_steepness;
015d06b10d37 initial
dwinter
parents:
diff changeset
1224 $params['bf'][] = "recip(ms(NOW,ds_created),3.16e-11,$ab,$ab)^$date_boost";
015d06b10d37 initial
dwinter
parents:
diff changeset
1225 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1226 // Boost on comment count.
015d06b10d37 initial
dwinter
parents:
diff changeset
1227 list($comment_steepness, $comment_boost) = explode(':', $comment_settings);
015d06b10d37 initial
dwinter
parents:
diff changeset
1228 if ($comment_boost) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1229 $params['bf'][] = "recip(div(1,max(is_comment_count,1)),$comment_steepness,10,10)^$comment_boost";
015d06b10d37 initial
dwinter
parents:
diff changeset
1230 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1231 // Boost for a more recent comment or node edit.
015d06b10d37 initial
dwinter
parents:
diff changeset
1232 list($changed_steepness, $changed_boost) = explode(':', $changed_settings);
015d06b10d37 initial
dwinter
parents:
diff changeset
1233 if ($changed_boost) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1234 $ab = 4 / $changed_steepness;
015d06b10d37 initial
dwinter
parents:
diff changeset
1235 $params['bf'][] = "recip(ms(NOW,ds_created),3.16e-11,$ab,$ab)^$changed_boost";
015d06b10d37 initial
dwinter
parents:
diff changeset
1236 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1237 // Boost for nodes with sticky bit set.
015d06b10d37 initial
dwinter
parents:
diff changeset
1238 if ($sticky_boost) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1239 $params['bq'][] = "bs_sticky:true^$sticky_boost";
015d06b10d37 initial
dwinter
parents:
diff changeset
1240 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1241 // Boost for nodes with promoted bit set.
015d06b10d37 initial
dwinter
parents:
diff changeset
1242 if ($promote_boost) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1243 $params['bq'][] = "bs_promote:true^$promote_boost";
015d06b10d37 initial
dwinter
parents:
diff changeset
1244 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1245 // Modify the weight of results according to the node types.
015d06b10d37 initial
dwinter
parents:
diff changeset
1246 $type_boosts = solrsearch_environment_variable_get($env_id, 'solrsearch_search_type_boosts', array());
015d06b10d37 initial
dwinter
parents:
diff changeset
1247 if (!empty($type_boosts)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1248 foreach ($type_boosts as $type => $boost) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1249 // Only add a param if the boost is != 0 (i.e. > "Normal").
015d06b10d37 initial
dwinter
parents:
diff changeset
1250 if ($boost) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1251 $params['bq'][] = "bundle:$type^$boost";
015d06b10d37 initial
dwinter
parents:
diff changeset
1252 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1253 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1254 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1255 $query->addParams($params);
015d06b10d37 initial
dwinter
parents:
diff changeset
1256 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1257
015d06b10d37 initial
dwinter
parents:
diff changeset
1258 function solrsearch_search_process_response($response, DrupalSolrQueryInterface $query) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1259 $results = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
1260 // We default to getting snippets from the body content and comments.
015d06b10d37 initial
dwinter
parents:
diff changeset
1261 $hl_fl = $query->getParam('hl.fl');
015d06b10d37 initial
dwinter
parents:
diff changeset
1262 if (!$hl_fl) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1263 //TODO: make highlighitn configurabel
015d06b10d37 initial
dwinter
parents:
diff changeset
1264 $hl_fl = array('title','author');
015d06b10d37 initial
dwinter
parents:
diff changeset
1265 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1266 $total = $response->response->numFound;
015d06b10d37 initial
dwinter
parents:
diff changeset
1267
015d06b10d37 initial
dwinter
parents:
diff changeset
1268
015d06b10d37 initial
dwinter
parents:
diff changeset
1269 pager_default_initialize($total, $query->getParam('rows'));
015d06b10d37 initial
dwinter
parents:
diff changeset
1270 if ($total > 0) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1271 $fl = $query->getParam('fl');
015d06b10d37 initial
dwinter
parents:
diff changeset
1272 // 'id' and 'entity_type' are the only required fields in the schema, and
015d06b10d37 initial
dwinter
parents:
diff changeset
1273 // 'score' is generated by solr.
015d06b10d37 initial
dwinter
parents:
diff changeset
1274
015d06b10d37 initial
dwinter
parents:
diff changeset
1275
015d06b10d37 initial
dwinter
parents:
diff changeset
1276 foreach ($response->response->docs as $doc) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1277 $extra = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
1278 // Allow modules to alter each document and its extra information.
015d06b10d37 initial
dwinter
parents:
diff changeset
1279 drupal_alter('solrsearch_search_result', $doc, $extra, $query);
015d06b10d37 initial
dwinter
parents:
diff changeset
1280
015d06b10d37 initial
dwinter
parents:
diff changeset
1281 // Start with an empty snippets array.
015d06b10d37 initial
dwinter
parents:
diff changeset
1282 $snippets = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
1283
015d06b10d37 initial
dwinter
parents:
diff changeset
1284 //TODO mappe das irgendwo allgemein?
015d06b10d37 initial
dwinter
parents:
diff changeset
1285 $doc->id=$doc->{'archive-path'};
015d06b10d37 initial
dwinter
parents:
diff changeset
1286
015d06b10d37 initial
dwinter
parents:
diff changeset
1287 // Find the nicest available snippet.
015d06b10d37 initial
dwinter
parents:
diff changeset
1288 foreach ($hl_fl as $hl_param) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1289 if (isset($response->highlighting->{$doc->id}->$hl_param)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1290 // Merge arrays preserving keys.
015d06b10d37 initial
dwinter
parents:
diff changeset
1291 foreach ($response->highlighting->{$doc->id}->$hl_param as $value) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1292 $snippets[$hl_param][] = $value;
015d06b10d37 initial
dwinter
parents:
diff changeset
1293 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1294 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1295 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1296 // If there's no snippet at this point, add the teaser.
015d06b10d37 initial
dwinter
parents:
diff changeset
1297 if (!$snippets) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1298 if (isset($doc->teaser)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1299 $snippets[] = truncate_utf8($doc->teaser, 256, TRUE);
015d06b10d37 initial
dwinter
parents:
diff changeset
1300 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1301 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1302
015d06b10d37 initial
dwinter
parents:
diff changeset
1303 $hook = 'solrsearch_search_snippets__' . $doc->{'doc-type'};
015d06b10d37 initial
dwinter
parents:
diff changeset
1304 /*$bundle = !empty($doc->bundle) ? $doc->bundle : NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
1305 if ($bundle) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1306 $hook .= '__' . $bundle;
015d06b10d37 initial
dwinter
parents:
diff changeset
1307 }*/
015d06b10d37 initial
dwinter
parents:
diff changeset
1308 $snippet = theme($hook, array('doc' => $doc, 'snippets' => $snippets));
015d06b10d37 initial
dwinter
parents:
diff changeset
1309
015d06b10d37 initial
dwinter
parents:
diff changeset
1310 if (!isset($doc->content)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1311 $doc->content = $snippet;
015d06b10d37 initial
dwinter
parents:
diff changeset
1312 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1313
015d06b10d37 initial
dwinter
parents:
diff changeset
1314 /*
015d06b10d37 initial
dwinter
parents:
diff changeset
1315 // Normalize common dates so that we can use Drupal's normal date and
015d06b10d37 initial
dwinter
parents:
diff changeset
1316 // time handling.
015d06b10d37 initial
dwinter
parents:
diff changeset
1317 if (isset($doc->ds_created)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1318 $doc->created = strtotime($doc->ds_created);
015d06b10d37 initial
dwinter
parents:
diff changeset
1319 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1320 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
1321 $doc->created = NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
1322 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1323
015d06b10d37 initial
dwinter
parents:
diff changeset
1324 if (isset($doc->ds_changed)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1325 $doc->changed = strtotime($doc->ds_changed);
015d06b10d37 initial
dwinter
parents:
diff changeset
1326 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1327 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
1328 $doc->changed = NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
1329 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1330
015d06b10d37 initial
dwinter
parents:
diff changeset
1331 if (isset($doc->tos_name)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1332 $doc->name = $doc->tos_name;
015d06b10d37 initial
dwinter
parents:
diff changeset
1333 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1334 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
1335 $doc->name = NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
1336 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1337 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1338 // Set all expected fields from fl to NULL if they are missing so
015d06b10d37 initial
dwinter
parents:
diff changeset
1339 // as to prevent Notice: Undefined property.
015d06b10d37 initial
dwinter
parents:
diff changeset
1340 $fl = array_merge($fl, array('path', 'label', 'score'));
015d06b10d37 initial
dwinter
parents:
diff changeset
1341 foreach ($fl as $field) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1342 if (!isset($doc->{$field})) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1343 $doc->{$field} = NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
1344 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1345 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1346
015d06b10d37 initial
dwinter
parents:
diff changeset
1347 $fields = (array) $doc;
015d06b10d37 initial
dwinter
parents:
diff changeset
1348
015d06b10d37 initial
dwinter
parents:
diff changeset
1349 // a path is not a requirement of entity (see entity_uri() ), so we check if we
015d06b10d37 initial
dwinter
parents:
diff changeset
1350 // can show it and fallback to the main page of the site if we don't
015d06b10d37 initial
dwinter
parents:
diff changeset
1351 // have it.
015d06b10d37 initial
dwinter
parents:
diff changeset
1352 if (!isset($doc->url)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1353 $path = '';
015d06b10d37 initial
dwinter
parents:
diff changeset
1354 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1355 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
1356 $path = $doc->url;
015d06b10d37 initial
dwinter
parents:
diff changeset
1357 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1358
015d06b10d37 initial
dwinter
parents:
diff changeset
1359 $result = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1360
015d06b10d37 initial
dwinter
parents:
diff changeset
1361 // template_preprocess_search_result() runs check_plain() on the title
015d06b10d37 initial
dwinter
parents:
diff changeset
1362 // again. Decode to correct the display.
015d06b10d37 initial
dwinter
parents:
diff changeset
1363 'title' => htmlspecialchars_decode($doc->title[0], ENT_QUOTES),
015d06b10d37 initial
dwinter
parents:
diff changeset
1364 'author' => htmlspecialchars_decode($doc->author[0], ENT_QUOTES),
015d06b10d37 initial
dwinter
parents:
diff changeset
1365 // These values are not required by the search module but are provided
015d06b10d37 initial
dwinter
parents:
diff changeset
1366 // to give entity callbacks and themers more flexibility.
015d06b10d37 initial
dwinter
parents:
diff changeset
1367 'score' => $doc->score,
015d06b10d37 initial
dwinter
parents:
diff changeset
1368 'snippets' => $snippets,
015d06b10d37 initial
dwinter
parents:
diff changeset
1369 'snippet' => $snippet,
015d06b10d37 initial
dwinter
parents:
diff changeset
1370 'fields' => $fields,
015d06b10d37 initial
dwinter
parents:
diff changeset
1371 'doc-type' => $doc->{'doc-type'},
015d06b10d37 initial
dwinter
parents:
diff changeset
1372 'mpiwg-dri' => $doc->{'mpiwg-dri'},
015d06b10d37 initial
dwinter
parents:
diff changeset
1373 'access-type'=> $doc->{'access-type'},
015d06b10d37 initial
dwinter
parents:
diff changeset
1374 'year' => $doc->{'year'},
015d06b10d37 initial
dwinter
parents:
diff changeset
1375 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1376
015d06b10d37 initial
dwinter
parents:
diff changeset
1377 if (isset($doc->{'IM_date'})){
015d06b10d37 initial
dwinter
parents:
diff changeset
1378 $result['date']=$doc->{'IM_date'};
015d06b10d37 initial
dwinter
parents:
diff changeset
1379 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1380 if (isset($doc->{'IM_signature'})){
015d06b10d37 initial
dwinter
parents:
diff changeset
1381 $result['signature']=$doc->{'IM_signature'};
015d06b10d37 initial
dwinter
parents:
diff changeset
1382 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1383
015d06b10d37 initial
dwinter
parents:
diff changeset
1384
015d06b10d37 initial
dwinter
parents:
diff changeset
1385 // Call entity-type-specific callbacks for extra handling.
015d06b10d37 initial
dwinter
parents:
diff changeset
1386 /*$function = solrsearch_entity_get_callback($doc->{'doc-type'}, 'result callback', '');
015d06b10d37 initial
dwinter
parents:
diff changeset
1387 if (is_callable($function)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1388 $function($doc, $result, $extra);
015d06b10d37 initial
dwinter
parents:
diff changeset
1389 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1390 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1391 $result['extra'] = $extra;
015d06b10d37 initial
dwinter
parents:
diff changeset
1392
015d06b10d37 initial
dwinter
parents:
diff changeset
1393 $results[] = $result;
015d06b10d37 initial
dwinter
parents:
diff changeset
1394 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1395 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1396 // Hook to allow modifications of the retrieved results
015d06b10d37 initial
dwinter
parents:
diff changeset
1397 foreach (module_implements('solrsearch_process_results') as $module) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1398 $function = $module . '_solrsearch_process_results';
015d06b10d37 initial
dwinter
parents:
diff changeset
1399 $function($results, $query);
015d06b10d37 initial
dwinter
parents:
diff changeset
1400 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1401 return $results;
015d06b10d37 initial
dwinter
parents:
diff changeset
1402 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1403
015d06b10d37 initial
dwinter
parents:
diff changeset
1404 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1405 * Used as a callback function to generate a title for a node/page depending
015d06b10d37 initial
dwinter
parents:
diff changeset
1406 * on the input in the configuration screen
015d06b10d37 initial
dwinter
parents:
diff changeset
1407 * @param integer $search_page_id
015d06b10d37 initial
dwinter
parents:
diff changeset
1408 * @param integer $value
015d06b10d37 initial
dwinter
parents:
diff changeset
1409 * @return String
015d06b10d37 initial
dwinter
parents:
diff changeset
1410 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1411 function searchsolr_search_get_value_title($search_page_id = NULL, $value = NULL) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1412 $page_title = 'Search results for %value';
015d06b10d37 initial
dwinter
parents:
diff changeset
1413 if (isset($value) && isset($search_page_id)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1414 $search_page = apachesolr_search_page_load($search_page_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
1415 $page_title = str_replace('%value', '!value', $search_page['page_title']);
015d06b10d37 initial
dwinter
parents:
diff changeset
1416 $title = $value;
015d06b10d37 initial
dwinter
parents:
diff changeset
1417 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1418 return t($page_title, array('!value' => $title));
015d06b10d37 initial
dwinter
parents:
diff changeset
1419 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1420
015d06b10d37 initial
dwinter
parents:
diff changeset
1421 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1422 * Retrieve all of the suggestions that were given after a certain search
015d06b10d37 initial
dwinter
parents:
diff changeset
1423 * @return array()
015d06b10d37 initial
dwinter
parents:
diff changeset
1424 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1425 function solrsearch_search_get_search_suggestions($env_id) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1426 $suggestions_output = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
1427 if (solrsearch_has_searched($env_id)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1428 $query = solrsearch_current_query($env_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
1429 $keyword = $query->getParam('q');
015d06b10d37 initial
dwinter
parents:
diff changeset
1430 $searcher = $query->getSearcher();
015d06b10d37 initial
dwinter
parents:
diff changeset
1431 $response = solrsearch_static_response_cache($searcher);
015d06b10d37 initial
dwinter
parents:
diff changeset
1432 // Get spellchecker suggestions into an array.
015d06b10d37 initial
dwinter
parents:
diff changeset
1433 if (!empty($response->spellcheck->suggestions)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1434 $suggestions = get_object_vars($response->spellcheck->suggestions);
015d06b10d37 initial
dwinter
parents:
diff changeset
1435 if ($suggestions) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1436 $replacements = array();
015d06b10d37 initial
dwinter
parents:
diff changeset
1437 // Get the original query and retrieve all words with suggestions.
015d06b10d37 initial
dwinter
parents:
diff changeset
1438 foreach ($suggestions as $word => $value) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1439 $replacements[$word] = $value->suggestion[0];
015d06b10d37 initial
dwinter
parents:
diff changeset
1440 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1441 // Replace the keyword with the suggested keyword.
015d06b10d37 initial
dwinter
parents:
diff changeset
1442 $suggested_keyword = strtr($keyword, $replacements);
015d06b10d37 initial
dwinter
parents:
diff changeset
1443 // Show only if suggestion is different than current query.
015d06b10d37 initial
dwinter
parents:
diff changeset
1444 if ($keyword != $suggested_keyword) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1445 $suggestions_output[] = $suggested_keyword;
015d06b10d37 initial
dwinter
parents:
diff changeset
1446 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1447 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1448 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1449 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1450 return $suggestions_output;
015d06b10d37 initial
dwinter
parents:
diff changeset
1451 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1452
015d06b10d37 initial
dwinter
parents:
diff changeset
1453 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1454 * Implements hook_solrsearch_entity_info_alter().
015d06b10d37 initial
dwinter
parents:
diff changeset
1455 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1456 function solrsearch_search_solrsearch_entity_info_alter(&$entity_info) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1457 // First set defaults so that we don't need to worry about NULL keys.
015d06b10d37 initial
dwinter
parents:
diff changeset
1458 foreach (array_keys($entity_info) as $type) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1459 $entity_info[$type]['result callback'] = '';
015d06b10d37 initial
dwinter
parents:
diff changeset
1460 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1461 // Now set those values that we know. Other modules can do so
015d06b10d37 initial
dwinter
parents:
diff changeset
1462 // for their own entities if they want.
015d06b10d37 initial
dwinter
parents:
diff changeset
1463 $entity_info['node']['result callback'] = 'solrsearch_search_node_result';
015d06b10d37 initial
dwinter
parents:
diff changeset
1464 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1465
015d06b10d37 initial
dwinter
parents:
diff changeset
1466 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1467 * Callback function for node search results.
015d06b10d37 initial
dwinter
parents:
diff changeset
1468 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1469 * @param stdClass $doc
015d06b10d37 initial
dwinter
parents:
diff changeset
1470 * The result document from Apache Solr.
015d06b10d37 initial
dwinter
parents:
diff changeset
1471 * @param array $result
015d06b10d37 initial
dwinter
parents:
diff changeset
1472 * The result array for this record to which to add.
015d06b10d37 initial
dwinter
parents:
diff changeset
1473 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1474 function solrsearch_search_node_result($doc, &$result, &$extra) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1475 $doc->uid = $doc->is_uid;
015d06b10d37 initial
dwinter
parents:
diff changeset
1476 $result += array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1477 'type' => node_type_get_name($doc->bundle),
015d06b10d37 initial
dwinter
parents:
diff changeset
1478 'user' => theme('username', array('account' => $doc)),
015d06b10d37 initial
dwinter
parents:
diff changeset
1479 'date' => isset($doc->changed) ? $doc->changed : 0,
015d06b10d37 initial
dwinter
parents:
diff changeset
1480 'node' => $doc,
015d06b10d37 initial
dwinter
parents:
diff changeset
1481 'uid' => $doc->is_uid,
015d06b10d37 initial
dwinter
parents:
diff changeset
1482 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1483
015d06b10d37 initial
dwinter
parents:
diff changeset
1484 if (isset($doc->is_comment_count)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1485 $extra['comments'] = format_plural($doc->is_comment_count, '1 comment', '@count comments');
015d06b10d37 initial
dwinter
parents:
diff changeset
1486 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1487 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1488
015d06b10d37 initial
dwinter
parents:
diff changeset
1489 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1490 * Returns whether a search page exists.
015d06b10d37 initial
dwinter
parents:
diff changeset
1491 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1492 function solrsearch_search_page_exists($search_page_id) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1493 return db_query('SELECT 1 FROM {solrsearch_search_page} WHERE page_id = :page_id', array(':page_id' => $search_page_id))->fetchField();
015d06b10d37 initial
dwinter
parents:
diff changeset
1494 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1495
015d06b10d37 initial
dwinter
parents:
diff changeset
1496 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1497 * Template preprocess for solrsearch search results.
015d06b10d37 initial
dwinter
parents:
diff changeset
1498 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1499 * We need to add additional entity/bundle-based templates
015d06b10d37 initial
dwinter
parents:
diff changeset
1500 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1501 function solrsearch_search_preprocess_search_result(&$variables) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1502 // If this search result is coming from our module, we want to improve the
015d06b10d37 initial
dwinter
parents:
diff changeset
1503 // template potential to make life easier for themers.
015d06b10d37 initial
dwinter
parents:
diff changeset
1504
015d06b10d37 initial
dwinter
parents:
diff changeset
1505
015d06b10d37 initial
dwinter
parents:
diff changeset
1506 if ($variables['module'] == 'solrsearch_search') {
015d06b10d37 initial
dwinter
parents:
diff changeset
1507 $result = $variables['result'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1508
015d06b10d37 initial
dwinter
parents:
diff changeset
1509 //info in display should display the author.
015d06b10d37 initial
dwinter
parents:
diff changeset
1510 $variables['info']=$result['author'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1511 if (!empty($result['entity_type'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1512 $variables['theme_hook_suggestions'][] = 'search_result__' . $variables['module'] . '__' . $result['entity_type'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1513 if (!empty($result['bundle'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1514 $variables['theme_hook_suggestions'][] = 'search_result__' . $variables['module'] . '__' . $result['entity_type'] . '__' . $result['bundle'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1515 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1516 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1517 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1518 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1519
015d06b10d37 initial
dwinter
parents:
diff changeset
1520 function solrsearch_search_preprocess_search_results(&$variables) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1521 // Initialize variables
015d06b10d37 initial
dwinter
parents:
diff changeset
1522 $env_id = NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
1523
015d06b10d37 initial
dwinter
parents:
diff changeset
1524 // If this is a solr search, expose more data to themes to play with.
015d06b10d37 initial
dwinter
parents:
diff changeset
1525 if ($variables['module'] == 'solrsearch_search') {
015d06b10d37 initial
dwinter
parents:
diff changeset
1526 // Fetch our current query
015d06b10d37 initial
dwinter
parents:
diff changeset
1527 if (!empty($variables['search_page']['env_id'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1528 $env_id = $variables['search_page']['env_id'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1529 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1530 $query = solrsearch_current_query($env_id);
015d06b10d37 initial
dwinter
parents:
diff changeset
1531
015d06b10d37 initial
dwinter
parents:
diff changeset
1532 if ($query) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1533 $variables['query'] = $query;
015d06b10d37 initial
dwinter
parents:
diff changeset
1534 $variables['response'] = solrsearch_static_response_cache($query->getSearcher());
015d06b10d37 initial
dwinter
parents:
diff changeset
1535 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1536 if (empty($variables['response'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1537 $variables['description'] = '';
015d06b10d37 initial
dwinter
parents:
diff changeset
1538 return NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
1539 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1540 $total = $variables['response']->response->numFound;
015d06b10d37 initial
dwinter
parents:
diff changeset
1541 $params = $variables['query']->getParams();
015d06b10d37 initial
dwinter
parents:
diff changeset
1542
015d06b10d37 initial
dwinter
parents:
diff changeset
1543 $variables['description'] = t('Showing items @start through @end of @total.', array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1544 '@start' => $params['start'] + 1,
015d06b10d37 initial
dwinter
parents:
diff changeset
1545 '@end' => $params['start'] + $params['rows'] - 1,
015d06b10d37 initial
dwinter
parents:
diff changeset
1546 '@total' => $total,
015d06b10d37 initial
dwinter
parents:
diff changeset
1547 ));
015d06b10d37 initial
dwinter
parents:
diff changeset
1548 // Redefine the pager if it was missing
015d06b10d37 initial
dwinter
parents:
diff changeset
1549 pager_default_initialize($total, $params['rows']);
015d06b10d37 initial
dwinter
parents:
diff changeset
1550 $variables['pager'] = theme('pager', array('tags' => NULL));
015d06b10d37 initial
dwinter
parents:
diff changeset
1551
015d06b10d37 initial
dwinter
parents:
diff changeset
1552 // Add template hints for environments
015d06b10d37 initial
dwinter
parents:
diff changeset
1553 if (!empty($env_id)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1554 $variables['theme_hook_suggestions'][] = 'search_results__' . $variables['module'] . '__' . $env_id;
015d06b10d37 initial
dwinter
parents:
diff changeset
1555 // Add template hints for search pages
015d06b10d37 initial
dwinter
parents:
diff changeset
1556 if (!empty($variables['search_page']['page_id'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1557 $variables['theme_hook_suggestions'][] = 'search_results__' . $variables['module'] . '__' . $variables['search_page']['page_id'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1558 // Add template hints for both
015d06b10d37 initial
dwinter
parents:
diff changeset
1559 $variables['theme_hook_suggestions'][] = 'search_results__' . $variables['module'] . '__' . $env_id . '__' . $variables['search_page']['page_id'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1560 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1561 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1562 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1563 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1564
015d06b10d37 initial
dwinter
parents:
diff changeset
1565 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1566 * Implements hook_solrsearch_environment_delete().
015d06b10d37 initial
dwinter
parents:
diff changeset
1567 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1568 function solrsearch_search_solrsearch_environment_delete($server) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1569 db_update('solrsearch_search_page')
015d06b10d37 initial
dwinter
parents:
diff changeset
1570 ->fields(array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1571 'env_id' => '',
015d06b10d37 initial
dwinter
parents:
diff changeset
1572 ))
015d06b10d37 initial
dwinter
parents:
diff changeset
1573 ->condition('env_id', $server['env_id'])
015d06b10d37 initial
dwinter
parents:
diff changeset
1574 ->execute();
015d06b10d37 initial
dwinter
parents:
diff changeset
1575 solrsearch_environment_variable_del($server['env_id'], 'solrsearch_search_show_facets');
015d06b10d37 initial
dwinter
parents:
diff changeset
1576 solrsearch_environment_variable_del($server['env_id'], 'solrsearch_search_facet_pages');
015d06b10d37 initial
dwinter
parents:
diff changeset
1577 menu_rebuild();
015d06b10d37 initial
dwinter
parents:
diff changeset
1578 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1579
015d06b10d37 initial
dwinter
parents:
diff changeset
1580 /*function solrsearch_search_form_search_block_form_alter(&$form, $form_state) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1581 if (variable_get('search_default_module') == 'solrsearch_search') {
015d06b10d37 initial
dwinter
parents:
diff changeset
1582 $form['#submit'][] = 'solrsearch_search_form_search_submit';
015d06b10d37 initial
dwinter
parents:
diff changeset
1583 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1584 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1585 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1586
015d06b10d37 initial
dwinter
parents:
diff changeset
1587 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1588 * Default theme function for spelling suggestions.
015d06b10d37 initial
dwinter
parents:
diff changeset
1589 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1590 function theme_solrsearch_search_suggestions($variables) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1591 $output = '<div class="spelling-suggestions">';
015d06b10d37 initial
dwinter
parents:
diff changeset
1592 $output .= '<dl class="form-item"><dt><strong>' . t('Did you mean') . '</strong></dt>';
015d06b10d37 initial
dwinter
parents:
diff changeset
1593 foreach ((array) $variables['links'] as $link) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1594 $output .= '<dd>' . $link . '</dd>';
015d06b10d37 initial
dwinter
parents:
diff changeset
1595 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1596 $output .= '</dl></div>';
015d06b10d37 initial
dwinter
parents:
diff changeset
1597 return $output;
015d06b10d37 initial
dwinter
parents:
diff changeset
1598 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1599
015d06b10d37 initial
dwinter
parents:
diff changeset
1600 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1601 * Added form submit function to retain filters.
015d06b10d37 initial
dwinter
parents:
diff changeset
1602 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1603 * @see solrsearch_search_form_search_form_alter()
015d06b10d37 initial
dwinter
parents:
diff changeset
1604 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1605 function solrsearch_search_form_search_submit($form, &$form_state) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1606 $fv = $form_state['values'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1607 // Replace keys with their rawurlencoded value
015d06b10d37 initial
dwinter
parents:
diff changeset
1608 if (isset($fv['search_block_form'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1609 $raw_keys = str_replace("/","%2f",$fv['search_block_form']);
015d06b10d37 initial
dwinter
parents:
diff changeset
1610 $form_state['redirect'] = str_replace($fv['search_block_form'], $raw_keys, $form_state['redirect']);
015d06b10d37 initial
dwinter
parents:
diff changeset
1611 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1612 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1613
015d06b10d37 initial
dwinter
parents:
diff changeset
1614
015d06b10d37 initial
dwinter
parents:
diff changeset
1615 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1616 * submit function for the delete_index form.
015d06b10d37 initial
dwinter
parents:
diff changeset
1617 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1618 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1619 function solrsearch_search_build_spellcheck($form, &$form_state) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1620 try {
015d06b10d37 initial
dwinter
parents:
diff changeset
1621 $solr = solrsearch_get_solr();
015d06b10d37 initial
dwinter
parents:
diff changeset
1622 $params['spellcheck'] = 'true';
015d06b10d37 initial
dwinter
parents:
diff changeset
1623 $params['spellcheck.build'] = 'true';
015d06b10d37 initial
dwinter
parents:
diff changeset
1624 $response = $solr->search('solr', 0, 0, $params);
015d06b10d37 initial
dwinter
parents:
diff changeset
1625 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1626 catch (Exception $e) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1627 watchdog('Apache Solr', nl2br(check_plain($e->getMessage())), NULL, WATCHDOG_ERROR);
015d06b10d37 initial
dwinter
parents:
diff changeset
1628 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1629 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1630
015d06b10d37 initial
dwinter
parents:
diff changeset
1631 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1632 * Implements hook_form_[form_id]_alter().
015d06b10d37 initial
dwinter
parents:
diff changeset
1633 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1634 * Adds settings to show facet blocks on non-search pages.
015d06b10d37 initial
dwinter
parents:
diff changeset
1635 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1636 function solrsearch_search_form_facetapi_realm_settings_form_alter(&$form, &$form_state) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1637
015d06b10d37 initial
dwinter
parents:
diff changeset
1638 if ('solrsearch' == $form['#facetapi']['adapter']->getId() && 'block' == $form['#facetapi']['realm']['name']) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1639 // Gets the environment ID from the searcher, stores in #facetapi property.
015d06b10d37 initial
dwinter
parents:
diff changeset
1640 $env_id = ltrim(strstr($form['#facetapi']['adapter']->getSearcher(), '@'), '@');
015d06b10d37 initial
dwinter
parents:
diff changeset
1641
015d06b10d37 initial
dwinter
parents:
diff changeset
1642 $show_facets = solrsearch_environment_variable_get($env_id, 'solrsearch_search_show_facets', 0);
015d06b10d37 initial
dwinter
parents:
diff changeset
1643 $facet_pages = solrsearch_environment_variable_get($env_id, 'solrsearch_search_facet_pages', '');
015d06b10d37 initial
dwinter
parents:
diff changeset
1644
015d06b10d37 initial
dwinter
parents:
diff changeset
1645 $form['#facetapi']['env_id'] = $env_id;
015d06b10d37 initial
dwinter
parents:
diff changeset
1646
015d06b10d37 initial
dwinter
parents:
diff changeset
1647 $form['solrsearch_search_show_facets'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1648 '#type' => 'checkbox',
015d06b10d37 initial
dwinter
parents:
diff changeset
1649 '#title' => t('Show facets on non-search pages.'),
015d06b10d37 initial
dwinter
parents:
diff changeset
1650 '#default_value' => $show_facets,
015d06b10d37 initial
dwinter
parents:
diff changeset
1651 '#weight' => '-10',
015d06b10d37 initial
dwinter
parents:
diff changeset
1652 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1653
015d06b10d37 initial
dwinter
parents:
diff changeset
1654 $form['solrsearch_search_facet_pages'] = array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1655 '#title' => t('Non-search paths'),
015d06b10d37 initial
dwinter
parents:
diff changeset
1656 '#type' => 'textarea',
015d06b10d37 initial
dwinter
parents:
diff changeset
1657 '#default_value' => $facet_pages,
015d06b10d37 initial
dwinter
parents:
diff changeset
1658 '#weight' => '-10',
015d06b10d37 initial
dwinter
parents:
diff changeset
1659 '#dependency' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1660 'edit-solrsearch-search-show-facets' => array(1),
015d06b10d37 initial
dwinter
parents:
diff changeset
1661 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1662 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1663
015d06b10d37 initial
dwinter
parents:
diff changeset
1664 $form['#submit'][] = 'solrsearch_search_facetapi_realm_settings_form_submit';
015d06b10d37 initial
dwinter
parents:
diff changeset
1665 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1666 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1667
015d06b10d37 initial
dwinter
parents:
diff changeset
1668 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1669 * Form submission handler for facetapi_realm_settings_form().
015d06b10d37 initial
dwinter
parents:
diff changeset
1670 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1671 function solrsearch_search_facetapi_realm_settings_form_submit(&$form, &$form_state) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1672 $env_id = $form['#facetapi']['env_id'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1673
015d06b10d37 initial
dwinter
parents:
diff changeset
1674 // Adds the settings to the array keyed by environment ID, saves variables.
015d06b10d37 initial
dwinter
parents:
diff changeset
1675 $show_facets = $form_state['values']['solrsearch_search_show_facets'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1676 $facet_pages = $form_state['values']['solrsearch_search_facet_pages'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1677 if ($show_facets) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1678 solrsearch_environment_variable_set($env_id, 'solrsearch_search_show_facets', $show_facets);
015d06b10d37 initial
dwinter
parents:
diff changeset
1679 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1680 else {
015d06b10d37 initial
dwinter
parents:
diff changeset
1681 // Due to performance reasons, we delete it from the vars so that our init
015d06b10d37 initial
dwinter
parents:
diff changeset
1682 // process can react on environments that hae it set and not unset.
015d06b10d37 initial
dwinter
parents:
diff changeset
1683 // See solrsearch_search_init().
015d06b10d37 initial
dwinter
parents:
diff changeset
1684 solrsearch_environment_variable_del($env_id, 'solrsearch_search_show_facets');
015d06b10d37 initial
dwinter
parents:
diff changeset
1685 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1686 solrsearch_environment_variable_set($env_id, 'solrsearch_search_facet_pages', $facet_pages);
015d06b10d37 initial
dwinter
parents:
diff changeset
1687 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1688
015d06b10d37 initial
dwinter
parents:
diff changeset
1689 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1690 * Implements hook_theme().
015d06b10d37 initial
dwinter
parents:
diff changeset
1691 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1692 function solrsearch_search_theme() {
015d06b10d37 initial
dwinter
parents:
diff changeset
1693 return array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1694 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1695 * Shows the facets in blocks in the search result area
015d06b10d37 initial
dwinter
parents:
diff changeset
1696 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1697 'solrsearch_search_browse_blocks' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1698 'render element' => 'content',
015d06b10d37 initial
dwinter
parents:
diff changeset
1699 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1700 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1701 * Shows the search snippet
015d06b10d37 initial
dwinter
parents:
diff changeset
1702 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1703 'solrsearch_search_snippets' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1704 'variables' => array('doc' => NULL, 'snippets' => array()),
015d06b10d37 initial
dwinter
parents:
diff changeset
1705 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1706 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1707 * Shows a message when the search does not return any result
015d06b10d37 initial
dwinter
parents:
diff changeset
1708 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1709 'solrsearch_search_noresults' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1710 'variables' => array(),
015d06b10d37 initial
dwinter
parents:
diff changeset
1711 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1712 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1713 * Shows a list of suggestions
015d06b10d37 initial
dwinter
parents:
diff changeset
1714 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1715 'solrsearch_search_suggestions' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1716 'variables' => array('links' => NULL),
015d06b10d37 initial
dwinter
parents:
diff changeset
1717 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1718 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1719 * Shows a list of results (docs) in content recommendation block
015d06b10d37 initial
dwinter
parents:
diff changeset
1720 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1721 'solrsearch_search_mlt_recommendation_block' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1722 'variables' => array('docs' => NULL, 'delta' => NULL),
015d06b10d37 initial
dwinter
parents:
diff changeset
1723 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1724 'solrsearch_search_block_form' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1725 'render element' => 'form',
015d06b10d37 initial
dwinter
parents:
diff changeset
1726 'template' => 'solrsearch-block-form',
015d06b10d37 initial
dwinter
parents:
diff changeset
1727 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1728
015d06b10d37 initial
dwinter
parents:
diff changeset
1729 'solrsearch_search_author_block_form' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1730 'render element' => 'form',
015d06b10d37 initial
dwinter
parents:
diff changeset
1731 'template' => 'solrsearch-author-block-form',
015d06b10d37 initial
dwinter
parents:
diff changeset
1732 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1733
015d06b10d37 initial
dwinter
parents:
diff changeset
1734 'solrsearch_search_title_block_form' => array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1735 'render element' => 'form',
015d06b10d37 initial
dwinter
parents:
diff changeset
1736 'template' => 'solrsearch-title-block-form',
015d06b10d37 initial
dwinter
parents:
diff changeset
1737 ),
015d06b10d37 initial
dwinter
parents:
diff changeset
1738 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1739 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1740
015d06b10d37 initial
dwinter
parents:
diff changeset
1741
015d06b10d37 initial
dwinter
parents:
diff changeset
1742
015d06b10d37 initial
dwinter
parents:
diff changeset
1743 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1744 * Implements hook_theme_registry_alter().
015d06b10d37 initial
dwinter
parents:
diff changeset
1745 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1746 function solrsearch_search_theme_registry_alter(&$theme_registry) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1747
015d06b10d37 initial
dwinter
parents:
diff changeset
1748 if (isset($theme_registry['search_results'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1749 $theme_registry['search_results']['variables']['search_page'] = NULL;
015d06b10d37 initial
dwinter
parents:
diff changeset
1750 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1751 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1752
015d06b10d37 initial
dwinter
parents:
diff changeset
1753 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1754 * Theme the highlighted snippet text for a search entry.
015d06b10d37 initial
dwinter
parents:
diff changeset
1755 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1756 * @param array $vars
015d06b10d37 initial
dwinter
parents:
diff changeset
1757 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1758 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1759 function theme_solrsearch_search_snippets($vars) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1760 $result = '';
015d06b10d37 initial
dwinter
parents:
diff changeset
1761 if (is_array($vars['snippets'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1762 $snippets = $vars['snippets'];
015d06b10d37 initial
dwinter
parents:
diff changeset
1763 if (isset($snippets['content'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1764 $result .= implode(' ... ', $snippets['content']);
015d06b10d37 initial
dwinter
parents:
diff changeset
1765 unset($snippets['content']);
015d06b10d37 initial
dwinter
parents:
diff changeset
1766 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1767 if (isset($snippets['teaser'])) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1768 $result .= (strlen($result) > 0) ? ' ... ' : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
1769 $result .= implode(' ... ', $snippets['teaser']);
015d06b10d37 initial
dwinter
parents:
diff changeset
1770 unset($snippets['teaser']);
015d06b10d37 initial
dwinter
parents:
diff changeset
1771 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1772 if (count($snippets)) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1773 $result .= (strlen($result) > 0) ? ' ... ' : '';
015d06b10d37 initial
dwinter
parents:
diff changeset
1774 foreach ($snippets as $snippet) {
015d06b10d37 initial
dwinter
parents:
diff changeset
1775 $result .= implode(' ... ', $snippet);
015d06b10d37 initial
dwinter
parents:
diff changeset
1776 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1777 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1778 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1779 return $result . ' ...';
015d06b10d37 initial
dwinter
parents:
diff changeset
1780 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1781
015d06b10d37 initial
dwinter
parents:
diff changeset
1782 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1783 * Brief message to display when no results match the query.
015d06b10d37 initial
dwinter
parents:
diff changeset
1784 *
015d06b10d37 initial
dwinter
parents:
diff changeset
1785 * @see search_help()
015d06b10d37 initial
dwinter
parents:
diff changeset
1786 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1787 function theme_solrsearch_search_noresults() {
015d06b10d37 initial
dwinter
parents:
diff changeset
1788 return t('<ul>
015d06b10d37 initial
dwinter
parents:
diff changeset
1789 <li>Check if your spelling is correct, or try removing filters.</li>
015d06b10d37 initial
dwinter
parents:
diff changeset
1790 <li>Remove quotes around phrases to match each word individually: <em>"blue drop"</em> will match less than <em>blue drop</em>.</li>
015d06b10d37 initial
dwinter
parents:
diff changeset
1791 <li>You can require or exclude terms using + and -: <em>big +blue drop</em> will require a match on <em>blue</em> while <em>big blue -drop</em> will exclude results that contain <em>drop</em>.</li>
015d06b10d37 initial
dwinter
parents:
diff changeset
1792 </ul>');
015d06b10d37 initial
dwinter
parents:
diff changeset
1793 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1794
015d06b10d37 initial
dwinter
parents:
diff changeset
1795
015d06b10d37 initial
dwinter
parents:
diff changeset
1796
015d06b10d37 initial
dwinter
parents:
diff changeset
1797
015d06b10d37 initial
dwinter
parents:
diff changeset
1798 /**
015d06b10d37 initial
dwinter
parents:
diff changeset
1799 * Implements hook_forms().
015d06b10d37 initial
dwinter
parents:
diff changeset
1800 */
015d06b10d37 initial
dwinter
parents:
diff changeset
1801 function solrsearch_search_forms() {
015d06b10d37 initial
dwinter
parents:
diff changeset
1802 $forms['solrsearch_search_block_form']= array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1803 'callback' => 'solrsearch_search_box',
015d06b10d37 initial
dwinter
parents:
diff changeset
1804 'callback arguments' => array('solrsearch_search_block_form'),
015d06b10d37 initial
dwinter
parents:
diff changeset
1805 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1806
015d06b10d37 initial
dwinter
parents:
diff changeset
1807 $forms['solrsearch_search_author_block_form']= array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1808 'callback' => 'solrsearch_search_author_box',
015d06b10d37 initial
dwinter
parents:
diff changeset
1809 'callback arguments' => array('solrsearch_search_author_block_form'),
015d06b10d37 initial
dwinter
parents:
diff changeset
1810 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1811
015d06b10d37 initial
dwinter
parents:
diff changeset
1812 $forms['solrsearch_search_title_block_form']= array(
015d06b10d37 initial
dwinter
parents:
diff changeset
1813 'callback' => 'solrsearch_search_title_box',
015d06b10d37 initial
dwinter
parents:
diff changeset
1814 'callback arguments' => array('solrsearch_search_title_block_form'),
015d06b10d37 initial
dwinter
parents:
diff changeset
1815 );
015d06b10d37 initial
dwinter
parents:
diff changeset
1816 return $forms;
015d06b10d37 initial
dwinter
parents:
diff changeset
1817 }
015d06b10d37 initial
dwinter
parents:
diff changeset
1818
015d06b10d37 initial
dwinter
parents:
diff changeset
1819
015d06b10d37 initial
dwinter
parents:
diff changeset
1820
015d06b10d37 initial
dwinter
parents:
diff changeset
1821
015d06b10d37 initial
dwinter
parents:
diff changeset
1822
015d06b10d37 initial
dwinter
parents:
diff changeset
1823
015d06b10d37 initial
dwinter
parents:
diff changeset
1824