CL-FORMS is a web forms handling library for Common Lisp.
Although it is potentially framework agnostic, it runs on top of Hunchentoot at the moment.
- Several form field types: String, boolean, integer, email, password fields. And more.
- Custom fields. CL-FORMS is extensible and it is possible to define new field types.
- Server and client side validation
- Rendering backends. Forms can be rendered via CL-WHO, or Djula, or something else; the backend is pluggable. The default renderer is CL-WHO.
- Themes (like Bootstrap)
- Control on rendering and layout.
- Handling of form errors.
- CSRF protection
defform to define a form. Example:
(defform fields-form (:action "/fields-post") ((name :string :value "") (ready :boolean :value t) (sex :choice :choices (list "Male" "Female") :value "Male") (submit :submit :label "Create")))
On your web handler, grab the form via
get-form, select a renderer with
with-form-rendererand then render the form with
(let ((form (forms::get-form 'fields-form))) (forms:with-form-renderer :who (forms:render-form form))
To handle the form, grab it via
get-form and then call
handle-request (you should probably also call
validate-form after). Then bind form fields via either
with-form-field-values, that binds the form field values; or
with-form-fields that binds the form fields.
(let ((form (forms:get-form 'fields-form))) (forms::handle-request form) (forms::with-form-field-values (name ready sex) form (who:with-html-output (forms.who::*html*) (:ul (:li (who:fmt "Name: ~A" name)) (:li (who:fmt "Ready: ~A" ready)) (:li (who:fmt "Sex: ~A" sex))))))
Plase have a look at the demo sources for more examples of how to use the library
There's a demo included. To run:
Download web assets. From /test/static directory run:
(require :cl-forms.demo) (forms.test:run-demo)
- Mariano Montone