如何在Common Lisp中讀取HTTP cookie？

Question

我想在Common Lisp中製作一個單獨的CGI程序，它讀取一個cookie。

很明顯，我認爲我可以通過發送HTTP標頭中發送的cookie。然而，我想知道如何通過CGI程序從正在訪問該程序的客戶端讀取服務器上的cookie。

Answer 1

的CGI機構通過使用HTTP_COOKIE環境變量該cookie。 ANSI Common Lisp沒有任何API來訪問POSIX和Windows系統環境變量。特定於實現的功能或實現的FFI用於實現C的getenv的等效功能。

的Common Lisp Cookbook表明這一點：

* (defun my-getenv (name &optional default) 
    #+CMU 
    (let ((x (assoc name ext:*environment-list* 
        :test #'string=))) 
     (if x (cdr x) default)) 
    #-CMU 
    (or 
    #+Allegro (sys:getenv name) 
    #+CLISP (ext:getenv name) 
    #+ECL (si:getenv name) 
    #+SBCL (sb-unix::posix-getenv name) 
    #+LISPWORKS (lispworks:environment-variable name) 
    default)) 
MY-GETENV 
* (my-getenv "HOME") 
"/home/edi" 
* (my-getenv "HOM") 
NIL 
* (my-getenv "HOM" "huh?") 
"huh?" 

使用之前，我想稍微修改這：

(or #+CMU (let ((x ...)) (if ...)) 
    #+Allegro ... 
    #+CLISP 
    ... 
    default) 

Answer 2

基於卡茲答案，我們需要得到一個環境變量。但我不會指的是CL-食譜[1]，現在我們有這個解決方案自帶的ASDF：

(uiop:getenv) 

另外，Osicat庫（操作系統，文件和目錄）具有(environment-variable name)對於POSIX系統，含。視窗。

[1] SourceForge上的CL-食譜是舊的和過時的有時。在github上有一個副本，維護（很好，有點）和可編輯的：https://lispcookbook.github.io/cl-cookbook/os.html（https://github.com/LispCookbook/cl-cookbook/）。

編輯：在GitHub上的菜譜一直edited accordingly，應在https://lispcookbook.github.io/cl-cookbook/os.html