[Emacs-cgi] 登入页面

简介: 最新进展:Emacs-cgi 加入对存取 Cookie 和 Session 的支持,以及页面之间跳转(redirect和forward)。项目地址:https://github.com/redraiment/emacs-cgi。下面以一个登入页面作为示例:首先是首页:如果用户为登入,显示输入框提示用户输入用户名;否则输出欢迎词。#!/usr/local/bin/elisp(requir

最新进展: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")

运行效果:



目录
相关文章
|
12月前
|
关系型数据库 Shell PHP
PHPCMS后台低权限拿SHELL
前提是需要有管理专题的权限 测试版本 PHPCMS程序版本:Phpcms V9.5.6 Release
|
5月前
|
开发工具 Linux Unix
18. 【Linux教程】vim 编辑器
18. 【Linux教程】vim 编辑器
75 0
|
应用服务中间件 Apache nginx
nginx配置网页密码
nginx配置网页密码
203 0
nginx配置网页密码
如何启用Joomla PHP错误报告
如果在Joomla站点上有问题,可以采取的最重要步骤之一是查找错误消息。 通过将Joomla错误报告调到最大值,你可以更容易地找到错误。在此基础上,你可以一步一步地找到问题的原因。 本教程将逐步介绍如何将Joomla错误报告设置更改为其最大值或开发选项。
|
搜索推荐 Shell 开发工具
|
MySQL 关系型数据库 测试技术