From 52503dfebf31ef731719a7abcc062628107bf0ba Mon Sep 17 00:00:00 2001
From: "Difrex(Denis Zheleztsov)" <dz@etegro.com>
Date: Tue, 12 Aug 2014 10:42:27 +0400
Subject: [PATCH] search route

---
 II/DB.pm  |  2 ++
 iiplc.app | 44 ++++++++++++++++++++++++++++++--------------
 2 files changed, 32 insertions(+), 14 deletions(-)

diff --git a/II/DB.pm b/II/DB.pm
index 7b2ad43..01a6dce 100644
--- a/II/DB.pm
+++ b/II/DB.pm
@@ -20,6 +20,7 @@ sub new {
     return $self;
 }
 
+# Check message hash
 sub check_hash {
     my ( $self, $hash, $echo ) = @_;
     my $dbh = $self->{_dbh};
@@ -39,6 +40,7 @@ sub check_hash {
     }
 }
 
+# Begin transaction
 sub begin {
     my ($self) = @_;
     my $dbh = $self->{_dbh};
diff --git a/iiplc.app b/iiplc.app
index 0c146b3..2b1a8ea 100644
--- a/iiplc.app
+++ b/iiplc.app
@@ -19,6 +19,7 @@ use warnings;
 use Plack::Builder;
 use Plack::Request;
 use Plack::Response;
+
 # Static files
 use Plack::App::File;
 
@@ -65,7 +66,7 @@ my $thread = sub {
 
 my $get = sub {
     $config = $c->reload();
-    my $GET    = II::Get->new($config);
+    my $GET     = II::Get->new($config);
     my $msgs    = $GET->get_echo();
     my $new_mes = $render->new_mes($msgs);
     return [ 200, [ 'Content-type' => 'text/html' ], ["$new_mes"], ];
@@ -176,19 +177,34 @@ my $user = sub {
     return [ 200, [ 'Content-type' => 'text/html' ], [$mes_from], ];
 };
 
+# Search
+########
+my $search = sub {
+    my $env = shift;
+
+    my $req   = Plack::Request->new($env);
+    my $query = $req->param('q');
+
+    my $db     = II::DB->new();
+    my $result = $db->do_search($q);
+
+    return [ 200, [ 'Content-type' => 'text/html' ], [$result], ];
+};
+
 # Mountpoints
 builder {
-    mount "/static" => Plack::App::File->new(root => './s/')->to_app;
-    mount '/'     => $root;
-    mount '/e'    => $echo;
-    mount '/s'    => $thread;
-    mount '/u'    => $user;
-    mount '/me'   => $me;
-    mount '/tree' => $tree;
-    mount '/get/' => $get;
-    mount '/send' => $send;
-    mount '/enc'  => $enc;
-    mount '/out'  => $out;
-    mount '/push' => $push;
-    mount '/new'  => $new;
+    mount "/static" => Plack::App::File->new( root => './s/' )->to_app;
+    mount "/search" => $search;
+    mount '/'       => $root;
+    mount '/e'      => $echo;
+    mount '/s'      => $thread;
+    mount '/u'      => $user;
+    mount '/me'     => $me;
+    mount '/tree'   => $tree;
+    mount '/get'    => $get;
+    mount '/send'   => $send;
+    mount '/enc'    => $enc;
+    mount '/out'    => $out;
+    mount '/push'   => $push;
+    mount '/new'    => $new;
 };