(ns shapey-shifty.test.handler
  (:require
   [clojure.test :refer :all]
   [ring.mock.request :refer :all]
   [shapey-shifty.handler :refer :all]
   [shapey-shifty.middleware.formats :as formats]
   [muuntaja.core :as m]
   [mount.core :as mount]))

(defn parse-json [body]
  (m/decode formats/instance "application/json" body))

(use-fixtures
  :once
  (fn [f]
    (mount/start #'shapey-shifty.config/env
                 #'shapey-shifty.handler/app-routes)
    (f)))

(deftest test-app
  (testing "main route"
    (let [response ((app) (request :get "/"))]
      (is (= 200 (:status response)))))

  (testing "not-found route"
    (let [response ((app) (request :get "/invalid"))]
      (is (= 404 (:status response))))))