epgsql_pool_tests.erl 1.1 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243
  1. -module(epgsql_pool_tests).
  2. -include("epgsql_pool.hrl").
  3. -include_lib("eunit/include/eunit.hrl").
  4. -spec get_set_settings_test() -> ok.
  5. get_set_settings_test() ->
  6. application:ensure_all_started(epgsql_pool),
  7. ?assertMatch(#{
  8. connection_timeout := 10000,
  9. keep_alive_timeout := 60000,
  10. max_reconnect_timeout := 5000,
  11. min_reconnect_timeout := 100,
  12. pooler_get_worker_timeout := 10000,
  13. pooler_max_queue := 1000,
  14. query_timeout := 10000,
  15. transaction_timeout := 20000
  16. }, epgsql_pool:get_settings()),
  17. ok = epgsql_pool:set_settings(#{
  18. aa => bb,
  19. pooler_max_queue => 500,
  20. cc => dd,
  21. max_reconnect_timeout => 777,
  22. min_reconnect_timeout => 42,
  23. dd => 42,
  24. query_timeout => 555
  25. }),
  26. ?assertMatch(#{
  27. connection_timeout := 10000,
  28. keep_alive_timeout := 60000,
  29. max_reconnect_timeout := 777,
  30. min_reconnect_timeout := 42,
  31. pooler_get_worker_timeout := 10000,
  32. pooler_max_queue := 500,
  33. query_timeout := 555,
  34. transaction_timeout := 20000
  35. }, epgsql_pool:get_settings()),
  36. ok.