# This file is a part of JuliaFEM.
# License is MIT: see https://github.com/JuliaFEM/JuliaFEM.jl/blob/master/LICENSE.md

using JuliaFEM
using FactCheck
using Logging
@Logging.configure(level=DEBUG)


facts("Testing if somebody used print, println(), @sprint in src directory") do
  # TODO: make better reqular expression. Currently it will match all print words
  lines_with_print = Dict()
  src_dir = "../src"
  src = readdir(src_dir)
  for file_name in src
    fil = open(joinpath(src_dir,file_name),"r")
    for (line_number,line) in enumerate(readlines(fil))
      if ismatch(r"print",line)
        lines_with_print[file_name * ":$line_number"] = "print found in line: $line_number"
      end
    end
    close(fil)
  end
  @fact lines_with_print => isempty "Instead of println() use Logging.jl package"
end

facts("Testing if we have non ascii characters in the src files") do
  lines_with_non_ascii = []
  src_dir = "../src"
  src = readdir(src_dir)
  for file_name in src
    fil = open(joinpath(src_dir,file_name),"r")
    for (line_number,line) in enumerate(readlines(fil))
      if ismatch(r"[^\x00-\x7F]",line)
        push!(lines_with_non_ascii, file_name * ":line $line_number")
      end
    end
    close(fil)
  end
  @fact lines_with_non_ascii => isempty "non ascii charecters found in src -> test is failing"
end

facts("Looking the [src,test] folders *.jl files header information") do
  files_no_license = []
  dirs = [".";"../src"]
  for folder in dirs
    for file_name in readdir(folder)
      if file_name[end-2:end] == ".jl"
        fil = open(joinpath(folder,file_name),"r")
        head = readall(fil)
      else
        continue
      end
      if ~ismatch(r"This file is a part of JuliaFEM",head)
        push!(files_no_license,"$file_name is missing JuliaFEM statement")
      end
      if ~ismatch(r"MIT",head)
        push!(files_no_license,"$file_name is missing MIT statement")
      end
      if ~ismatch(r"https://github.com/JuliaFEM/JuliaFEM.jl/blob/master/LICENSE.md",head)
        push!(files_no_license,"$file_name is missing reference to LICENSE.md")
      end
      close(fil)
    end
  end
  out_str = """License information missing or incorrect. Please use these two lines in the beginning of each file:

# This file is a part of JuliaFEM.
# License is MIT: see https://github.com/JuliaFEM/JuliaFEM.jl/blob/master/LICENSE.md

  """
  @fact files_no_license => isempty out_str
end

#function test_get_element()
#    m = new_model()
#    nodes = Dict(1 => [0.0, 0.0, 0.0],
#                 2 => [1.0, 0.0, 0.0],
#                 3 => [0.0, 1.0, 0.0],
#                 4 => [0.0, 0.0, 1.0])
#    add_nodes(m, nodes)
#    el1 = Dict("element_type" => 0x6, "node_ids" => [1, 2, 3, 4])
#    el2 = Dict("element_type" => 0x6, "node_ids" => [4, 3, 2, 1])
#    elements = Dict(1 => el1, 2 => el2)
#    #println(elements)
#    add_elements(m, elements)
#    #println(m)
#    # get elements by element id
#    els = get_elements(m, [1])
#    #println(els)
#    @test length(els) == 1
#    @test 1 in keys(els)
#    @test els[1]["element_type"] == 0x6
#    @test els[1]["node_ids"] == [1, 2, 3, 4]
#end
#test_get_element()



# include("test_xdmf.jl")
# include("solver_tests/test_elasticity_solver.jl")
# include("test_model.jl")

include("test_elasticity_solver.jl")

# Keep this at the end of this file (include statements above this)
@debug("Let's print the summary of the tests")
for dic in FactCheck.getstats()
  @debug(dic[1], ": ",dic[2])
end