You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
data-test/test/src/data_test/loader_test.clj

74 lines
3.0 KiB
Clojure

; Licensed to the Apache Software Foundation (ASF) under one
; or more contributor license agreements. See the NOTICE file
; distributed with this work for additional information
; regarding copyright ownership. The ASF licenses this file
; to you under the Apache License, Version 2.0 (the
; "License"); you may not use this file except in compliance
; with the License. You may obtain a copy of the License at
;
; http://www.apache.org/licenses/LICENSE-2.0
;
; Unless required by applicable law or agreed to in writing, software
; distributed under the License is distributed on an "AS IS" BASIS,
; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
; See the License for the specific language governing permissions and
; limitations under the License.
(ns data-test.loader-test
(:require
[clojure.test :refer :all]
[clojure.java.io :as io]
[data-test.loader :as sut]))
(deftest should-read-test-data-spec
(is (= {:input "test"
:expected true}
(sut/read-test-data-spec (io/resource "simple_aero.edn"))))
(is (= {:references {:to-be-refernced "ref-test"}, :input "ref-test", :expected "ref-test"}
(sut/read-test-data-spec (io/resource "tagged_aero.edn"))))
(is (thrown? RuntimeException
(sut/read-test-data-spec (io/resource "aero_with_deserialization_issue.edn")))))
(deftest should-calculate-data-test-spec-file-prefix
(is (= "data_test/loader_test/test_it"
(sut/data-test-spec-file-prefix ::test-it))))
(deftest should-list-all-posible-resources
(is (= '("data_test/loader_test/test_it.edn"
"data_test/loader_test/test_it.0.edn"
"data_test/loader_test/test_it.1.edn"
"data_test/loader_test/test_it.2.edn"
"data_test/loader_test/test_it.3.edn"
"data_test/loader_test/test_it.4.edn"
"data_test/loader_test/test_it.5.edn"
"data_test/loader_test/test_it.6.edn"
"data_test/loader_test/test_it.7.edn"
"data_test/loader_test/test_it.8.edn"
"data_test/loader_test/test_it.9.edn")
(sut/data-test-spec-file-names ::test-it))))
(deftest should-load-data
(is (= {:input "data"
:expectation true
:data-spec-file "data_test/loader_test/test_it.edn"}
(sut/load-data-test-spec (str (sut/data-test-spec-file-prefix ::test-it) ".edn")))))
(deftest should-not-load-non-existing-data
(is (= nil
(sut/load-data-test-spec (str (sut/data-test-spec-file-prefix ::not-existing) ".edn")))))
(deftest should-load-data-test-specs
(is (= [{:input "data"
:expectation true
:data-spec-file "data_test/loader_test/test_it.edn"}
{:input "data1"
:expectation true
:data-spec-file "data_test/loader_test/test_it.1.edn"}
{:input "data9"
:expectation true
:data-spec-file "data_test/loader_test/test_it.9.edn"}]
(sut/load-data-test-specs ::test-it))))
(deftest should-throw-exception
(is (thrown? RuntimeException
(sut/load-data-test-specs ::not-existing))))