2020-12-02 13:33:15 +00:00
|
|
|
open Opium
|
|
|
|
|
|
|
|
|
|
|
2021-01-21 16:51:58 +00:00
|
|
|
let app t =
|
2020-12-02 13:33:15 +00:00
|
|
|
App.empty
|
|
|
|
|
|> App.cmd_name "Builder Web"
|
|
|
|
|
|> Builder_web.add_routes t
|
|
|
|
|
|
|
|
|
|
let () =
|
2021-01-21 16:51:58 +00:00
|
|
|
let () = Mirage_crypto_rng_unix.initialize () in
|
|
|
|
|
let datadir = Fpath.v "/var/db/builder-web/" in
|
2021-02-16 17:33:04 +00:00
|
|
|
match Builder_web.init "/var/db/builder-web/builder.sqlite3" datadir with
|
|
|
|
|
| Error (#Caqti_error.load as e) ->
|
|
|
|
|
Format.eprintf "Error: %a\n" Caqti_error.pp e;
|
|
|
|
|
| Error (#Builder_web.db_error | `Wrong_version _ as e) ->
|
|
|
|
|
Format.eprintf "Error: %a\n" Builder_web.pp_error e;
|
|
|
|
|
exit 1
|
|
|
|
|
| Ok t ->
|
|
|
|
|
App.run_command (app t)
|
