json - Hunchentoot で raw-post-data を処理する方法

Question

RESTAS、Hunchentoot、CL-JSON を利用した Lisp API に取り組んでいます。次のように定義されたルートがあります。

(define-route user/register ("/user/register" :method :post)
  (let* ((raw-data (hunchentoot:raw-post-data :force-text t))
     (params (json:decode-json-from-string)))
    (format t "List of parameters: ~a~%" params)
      ))

現在、Postman を使用して HTTP POST リクエストを送信しています。リクエスト本文には、次のような JSON データの例が含まれています。

{
    "first_name": "John",
    "last_name": "Doe",
    "login": "jdoe",
    "password": "lalala",
    "email": "jdoe@ietf.org",
    "organization": "IETF"
}

画面に出力できるので、リクエストボディは明らかに通過しますが、そのdecode-json部分には500サーバーエラーが残ります。妥当と思われるいくつかの組み合わせを試しましたが、その JSON を解析できませんでした。plist理想的には、alistまたはハッシュテーブルに解析したいと思います。どんな助けでも大歓迎です。

Answer 1

デバッグには (restas:debug-mode-on) を使用します。