solrsearch: solrsearch_search.admin.inc annotate

author	Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de>
date	Mon, 08 Jun 2015 10:21:54 +0200
parents
children

rev	line source
0 a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	1 <?php
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	2
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	3 /**
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	4 * @file
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	5 * Administrative settings for searching.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	6 */
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	7
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	8 /**
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	9 * Helper function for empty search configuration.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	10 */
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	11 function _solrsearch_search_browse_form($default_value) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	12 $description = t('This is what is shown when the user enters an empty search, or removes all filters from an active search.') . ' ';
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	13 if (!module_exists('facetapi')) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	14 $description .= t('<strong>Facets will not be shown until you enable Facet API module.</strong>');
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	15 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	16 else {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	17 $description .= t('Remember to configure the facets on the <a href="!facetslink">search environment page</a> and assign blocks to regions on the <a href="!blocklink">block settings page</a>', array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	18 '!facetslink' => url('admin/config/search/solrsearch/settings/'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	19 '!blocklink' => url('admin/structure/block'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	20 ));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	21 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	22 return array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	23 '#type' => 'radios',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	24 '#title' => t('Behavior on empty search'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	25 '#options' => array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	26 'none' => t("Show search box"),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	27 'browse' => t("Show enabled facets' blocks under the search box"),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	28 'blocks' => t("Show enabled facets' blocks in their configured regions"),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	29 'results' => t("Show enabled facets' blocks in their configured regions and first page of all available results"),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	30 ),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	31 '#default_value' => $default_value,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	32 '#description' => $description,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	33 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	34 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	35
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	36 /**
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	37 * Menu callback for the overview page showing custom search pages and blocks.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	38 * @return array $build
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	39 */
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	40 function solrsearch_search_page_list_all() {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	41
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	42 $build['pages'] = solrsearch_search_page_list_pages();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	43 $build['blocks'] = solrsearch_search_page_list_blocks();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	44 return $build;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	45
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	46 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	47
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	48
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	49 /**
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	50 * Listing of all the search pages
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	51 * @return array $build
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	52 */
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	53 function solrsearch_search_page_list_pages() {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	54 $build = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	55 $rows = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	56 $rows['core_solr_search'] = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	57
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	58 // Build the sortable table header.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	59 $header = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	60 'label' => array('data' => t('Name'), 'field' => 's.label'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	61 'path' => array('data' => t('Path'), 'field' => 's.search_path'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	62 'environment' => array('data' => t('Search environment')),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	63 'operations' => array('data' => t('Operations')),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	64 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	65
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	66 $search_pages = solrsearch_search_load_all_search_pages();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	67 $default_search_page = solrsearch_search_default_search_page();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	68 foreach ($search_pages as $search_page) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	69 $row = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	70
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	71 // Add the label
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	72 $label = check_plain($search_page['label']);
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	73 // Is this row our default environment?
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	74 if ($search_page['page_id'] == $default_search_page) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	75 $label = t('!search_page <em>(Default)</em>', array('!search_page' => $label));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	76 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	77
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	78 $row[] = $label;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	79 // Add the link
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	80 $row[] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	81 'data' => array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	82 '#type' => 'link',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	83 '#title' => $search_page['search_path'],
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	84 '#href' => $search_page['search_path'],
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	85 ),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	86 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	87
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	88 // Add the search environment
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	89 $environment = solrsearch_environment_load($search_page['env_id']);
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	90 $row[] = $environment ? check_plain($environment['name']) : check_plain(t('<Disabled>'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	91 // Operations
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	92 $row[] = array('data' => l(t('Edit'), 'admin/config/search/solrsearch/search-pages/' . $search_page['page_id'] . '/edit'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	93 $row[] = array('data' => l(t('Clone'), 'admin/config/search/solrsearch/search-pages/' . $search_page['page_id'] . '/clone'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	94
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	95 // Allow to revert a search page or to delete it
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	96 if (!isset($search_page['settings']['solrsearch_search_not_removable']) && !isset($search_page['in_code_only'])) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	97 if ((isset($search_page['type']) && $search_page['type'] == 'Overridden')) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	98 $row[] = array('data' => l(t('Revert'), 'admin/config/search/solrsearch/search-pages/' . $search_page['page_id'] . '/delete'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	99 } else {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	100 $row[] = array('data' => l(t('Delete'), 'admin/config/search/solrsearch/search-pages/' . $search_page['page_id'] . '/delete'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	101 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	102 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	103 else {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	104 $row[] = '';
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	105 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	106 $rows[$search_page['page_id']] = $row;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	107 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	108
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	109 // Automatically enlarge our header with the operations size
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	110 $header['operations']['colspan'] = count(reset($rows)) - 3;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	111
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	112 $build['list'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	113 '#prefix' => '<h3>Pages</h3>',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	114 '#theme' => 'table',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	115 '#header' => $header,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	116 '#rows' => array_values($rows),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	117 '#empty' => t('No available search pages.'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	118 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	119 $build['pager'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	120 '#theme' => 'pager',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	121 '#quantity' => 20,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	122 '#weight' => 10,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	123 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	124
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	125 return $build;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	126 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	127
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	128 /**
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	129 * Listing of all the search blocks
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	130 * @return array $build
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	131 */
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	132 function solrsearch_search_page_list_blocks() {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	133 $build = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	134 $rows = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	135
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	136 // Build the sortable table header.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	137 $header = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	138 'label' => array('data' => t('Name'), 'field' => 's.label'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	139 'environment' => array('data' => t('Search environment')),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	140 'operations' => array('data' => t('Operations')),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	141 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	142
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	143 $search_blocks = variable_get('solrsearch_search_mlt_blocks', array());
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	144 foreach ($search_blocks as $search_block_id => $search_block) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	145 $row = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	146
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	147 // Add the label
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	148 $label = check_plain($search_block['name']);
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	149 $row[] = $label;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	150
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	151 // Add the search environment
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	152 $environment = solrsearch_environment_load($search_block['mlt_env_id']);
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	153 $row[] = $environment ? check_plain($environment['name']) : check_plain(t('<Disabled>'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	154 // Operations
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	155 if (module_exists('block')) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	156 $row[] = array('data' => l(t('Configure'), 'admin/structure/block/manage/solrsearch_search/' . $search_block_id . '/configure', array('query' => array('destination' => current_path()))));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	157 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	158 $row[] = array('data' => l(t('Delete'), 'admin/config/search/solrsearch/search-pages/block/' . $search_block_id . '/delete'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	159 $rows[$search_block_id] = $row;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	160 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	161
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	162 // Automatically enlarge our header with the operations size
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	163 $header['operations']['colspan'] = count(reset($rows)) - 2;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	164
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	165 $build['list'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	166 '#prefix' => '<h3>Blocks "More Like This"</h3>',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	167 '#theme' => 'table',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	168 '#header' => $header,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	169 '#rows' => array_values($rows),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	170 '#empty' => t('No available search blocks.'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	171 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	172 $build['pager'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	173 '#theme' => 'pager',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	174 '#quantity' => 20,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	175 '#weight' => 10,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	176 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	177
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	178 return $build;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	179 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	180
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	181 /**
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	182 * Menu callback/form-builder for the form to create or edit a search page.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	183 */
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	184 function solrsearch_search_page_settings_form($form, &$form_state, $search_page = NULL) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	185 $environments = solrsearch_load_all_environments();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	186 $options = array('' => t('<Disabled>'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	187 foreach ($environments as $id => $environment) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	188 $options[$id] = $environment['name'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	189 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	190 // Validate the env_id.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	191 if (!empty($search_page['env_id']) && !solrsearch_environment_load($search_page['env_id'])) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	192 $search_page['env_id'] = '';
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	193 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	194
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	195 // Initializes form with common settings.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	196 $form['search_page'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	197 '#type' => 'value',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	198 '#value' => $search_page,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	199 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	200
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	201 $form['label'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	202 '#type' => 'textfield',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	203 '#title' => t('Label'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	204 '#description' => '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	205 '#required' => TRUE,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	206 '#size' => 30,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	207 '#maxlength' => 32,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	208 '#default_value' => !empty($search_page['label']) ? $search_page['label'] : '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	209 '#description' => t('The human-readable name of the search page configuration.'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	210 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	211
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	212 $form['page_id'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	213 '#type' => 'machine_name',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	214 '#maxlength' => 32,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	215 '#required' => TRUE,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	216 '#machine_name' => array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	217 'exists' => 'solrsearch_search_page_exists',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	218 'source' => array('label'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	219 ),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	220 '#description' => '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	221 '#default_value' => !empty($search_page['page_id']) ? $search_page['page_id'] : '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	222 '#disabled' => !empty($search_page),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	223 '#description' => t('A unique machine-readable identifier for the search page configuration. It must only contain lowercase letters, numbers, and underscores.'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	224 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	225
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	226 $form['description_enable'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	227 '#type' => 'checkbox',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	228 '#title' => t('Description'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	229 '#default_value' => !empty($search_page['description']) ? TRUE : FALSE
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	230 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	231
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	232 $form['description'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	233 '#type' => 'textfield',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	234 '#title' => t('Provide description'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	235 '#title_display' => 'invisible',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	236 '#size' => 64,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	237 '#default_value' => !empty($search_page['description']) ? $search_page['description'] : '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	238 '#dependency' => array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	239 'edit-description-enable' => array(1),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	240 ),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	241 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	242
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	243 $is_default = FALSE;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	244 if (!empty($search_page)) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	245 $is_default = $search_page['page_id'] == solrsearch_search_default_search_page();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	246 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	247 $form['make_default'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	248 '#type' => 'checkbox',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	249 '#title' => t('Make this Solr Search Page the default'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	250 '#description' => t('Useful for eg. making facets to link to this page when they are shown on non-search pages'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	251 '#default_value' => $is_default,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	252 '#disabled' => $is_default,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	253 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	254
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	255 $form['info'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	256 '#title' => t('Search Page Information'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	257 '#type' => 'fieldset',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	258 '#collapsible' => FALSE,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	259 '#prefix' => '<div id="dynamic-search-page">',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	260 '#suffix' => '</div>',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	261 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	262
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	263 $core_solr_search = FALSE;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	264 if (!empty($search_page['page_id']) && ($search_page['page_id'] == 'core_solr_search')) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	265 $core_solr_search = TRUE;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	266 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	267 if ($core_solr_search) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	268 $description = t('This page always uses the current default search environment');
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	269 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	270 else {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	271 $description = t('The environment that is used by this search page. If no environment is selected, this page will be disabled.');
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	272 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	273
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	274 $form['info']['env_id'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	275 '#title' => t('Search environment'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	276 '#type' => 'select',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	277 '#options' => $options,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	278 '#default_value' => !empty($search_page['env_id']) ? $search_page['env_id'] : '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	279 '#disabled' => $core_solr_search,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	280 '#description' => $description,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	281 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	282
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	283 $form['info']['page_title'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	284 '#title' => t('Title'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	285 '#type' => 'textfield',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	286 '#required' => TRUE,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	287 '#maxlength' => 255,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	288 '#description' => 'You can use %value to place the search term in the title',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	289 '#default_value' => !empty($search_page['page_title']) ? $search_page['page_title'] : '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	290 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	291
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	292 $search_types = solrsearch_search_load_all_search_types();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	293 $options = array('custom' => t('Custom Field'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	294 foreach ($search_types as $id => $search_type) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	295 $options[$id] = $search_type['name'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	296 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	297
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	298 $form['info']['search_type'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	299 '#title' => t('Search Type'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	300 '#type' => 'select',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	301 '#options' => $options,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	302 '#default_value' => !empty($search_page['settings']['solrsearch_search_search_type']) ? $search_page['settings']['solrsearch_search_search_type'] : '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	303 '#access' => !$core_solr_search,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	304 '#description' => t('Use this only when filtering on a value from the search path.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	305 For example, select Taxonomy Term to filter on a term ID (search/taxonomy/%).'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	306 '#ajax' => array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	307 'callback' => 'solrsearch_search_ajax_search_page_default',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	308 'wrapper' => 'dynamic-search-page',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	309 'method' => 'replace',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	310 ),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	311 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	312
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	313 // Token element validate is added to validate the specific
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	314 // tokens that are allowed
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	315 $form['info']['search_path'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	316 '#title' => t('Path'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	317 '#type' => 'textfield',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	318 '#required' => TRUE,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	319 '#maxlength' => 255,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	320 '#description' => t('For example: search/my-search-page. Search keywords will appear at the end of the path.'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	321 '#default_value' => !empty($search_page['search_path']) ? $search_page['search_path'] : '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	322 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	323 if (!$core_solr_search) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	324 $form['info']['search_path']['#description'] .= ' ' . t('You can use one % to make the search page dynamic.');
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	325 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	326
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	327 $form['info']['custom_filter_enable'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	328 '#type' => 'checkbox',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	329 '#title' => t('Custom Filter'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	330 '#default_value' => !empty($search_page['settings']['solrsearch_search_custom_enable']) ? TRUE : FALSE
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	331 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	332
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	333 $form['info']['filters'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	334 '#title' => t('Custom filters'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	335 '#type' => 'textfield',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	336 '#required' => FALSE,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	337 '#maxlength' => 255,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	338 '#description' => t('A comma-separated list of lucene filter queries to apply by default.'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	339 '#default_value' => !empty($search_page['settings']['fq']) ? implode(', ', $search_page['settings']['fq']) : '',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	340 '#dependency' => array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	341 'edit-custom-filter-enable' => array(1),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	342 'edit-search-type' => array('custom'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	343 ),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	344 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	345 if (!$core_solr_search) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	346 $form['info']['filters']['#description'] .= ' ' . t('E.g. "bundle:blog, is_uid:(1 OR 2 OR %). % will be replaced by the value of % in the path"');
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	347 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	348
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	349 $form['advanced'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	350 '#title' => t('Advanced Search Page Options'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	351 '#type' => 'fieldset',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	352 '#collapsible' => TRUE,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	353 '#collapsed' => TRUE,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	354 '#tree' => TRUE,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	355 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	356
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	357 // Results per page per search page
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	358 $default_value = isset($search_page['settings']['solrsearch_search_per_page']) ? $search_page['settings']['solrsearch_search_per_page'] : '10';
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	359 $form['advanced']['solrsearch_search_per_page'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	360 '#type' => 'textfield',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	361 '#size' => 3,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	362 '#title' => t('Results per page'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	363 '#description' => t('How many items will be displayed on one page of the search result.'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	364 '#default_value' => $default_value,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	365 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	366
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	367 // Enable/disable spellcheck on pages
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	368 $default_value = isset($search_page['settings']['solrsearch_search_spellcheck']) ? $search_page['settings']['solrsearch_search_spellcheck'] : TRUE;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	369 $form['advanced']['solrsearch_search_spellcheck'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	370 '#type' => 'checkbox',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	371 '#title' => t('Enable spell check'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	372 '#description' => t('Display "Did you mean … ?" above search results.'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	373 '#default_value' => $default_value,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	374 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	375
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	376 // Enable/disable search form on search page (replaced by a block perhaps)
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	377 $default_value = isset($search_page['settings']['solrsearch_search_search_box']) ? $search_page['settings']['solrsearch_search_search_box'] : TRUE;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	378 $form['advanced']['solrsearch_search_search_box'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	379 '#type' => 'checkbox',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	380 '#title' => t('Enable the search box on the page'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	381 '#description' => t('Display a search box on the page.'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	382 '#default_value' => $default_value,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	383 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	384
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	385 // Enable/disable search form on search page (replaced by a block perhaps)
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	386 $default_value = isset($search_page['settings']['solrsearch_search_allow_user_input']) ? $search_page['settings']['solrsearch_search_allow_user_input'] : FALSE;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	387 $form['advanced']['solrsearch_search_allow_user_input'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	388 '#type' => 'checkbox',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	389 '#title' => t('Allow user input using the URL'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	390 '#description' => t('Allow users to use the URL for manual facetting via fq[] params (e.g. http://example.com/search/site/test?fq[]=uid:1&fq[]=tid:99). This will only work in combination with a keyword search. The recommended value is unchecked'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	391 '#default_value' => $default_value,
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	392 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	393
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	394 // Use the main search page setting as the default for new pages.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	395 $default_value = isset($search_page['settings']['solrsearch_search_browse']) ? $search_page['settings']['solrsearch_search_browse'] : 'browse';
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	396 $form['advanced']['solrsearch_search_browse'] = _solrsearch_search_browse_form($default_value);
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	397
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	398 // Button for the corresponding actions
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	399 $form['actions'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	400 '#type' => 'actions',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	401 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	402
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	403 $form['actions']['submit'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	404 '#type' => 'submit',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	405 '#redirect' => 'admin/config/search/solrsearch/search-pages',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	406 '#value' => t('Save'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	407 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	408 $form['actions']['submit_edit'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	409 '#type' => 'submit',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	410 '#value' => t('Save and edit'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	411 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	412
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	413 $form['actions']['cancel'] = array(
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	414 '#type' => 'link',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	415 '#title' => t('Cancel'),
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	416 '#href' => 'admin/config/search/solrsearch/search-pages',
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	417 );
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	418
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	419 $form['#submit'][] = 'solrsearch_search_page_settings_form_submit';
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	420
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	421 return $form;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	422 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	423
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	424 /**
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	425 * Callback element needs only select the portion of the form to be updated.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	426 * Since #ajax['callback'] return can be HTML or a renderable array (or an
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	427 * array of commands), we can just return a piece of the form.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	428 */
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	429 function solrsearch_search_ajax_search_page_default($form, $form_state, $search_page = NULL) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	430
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	431 $search_page = $form_state['values']['search_page'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	432 $search_types = solrsearch_search_load_all_search_types();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	433
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	434 // Helping with sensible defaults for the search path
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	435 $default_search_path = '';
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	436 if (!empty($form_state['values']['search_type']) && $form_state['values']['search_type'] != 'custom') {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	437 $default_search_path = $search_types[$form_state['values']['search_type']]['default menu'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	438 $form['info']['search_path']['#value'] = $default_search_path;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	439 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	440
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	441 // Helping with sensible defaults for the search title
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	442 $default_search_title = '';
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	443
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	444 if (empty($form_state['values']['page_title']) && $form_state['values']['search_type'] != 'custom') {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	445 $default_search_title_callback = $search_types[$form_state['values']['search_type']]['title callback'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	446 $default_search_title = $default_search_title_callback();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	447 $form['info']['page_title']['#value'] = $default_search_title;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	448 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	449 return $form['info'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	450 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	451
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	452 function solrsearch_search_page_settings_form_validate($form, &$form_state) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	453 // Performs basic validation of the menu path.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	454 if (url_is_external($form_state['values']['search_path'])) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	455 form_set_error('search_path', t('Path must be local.'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	456 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	457 $form_state['values']['search_path'] = trim($form_state['values']['search_path'], '/');
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	458 if (empty($form_state['values']['search_path'])) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	459 form_set_error('search_path', t('Path required.'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	460 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	461 if (!is_numeric($form_state['values']['advanced']['solrsearch_search_per_page'])) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	462 form_set_error('advanced][solrsearch_search_per_page', t('The amount of search results must be an integer.'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	463 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	464 $form_state['values']['advanced']['solrsearch_search_per_page'] = (int) $form_state['values']['advanced']['solrsearch_search_per_page'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	465 if (empty($form_state['values']['advanced']['solrsearch_search_per_page'])) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	466 form_set_error('advanced][solrsearch_search_per_page', t('The amount of search results cannot be empty.'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	467 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	468 if (count(explode('%', $form_state['values']['search_path'])) > 2) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	469 form_set_error('search_path', t('Only one % placeholder is allowed.'));
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	470 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	471 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	472
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	473 /**
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	474 * Processes solrsearch_search_page_settings_form form submissions.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	475 */
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	476 function solrsearch_search_page_settings_form_submit($form, &$form_state) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	477 $settings = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	478 $settings['fq'] = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	479 if ($form_state['values']['filters']) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	480 foreach (explode(',', $form_state['values']['filters']) as $string) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	481 $string = trim($string);
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	482 // Minimal validation. ':' must exist and can't be the 1st char..
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	483 if (strpos($string, ':')) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	484 $settings['fq'][] = $string;
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	485 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	486 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	487 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	488 $settings['solrsearch_search_custom_enable'] = $form_state['values']['custom_filter_enable'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	489 $settings['solrsearch_search_search_type'] = $form_state['values']['search_type'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	490 // Add all advanced settings.
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	491 $settings += $form_state['values']['advanced'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	492
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	493 // Set the default search page settings
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	494 if (!empty($form_state['values']['make_default']) && isset($form_state['values']['page_id'])) {
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	495 variable_set('solrsearch_search_default_search_page', $form_state['values']['page_id']);
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	496 }
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	497
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	498 $search_page = array();
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	499 $search_page['page_id'] = $form_state['values']['page_id'];
a2b4f67e73dc initial Dirk Wintergruen <dwinter@mpiwg-berlin.mpg.de> parents: diff changeset	500 $search_page['label'] = $form_state['values']['label'];

0

a2b4f67e73dc initial