hiro/lack
1
0
Fork 0
mirror of https://github.com/vale981/lack synced 2025-03-04 17:01:41 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Validate session ID.

Browse source
This commit is contained in:
Eitaro Fukamachi 2015-03-22 21:41:30 +09:00
parent 06d0021da7
commit 7106525601
1 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/middleware/session/state.lisp
View file

@ -25,6 +25,11 @@
(funcall (state-sid-generator state) env))
(defgeneric extract-sid (state env))
(defmethod extract-sid :around ((state state) env)
(let ((sid (call-next-method)))
(when (and sid
(funcall (state-sid-validator state) sid))
sid)))
(defgeneric expire-state (state sid res options))