namespace DredgePos

open DredgePos
open Saturn
open Giraffe

module Program =
    let router = router {
        pipe_through Ajax.Router.pipeline
        not_found_handler (setStatusCode 404 >=> text "404")
        get "/" (redirectTo true "/login")
        forward "/ajax" Ajax.Router.router
        forward "/floorplan" DredgePos.Floorplan.Router.router
        forward "/order" DredgePos.OrderScreen.Router.router
        forward "/login" DredgePos.Authenticate.Router.router
        forward "/reservations" DredgePos.Reservations.Router.router
        forward "/install" DredgePos.Installer.Router.router
    }

    let app = application {
        use_mime_types [(".woff", "application/font-woff")]
        use_static "wwwroot"
        use_router router
        url "http://0.0.0.0:5001"
    }

    run app