wsf/package.lisp at master · neverblued/wsf · GitHub

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
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
;; (c) www.neverblued.info
;; LLGPL -> http://opensource.franz.com/preamble.html

(defpackage #:wsf
  (:use #:cl #:cl-ppcre #:hunchentoot #:iterate #:alexandria
        #:blackjack)
  (:shadow #:acceptor #:content-type)
  (:export
                                        ; api
   #:defsite #:defroute #:defroute-ajax #:respond-page
                                        ; website
   #:website

   ;; basic server
                                        ; interface
   #:respond #:default-response #:failure-response
   #:*server* #:*request* #:with-server
                                        ; lisp
   #:lisp-server #:server-system #:server-package #:with-server-package
   #:reload-system
                                        ; docroot
   #:docroot-server #:server-pathname #:from-docroot
   #:server-data-pathname-format
   #:docroot #:docroot/ #:text-docroot/ #:list-docroot/
   #:define-file-datum #:load-file-datum #:defile
                                        ; parse
   #:parse-server #:server-parsers #:ranked-parsers #:parse
   #:regex-parser

   ;; web server
                                        ; responses
   #:text-response #:json-response #:html-response
                                        ; http
   #:http-server #:server-domain #:server-port #:stop&start #:online?
   #:throw-response #:robot? #:assert-session
   #:within-headless-reply?
                                        ; pookies
   #:pookies #:pookie-origin
                                        ; route
   #:router #:*router* #:with-router #:set-route #:unset-route
   #:route #:*route* #:*routes* #:route-name #:route-follow #:call-next-route
   #:link #:broken-link #:make-link
                                        ; links
   #:set-special-link #:another-link #:original-link

                                        ; ajax
   #:set-route-ajax #:ajax? #:ajax-win #:ajax-fail
   #:ajax-action #:ajax-parameters #:ajax-parameter

   #:ajax-boolean
   #:ajax-keyword
   #:ajax-string
   #:ajax-null-string
   #:ajax-symbol
   #:ajax-time
   #:ajax-value

   ))