Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | On the /search.d/admin page, show the Wapp environment if the env=1 query parameter is present. |
|---|---|
| Timelines: | family | ancestors | descendants | both | search-refactor |
| Files: | files | file ages | folders |
| SHA3-256: |
ebe9a614ebb00773e5f08d9b81cd9ea5 |
| User & Date: | drh 2018-02-05 00:47:57 |
Context
|
2018-02-05
| ||
| 01:15 | Update the built-in wapp.tcl to the latest from wapp.tcl.tk. Closed-Leaf check-in: 9c03c81fbb user: drh tags: search-refactor | |
| 00:47 | On the /search.d/admin page, show the Wapp environment if the env=1 query parameter is present. check-in: ebe9a614eb user: drh tags: search-refactor | |
|
2018-02-04
| ||
| 23:30 | Add the search.d/admin script. check-in: 685371e833 user: drh tags: search-refactor | |
Changes
Changes to search/admin.tcl.in.
37 38 39 40 41 42 43 44 45 46 47 48 49 50 |
return
}
wapp-page-admin
}
proc wapp-page-admin {} {
wapp-allow-xorigin-params
wapp-content-security-policy off
sqlite3 db2 [file dir [wapp-param SCRIPT_FILENAME]]/searchlog.db
set where ""
set res ""
set ipfilter ""
set ipaddr [wapp-param ip]
if {$ipaddr!=""} {
|
> > > > > > > > |
37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 |
return
}
wapp-page-admin
}
proc wapp-page-admin {} {
wapp-allow-xorigin-params
wapp-content-security-policy off
if {[wapp-param-exists env]} {
search_header
wapp-trim {
<h1>Environment</h1>
<pre>%html([wapp-debug-env])</pre>
}
return
}
sqlite3 db2 [file dir [wapp-param SCRIPT_FILENAME]]/searchlog.db
set where ""
set res ""
set ipfilter ""
set ipaddr [wapp-param ip]
if {$ipaddr!=""} {
|