最新进展:Emacs-cgi 加入对存取 Cookie 和 Session 的支持,以及页面之间跳转(redirect和forward)。项目地址:https://github.com/redraiment/emacs-cgi。下面以一个登入页面作为示例:
首先是首页:如果用户为登入,显示输入框提示用户输入用户名;否则输出欢迎词。
#!/usr/local/bin/elisp
(require 'cgi)
(html
(head
(title "Hello Session")
(meta (http-equiv . "Content-Type")
(content . "text/html; charset=UTF-8")))
(body
(h1 "Welcome to Emacs Lisp CGI")
<%
(if (cgi/session "name")
(form (method . post) (action . "logout.el")
(div
"Hello " <%= (cgi/session "name") %>
(button (type . submit) logout)))
(form (method . post) (action . "login.el")
(div
"My name is: "
(input (type . text)
(name . name))
(button (type . submit) Submit))))
%>)))
然后登入处理页面,在 session 中设置名字。
#!/usr/local/bin/elisp
(require 'cgi)
(if (cgi/param "name")
(cgi/session "name" (cgi/param "name")))
(cgi/redirect "index.el")
最后是退出处理页面,即清空 session 中的值。
#!/usr/local/bin/elisp
(require 'cgi)
(cgi/remove-session "name")
(cgi/redirect "index.el")
运行效果: