(ns chameleon.server
  (:require [chameleon.config :refer [config]]
            [chameleon.handler :refer [handler]]
            [config.core :refer [env]]
            [org.httpkit.server :refer [run-server]]
            [integrant.core :as ig]
            [chameleon.specs :as cs])
  (:gen-class))

(defn -main [& args]
  (let [port (Integer/parseInt (or (env :http-port) "8082"))
        system-config (read-string (slurp (System/getenv "CONFIG_LOCATION" )))
        event-config (:event-config system-config)
        route-config (:gallifrey-host system-config)
        log-config (:log-config system-config)]
    (println "Listening on port" port)
    (ig/init (config {:event-config event-config
                      :gallifrey-host route-config
                      :http-port port
                      :log-config log-config}))))