-
Notifications
You must be signed in to change notification settings - Fork 2
/
Copy pathpackage.lisp
43 lines (43 loc) · 1.18 KB
/
package.lisp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
;;; Preamble
(in-package :cl-user)
(defpackage :germinal
(:use :cl :cl+ssl)
(:import-from :quri
#:uri
#:uri-scheme
#:uri-host
#:uri-path
#:uri-userinfo
#:url-encode
#:url-decode)
(:import-from :ppath
#:normpath
#:join)
(:import-from :cl-ppcre
#:scan
#:scan-to-strings)
(:import-from :uax-15
#:normalize)
(:export #:start
#:start-cli
#:make-request
#:make-response
#:path-blacklisted-p
#:gemini-serve-file-or-directory
#:*germinal-server-name*
#:*germinal-root*
#:*germinal-host*
#:*germinal-port*
#:*germinal-cert*
#:*germinal-cert-key*
#:*germinal-pathname-blacklist*
#:*germinal-routes*
#:*germinal-middleware*
#:request-url
#:request-pathinfo
#:request-params
#:request-client-key
#:request-client-addres
#:response-status
#:response-meta
#:response-body))