Tagged as common lisp
Written on 2021-04-19 23:47:20
Caveman2でセッションを有効するには,app.lispにあるbuilderマクロで:session
を書けばいいことはREADMEに書かれているのでそこは問題無いのですが,cookieのexpiresやセッション名となっているcookieキーの変更方法は書かれておらずソースを読む必要がありました.
https://github.com/fukamachi/lack/blob/master/src/builder.lispを読むとlackのミドルウェアか判別して実行する展開する箇所があります.
:sessionを渡すとlack.middleware.sessionを実行するということなので,
https://github.com/fukamachi/lack/blob/master/src/middleware/session.lispを読むとstateキーのデフォルトとしてmake-cookie-stateを使っているのわかります.
app.lisp内で:lack.middleware.session.state.cookieをインポートして,builder内で
(:session
:state (make-cookie-state
:httponly t
:cookie-key "myapp.session"
:expires 1800))
すればset-cookieの値が変わっているはずです.
このcookie-stateは構造体でありhttps://github.com/fukamachi/lack/blob/master/src/middleware/session/state/cookie.lispで定義されています.
「cookieを生成した現在時刻+make-cookie-stateのexpiresキーで渡した秒数」が最終的なexpiresになるのでこの例だと30分有効ということになります.
個人的にはsamesiteを入れたいのですが入り組んでいて私ではわかりづらく難航しています.
まぁ元のlackの該当箇所を書き換えてしまった方が早いですが.
私がlackに出していたPRがマージされたので現在のバージョンであれば,
(:session
:state (make-cookie-state
:samesite :lax))
の様にキーワードで渡してsamesiteキーワードに渡してやればSet-CookieにSameSite=Laxが追加されます.
何も指定しなければNoneになります.
Strictにするには:strictキーワードをどうぞ.
caveman2 projectのproject-name.asdの:depends-on内で"lack.middleware.session"かそれをインポートしているライブラリを指定する必要があるということを書いておくのを忘れていました.
上記の"lack.middleware.session"ではなく"lack-middleware-session"でした.
Excerpt separator can also be extracted from content.
Add excerpt: <string>
to the above metadata.
Excerpt separator is <!--more-->
by default.