lisp>> lsx>> 返回
项目作者： fukamachi

项目描述 ：
Embeddable HTML templating engine for Common Lisp with JSX-like syntax
高级语言： Common Lisp
项目地址: git://github.com/fukamachi/lsx.git
创建时间： 2018-09-13T20:25:29Z
项目社区：https://github.com/fukamachi/lsx
开源协议：
下载


LSX

Quicklisp dist
Build Status
Coverage Status

Embeddable HTML templating engine with JSX-like syntax.

Usage

  1. (ql:quickload '(:lsx :local-time))
  3. (lsx:enable-lsx-syntax)
  5. <br/>
  6. ;=> #<LSX/HTML:ELEMENT br {1003F98BF3}>
  8. (lsx:render-object <br/> t)
  9. ;-> <br>
  10. ;=> NIL
  12. (lsx:render-object <a href="/hello">Say Hello</a> t)
  13. ;-> <a href="/hello">Say Hello</a>
  14. ;=> NIL
  17. ;;
  18. ;; Embed Lisp code in {}
  20. (lsx:render-object <a href="/hello">Say Hello at {(local-time:now)}</a> t)
  21. ;-> <a href="/hello">Say Hello at 2018-09-14T05:04:55.009102+09:00</a>
  22. ;=> NIL

Defining custom tags

  1. (lsx:deftag welcome (&key name)
  2.   <h1>{name}</h1>)
  4. <welcome name="fukamachi"></welcome>
  5. ;=> #<WELCOME {10028D74D3}>
  7. (lsx:render-object <welcome name="fukamachi" ></welcome> t)
  8. ;-> <h1>fukamachi</h1>
  9. ;=> NIL

Defining templates

  1. (lsx:deftemplate default-layout ()
  2.   (title body)
  3.   (:render
  4.     <html>
  5.       <head>
  6.         <title>{title}</title>
  7.       </head>
  8.       <body>
  9.         {body}
  10.       </body>
  11.     </html>))
  13. (lsx:deftemplate index-page (default-layout)
  14.   ()
  15.   (:default-initargs
  16.    :title "Index"
  17.    :body <h1>Welcome</h1>))
  19. (lsx:render 'index-page)
  20. ;=> "<!DOCTYPE html>
  21. ;    <html>
  22. ;          <head>
  23. ;            <title>Index</title>
  24. ;          </head>
  25. ;          <body>
  26. ;            <h1>Welcome</h1>
  27. ;          </body>
  28. ;        </html>
  29. ;    "

Loading from file

  1. ;; example.lsx
  2. (lambda (&key (name "Guest"))
  3. <html>
  4.   <head>
  5.     <title>Welcome {name}</title>
  6.   </head>
  7.   <body>
  8.     <div id="main"><h1>Hello</h1><p><a href="/entries">Show Entries</a></p></div>
  9.   </body>
  10. </html>)
  1. (lsx:read-lsx-file #P"example.lsx")
  2. ;=> #<FUNCTION (LAMBDA (&KEY :NAME) :IN "~/Programs/lib/lsx/example.lsx") {1005E72B5B}>
  4. (lsx:render-object (funcall * :name "fukamachi") t)
  5. ;-> <!DOCTYPE html>
  6. ;   <html>
  7. ;     <head>
  8. ;       <title>Welcome fukamachi</title>
  9. ;     </head>
  10. ;     <body>
  11. ;       <div id="main"><h1>Hello</h1><p><a href="/entries">Show Entries</a></p></div>
  12. ;     </body>
  13. ;   </html>
  14. ;=> NIL

How it works

LSX syntax is implemented as reader macro. It’s able to see how it’s expanded with quoting.

  1. '<br/>
  2. ;=> (LSX/TAG:H 'BR (LIST))
  4. '<a href="/hello">Say Hello</a>
  5. ;=> (LSX/TAG:H 'A (LIST (CONS "href" "/hello")) (LIST "Say Hello"))
  7. '<a href="/hello">Say Hello at {(local-time:now)}</a>
  8. ;=> (LSX/TAG:H 'A (LIST (CONS "href" "/hello")) (LIST "Say Hello at " (LAMBDA () (LOCAL-TIME:NOW))))

h is a function to make an element. It takes a single required argument, a tag-name as a string, and 2 optional arguments, attributes as an association list and children as a list of elements.

  1. ;; Same as <br/>
  2. (lsx:h "br")
  3. ;=> #<LSX/HTML:ELEMENT br {10033183D3}>
  5. (lsx:h "a" '(("href" . "/hello")) '("Say Hello"))
  6. ;=> #<LSX/HTML:ELEMENT a {100331D823}>
  8. (lsx:h "a" '(("href" . "/hello")) (list "Say Hello at " (lambda () (local-time:now))))

See Also

Author

Copyright (c) 2018 Eitaro Fukamachi

License

Licensed under the BSD 2-Clause License.