126 lines
		
	
	
	
		
			4 KiB
		
	
	
	
		
			Elixir
		
	
	
	
	
	
			
		
		
	
	
			126 lines
		
	
	
	
		
			4 KiB
		
	
	
	
		
			Elixir
		
	
	
	
	
	
| # Pleroma: A lightweight social networking server
 | |
| # Copyright © 2017-2018 Pleroma Authors <https://pleroma.social/>
 | |
| # SPDX-License-Identifier: AGPL-3.0-only
 | |
| 
 | |
| defmodule Pleroma.InstancesTest do
 | |
|   alias Pleroma.Instances
 | |
| 
 | |
|   use Pleroma.DataCase
 | |
| 
 | |
|   clear_config_all([:instance, :federation_reachability_timeout_days]) do
 | |
|     Pleroma.Config.put([:instance, :federation_reachability_timeout_days], 1)
 | |
|   end
 | |
| 
 | |
|   describe "reachable?/1" do
 | |
|     test "returns `true` for host / url with unknown reachability status" do
 | |
|       assert Instances.reachable?("unknown.site")
 | |
|       assert Instances.reachable?("http://unknown.site")
 | |
|     end
 | |
| 
 | |
|     test "returns `false` for host / url marked unreachable for at least `reachability_datetime_threshold()`" do
 | |
|       host = "consistently-unreachable.name"
 | |
|       Instances.set_consistently_unreachable(host)
 | |
| 
 | |
|       refute Instances.reachable?(host)
 | |
|       refute Instances.reachable?("http://#{host}/path")
 | |
|     end
 | |
| 
 | |
|     test "returns `true` for host / url marked unreachable for less than `reachability_datetime_threshold()`" do
 | |
|       url = "http://eventually-unreachable.name/path"
 | |
| 
 | |
|       Instances.set_unreachable(url)
 | |
| 
 | |
|       assert Instances.reachable?(url)
 | |
|       assert Instances.reachable?(URI.parse(url).host)
 | |
|     end
 | |
| 
 | |
|     test "returns true on non-binary input" do
 | |
|       assert Instances.reachable?(nil)
 | |
|       assert Instances.reachable?(1)
 | |
|     end
 | |
|   end
 | |
| 
 | |
|   describe "filter_reachable/1" do
 | |
|     setup do
 | |
|       host = "consistently-unreachable.name"
 | |
|       url1 = "http://eventually-unreachable.com/path"
 | |
|       url2 = "http://domain.com/path"
 | |
| 
 | |
|       Instances.set_consistently_unreachable(host)
 | |
|       Instances.set_unreachable(url1)
 | |
| 
 | |
|       result = Instances.filter_reachable([host, url1, url2, nil])
 | |
|       %{result: result, url1: url1, url2: url2}
 | |
|     end
 | |
| 
 | |
|     test "returns a map with keys containing 'not marked consistently unreachable' elements of supplied list",
 | |
|          %{result: result, url1: url1, url2: url2} do
 | |
|       assert is_map(result)
 | |
|       assert Enum.sort([url1, url2]) == result |> Map.keys() |> Enum.sort()
 | |
|     end
 | |
| 
 | |
|     test "returns a map with `unreachable_since` values for keys",
 | |
|          %{result: result, url1: url1, url2: url2} do
 | |
|       assert is_map(result)
 | |
|       assert %NaiveDateTime{} = result[url1]
 | |
|       assert is_nil(result[url2])
 | |
|     end
 | |
| 
 | |
|     test "returns an empty map for empty list or list containing no hosts / url" do
 | |
|       assert %{} == Instances.filter_reachable([])
 | |
|       assert %{} == Instances.filter_reachable([nil])
 | |
|     end
 | |
|   end
 | |
| 
 | |
|   describe "set_reachable/1" do
 | |
|     test "sets unreachable url or host reachable" do
 | |
|       host = "domain.com"
 | |
|       Instances.set_consistently_unreachable(host)
 | |
|       refute Instances.reachable?(host)
 | |
| 
 | |
|       Instances.set_reachable(host)
 | |
|       assert Instances.reachable?(host)
 | |
|     end
 | |
| 
 | |
|     test "keeps reachable url or host reachable" do
 | |
|       url = "https://site.name?q="
 | |
|       assert Instances.reachable?(url)
 | |
| 
 | |
|       Instances.set_reachable(url)
 | |
|       assert Instances.reachable?(url)
 | |
|     end
 | |
| 
 | |
|     test "returns error status on non-binary input" do
 | |
|       assert {:error, _} = Instances.set_reachable(nil)
 | |
|       assert {:error, _} = Instances.set_reachable(1)
 | |
|     end
 | |
|   end
 | |
| 
 | |
|   # Note: implementation-specific (e.g. Instance) details of set_unreachable/1
 | |
|   # should be tested in implementation-specific tests
 | |
|   describe "set_unreachable/1" do
 | |
|     test "returns error status on non-binary input" do
 | |
|       assert {:error, _} = Instances.set_unreachable(nil)
 | |
|       assert {:error, _} = Instances.set_unreachable(1)
 | |
|     end
 | |
|   end
 | |
| 
 | |
|   describe "set_consistently_unreachable/1" do
 | |
|     test "sets reachable url or host unreachable" do
 | |
|       url = "http://domain.com?q="
 | |
|       assert Instances.reachable?(url)
 | |
| 
 | |
|       Instances.set_consistently_unreachable(url)
 | |
|       refute Instances.reachable?(url)
 | |
|     end
 | |
| 
 | |
|     test "keeps unreachable url or host unreachable" do
 | |
|       host = "site.name"
 | |
|       Instances.set_consistently_unreachable(host)
 | |
|       refute Instances.reachable?(host)
 | |
| 
 | |
|       Instances.set_consistently_unreachable(host)
 | |
|       refute Instances.reachable?(host)
 | |
|     end
 | |
|   end
 | |
| end
 | 
