Mercurial Hosting > luan
annotate src/luan/modules/lucene/Web_search.luan @ 1152:21d157b153fe
change http parameters interface
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Sun, 04 Feb 2018 19:25:12 -0700 |
parents | bae2d0c2576c |
children | 73d754b1889f |
rev | line source |
---|---|
1088
bae2d0c2576c
change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents:
775
diff
changeset
|
1 local Luan = require "luan:Luan.luan" |
548
f4dfe9c64c25
shorten some String function names
Franklin Schmidt <fschmidt@gmail.com>
parents:
545
diff
changeset
|
2 local error = Luan.error |
f4dfe9c64c25
shorten some String function names
Franklin Schmidt <fschmidt@gmail.com>
parents:
545
diff
changeset
|
3 local pairs = Luan.pairs or error() |
f4dfe9c64c25
shorten some String function names
Franklin Schmidt <fschmidt@gmail.com>
parents:
545
diff
changeset
|
4 local ipairs = Luan.ipairs or error() |
f4dfe9c64c25
shorten some String function names
Franklin Schmidt <fschmidt@gmail.com>
parents:
545
diff
changeset
|
5 local range = Luan.range or error() |
f4dfe9c64c25
shorten some String function names
Franklin Schmidt <fschmidt@gmail.com>
parents:
545
diff
changeset
|
6 local to_string = Luan.to_string or error() |
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
561
diff
changeset
|
7 local Io = require "luan:Io.luan" |
550
b2139b21b49c
use Io.repr() in lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
549
diff
changeset
|
8 local repr = Io.repr or error() |
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
561
diff
changeset
|
9 local Http = require "luan:http/Http.luan" |
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
561
diff
changeset
|
10 local String = require "luan:String.luan" |
548
f4dfe9c64c25
shorten some String function names
Franklin Schmidt <fschmidt@gmail.com>
parents:
545
diff
changeset
|
11 local string_to_number = String.to_number or error() |
693
ca169567ce07
module URIs must now include ".luan"
Franklin Schmidt <fschmidt@gmail.com>
parents:
561
diff
changeset
|
12 local Html = require "luan:Html.luan" |
285
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
13 |
561
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
14 |
1088
bae2d0c2576c
change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents:
775
diff
changeset
|
15 local Web_search = {} |
285
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
16 |
561
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
17 local function style() %> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
18 body { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
19 font-family: "Helvetica Neue", Helvetica, Arial, sans-serif; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
20 margin: 2em 5%; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
21 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
22 h2 { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
23 margin-bottom: .5em; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
24 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
25 label { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
26 text-align: right; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
27 min-width: 6em; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
28 display: inline-block; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
29 margin-right: .5em; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
30 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
31 <% |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
32 end |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
33 |
391
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
34 local function form() %> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
35 <html> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
36 <head> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
37 <title>Lucene Query</title> |
561
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
38 <style> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
39 <% style() %> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
40 input { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
41 margin-top: 1em; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
42 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
43 input[type="text"] { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
44 font: inherit; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
45 padding: .5em .8em; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
46 border-radius: 8px; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
47 border-style: groove; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
48 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
49 input[type="text"]:focus { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
50 border-color: #66afe9; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
51 outline: none; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
52 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
53 span[tip] { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
54 color: #888; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
55 font-size: smaller; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
56 margin-left: .5em; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
57 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
58 input[type="submit"] { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
59 color: white; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
60 background: #337ab7; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
61 border-color: #337ab7; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
62 font: inherit; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
63 padding: .5em; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
64 border-radius: 4px; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
65 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
66 input[type="submit"]:hover { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
67 background: #236aa7 !important; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
68 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
69 </style> |
391
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
70 </head> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
71 <body> |
561
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
72 <h2>Lucene Query</h2> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
73 <form horizontal name="form0" method="post"> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
74 <div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
75 <label>Query:</label> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
76 <input type=text name="query" size="80" autofocus /> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
77 </div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
78 <div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
79 <label></label> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
80 <span tip>Query examples: <i>type:user</i> or <i>+type:user +name:Joe"</i></span> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
81 </div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
82 <div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
83 <label>Max Rows:</label> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
84 <input type=text name="rows" value="100" size="3" maxlength="5" /> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
85 </div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
86 <div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
87 <label>Sort:</label> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
88 <input type=text name="sort" size="60" /> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
89 </div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
90 <div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
91 <label></label> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
92 <span tip>Sort examples: <i>name, id</i></span> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
93 </div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
94 <div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
95 <label></label> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
96 <input type="submit" /> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
97 </div> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
98 </form> |
391
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
99 </body> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
100 </html> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
101 <% end |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
102 |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
103 |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
104 local function result(query,sort,headers,table) %> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
105 <html> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
106 <head> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
107 <title>Lucene Query</title> |
561
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
108 <style> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
109 <% style() %> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
110 table { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
111 border-collapse: collapse; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
112 width: 100%; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
113 font-size: smaller; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
114 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
115 th, td { |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
116 text-align: left; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
117 padding: .5em; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
118 border: solid 1px #ddd; |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
119 } |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
120 </style> |
391
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
121 </head> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
122 <body> |
561
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
123 <h2>Lucene Query Results</h2> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
124 <p><label>Query:</label> <b><%=Html.encode(to_string(query))%></b></p> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
125 <p><label>Sort:</label> <b><%=Html.encode(to_string(sort))%></b></p> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
126 <table> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
127 <tr> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
128 <th></th> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
129 <% for _, header in ipairs(headers) do %> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
130 <th><%=header%></th> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
131 <% end %> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
132 </tr> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
133 <% for i, row in ipairs(table) do %> |
391
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
134 <tr> |
561
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
135 <td><%=i%></td> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
136 <% |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
137 for col in range(1, #headers) do |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
138 local val = row[col] |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
139 %><td><%= val and repr(val) or "" %></td><% |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
140 end |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
141 %> |
391
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
142 </tr> |
561
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
143 <% end %> |
363d07e26549
remove SimplyHTML from lucene/Web_search
Franklin Schmidt <fschmidt@gmail.com>
parents:
550
diff
changeset
|
144 </table> |
391
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
145 </body> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
146 </html> |
2f5cc9c2cbf0
replace Html.simply_html_page with simply_html_head and simply_html_body_bottom
Franklin Schmidt <fschmidt@gmail.com>
parents:
340
diff
changeset
|
147 <% end |
285
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
148 |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
149 |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
150 local function index_of(tbl,val) |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
151 for i, v in ipairs(tbl) do |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
152 if v == val then |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
153 return i |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
154 end |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
155 end |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
156 local n = #tbl + 1 |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
157 tbl[n] = val |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
158 return n |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
159 end |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
160 |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
161 |
1088
bae2d0c2576c
change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents:
775
diff
changeset
|
162 function Web_search.of(index) |
549 | 163 index or error "index is nil" |
285
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
164 |
505
7bc63886d4f2
web page modules now return a function
Franklin Schmidt <fschmidt@gmail.com>
parents:
503
diff
changeset
|
165 return function() |
285
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
166 Io.stdout = Http.response.text_writer() |
1152
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
1088
diff
changeset
|
167 local query = Http.request.parameters.query |
544
c5a93767cc5c
lucene overhaul, untested
Franklin Schmidt <fschmidt@gmail.com>
parents:
540
diff
changeset
|
168 if query == nil then |
285
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
169 form() |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
170 return |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
171 end |
1152
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
1088
diff
changeset
|
172 local rows = string_to_number(Http.request.parameters.rows) |
21d157b153fe
change http parameters interface
Franklin Schmidt <fschmidt@gmail.com>
parents:
1088
diff
changeset
|
173 local sort = Http.request.parameters.sort |
545
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
174 local results = index.search(query,1,rows,sort) |
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
175 local headers = {} |
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
176 local table = {} |
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
177 for _, doc in ipairs(results) do |
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
178 local row = {} |
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
179 for field, value in pairs(doc) do |
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
180 row[index_of(headers,field)] = value |
285
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
181 end |
545
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
182 table[#table+1] = row |
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
183 end |
ddcd4296107a
clean up lucene search
Franklin Schmidt <fschmidt@gmail.com>
parents:
544
diff
changeset
|
184 result(query,sort,headers,table) |
505
7bc63886d4f2
web page modules now return a function
Franklin Schmidt <fschmidt@gmail.com>
parents:
503
diff
changeset
|
185 end |
285
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
186 |
582e8db4cdb6
add lucene Web_search
fschmidt@gmail.com <fschmidt@gmail.com@21e917c8-12df-6dd8-5cb6-c86387c605b9>
parents:
diff
changeset
|
187 end |
503 | 188 |
1088
bae2d0c2576c
change module naming convention
Franklin Schmidt <fschmidt@gmail.com>
parents:
775
diff
changeset
|
189 return Web_search |