summaryrefslogtreecommitdiff
path: root/lisp/service/login-service.lisp
diff options
context:
space:
mode:
authorckonstanski <kostcarl@isu.edu>2026-08-07 19:11:49 -0600
committerckonstanski <kostcarl@isu.edu>2026-08-07 19:11:49 -0600
commit44f7a0a4da7cc45d638e4b64fbf47cb1afc51292 (patch)
treed2fa16893166cd0768ef738fbc37406b94b1aa41 /lisp/service/login-service.lisp
parent2fc46b8c30d92352ca2df49b001ec38817868905 (diff)
lots of react migration
Diffstat (limited to 'lisp/service/login-service.lisp')
-rw-r--r--lisp/service/login-service.lisp5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/service/login-service.lisp b/lisp/service/login-service.lisp
index 5f7dd2c..1b966e2 100644
--- a/lisp/service/login-service.lisp
+++ b/lisp/service/login-service.lisp
@@ -62,3 +62,8 @@
(setf (session-value :errormsg) "Login failed."))))))
(setf (message instance) (session-value :message))
(setf (errormsg instance) (session-value :errormsg))))
+
+(define-endpoint ("/login" :method :get) () login-json)
+(define-endpoint ("/login/authenticate" :method :post) (&post (username :parameter-type 'string) (pwd :parameter-type 'string)) login-authenticate-json username pwd)
+(define-endpoint ("/login/forgot" :method :get) () login-forgot-json)
+(define-endpoint ("/logout" :method :get) () logout-json)