; 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))))