~bestpractical/rt/master

%# BEGIN BPS TAGGED BLOCK {{{

%# 

%# COPYRIGHT:

%#  

%# This software is Copyright (c) 1996-2008 Best Practical Solutions, LLC 

%#                                          <jesse@bestpractical.com>

%# 

%# (Except where explicitly superseded by other copyright notices)

%# 

%# 

%# LICENSE:

%# 

%# This work is made available to you under the terms of Version 2 of

%# the GNU General Public License. A copy of that license should have

%# been provided with this software, but in any event can be snarfed

%# from www.gnu.org.

%# 

%# This work is distributed in the hope that it will be useful, but

%# WITHOUT ANY WARRANTY; without even the implied warranty of

%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

%# General Public License for more details.

%# 

%# You should have received a copy of the GNU General Public License

%# along with this program; if not, write to the Free Software

%# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA

%# 02110-1301 or visit their web page on the internet at

%# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html.

%# 

%# 

%# CONTRIBUTION SUBMISSION POLICY:

%# 

%# (The following paragraph is not intended to limit the rights granted

%# to you to modify and distribute this software under the terms of

%# the GNU General Public License and is only of importance to you if

%# you choose to contribute your changes and enhancements to the

%# community by submitting them to Best Practical Solutions, LLC.)

%# 

%# By intentionally submitting any modifications, corrections or

%# derivatives to this work, or any other work intended for use with

%# Request Tracker, to Best Practical Solutions, LLC, you confirm that

%# you are the copyright holder for those contributions and you grant

%# Best Practical Solutions,  LLC a nonexclusive, worldwide, irrevocable,

%# royalty-free, perpetual, license to use, copy, create derivative

%# works based on those contributions, and sublicense and distribute

%# those contributions and any derivatives thereof.

%# 

%# END BPS TAGGED BLOCK }}}

<& /Elements/Header, Title => $title &>

<& /Elements/Tabs, 

    current_toptab => "Search/Simple.html",

    Title => $title

&>

 

% $m->callback( %ARGS, CallbackName => 'PreForm' );

 

<div id="SimpleSearchForm">

<form action="Simple.html" method="get">

 

<p><&|/l&>Search for tickets. Enter <strong>id</strong> numbers, <strong>queues</strong> by name, Owners by <strong>username</strong> and Requestors by <strong>email address</strong>. RT will look for anything else you enter in ticket bodies and attachments.</&></p>

 

<p><&|/l&>Searching the full text of every ticket can take a long time, but if you need to do it, you can search for any word in full ticket history for any word by typing <b>fulltext:<i>word</i></b>.</&></p>

<p><&|/l&>RT will look for anything else you enter in ticket subjects.</&></p>

 

<br />

<br />

<div align="center">

<input name="q" size="60" /><input type="submit" class="button" value="<&|/l&>Search</&>" />

</div>

 

</form>

 

% $m->callback( %ARGS, CallbackName => 'PostForm' );

 

</div>

 

<%INIT>

my $title = loc("Search for tickets");

use RT::Search::Googleish;

 

if ($q) {

    my $tickets = new RT::Tickets( $session{'CurrentUser'} );

    if ($q =~ /^(\d+)$/) {

        RT::Interface::Web::Redirect(RT->Config->Get('WebURL')."Ticket/Display.html?id=".$q);

    }

 

    $m->callback( %ARGS, query => \$q, CallbackName => 'ModifyQuery' );

 

    if ($q =~ /^(\d+)$/) {

        RT::Interface::Web::Redirect(RT->Config->Get('WebURL')."Ticket/Display.html?id=".$q);

    }

 

    my %args = (

        Argument   => $q,

        TicketsObj => $tickets,

    );

 

    $m->callback( %ARGS, CallbackName => 'SearchArgs', args => \%args);

 

    my $search = RT::Search::Googleish->new(%args);

 

    $m->comp( "Results.html", Query => $search->QueryToSQL() );

    $m->comp( "/Elements/Footer" );

    $m->abort();

}

</%INIT>

 

<%ARGS>

$q => undef

</%ARGS>