lib/plugin/SemanticSearchAdvanced.php

   1 <?php
   2
   3 /*
   4  * Copyright 2007 Reini Urban
   5  *
   6  * This file is part of PhpWiki.
   7  *
   8  * PhpWiki is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * PhpWiki is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License along
  19  * with PhpWiki; if not, write to the Free Software Foundation, Inc.,
  20  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  21  */
  22
  23 require_once 'lib/plugin/SemanticSearch.php';
  24
  25 /**
  26  * Advanced search for relations/attributes and its values.
  27  * Parse the query string, which can contain full mathematical expressions
  28  * and various logical and mathematical functions and operators.
  29  * Support subqueries (for _pagename ...) and temporary variables
  30  * starting with _
  31  *
  32  * Are multiple variables valid for one page only, or is the result
  33  * constructed as list of all matches? We'll stick with one page for now.
  34  * This the only way I can see semantic meaning for now.
  35  *
  36  * Simple queries, with no variables, only against the pagename (implicit):
  37  *    "is_a::city and (population < 1.000.000 or population > 10.000.000)"
  38  *    "(is_a::city or is_a::country) and population < 10.000.000"
  39  *
  40  * Subqueries, with variables bound to the matching pagename, with (for ...):
  41  *    "works_at::_organization
  42  *      and (for _organization located_in::_city
  43  *             and (for _city population>1000000))"
  44  *
  45  *    "works_at::_organization
  46  *       and (for _organization
  47  *             (located_in::_city
  48  *             and (for _city is_a::City
  49  *                   and population>1000000))
  50  *          or (located_in::_country
  51  *               and (for _country is_a::Country and population>5000000)))
  52  *
  53  * Relation links may contain wildcards. For relation and attribute names I'm not sure yet.
  54  *
  55  * @author: Reini Urban
  56  */
  57
  58 class WikiPlugin_SemanticSearchAdvanced
  59     extends WikiPlugin_SemanticSearch
  60 {
  61     function getDescription()
  62     {
  63         return _("Parse and execute a full query expression.");
  64     }
  65
  66     function getDefaultArguments()
  67     {
  68         return array_merge
  69         (
  70             PageList::supportedArgs(), // paging and more.
  71             array(
  72                 's' => "", // query expression
  73                 'page' => "*", // which pages (glob allowed), default: all
  74                 'case_exact' => false,
  75                 'regex' => 'auto', // hmm
  76                 'noform' => false, // don't show form with results.
  77                 'noheader' => false // no caption
  78             ));
  79     }
  80
  81     function showForm(&$dbi, &$request, $args, $allrelations)
  82     {
  83         $action = $request->getPostURL();
  84         $hiddenfield = HiddenInputs($request->getArgs(), '',
  85             array('action', 'page', 's'));
  86         $pagefilter = HTML::input(array('name' => 'page',
  87             'value' => $args['page'],
  88             'title' => _("Search only in these pages. With autocompletion."),
  89             'class' => 'dropdown',
  90             'acdropdown' => 'true',
  91             'autocomplete_complete' => 'true',
  92             'autocomplete_matchsubstring' => 'false',
  93             'autocomplete_list' => 'xmlrpc:wiki.titleSearch ^[S] 4'
  94         ), '');
  95         $help = Button('submit:semsearch[help]', "?", false);
  96         $svalues = empty($allrelations) ? "" : join("','", $allrelations);
  97         $reldef = JavaScript("var semsearch_relations = new Array('" . $svalues . "')");
  98         $querybox = HTML::textarea(array('name' => 's',
  99             'title' => _("Enter a valid query expression"),
 100             'rows' => 4,
 101             'acdropdown' => 'true',
 102             'autocomplete_complete' => 'true',
 103             'autocomplete_assoc' => 'false',
 104             'autocomplete_matchsubstring' => 'true',
 105             'autocomplete_list' => 'array:semsearch_relations'
 106         ), $args['s']);
 107         $submit = Button('submit:semsearch[relations]', _("Search"), false,
 108             array('title' => 'Move to help page. No separate window'));
 109         $instructions = _("Search in all specified pages for the expression.");
 110         $form = HTML::form(array('action' => $action,
 111                 'method' => 'post',
 112                 'accept-charset' => 'UTF-8'),
 113             $reldef,
 114             $hiddenfield, HiddenInputs(array('attribute' => '')),
 115             $instructions, HTML::br(),
 116             HTML::table(array('class' => 'fullwidth'),
 117                 HTML::tr(HTML::td(_("Page Name")._(': '), $pagefilter),
 118                     HTML::td(array('align' => 'right'),
 119                         $help)),
 120                 HTML::tr(HTML::td(array('colspan' => 2),
 121                     $querybox))),
 122             HTML::br(),
 123             HTML::div(array('align' => 'center'), $submit));
 124         return $form;
 125     }
 126
 127     function run($dbi, $argstr, &$request, $basepage)
 128     {
 129         $this->_supported_operators = array(':=', '<', '<=', '>', '>=', '!=', '==', '=~');
 130         $args = $this->getArgs($argstr, $request);
 131         $posted = $request->getArg('semsearch');
 132         $request->setArg('semsearch', false);
 133         if ($request->isPost() and isset($posted['help'])) {
 134             $request->redirect(WikiURL(__("Help")."/".__("SemanticSearchAdvancedPlugin"),
 135                 array('redirectfrom' => $basepage), true));
 136         }
 137         $allrelations = $dbi->listRelations();
 138         $form = $this->showForm($dbi, $request, $args, $allrelations);
 139         if (isset($this->_norelations_warning))
 140             $form->pushContent(HTML::div(array('class' => 'warning'),
 141                 _("Warning:") . $this->_norelations_warning));
 142         extract($args);
 143         // For convenience, peace and harmony we allow GET requests also.
 144         if (!$args['s']) // check for good GET request
 145             return $form; // nobody called us, so just display our form
 146
 147         // In reality we have to iterate over all found pages.
 148         // To makes things shorter extract the next AND required expr and
 149         // iterate only over this, then recurse into the next AND expr.
 150         // => Split into an AND and OR expression tree.
 151
 152         $parsed_relations = $this->detectRelationsAndAttributes($args['s']);
 153         $regex = '';
 154         if ($parsed_relations)
 155             $regex = preg_grep("/[\*\?]/", $parsed_relations);
 156         // Check that all those do exist.
 157         else
 158             $this->error("Invalid query: No relations or attributes in the query $s found");
 159         $pagelist = new PageList($args['info'], $args['exclude'], $args);
 160         if (!$noheader) {
 161             $pagelist->setCaption
 162             (HTML($noform ? '' : HTML($form, HTML::hr()),
 163                 fmt("Semantic %s Search Result for \"%s\" in pages \"%s\"",
 164                     '', $s, $page)));
 165         }
 166         if (!$regex and $missing = array_diff($parsed_relations, $allrelations))
 167             return $pagelist;
 168         $relquery = new TextSearchQuery(join(" ", $parsed_relations));
 169         if (!$relquery->match(join(" ", $allrelations)))
 170             return $pagelist;
 171         $pagequery = new TextSearchQuery($page, $args['case_exact'], $args['regex']);
 172         // if we have only numeric or text ops we can optimize.
 173         //$parsed_attr_ops = $this->detectAttrOps($args['s']);
 174
 175         //TODO: writeme
 176         $linkquery = new TextSearchQuery($s, $args['case_exact'], $args['regex']);
 177         $links = $dbi->linkSearch($pagequery, $linkquery, 'relation', $relquery);
 178         $pagelist->_links = array();
 179         while ($link = $links->next()) {
 180             $pagelist->addPage($link['pagename']);
 181             $pagelist->_links[] = $link;
 182         }
 183         $pagelist->addColumnObject
 184         (new _PageList_Column_SemanticSearch_relation('relation', _("Relation"), $pagelist));
 185         $pagelist->addColumnObject
 186         (new _PageList_Column_SemanticSearch_link('link', _("Link"), $pagelist));
 187
 188         return $pagelist;
 189     }
 190
 191     // ... (for _variable subquery) ...
 192     function bindSubquery($query)
 193     {
 194     }
 195
 196     // is_a::city* and (population < 1.000.000 or population > 10.000.000)
 197     // => is_a population
 198     // Do we support wildcards in relation names also? is_*::city
 199     function detectRelationsAndAttributes($subquery)
 200     {
 201         $relations = array();
 202         // relations are easy
 203         //$reltoken = preg_grep("/::/", preg_split("/\s+/", $query));
 204         //$relations = array_map(create_function('$a','list($f,$b)=split("::",$a); return $f'),
 205         //                       $reltoken);
 206         foreach (preg_split("/\s+/", $query) as $whitetok) {
 207             if (preg_match("/^([\w\*\?]+)::/", $whitetok))
 208                 $relations[] = $m[1];
 209         }
 210         return $relations;
 211         // for attributes we might use the tokenizer. All non-numerics excl. units and non-ops
 212     }
 213 }
 214
 215 // Local Variables:
 216 // mode: php
 217 // tab-width: 8
 218 // c-basic-offset: 4
 219 // c-hanging-comment-ender-p: nil
 220 // indent-tabs-mode: nil
 221 // End: