User authentication and session management for web applications
Upgrade to ocamlformat 0.29.0; fix csvt/sexpt streaming; reformat
- Update .ocamlformat to 0.29.0 across all 591 files
- csvt: reuse single Buffer.t for field reads (no alloc per field)
- sexpt: Obj members decoded from stream into Dict, typed Variant GADT
- Reformat all source files for 0.29.0
+14
-14
+14
-14
lib/auth.mli
+14
-14
lib/auth.mli
···
26
26
{2 Quick start}
27
27
28
28
{[
29
-
Eio_main.run @@ fun env ->
30
-
Eio.Switch.run @@ fun sw ->
31
-
let fs = Eio.Stdenv.fs env in
32
-
let http = Requests.v ~sw env in
33
-
let store = Auth.Store.v ~sw Eio.Path.(fs / "data" / "auth.db") in
34
-
let cfg =
35
-
Auth.config ~oauth_provider:Oauth.Github ~client_id:"Iv1.abc"
36
-
~client_secret:"secret" ~base_url:"https://app.com"
37
-
~cookie_secret:"32-char-min" ~http
38
-
in
39
-
let routes = Auth.routes cfg store in
40
-
Respond.run ~net:(Eio.Stdenv.net env) ~port:8080
41
-
~root:Eio.Path.(fs / "static")
42
-
routes
29
+
Eio_main.run @@ fun env ->
30
+
Eio.Switch.run @@ fun sw ->
31
+
let fs = Eio.Stdenv.fs env in
32
+
let http = Requests.v ~sw env in
33
+
let store = Auth.Store.v ~sw Eio.Path.(fs / "data" / "auth.db") in
34
+
let cfg =
35
+
Auth.config ~oauth_provider:Oauth.Github ~client_id:"Iv1.abc"
36
+
~client_secret:"secret" ~base_url:"https://app.com"
37
+
~cookie_secret:"32-char-min" ~http
38
+
in
39
+
let routes = Auth.routes cfg store in
40
+
Respond.run ~net:(Eio.Stdenv.net env) ~port:8080
41
+
~root:Eio.Path.(fs / "static")
42
+
routes
43
43
]}
44
44
45
45
{2 Session lifecycle}