From 07b65ca325a7e37a83dc5f7b1b87bf8fc4dbd180 Mon Sep 17 00:00:00 2001 From: Frederik Andersen Date: Wed, 8 Oct 2014 16:00:44 +0200 Subject: [PATCH] test cases for handler --- test/robotwar/handler_test.clj | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 test/robotwar/handler_test.clj diff --git a/test/robotwar/handler_test.clj b/test/robotwar/handler_test.clj new file mode 100644 index 0000000..3db0647 --- /dev/null +++ b/test/robotwar/handler_test.clj @@ -0,0 +1,33 @@ +(ns robotwar.handler-test + (:require [clojure.test :refer :all] + [robotwar.handler :refer :all] + [ring.mock.request :as mock])) + + +(deftest app-handler-test + (testing "program-names" + (let [response (app (mock/request :get "/program-names"))] + (is (= (:status response) 200)) + (is (.contains (:body response) "mover")))) + + (testing "not-found route" + (let [response (app (mock/request :get "/invalid"))] + (is (= (:status response) 404)))) + + (testing "files" + (let [response (app (mock/request :get "/index.html"))] + (is (= (:status response) 200)) + (is (.contains (slurp (:body response)) "Welcome to the future"))) + (let [response (app (mock/request :get "/js/main.js"))] + (is (= (:status response) 200)) + (is (.contains (slurp (:body response)) "function")))) + + (testing "worlds route" + (let [response (app (mock/request :get "/worlds/0/99"))] + (is (= (:status response) 200)) + (is (.contains (:body response) "[")))) + + (testing "init route" + (let [response (app (mock/request :get "/init?programs=mover"))] + (is (= (:status response) 200)) + (is (.contains (:body response) "game-info"))))) \ No newline at end of file