require "../spec_helper"

describe "Kemal::FilterHandler" do
  it "executes code before home request" do
    test_filter = FilterTest.new
    test_filter.modified = "false"

    filter_middleware = Kemal::FilterHandler.new
    filter_middleware._add_route_filter("GET", "/greetings", :before) { test_filter.modified = "true" }

    kemal = Kemal::RouteHandler::INSTANCE
    kemal.add_route "GET", "/greetings" { test_filter.modified }

    test_filter.modified.should eq("false")
    request = HTTP::Request.new("GET", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("true")
  end

  it "executes code before GET home request but not POST home request" do
    test_filter = FilterTest.new
    test_filter.modified = "false"

    filter_middleware = Kemal::FilterHandler.new
    filter_middleware._add_route_filter("GET", "/greetings", :before) { test_filter.modified = test_filter.modified == "true" ? "false" : "true" }

    kemal = Kemal::RouteHandler::INSTANCE
    kemal.add_route "GET", "/greetings" { test_filter.modified }
    kemal.add_route "POST", "/greetings" { test_filter.modified }

    test_filter.modified.should eq("false")

    request = HTTP::Request.new("GET", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("true")

    request = HTTP::Request.new("POST", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("true")
  end

  it "executes code before all GET/POST home request" do
    test_filter = FilterTest.new
    test_filter.modified = "false"

    filter_middleware = Kemal::FilterHandler.new
    filter_middleware._add_route_filter("ALL", "/greetings", :before) { test_filter.modified = test_filter.modified == "true" ? "false" : "true" }
    filter_middleware._add_route_filter("GET", "/greetings", :before) { test_filter.modified = test_filter.modified == "true" ? "false" : "true" }
    filter_middleware._add_route_filter("POST", "/greetings", :before) { test_filter.modified = test_filter.modified == "true" ? "false" : "true" }

    kemal = Kemal::RouteHandler::INSTANCE
    kemal.add_route "GET", "/greetings" { test_filter.modified }
    kemal.add_route "POST", "/greetings" { test_filter.modified }

    test_filter.modified.should eq("false")

    request = HTTP::Request.new("GET", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("false")

    request = HTTP::Request.new("POST", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("false")
  end

  it "executes code after home request" do
    test_filter = FilterTest.new
    test_filter.modified = "false"

    filter_middleware = Kemal::FilterHandler.new
    filter_middleware._add_route_filter("GET", "/greetings", :after) { test_filter.modified = "true" }

    kemal = Kemal::RouteHandler::INSTANCE
    kemal.add_route "GET", "/greetings" { test_filter.modified }

    test_filter.modified.should eq("false")
    request = HTTP::Request.new("GET", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("true")
  end

  it "executes code after GET home request but not POST home request" do
    test_filter = FilterTest.new
    test_filter.modified = "false"

    filter_middleware = Kemal::FilterHandler.new
    filter_middleware._add_route_filter("GET", "/greetings", :after) { test_filter.modified = test_filter.modified == "true" ? "false" : "true" }

    kemal = Kemal::RouteHandler::INSTANCE
    kemal.add_route "GET", "/greetings" { test_filter.modified }
    kemal.add_route "POST", "/greetings" { test_filter.modified }

    test_filter.modified.should eq("false")

    request = HTTP::Request.new("GET", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("true")

    request = HTTP::Request.new("POST", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("true")
  end

  it "executes code after all GET/POST home request" do
    test_filter = FilterTest.new
    test_filter.modified = "false"

    filter_middleware = Kemal::FilterHandler.new
    filter_middleware._add_route_filter("ALL", "/greetings", :after) { test_filter.modified = test_filter.modified == "true" ? "false" : "true" }
    filter_middleware._add_route_filter("GET", "/greetings", :after) { test_filter.modified = test_filter.modified == "true" ? "false" : "true" }
    filter_middleware._add_route_filter("POST", "/greetings", :after) { test_filter.modified = test_filter.modified == "true" ? "false" : "true" }

    kemal = Kemal::RouteHandler::INSTANCE
    kemal.add_route "GET", "/greetings" { test_filter.modified }
    kemal.add_route "POST", "/greetings" { test_filter.modified }

    test_filter.modified.should eq("false")
    request = HTTP::Request.new("GET", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("false")

    request = HTTP::Request.new("POST", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("false")
  end

  it "executes 3 differents blocks after all request" do
    test_filter = FilterTest.new
    test_filter.modified = "false"
    test_filter_second = FilterTest.new
    test_filter_second.modified = "false"
    test_filter_third = FilterTest.new
    test_filter_third.modified = "false"

    filter_middleware = Kemal::FilterHandler.new
    filter_middleware._add_route_filter("ALL", "/greetings", :before) { test_filter.modified = test_filter.modified == "true" ? "false" : "true" }
    filter_middleware._add_route_filter("ALL", "/greetings", :before) { test_filter_second.modified = test_filter_second.modified == "true" ? "false" : "true" }
    filter_middleware._add_route_filter("ALL", "/greetings", :before) { test_filter_third.modified = test_filter_third.modified == "true" ? "false" : "true" }

    kemal = Kemal::RouteHandler::INSTANCE
    kemal.add_route "GET", "/greetings" { test_filter.modified }
    kemal.add_route "POST", "/greetings" { test_filter_second.modified }
    kemal.add_route "PUT", "/greetings" { test_filter_third.modified }

    test_filter.modified.should eq("false")
    test_filter_second.modified.should eq("false")
    test_filter_third.modified.should eq("false")
    request = HTTP::Request.new("GET", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("true")

    request = HTTP::Request.new("POST", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("false")

    request = HTTP::Request.new("PUT", "/greetings")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("true")
  end

  it "executes code before and after request" do
    before_filter = FilterTest.new
    before_filter.modified = "false"

    after_filter = FilterTest.new
    after_filter.modified = "false"

    filter_middleware = Kemal::FilterHandler.new
    filter_middleware._add_route_filter("ALL", "*", :before) { before_filter.modified = "true" }
    filter_middleware._add_route_filter("ALL", "*", :after) { after_filter.modified = "true" }

    kemal = Kemal::RouteHandler::INSTANCE
    kemal.add_route "GET", "/" { "#{before_filter.modified}-#{after_filter.modified}" }

    before_filter.modified.should eq("false")
    after_filter.modified.should eq("false")

    request = HTTP::Request.new("GET", "/")
    create_request_and_return_io_and_context(filter_middleware, request)
    io_with_context = create_request_and_return_io_and_context(kemal, request)[0]
    client_response = HTTP::Client::Response.from_io(io_with_context, decompress: false)
    client_response.body.should eq("true-true")
  end
end

class FilterTest
  property modified : String?
end