ac47e02961
Little Helper contains a full text search engine.
Currently it indexes all html-files in /collects/doc.
A mockup web-interface is present in order to facilitate easy experimentation with searches.
Run run-indexer to generate the index for your documentation dir.
Run launch to start a web-server with the search interface.
Note: Currently assumes w3m is in your path (used to precompute the
preview-snippets shown in the search results.
svn: r8836
37 lines
1.5 KiB
Scheme
37 lines
1.5 KiB
Scheme
(module config mzscheme
|
|
(provide (all-defined))
|
|
|
|
(require
|
|
setup/dirs
|
|
(only mzlib/etc this-expression-source-directory))
|
|
|
|
(define default-sensitivity (make-parameter #t))
|
|
(define current-data-directory (make-parameter (build-path (this-expression-source-directory) "data")))
|
|
(define current-index-name (make-parameter "sensitive"))
|
|
(define current-lexicon-block-size (make-parameter 100))
|
|
|
|
; The number of term-doc-frequencies records that
|
|
; can be in memory at a time (see indexer.scm).
|
|
; Use a low number on memory starved machines.
|
|
(define MAX-RECORDS-IN-MEMORY 500000)
|
|
;(define MAX-RECORDS-IN-MEMORY 1)
|
|
|
|
(define the-index-dir (string->path "/tmp/little-helper/doc"))
|
|
(define the-index-path (build-path the-index-dir "doc.index"))
|
|
(define the-index-inverted-path (build-path the-index-dir "doc.inverted"))
|
|
(define the-repository-path (find-doc-dir))
|
|
|
|
(define (lexicon-path index-name)
|
|
(build-path (current-data-directory) index-name "lexicon.txt"))
|
|
(define (lexicon-index-path index-name)
|
|
(build-path (current-data-directory) index-name "lexicon-index.txt"))
|
|
(define (inverted-path index-name)
|
|
(build-path (current-data-directory) index-name "inverted.txt"))
|
|
(define (name->index-path index-name)
|
|
(build-path (current-data-directory) index-name "index.txt"))
|
|
|
|
(define (flat-lexicon-path index-name)
|
|
(build-path (current-data-directory) index-name "flat-lexicon.txt"))
|
|
|
|
)
|